12: cursor c_delete(p_info_type_basis in VARCHAR2) is
13: select bbi.bld_blk_info_type_id
14: from hxc_mapping_comp_usages mcu,
15: hxc_mapping_components mc,
16: hxc_bld_blk_info_types bbi
17: where mcu.mapping_component_id = mc.mapping_component_id
18: and mc.bld_blk_info_type_id = bbi.bld_blk_info_type_id
19: and upper(bld_blk_info_type) like '%'||p_info_type_basis||'%';
20:
17: where mcu.mapping_component_id = mc.mapping_component_id
18: and mc.bld_blk_info_type_id = bbi.bld_blk_info_type_id
19: and upper(bld_blk_info_type) like '%'||p_info_type_basis||'%';
20:
21: l_bld_blk_info_type_id HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE_ID%TYPE;
22:
23: BEGIN
24:
25: open c_delete(p_info_type_basis);
141:
142: END add_comp_to_proc;
143:
144: PROCEDURE include_mapping_components
145: (p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE)
146: IS
147:
148:
149: cursor c_map_comp(
146: IS
147:
148:
149: cursor c_map_comp(
150: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
151: ) is
152: select mc.mapping_component_id
153: from hxc_mapping_components mc,
154:
151: ) is
152: select mc.mapping_component_id
153: from hxc_mapping_components mc,
154:
155: hxc_bld_blk_info_types bbit
156: where upper(bbit.bld_blk_info_type) like '%'||upper(p_info_type_basis)||'%'
157: and bbit.bld_blk_info_type_id = mc.bld_blk_info_type_id;
158:
159:
189:
190: END include_mapping_components;
191:
192: PROCEDURE remove_mapping_component(
193: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE)
194: IS
195:
196: cursor c_map_comp(
197: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
193: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE)
194: IS
195:
196: cursor c_map_comp(
197: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
198: ) is
199: select mc.mapping_component_id
200: from hxc_mapping_components mc,
201: hxc_bld_blk_info_types bbit
197: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
198: ) is
199: select mc.mapping_component_id
200: from hxc_mapping_components mc,
201: hxc_bld_blk_info_types bbit
202: where upper(bbit.bld_blk_info_type) like '%'||upper(p_info_type_basis)||'%'
203: and bbit.bld_blk_info_type_id = mc.bld_blk_info_type_id;
204:
205: BEGIN
229:
230: END remove_mapping_component;
231:
232: PROCEDURE remove_bld_blk_usage(
233: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE)
234: IS
235:
236: cursor c_bld_blk_usage(
237: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
233: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE)
234: IS
235:
236: cursor c_bld_blk_usage(
237: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
238: ) is
239: select bbu.bld_blk_info_type_usage_id
240: from hxc_bld_blk_info_type_usages bbu,
241: hxc_bld_blk_info_types bbit
237: p_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
238: ) is
239: select bbu.bld_blk_info_type_usage_id
240: from hxc_bld_blk_info_type_usages bbu,
241: hxc_bld_blk_info_types bbit
242: where upper(bbit.bld_blk_info_type) like '%'||upper(p_info_type_basis)||'%'
243: and bbit.bld_blk_info_type_id = bbu.bld_blk_info_type_id;
244:
245: BEGIN
258: p_flexfield_name in FND_DESCRIPTIVE_FLEXS.DESCRIPTIVE_FLEXFIELD_NAME%TYPE,
259: p_flex_context_basis in VARCHAR2) IS
260:
261: cursor c_flex(
262: p_flex_context_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
263: ) is
264: select bld_blk_info_type
265: from hxc_bld_blk_info_types
266: where upper(bld_blk_info_Type) like '%'||upper(p_flex_context_basis)||'%';
261: cursor c_flex(
262: p_flex_context_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
263: ) is
264: select bld_blk_info_type
265: from hxc_bld_blk_info_types
266: where upper(bld_blk_info_Type) like '%'||upper(p_flex_context_basis)||'%';
267:
268: BEGIN
269:
287:
288: END remove_flex_context;
289:
290: PROCEDURE remove_bld_blk_info_type(
291: p_bld_blk_info_type_basis in HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE%TYPE
292: ) is
293:
294: BEGIN
295:
292: ) is
293:
294: BEGIN
295:
296: DELETE from HXC_BLD_BLK_INFO_TYPES
297: where upper(bld_blk_info_type) like '%'||upper(p_bld_blk_info_type_basis)||'%';
298:
299: END remove_bld_blk_info_type;
300:
442: and per.element_type_id = pet.element_type_id
443: and multiple_entries_allowed_flag = 'Y'
444: and p_effective_date between effective_start_date and effective_end_date;
445: -- End 115.24 Change
446: l_bld_blk_info_type_id HXC_BLD_BLK_INFO_TYPES.BLD_BLK_INFO_TYPE_ID%TYPE;
447:
448: l_generate BOOLEAN default FALSE;
449: l_loop_var NUMBER default 0;
450: l_key_app VARCHAR2(30) := 'PAY';
685:
686: FUNCTION mapping_missing(
687: p_name in hxc_mapping_components.name%type,
688: p_field_name in hxc_mapping_components.field_name%type,
689: p_bld_blk_info_type_id in hxc_bld_blk_info_types.bld_blk_info_type_id%type,
690: p_segment in hxc_mapping_components.segment%type,
691: p_mp_id IN OUT NOCOPY NUMBER,
692: p_ovn IN OUT NOCOPY NUMBER ) RETURN BOOLEAN IS
693:
738:
739: PROCEDURE create_mapping(
740: p_name in hxc_mapping_components.name%type,
741: p_field_name in hxc_mapping_components.field_name%type,
742: p_bld_blk_info_type_id in hxc_bld_blk_info_types.bld_blk_info_type_id%type,
743: p_segment in hxc_mapping_components.segment%type) is
744:
745: l_mapping_component_id NUMBER;
746: l_ovn NUMBER;
779:
780: FUNCTION create_bld_blk_info_type(
781: p_appl_short_name in VARCHAR2
782: ,p_flexfield_name in VARCHAR2
783: ,p_legislation_code in hxc_bld_blk_info_types.legislation_code%type
784: ,p_bld_blk_info_type in hxc_bld_blk_info_types.bld_blk_info_type%type
785: ,p_category hxc_bld_blk_info_type_usages.building_block_category%type
786: ) RETURN NUMBER is
787:
780: FUNCTION create_bld_blk_info_type(
781: p_appl_short_name in VARCHAR2
782: ,p_flexfield_name in VARCHAR2
783: ,p_legislation_code in hxc_bld_blk_info_types.legislation_code%type
784: ,p_bld_blk_info_type in hxc_bld_blk_info_types.bld_blk_info_type%type
785: ,p_category hxc_bld_blk_info_type_usages.building_block_category%type
786: ) RETURN NUMBER is
787:
788: cursor c_info_type_id (p_info_type in hxc_bld_blk_info_types.bld_blk_info_type%type) is
784: ,p_bld_blk_info_type in hxc_bld_blk_info_types.bld_blk_info_type%type
785: ,p_category hxc_bld_blk_info_type_usages.building_block_category%type
786: ) RETURN NUMBER is
787:
788: cursor c_info_type_id (p_info_type in hxc_bld_blk_info_types.bld_blk_info_type%type) is
789: select bld_blk_info_type_id
790: from HXC_BLD_BLK_INFO_TYPES
791: where bld_blk_info_type = p_info_type;
792:
786: ) RETURN NUMBER is
787:
788: cursor c_info_type_id (p_info_type in hxc_bld_blk_info_types.bld_blk_info_type%type) is
789: select bld_blk_info_type_id
790: from HXC_BLD_BLK_INFO_TYPES
791: where bld_blk_info_type = p_info_type;
792:
793: l_bld_blk_info_type_id NUMBER;
794:
805: --
806:
807: if c_info_type_id%NOTFOUND then
808:
809: insert into HXC_BLD_BLK_INFO_TYPES(
810: bld_blk_info_type_id,
811: legislation_code,
812: descriptive_flexfield_name,
813: bld_blk_info_type,
818: last_update_date,
819: last_update_login,
820: object_version_number)
821: select
822: HXC_BLD_BLK_INFO_TYPES_S.NEXTVAL,
823: p_legislation_code,
824: p_flexfield_name,
825: p_bld_blk_info_type,
826: 'N',
889: where descriptive_flexfield_name = p_flex_name
890: and fdfc.descriptive_flex_context_code <> 'Global Data Elements'
891: and not exists (
892: select 'Y'
893: from hxc_bld_blk_info_types bbi
894: where bbi.bld_blk_info_type = fdfc.descriptive_flex_context_code
895: );
896: l_dummy_info_type_id NUMBER;
897: