[Home] [Help]
18: where_num NUMBER;
19: my_rowid ROWID;
20: cursor c1 is
21: SELECT a2.ROWID the_rowid
22: FROM WIP_TRANSACTION_ACCOUNTS a2
23: , WIP_COST_TXN_INTERFACE i
24: WHERE i.group_id = l_group_id
25: AND i.transaction_id = a2.transaction_id
26: AND a2.base_transaction_value = 0;
123: /***************************************************************
124: * Elemental variance for wip valuation for expense/eam jobs
125: **************************************************************/
126: where_num := 120;
127: INSERT INTO wip_transaction_accounts
128: (TRANSACTION_ID, REFERENCE_ACCOUNT,
129: LAST_UPDATE_DATE, LAST_UPDATED_BY,
130: CREATION_DATE, CREATED_BY,
131: LAST_UPDATE_LOGIN, ORGANIZATION_ID,
209: /***************************************************************
210: * Single level variance to variance account for expense/eam jobs
211: **************************************************************/
212: where_num := 140;
213: INSERT INTO wip_transaction_accounts
214: (TRANSACTION_ID, REFERENCE_ACCOUNT,
215: LAST_UPDATE_DATE, LAST_UPDATED_BY,
216: CREATION_DATE, CREATED_BY,
217: LAST_UPDATE_LOGIN, ORGANIZATION_ID,
441: /***************************************************************
442: * Elemental variance for wip valuation for schedules
443: **************************************************************/
444: where_num := 220;
445: INSERT INTO wip_transaction_accounts
446: (TRANSACTION_ID, REFERENCE_ACCOUNT,
447: LAST_UPDATE_DATE, LAST_UPDATED_BY,
448: CREATION_DATE, CREATED_BY,
449: LAST_UPDATE_LOGIN, ORGANIZATION_ID,
533: /***************************************************************
534: * Single level variance to variance account for schedules
535: **************************************************************/
536: where_num := 240;
537: INSERT INTO wip_transaction_accounts
538: (TRANSACTION_ID, REFERENCE_ACCOUNT,
539: LAST_UPDATE_DATE, LAST_UPDATED_BY,
540: CREATION_DATE, CREATED_BY,
541: LAST_UPDATE_LOGIN, ORGANIZATION_ID,
693: OPEN c1;
694: LOOP
695: FETCH c1 into my_rowid;
696: EXIT WHEN c1%NOTFOUND;
697: DELETE FROM WIP_TRANSACTION_ACCOUNTS
698: WHERE ROWID = my_rowid;
699: END LOOP;
700: CLOSE c1;
701:
702:
703: where_num := 560;
704:
705: /* Update WTA with WIP_SUB_LEDGER_ID */
706: UPDATE WIP_TRANSACTION_ACCOUNTS
707: SET WIP_SUB_LEDGER_ID = CST_WIP_SUB_LEDGER_ID_S.NEXTVAL
708: WHERE TRANSACTION_ID IN
709: ( SELECT TRANSACTION_ID
710: FROM WIP_COST_TXN_INTERFACE