[Home] [Help]
869:
870: d_progress := 30.0;
871:
872: FORALL i IN 1 .. p_line_id_tbl.COUNT
873: INSERT INTO PO_SESSION_GT
874: ( key
875: , index_num1 -- po_line_id
876: , char1 -- currency_code
877: , num1 -- minimum_accountable_unit
975: ELSE GREATEST(NVL(PLL.amount_billed, 0),
976: NVL(PLL.amount_financed, 0))
977: END)), 0) sum_amt_bill_actuals
978: FROM PO_LINE_LOCATIONS_ALL PLL
979: , PO_SESSION_GT GTT
980: WHERE PLL.po_line_id = p_line_id_tbl(i)
981: AND GTT.key = l_gt_key
982: AND GTT.index_num1(+) = PLL.po_line_id
983: )
1060:
1061: l_data_key := PO_CORE_S.get_session_gt_nextval();
1062:
1063: FORALL i IN 1 .. p_line_id_tbl.COUNT
1064: INSERT INTO PO_SESSION_GT
1065: ( key
1066: , num1
1067: , num2
1068: )
1079: BULK COLLECT INTO
1080: l_line_id_tbl
1081: , l_amount_tbl
1082: FROM
1083: PO_SESSION_GT SES
1084: , PO_LINES_ALL LINE
1085: , PO_HEADERS_ALL HEADER
1086: WHERE
1087: SES.key = l_data_key
2178:
2179: l_data_key := PO_CORE_S.get_session_gt_nextval();
2180:
2181: FORALL i IN 1 .. p_line_id_tbl.COUNT
2182: INSERT INTO PO_SESSION_GT
2183: ( key
2184: , num1
2185: , num2
2186: , char1
2204: l_line_id_tbl
2205: , l_price_break_lookup_code_tbl
2206: , l_amount_changed_flag_tbl --
2207: FROM
2208: PO_SESSION_GT SES
2209: , PO_LINES_ALL SAVED_LINE
2210: WHERE
2211: SES.key = l_data_key
2212: AND SAVED_LINE.po_line_id = SES.num1
3970: FOR i IN 1 .. l_parent_id_tbl.COUNT LOOP
3971: -- Extract Par Line ids of this line
3972: PO_VALIDATION_HELPER.extract_par_draft_id_tbl(p_par_draft_id_tbl(i),
3973: l_par_draft_id_tbl);
3974: INSERT INTO PO_SESSION_GT
3975: ( key
3976: , index_num1
3977: , index_num2
3978: , num1
3992: END LOOP;
3993:
3994: -- Merge in the new data.
3995: FORALL i IN 1 .. p_line_id_tbl.COUNT
3996: MERGE INTO PO_SESSION_GT SES
3997: USING DUAL
3998: ON
3999: ( SES.key = l_data_key
4000: AND SES.index_num2 = p_line_id_tbl(i)
4038: , c_LINE_NUM_DISP
4039: , CHILD.char1
4040: , PO_MESSAGE_S.PO_PO_ENTER_UNIQUE_LINE_NUM
4041: FROM
4042: PO_SESSION_GT CHILD
4043: WHERE
4044: CHILD.key = l_data_key
4045: AND CHILD.index_char2 = c_NEW -- check only new and modified records
4046: AND EXISTS
4044: CHILD.key = l_data_key
4045: AND CHILD.index_char2 = c_NEW -- check only new and modified records
4046: AND EXISTS
4047: ( SELECT null
4048: FROM PO_SESSION_GT SIBLING
4049: WHERE
4050: SIBLING.key = l_data_key
4051: AND SIBLING.index_num1 = CHILD.index_num1 -- header_id
4052: AND SIBLING.char1 = CHILD.char1 -- line num disp
4076: , c_LINE_NUM_DISP
4077: , SLIN.char1
4078: , 'PO_CLIN_SLIN_NUM_NOT_SYNC'
4079: FROM
4080: PO_SESSION_GT CLIN,
4081: PO_SESSION_GT SLIN
4082: WHERE
4083: CLIN.key = l_data_key
4084: AND SLIN.key = l_data_key
4077: , SLIN.char1
4078: , 'PO_CLIN_SLIN_NUM_NOT_SYNC'
4079: FROM
4080: PO_SESSION_GT CLIN,
4081: PO_SESSION_GT SLIN
4082: WHERE
4083: CLIN.key = l_data_key
4084: AND SLIN.key = l_data_key
4085: AND CLIN.num1 IS NULL -- CLIN.group_line_id
4902:
4903: l_data_key := PO_CORE_S.get_session_gt_nextval();
4904:
4905: FORALL i IN 1..p_intf_line_id_tbl.Count
4906: INSERT INTO PO_SESSION_GT(
4907: KEY,
4908: num1)
4909: SELECT
4910: l_data_key,
4915: AND phi.interface_header_id = PLI.interface_header_id
4916: AND PLI.interface_line_id = p_intf_line_id_tbl(i)
4917: AND Nvl(phd.clm_source_document_id,-1) <> Nvl(p_from_header_id_tbl(i),-1);
4918:
4919: DELETE FROM po_session_gt
4920: WHERE key = l_data_key
4921: RETURNING num1 BULK COLLECT INTO l_intf_line_id_tbl;
4922:
4923: FOR i IN 1..l_intf_line_id_tbl.Count
4975:
4976: l_data_key := PO_CORE_S.get_session_gt_nextval();
4977:
4978: FORALL i IN 1..p_intf_line_id_tbl.Count
4979: INSERT INTO PO_SESSION_GT(
4980: KEY,
4981: num1)
4982: SELECT
4983: l_data_key,
4987: AND line_type_id = p_line_type_id_tbl(i)
4988: AND order_type_lookup_code = 'RATE'
4989: AND purchase_basis = 'TEMP LABOR';
4990:
4991: DELETE FROM po_session_gt
4992: WHERE key = l_data_key
4993: RETURNING num1 BULK COLLECT INTO l_intf_line_id_tbl;
4994:
4995: FOR i IN 1..l_intf_line_id_tbl.Count