98: -- {End Of Comments}
99: -- ----------------------------------------------------------------------------
100: Procedure chk_mapping_component_id
101: (
102: p_mapping_component_id in hxc_mapping_components.mapping_component_id%TYPE
103: ) IS
104: --
105: l_proc varchar2(72);
106: --
110: SELECT 'error'
111: FROM sys.dual
112: WHERE NOT EXISTS (
113: SELECT 'x'
114: FROM hxc_mapping_components mpc
115: WHERE mpc.mapping_component_id = p_mapping_component_id );
116: --
117: l_error varchar2(5) := NULL;
118: --
261: -- ----------------------------------------------------------------------------
262: Procedure chk_mcu_field_name
263: (
264: p_mapping_id in hxc_mappings.mapping_id%TYPE
265: , p_mapping_component_id in hxc_mapping_components.mapping_component_id%TYPE
266: ) IS
267: --
268: l_proc varchar2(72);
269: --
268: l_proc varchar2(72);
269: --
270: CURSOR csr_chk_field_name IS
271: SELECT 'error'
272: FROM hxc_mapping_components mpc
273: WHERE mpc.mapping_component_id = p_mapping_component_id
274: AND EXISTS (
275: SELECT 'x'
276: FROM hxc_mapping_components mpc1
272: FROM hxc_mapping_components mpc
273: WHERE mpc.mapping_component_id = p_mapping_component_id
274: AND EXISTS (
275: SELECT 'x'
276: FROM hxc_mapping_components mpc1
277: , hxc_mapping_comp_usages mcu
278: WHERE mcu.mapping_id = p_mapping_id
279: AND mcu.mapping_component_id = mpc1.mapping_component_id
280: AND mpc1.mapping_component_id <> mpc.mapping_component_id
336: -- ----------------------------------------------------------------------------
337: Procedure chk_mcu_composite_key
338: (
339: p_mapping_id in hxc_mappings.mapping_id%TYPE
340: , p_mapping_component_id in hxc_mapping_components.mapping_component_id%TYPE
341: ) IS
342: --
343: l_proc varchar2(72);
344: --
343: l_proc varchar2(72);
344: --
345: CURSOR csr_chk_composite_key IS
346: SELECT 'error'
347: FROM hxc_mapping_components mpc
348: WHERE mpc.mapping_component_id = p_mapping_component_id
349: AND EXISTS (
350: SELECT 'x'
351: FROM hxc_mapping_components mpc1
347: FROM hxc_mapping_components mpc
348: WHERE mpc.mapping_component_id = p_mapping_component_id
349: AND EXISTS (
350: SELECT 'x'
351: FROM hxc_mapping_components mpc1
352: , hxc_mapping_comp_usages mcu
353: WHERE mcu.mapping_id = p_mapping_id
354: AND mcu.mapping_component_id = mpc1.mapping_component_id
355: AND mpc1.segment = mpc.segment