40: select icx_pages_s.nextval
41: into l_page_id
42: from sys.dual;
43:
44: l_main_region_id := icx_api_region.create_main_region;
45: --added substr() to p_page_name 1388074 mputman
46: ICX_PAGES_PKG.INSERT_ROW(
47: x_rowid => l_rowid,
48: x_page_id => l_page_id,
170: select icx_pages_s.nextval
171: into l_to_page_id
172: from sys.dual;
173:
174: l_to_main_region_id := icx_api_region.create_main_region;
175:
176: ICX_PAGES_PKG.INSERT_ROW(
177: x_rowid => l_rowid,
178: x_page_id => l_to_page_id,
212: procedure copyPagePrivate(p_from_main_region_id in number,
213: p_to_main_region_id in number,
214: p_to_page_id in number) is
215:
216: l_from_region icx_api_region.region_record;
217: l_to_region icx_api_region.region_record;
218: l_child_region_count number;
219:
220: begin
213: p_to_main_region_id in number,
214: p_to_page_id in number) is
215:
216: l_from_region icx_api_region.region_record;
217: l_to_region icx_api_region.region_record;
218: l_child_region_count number;
219:
220: begin
221:
218: l_child_region_count number;
219:
220: begin
221:
222: l_from_region := icx_api_region.get_main_region_record(p_from_main_region_id);
223: l_to_region := icx_api_region.get_main_region_record(p_to_main_region_id);
224:
225: l_to_region.split_mode := l_from_region.split_mode;
226: l_to_region.width := l_from_region.width;
219:
220: begin
221:
222: l_from_region := icx_api_region.get_main_region_record(p_from_main_region_id);
223: l_to_region := icx_api_region.get_main_region_record(p_to_main_region_id);
224:
225: l_to_region.split_mode := l_from_region.split_mode;
226: l_to_region.width := l_from_region.width;
227: l_to_region.height := l_from_region.height;
229: l_to_region.width_restrict := l_from_region.width_restrict;
230: l_to_region.portlet_flow := l_from_region.portlet_flow;
231: l_to_region.navwidget_id := l_from_region.navwidget_id;
232:
233: icx_api_region.edit_region(l_to_region);
234:
235: icx_api_region.copy_child_regions(l_from_region.region_id,
236: l_to_region.region_id,
237: p_to_page_id);
231: l_to_region.navwidget_id := l_from_region.navwidget_id;
232:
233: icx_api_region.edit_region(l_to_region);
234:
235: icx_api_region.copy_child_regions(l_from_region.region_id,
236: l_to_region.region_id,
237: p_to_page_id);
238: end copyPageprivate;
239:
575: ------------------------------------------------------------------------------
576: procedure render( p_page_id in number,
577: p_region_id in number,
578: p_user in number,
579: p_regionid in icx_api_region.array,
580: p_portletid in icx_api_region.array,
581: p_mode in number,
582: p_height in number,
583: p_width in number)
576: procedure render( p_page_id in number,
577: p_region_id in number,
578: p_user in number,
579: p_regionid in icx_api_region.array,
580: p_portletid in icx_api_region.array,
581: p_mode in number,
582: p_height in number,
583: p_width in number)
584:
582: p_height in number,
583: p_width in number)
584:
585: as
586: l_region icx_api_region.region_record;
587: l_style_id number := -1;
588: start_time number;
589: end_time number;
590:
688: where session_id = icx_sec.g_session_id;
689: commit;
690: end if;
691:
692: l_region := icx_api_region.get_main_region_record(p_region_id);
693:
694: --insert into icx_testing values ('region record id ' || to_char(l_region.region_id));
695: --commit;
696:
710:
711: -- ***********************************************
712: -- procedure renderregion
713: -- ***********************************************
714: procedure renderregion (p_region in icx_api_region.region_record,
715: p_page_id in number,
716: p_styleid in number,
717: p_user in varchar2,
718: p_regionid in icx_api_region.array ,
714: procedure renderregion (p_region in icx_api_region.region_record,
715: p_page_id in number,
716: p_styleid in number,
717: p_user in varchar2,
718: p_regionid in icx_api_region.array ,
719: p_portletid in icx_api_region.array ,
720: p_mode in number ,
721: p_height in number ,
722: p_width in number ) as
715: p_page_id in number,
716: p_styleid in number,
717: p_user in varchar2,
718: p_regionid in icx_api_region.array ,
719: p_portletid in icx_api_region.array ,
720: p_mode in number ,
721: p_height in number ,
722: p_width in number ) as
723:
724: l_height number := p_height;
725: l_border number := 0;
726: l_cellspacing number := BORDER_WIDTH;
727: l_cellpadding number := CELL_PADDING;
728: l_region_list icx_api_region.region_table;
729: l_str varchar2(32767) := null;
730: l_agent varchar2(80);
731: l_start number;
732:
780: -- REGION IS SPLIT HORIZONTALLY, SO DRAW ROWS FOR EACH CHILD
781: -- AND THEN CALL RENDERREGION FOR EACH CHILD
782: ------------------------------------------------------------
783:
784: if (p_region.split_mode = ICX_API_REGION.REGION_HORIZONTAL_SPLIT) then
785:
786: if (p_mode = DISPLAY_PORTLETS) then
787:
788: l_region_list := icx_api_region.get_child_region_list(p_region.region_id);
784: if (p_region.split_mode = ICX_API_REGION.REGION_HORIZONTAL_SPLIT) then
785:
786: if (p_mode = DISPLAY_PORTLETS) then
787:
788: l_region_list := icx_api_region.get_child_region_list(p_region.region_id);
789: for i in 1..l_region_list.count
790: loop
791: renderregion(l_region_list(i), p_page_id, p_styleid, p_user,
792: p_regionid, p_portletid, p_mode, l_height, p_width);
792: p_regionid, p_portletid, p_mode, l_height, p_width);
793: end loop;
794: else
795:
796: l_region_list := icx_api_region.get_child_region_list(p_region.region_id);
797: htp.p('
'); 822: renderregion(l_region_list(i), p_page_id, p_styleid, p_user, p_regionid, p_portletid, Line 836: if (p_region.parent_region_id = ICX_API_REGION.MAIN_REGION) then |
'); 840: end if; Line 846: if (p_region.parent_region_id = ICX_API_REGION.MAIN_REGION) then | ');
953: p_page_id number ) is
954:
955: l_url varchar2(1000) := null;
956: l_str varchar2(32767) := null;
957: l_region icx_api_region.region_record;
958: l_agent varchar2(80);
959:
960: begin
961:
1009: l_button1 icxui_api_button;
1010: l_button2 icxui_api_button;
1011: l_button_list icxui_api_button_list;
1012:
1013: l_region icx_api_region.region_record;
1014: l_agent varchar2(80);
1015: l_prompt varchar2(240);
1016:
1017: begin
1019: if icx_sec.validateSession
1020: then
1021: l_agent := FND_WEB_CONFIG.WEB_SERVER || icx_plug_utilities.getPLSQLagent;
1022: -- Get the region properties
1023: l_region := icx_api_region.get_region(p_region_id);
1024:
1025: -- HTML Open
1026: htp.htmlOpen;
1027:
1176: )
1177:
1178: is
1179:
1180: l_region icx_api_region.region_record;
1181: l_width_num number := 0;
1182:
1183: begin
1184:
1183: begin
1184:
1185: if UPPER(p_action) = 'APPLY' then
1186:
1187: l_region := icx_api_region.get_region(p_region_id);
1188:
1189: -- Region width needs to a numeric value
1190: begin
1191: l_width_num := to_number(p_region_width);
1207: l_region.border := p_region_border;
1208:
1209: -- Edit the region properties
1210: begin
1211: icx_api_region.edit_region(l_region);
1212: exception
1213: when OTHERS then
1214: htp.p(SQLERRM);
1215: end;
1237: --insert into icx_testing values ('split mode ' || to_char(p_split_mode));
1238: --insert into icx_testing values ('page id ' || to_char(p_page_id));
1239:
1240: begin
1241: icx_api_region.split_region(p_region_id, p_split_mode);
1242: exception
1243: when OTHERS then
1244: htp.p(SQLERRM);
1245: end;
1263: begin
1264:
1265: -- Delete the Region
1266: begin
1267: icx_api_region.delete_region(p_region_id);
1268: exception
1269: when OTHERS then
1270: htp.p(SQLERRM);
1271: end;
1449: l_btn_list icxui_api_button_list;
1450:
1451: l_index number := 1;
1452:
1453: -- type icx_api_region.array is table of varchar2(2000)
1454: l_leftnames icx_api_region.array := icx_api_region.empty;
1455: l_leftids icx_api_region.array := icx_api_region.empty;
1456: l_rightnames icx_api_region.array := icx_api_region.empty;
1457: l_rightids icx_api_region.array := icx_api_region.empty;
1450:
1451: l_index number := 1;
1452:
1453: -- type icx_api_region.array is table of varchar2(2000)
1454: l_leftnames icx_api_region.array := icx_api_region.empty;
1455: l_leftids icx_api_region.array := icx_api_region.empty;
1456: l_rightnames icx_api_region.array := icx_api_region.empty;
1457: l_rightids icx_api_region.array := icx_api_region.empty;
1458:
1451: l_index number := 1;
1452:
1453: -- type icx_api_region.array is table of varchar2(2000)
1454: l_leftnames icx_api_region.array := icx_api_region.empty;
1455: l_leftids icx_api_region.array := icx_api_region.empty;
1456: l_rightnames icx_api_region.array := icx_api_region.empty;
1457: l_rightids icx_api_region.array := icx_api_region.empty;
1458:
1459: l_agent varchar2(80);
1452:
1453: -- type icx_api_region.array is table of varchar2(2000)
1454: l_leftnames icx_api_region.array := icx_api_region.empty;
1455: l_leftids icx_api_region.array := icx_api_region.empty;
1456: l_rightnames icx_api_region.array := icx_api_region.empty;
1457: l_rightids icx_api_region.array := icx_api_region.empty;
1458:
1459: l_agent varchar2(80);
1460:
1453: -- type icx_api_region.array is table of varchar2(2000)
1454: l_leftnames icx_api_region.array := icx_api_region.empty;
1455: l_leftids icx_api_region.array := icx_api_region.empty;
1456: l_rightnames icx_api_region.array := icx_api_region.empty;
1457: l_rightids icx_api_region.array := icx_api_region.empty;
1458:
1459: l_agent varchar2(80);
1460:
1461: cursor options is
1655: p_selectedlist in varchar2
1656: )
1657: as
1658:
1659: l_rightids icx_api_region.array := icx_api_region.empty;
1660: l_rightid_details icx_api_region.array := icx_api_region.empty;
1661: l_instanceid number;
1662: l_old_plug_indicator varchar2(30);
1663: l_oldrightids icx_api_region.array := icx_api_region.empty;
1656: )
1657: as
1658:
1659: l_rightids icx_api_region.array := icx_api_region.empty;
1660: l_rightid_details icx_api_region.array := icx_api_region.empty;
1661: l_instanceid number;
1662: l_old_plug_indicator varchar2(30);
1663: l_oldrightids icx_api_region.array := icx_api_region.empty;
1664: l_index number;
1659: l_rightids icx_api_region.array := icx_api_region.empty;
1660: l_rightid_details icx_api_region.array := icx_api_region.empty;
1661: l_instanceid number;
1662: l_old_plug_indicator varchar2(30);
1663: l_oldrightids icx_api_region.array := icx_api_region.empty;
1664: l_index number;
1665: l_old_plug_id number;
1666: l_preserve_plug boolean := FALSE;
1667: temp_str varchar2(2000);
1924: -- *********************************************************
1925: -- csvtoarray
1926: -- *********************************************************
1927:
1928: -- splits a comma-separated variable list into a icx_api_region.array
1929: -- e.g. 'value,value,value,value'
1930: function csvtoarray( p_variables in varchar2 ) return icx_api_region.array
1931: as
1932: v_start number;
1926: -- *********************************************************
1927:
1928: -- splits a comma-separated variable list into a icx_api_region.array
1929: -- e.g. 'value,value,value,value'
1930: function csvtoarray( p_variables in varchar2 ) return icx_api_region.array
1931: as
1932: v_start number;
1933: v_end number;
1934: v_index number;
1931: as
1932: v_start number;
1933: v_end number;
1934: v_index number;
1935: v_variables icx_api_region.array;
1936: begin
1937: v_index := 1;
1938: v_start := 1;
1939: if p_variables is null then
1936: begin
1937: v_index := 1;
1938: v_start := 1;
1939: if p_variables is null then
1940: return icx_api_region.empty;
1941: end if;
1942: loop
1943: v_end := instr( p_variables, ',', 1, v_index );
1944: if v_end = 0 then
1962: -- *********************************************************
1963:
1964: -- converts a table of varchars to a list of comma-separated items
1965: -- e.g. 'value,value,value,value'
1966: function arraytocsv( p_array in icx_api_region.array ) return varchar2
1967: as
1968: v_csv varchar2(10000) := '';
1969: begin
1970: if p_array.count = 0 then