[Home] [Help]
52: - The layer cost update is done against the layers that were hit by the
53: original delivery and the layer values are updated in proportion of the
54: delivered quantities against each layer.
55: - Create records into tables rcv_accounting_events, rcv_receiving_sub_ledger,
56: mtl_material_transactions, mtl_cst_txn_cost_details and XLA_EVENTS_INT_GT using
57: the global temporary tables.
58: ------------------------------------------------------------------------------------------*/
59:
60: G_PKG_NAME CONSTANT VARCHAR2(30) :='CST_LcmAdjustments_PVT';
849: Decode(sign(acc.new_landed_cost-acc.prior_landed_cost), 1, 1, -1) debit_credit_flag,
850: Decode(acc.inventory_asset_flag, 'Y', Decode(mse.asset_inventory, 1,
851: 0,
852: 1), 1) exp_flag
853: FROM mtl_material_transactions mmt,
854: cst_lc_rcv_txn_gt rt,
855: cst_cost_group_accounts ccga,
856: cst_lc_adj_acctg_info_gt acc,
857: mtl_secondary_inventories mse
1541: msi.primary_uom_code
1542: FROM cst_lc_adj_acctg_info_gt acc,
1543: cst_lc_rcv_txn_gt rt,
1544: mtl_secondary_inventories mse,
1545: mtl_material_transactions mmt,
1546: mtl_system_items_b msi
1547: WHERE (rt.transaction_type IN ('DELIVER', 'RETURN TO RECEIVING')
1548: or (rt.transaction_type = 'CORRECT'
1549: and rt.parent_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING')))
1579: END IF;
1580:
1581: l_stmt_num := 75;
1582: UPDATE CST_LC_MMT_GT
1583: SET transaction_id = MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL;
1584:
1585: IF (l_sLog AND l_pLog) THEN
1586: l_num_records := SQL%ROWCOUNT;
1587: FND_LOG.STRING(
1687: acc.rcv_transaction_id,
1688: acc.lcm_account,
1689: acc.lcm_var_account,
1690: (layer_quantity * (acc.new_landed_cost - acc.prior_landed_cost)) value_change
1691: FROM mtl_material_transactions mmt,
1692: mtl_cst_layer_act_cost_details mclacd,
1693: cst_lc_adj_acctg_info_gt acc,
1694: cst_lc_rcv_txn_gt rt,
1695: mtl_secondary_inventories mse
1729: END IF;
1730:
1731: l_stmt_num := 100;
1732: UPDATE CST_LC_MMT_GT
1733: SET transaction_id = MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL;
1734:
1735: IF (l_sLog AND l_pLog) THEN
1736: l_num_records := SQL%ROWCOUNT;
1737: FND_LOG.STRING(
1793: | PROCEDURE : Insert_Adjustment_Data |
1794: | |
1795: | DESCRIPTION : This procedure inserts the receiving events data and the |
1796: | average and layer cost update data from temporary tables |
1797: | into RCV_ACCOUNTING_EVENTS and MTL_MATERIAL_TRANSACTIONS. |
1798: | Accounting and other entries are also calculated and |
1799: | inserted into RCV_RECEIVING_SUBLEDGER, XLA_EVENTS_INT_GT |
1800: | and MTL_CST_TXN_COST_DETAILS. |
1801: | |
2233:
2234: l_stmt_num := 50;
2235:
2236: /* Create the the average / layer cost update transactions */
2237: INSERT INTO MTL_MATERIAL_TRANSACTIONS
2238: (transaction_id,
2239: transaction_type_id,
2240: transaction_action_id,
2241: transaction_source_type_id,