TAB_CANVAS使用总结(转)

http://www.cnblogs.com/lfx0692/articles/2413913.html

1. 建立Window,canvas，block为order，其canvas为Conent Canvas
2. 建立TAB_CANVAS为LINE_CHOICE,并带有3个Tab pages分别为： LINE_ORDER,LINE_DATE,LINE_QTY
3. 建立CANVAS_STACKED_FIXED_FIELD为LINE_FIXED,并把需要固定的项如 CURRENT_RECORD_INDICATOR, ITEM,Scroll Bar显示在此画布上
4. 建立CANVAS_STACKED为LINE_ORDER,LINE_DATE,LINE_QTY,并把相应数据项分别置于各自的画布 其中LINE_ORDER为现实第一堆叠画面，Visible为Yes，LINE_DATE和LINE_QTY其Visible为No
5. 以上所有的画布其Window为：order，建立按以上顺序建立，并按以上顺序堆叠，其大小顺序为
order>LINE_CHOICE>LINE_FIXED>LINE_ORDER=LINE_DATE=LINE_QTY
6. 从服务器上下载FND_TOP/resource文件FNDTABS.txt or FNDTABFF.txt
7. 修改文件FNDTABFF.txt,在program Units建立MY_TAB包
8. 在WHEN-TAB-PAGE-CHANGED，WHEN-NEW-ITEM-INSTANCE，KEY-CLRFRM调用此包MY_TAB.tab_entity_regions

PACKAGE MY_TAB IS
PROCEDURE tab_entity_regions(event VARCHAR2);
END;

PACKAGE BODY MY_TAB IS
PROCEDURE tab_entity_regions(event VARCHAR2) IS

/* --------------------------------------------------------------------
$Header: fndtabff.txt 115.2.1150.2 2000/02/21 14:45:16 pkm ship $
+======================================================================+
| Copyright (c) 1999 Oracle Corporation Redwood Shores, California, USA|
| All rights reserved. |
+======================================================================+
This is a template of the control procedure for Tab Regions. Import 
into your form program unit (package) and MODIFY as appropriate for
YOUR form, canvas, block, item, and other names. Be sure to call your
handler from the appropriate triggers.

This template handles the more complex case where you have a multi-row
tab region with one or more fixed fields (such as current record 
indicators, block scrollbars and other fixed fields), which appear on a
stacked canvas, and one or more sets of fields that appear on additional
stacked canvases. 

Names of corresponding stacked canvases and tab pages must match.

Modify the following variables/names (in order of appearance):
tab_entity_regions -- name of the procedure
TAB_ENTITY_REGIONS -- name of the entire tab canvas
MY_BLOCKNAME -- name of the block 
MY_FIRST_ALT_REG_CANVAS -- name of first stacked canvas containing 
"alternative" (non-fixed) fields
TAB_ENTITY_REGIONS_FIXED -- name of stacked canvas containing fixed fields
FIRST_ALT_REG_FIRST_FIELD -- name of first (enterable/queryable) field on 
first "alternative" (non-fixed) stacked canvas
MY_SECOND_ALT_REG_CANVAS -- name of second stacked canvas containing 
non-fixed fields
SECOND_ALT_REG_FIRST_FIELD -- name of first (enterable/queryable) field on 
second "alternative" (non-fixed) stacked canvas
MY_THIRD_ALT_REG_CANVAS -- name of third stacked canvas containing 
non-fixed fields
THIRD_ALT_REG_FIRST_FIELD -- name of first (enterable/queryable) field on 
third "alternative" (non-fixed) stacked canvas

----------------------------------------------------------------------
*/

/*-------------------------------------------------------+
| Tab Handler for one set of Alternative Regions (Tabs).|
| Called from form-level WHEN-TAB-PAGE-CHANGED and |
| block-level WHEN-NEW-ITEM-INSTANCE triggers (passing |
| EVENT) |
+-------------------------------------------------------*/
target_canvas_name VARCHAR2(30) := name_in('system.tab_new_page');
curr_canvas_name VARCHAR2(30) := get_item_property(
name_in('system.cursor_item'),
item_canvas);
current_tab VARCHAR2(30) := get_canvas_property('HEADER_CHOICE',
topmost_tab_page);

BEGIN

IF (event = 'WHEN-TAB-PAGE-CHANGED') THEN

---------ORDER LINES

if name_in('system.cursor_block') = 'ORDER_LINES_V' then 
--
-- Process the 'First' tab specially. if the cursor is already
-- on a field on the 'Fixed' canvas then we merely show the other
-- stacked canvas; otherwise, we move the cursor to the first 
-- item on it.
--
if target_canvas_name = 'LINE_ORDER' then
if curr_canvas_name = 'LINE_FIXED' then
show_view(target_canvas_name); 
go_item(name_in('system.cursor_item')); 
-- move focus off the tab itself
else
validate(item_scope);
if not form_success then
--
-- Revert tab to prior value and exit
--
set_canvas_property('LINE_CHOICE', topmost_tab_page, 
name_in('system.tab_previous_page'));
return;
end if;
show_view('LINE_ORDER'); 
-- display first stacked canvas
go_item('ORDER_LINES_V.ITEM_DESC'); 
-- go to first item on that stacked canvas
end if;
else
validate(item_scope);
if not form_success then
--
-- Revert tab to prior value and exit
--
set_canvas_property('LINES_CHOICE', topmost_tab_page, 
name_in('system.tab_previous_page'));
return;
end if;
--
-- Move to first item on each additional (non-first) tab
--
if target_canvas_name = 'LINE_DATE' then
go_item('ORDER_LINES_V.CREATION_DATE');
elsif target_canvas_name = 'LINE_QTY' then
go_item('ORDER_LINES_V.ORDERED_QUANTITY');
end if;
end if;
else
show_view(target_canvas_name);
end if;


ELSIF (event = 'WHEN-NEW-ITEM-INSTANCE') THEN

if ((curr_canvas_name in ('HEADER_ORDER',
'HEADER_CUSTOMER')) and
(curr_canvas_name != current_tab)) then
set_canvas_property('HEADER_CHOICE', topmost_tab_page, 
curr_canvas_name);
end if;

if ((curr_canvas_name in ('LINE_ORDER',
'LINE_DATE','LINE_QTY')) and
(curr_canvas_name != current_tab)) then
set_canvas_property('LINE_CHOICE', topmost_tab_page, 
curr_canvas_name);
end if;

ELSE
app_exception.invalid_argument('ORDER_LINES_V.LINE_CHOICE',
'EVENT', event);
END IF;

END tab_entity_regions;

END;