[Home] [Help]
1310: END ;
1311:
1312: -- end of select valid projects
1313: --Bug 5635857. Select the pending commitments for eligible projects and insert them
1314: --into the temoporary table pa_commitment_txns_tmp so that they can be used later
1315: -- in the code
1316: --Note that if the below condition is changed then the code for updating the commitments
1317: --should also be changed in the FOR loop
1318:
3567: RAISE;
3568: END Get_curr_end_date;
3569:
3570: /*
3571: --Bug 5635857. This procedure will populate pa_commitment_txns_tmp table from
3572: --pa_commitment_txns_v. This table will later be used in processing
3573: --Dynamic Insert statement is used since otherwise its not possible to get and insert
3574: --the data from pa_commitment_txns_v for all the projects in one go.
3575: PROCEDURE populate_cmt_tmp_table
3589: l_current_pa_period_flag Varchar2(1);
3590:
3591: BEGIN
3592:
3593: DELETE FROM pa_commitment_txns_tmp;
3594:
3595: x_last_updated_by := NVL(FND_GLOBAL.USER_ID,-1);
3596: x_last_update_date := NVL(FND_GLOBAL.USER_ID,-1);
3597: x_created_by := NVL(FND_GLOBAL.USER_ID,-1);
3606: FOR i IN 1..p_project_id_tbl.COUNT LOOP
3607:
3608: IF l_sql IS NULL THEN
3609:
3610: l_sql:='INSERT INTO pa_commitment_txns_tmp ' ||
3611: '( PROJECT_ID, '||
3612: 'TASK_ID, '||
3613: 'TRANSACTION_SOURCE, '||
3614: 'LINE_TYPE, '||
3827: L_CNT NUMBER;
3828: TmpProjectTab SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type(); --bug 6408874
3829: BEGIN
3830:
3831: DELETE FROM pa_commitment_txns_tmp;
3832: DELETE FROM pa_pjm_po_commitments_tmp; /* Bug 6408874 */
3833: DELETE FROM pa_pjm_req_commitments_tmp; /* Bug 6408874 */
3834: -- DELETE FROM pa_fp_ra_map_tmp;
3835:
4051:
4052: /* Bug 6408874 */
4053:
4054: forall i in 1..TmpProjectTab.count
4055: INSERT INTO pa_commitment_txns_tmp
4056: (PROJECT_ID,
4057: TASK_ID,
4058: TRANSACTION_SOURCE,
4059: LINE_TYPE,