[Home] [Help]
206: AND rae.event_type_id = 1 -- RECEIVE
207: AND rae.trx_flow_header_id is not NULL)
208: )
209: UNION
210: ( select i_receipt_no from dual
211: where i_receipt_no IS NOT NULL
212: /*bug 5044215/5264793.Only pick up receipts that have delivers */
213: AND EXISTS (Select 1
214: from rcv_transactions rt2
603: -- Get next header id from sequence
604: -----------------------------------------------------------
605: SELECT cst_rcv_acq_costs_s.nextval
606: INTO l_header
607: FROM dual;
608:
609: /* begin changes for dropshipment project */
610: /* Includes Changes for Service Line Types */
611: l_stmt_num := 120;
1096:
1097: If l_chrg_present = 0 then /* means that this has not been allocated */
1098:
1099: select cst_rcv_acq_cost_details_s.nextval into l_details_nextvalue
1100: from dual;
1101:
1102: l_stmt_num := 105;
1103:
1104: select decode(l_pri_quantity_invoiced,0,0,(c_inv.unit_price * c_inv.quantity_invoiced / l_pri_quantity_invoiced)) into l_priuom_cost
1101:
1102: l_stmt_num := 105;
1103:
1104: select decode(l_pri_quantity_invoiced,0,0,(c_inv.unit_price * c_inv.quantity_invoiced / l_pri_quantity_invoiced)) into l_priuom_cost
1105: from dual;
1106:
1107: l_stmt_num := 110;
1108:
1109: Insert_into_acqdtls_tables (
1268:
1269: l_stmt_num := 1040;
1270: SELECT cst_rcv_acq_costs_s.nextval
1271: INTO l_header_id
1272: FROM dual;
1273:
1274: l_stmt_num := 1050;
1275:
1276: l_nr_tax_rate := get_rcv_tax(c_rec.transaction_id);
1643: IF (l_prior_landed_cost <> l_new_landed_cost) THEN
1644: l_stmt_num := 1210;
1645: SELECT cst_rcv_acq_costs_s.nextval
1646: INTO l_header_id
1647: FROM dual;
1648:
1649: l_stmt_num := 1220;
1650:
1651: Insert_into_acqhdr_tables(
1811: c_rec.inventory_item_id,
1812: l_new_landed_cost unit_price,
1813: l_prior_landed_cost,
1814: 1
1815: FROM DUAL);
1816: ELSE
1817: l_stmt_num := 1245;
1818: INSERT into RCV_ACCOUNTING_EVENTS(
1819: accounting_event_id,
1986: Returning accounting_event_id INTO l_rcv_accounting_event_id;
1987: l_stmt_num := 1260;
1988: select MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL
1989: into l_transaction_id
1990: from dual;
1991: l_stmt_num := 1265;
1992: l_um_rate := 1;
1993: CSTPPINV.get_um_rate(
1994: i_txn_org_id => c_rec.organization_id,
2236: c_rec.inventory_item_id,
2237: l_new_landed_cost unit_price,
2238: l_prior_landed_cost,
2239: 1
2240: FROM DUAL);
2241: END IF;
2242: END LOOP;
2243: IF l_recs_processed >= l_commit_records_count THEN
2244: IF g_debug = 'Y' THEN
2396: -- Get next header id from sequence
2397: -----------------------------------------------------------
2398: SELECT cst_rcv_acq_costs_s.nextval
2399: INTO l_header
2400: FROM dual;
2401:
2402: /* begin changes for dropshipment project */
2403: /* Includes Changes for Service Line Types */
2404: l_stmt_num := 121;
2887:
2888: If l_chrg_present = 0 then /* means that this has not been allocated */
2889:
2890: select cst_rcv_acq_cost_details_s.nextval into l_details_nextvalue
2891: from dual;
2892:
2893: l_stmt_num := 106;
2894:
2895: select decode(l_pri_quantity_invoiced,0,0,(c_inv.unit_price * c_inv.quantity_invoiced / l_pri_quantity_invoiced)) into l_priuom_cost
2892:
2893: l_stmt_num := 106;
2894:
2895: select decode(l_pri_quantity_invoiced,0,0,(c_inv.unit_price * c_inv.quantity_invoiced / l_pri_quantity_invoiced)) into l_priuom_cost
2896: from dual;
2897:
2898: l_stmt_num := 111;
2899:
2900: Insert_into_acqdtls_tables (
4355: fnd_file.put_line(fnd_file.log,'org_id : ' || to_char(i_org_id));
4356:
4357:
4358: select MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL into l_transaction_id
4359: from dual;
4360:
4361: /* get the period close date for the current open period */
4362:
4363: l_stmt_num := 80;
4370:
4371: /* Now insert stuff into MMT */
4372:
4373: select LEAST(l_period_close_date,sysdate) into l_least_date
4374: from dual;
4375:
4376: l_stmt_num := 90;
4377:
4378: /* bug 4322574. CHanged the Costed_flag to NULL from 'N' so that the perpetual cost worker does not try and