[Home] [Help]
299: FOR l_resourcetxn_rec IN l_resourcetxn_csr LOOP
300: l_stmt_num := 40;
301: SELECT SUM(NVL(wta.base_transaction_value,0))
302: INTO l_value
303: FROM wip_transaction_accounts wta
304: WHERE transaction_id = l_resourcetxn_rec.transaction_id
305: AND accounting_line_type = 7;
306:
307: /* dle 7/20 ---------------------------------------------------------
6400: -- DESCRIPTION --
6401: -- cost a transaction record from wip_cost_txn_interface --
6402: -- * new transaction type called Direct Shopfloor Delivery --
6403: -- * called by cmlctw --
6404: -- * inserts debits and credits into wip_transaction_accounts --
6405: -- * update eam asset cost and asset period balances --
6406: -- PURPOSE: --
6407: -- procedure that costs a direct item transaction and does --
6408: -- accounting --
6820: -- PROCEDURE --
6821: -- insert_direct_item_distr --
6822: -- --
6823: -- DESCRIPTION --
6824: -- insert accounting into wip_transaction_accounts --
6825: -- * WIP valuation account used is material account --
6826: -- * Offset against Receiving Inspection account --
6827: -- * Accounting done at actuals (PO price + non recoverable tax) --
6828: -- PURPOSE: --
6825: -- * WIP valuation account used is material account --
6826: -- * Offset against Receiving Inspection account --
6827: -- * Accounting done at actuals (PO price + non recoverable tax) --
6828: -- PURPOSE: --
6829: -- insert accounting into wip_transaction_accounts --
6830: -- HISTORY: --
6831: -- 05/01/01 Anitha Dixit Created --
6832: ----------------------------------------------------------------------------
6833:
6989: if (l_debug = 'Y') then
6990: FND_FILE.PUT_LINE(FND_FILE.LOG,'mfg cost_element_id: '|| to_char(l_cost_element));
6991: end if;
6992:
6993: -- insert into wip_transaction_accounts
6994: l_stmt_num := 100;
6995: Insert into wip_transaction_accounts (
6996: wip_sub_ledger_id,
6997: transaction_id,
6991: end if;
6992:
6993: -- insert into wip_transaction_accounts
6994: l_stmt_num := 100;
6995: Insert into wip_transaction_accounts (
6996: wip_sub_ledger_id,
6997: transaction_id,
6998: reference_account,
6999: last_update_date,
7194: -----------------------------------
7195: l_statement := 50;
7196: select sum(nvl(base_transaction_value,0))
7197: into l_txn_value
7198: from wip_transaction_accounts
7199: where transaction_id = p_txn_id
7200: and accounting_line_type = 7;
7201:
7202: -----------------------------------------------
8179: -- Dr. Member Route Accounts
8180: ---------------------------------------------------------------------
8181:
8182: l_stmt_num := 50;
8183: INSERT INTO wip_transaction_accounts
8184: (TRANSACTION_ID, REFERENCE_ACCOUNT,
8185: LAST_UPDATE_DATE, LAST_UPDATED_BY,
8186: CREATION_DATE, CREATED_BY,
8187: LAST_UPDATE_LOGIN, ORGANIZATION_ID,
8243: -- Cr. Route Accounts for the Balance
8244: ---------------------------------------------------------------------
8245:
8246:
8247: INSERT INTO wip_transaction_accounts
8248: (TRANSACTION_ID, REFERENCE_ACCOUNT,
8249: LAST_UPDATE_DATE, LAST_UPDATED_BY,
8250: CREATION_DATE, CREATED_BY,
8251: LAST_UPDATE_LOGIN, ORGANIZATION_ID,
8298: 4,l_osp_var_total,
8299: 5,l_ovh_var_total) <> 0;
8300:
8301: l_stmt_num := 65;
8302: UPDATE WIP_TRANSACTION_ACCOUNTS
8303: SET WIP_SUB_LEDGER_ID = CST_WIP_SUB_LEDGER_ID_S.NEXTVAL
8304: WHERE TRANSACTION_ID = c_route_rec.transaction_id;
8305:
8306: