[Home] [Help]
78: l_pte_code varchar2(30);
79: begin
80: select pte_code
81: into l_pte_code
82: from qp_pte_request_types_b
83: where request_type_code = p_request_type_code and
84: rownum = 1;
85: return (l_pte_code);
86: exception
111: return(-2);
112: end;
113: --
114: FUNCTION p_req_exists(p_request_type_code in varchar2) return number is
115: --Private function to check if given Request Type Exists in QP_PTE_REQUEST_TYPES_B table.
116: dummy varchar2(1);
117: begin
118: select 'x'
119: into dummy
116: dummy varchar2(1);
117: begin
118: select 'x'
119: into dummy
120: from qp_pte_request_types_b
121: where request_type_code = p_request_type_code and
122: rownum = 1;
123: return(0);
124: exception
625: end;
626: --
627: PROCEDURE p_insert_rqt (p_request_type_code in varchar2,
628: p_pte_code in varchar2) is
629: -- Private procedure to insert Request Types in QP_PTE_REQUEST_TYPES_B/TL tables.
630: l_order_level_global_struct varchar2(80);
631: l_line_level_global_struct varchar2(80);
632: begin
633: if p_request_type_code = 'ASO' then
646: l_order_level_global_struct := null;
647: l_line_level_global_struct := null;
648: end if;
649: --
650: INSERT into QP_PTE_REQUEST_TYPES_B
651: (REQUEST_TYPE_CODE,
652: PTE_CODE,
653: ORDER_LEVEL_GLOBAL_STRUCT,
654: LINE_LEVEL_GLOBAL_STRUCT,
918: where a.pte_code = 'INTCOM' and
919: a.seeded_sourcing_method = 'ATTRIBUTE MAPPING' and
920: not exists ( select 'x'
921: from qp_attribute_sourcing b,
922: qp_pte_request_types_b c
923: where b.segment_id = a.segment_id and
924: b.request_type_code = c.request_type_code and
925: a.pte_code = c.pte_code) and
926: a.created_by = 1;
932: where a.pte_code = 'DEMAND' and
933: a.seeded_sourcing_method = 'ATTRIBUTE MAPPING' and
934: not exists ( select 'x'
935: from qp_attribute_sourcing b,
936: qp_pte_request_types_b c
937: where b.segment_id = a.segment_id and
938: b.request_type_code = c.request_type_code and
939: a.pte_code = c.pte_code) and
940: a.created_by = 1;