[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
1557: msi.primary_uom_code
1558: FROM cst_lc_adj_acctg_info_gt acc,
1559: cst_lc_rcv_txn_gt rt,
1560: mtl_secondary_inventories mse,
1561: mtl_material_transactions mmt,
1562: mtl_system_items_b msi
1563: WHERE (rt.transaction_type IN ('DELIVER', 'RETURN TO RECEIVING')
1564: or (rt.transaction_type = 'CORRECT'
1565: and rt.parent_transaction_type IN ('DELIVER', 'RETURN TO RECEIVING')))
1596: END IF;
1597:
1598: l_stmt_num := 75;
1599: UPDATE CST_LC_MMT_GT
1600: SET transaction_id = MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL;
1601:
1602: IF (l_sLog AND l_pLog) THEN
1603: l_num_records := SQL%ROWCOUNT;
1604: FND_LOG.STRING(
1704: acc.rcv_transaction_id,
1705: acc.lcm_account,
1706: acc.lcm_var_account,
1707: (layer_quantity * (acc.new_landed_cost - acc.prior_landed_cost)) value_change
1708: FROM mtl_material_transactions mmt,
1709: mtl_cst_layer_act_cost_details mclacd,
1710: cst_lc_adj_acctg_info_gt acc,
1711: cst_lc_rcv_txn_gt rt,
1712: mtl_secondary_inventories mse
1747: END IF;
1748:
1749: l_stmt_num := 100;
1750: UPDATE CST_LC_MMT_GT
1751: SET transaction_id = MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL;
1752:
1753: IF (l_sLog AND l_pLog) THEN
1754: l_num_records := SQL%ROWCOUNT;
1755: FND_LOG.STRING(
1811: | PROCEDURE : Insert_Adjustment_Data |
1812: | |
1813: | DESCRIPTION : This procedure inserts the receiving events data and the |
1814: | average and layer cost update data from temporary tables |
1815: | into RCV_ACCOUNTING_EVENTS and MTL_MATERIAL_TRANSACTIONS. |
1816: | Accounting and other entries are also calculated and |
1817: | inserted into RCV_RECEIVING_SUBLEDGER, XLA_EVENTS_INT_GT |
1818: | and MTL_CST_TXN_COST_DETAILS. |
1819: | |
2251:
2252: l_stmt_num := 50;
2253:
2254: /* Create the the average / layer cost update transactions */
2255: INSERT INTO MTL_MATERIAL_TRANSACTIONS
2256: (transaction_id,
2257: transaction_type_id,
2258: transaction_action_id,
2259: transaction_source_type_id,