[Home] [Help]
494: || Rollback Activities Include:
495: || 10. Updating gms_award_distributions (revenue_distributed_flag/billed_flag)
496: || 20. Deleting from gms_event_intersect
497: || 30. Deleting from gms_burden_components
498: || 40. Updating gms_summary_project_fundings
499: || 50. Deleting gms_event_attribute
500: -------------------------------------------------------------------------- */
501:
502: FOR evt IN events_to_rollback
660: f_row_id; -- Bug 2715312
661: EXIT WHEN get_event_details%NOTFOUND;
662:
663: BEGIN -- Event Related
664: -- 40: Updating gms_summary_project_fundings
665:
666: IF evt.event_type = 'Invoice'
667: THEN
668: UPDATE gms_summary_project_fundings
664: -- 40: Updating gms_summary_project_fundings
665:
666: IF evt.event_type = 'Invoice'
667: THEN
668: UPDATE gms_summary_project_fundings
669: SET total_billed_amount =
670: total_billed_amount - f_bill_amount
671: WHERE project_id = f_act_project_id
672: AND ( task_id IS NULL
678: AND installment_id = f_installment_id;
679:
680: ELSIF evt.event_type = 'Revenue'
681: THEN
682: UPDATE gms_summary_project_fundings
683: SET total_revenue_amount =
684: total_revenue_amount - f_rev_amount
685: WHERE project_id = f_act_project_id
686: AND ( task_id IS NULL
1174: BEGIN
1175:
1176: /* --------------------------------------------------------------------------
1177: || Here's what we need to do :
1178: || 1. Updating gms_summary_project_fundings
1179: || 2. Deleting from gms_event_intersect
1180: || 3. Deleting from gms_burden_components
1181: || 4. Updating gms_award_distributions (revenue_distributed_flag/billed_flag)
1182: -------------------------------------------------------------------------- */
1187:
1188:
1189: FOR i in 1..x_inst_cnt
1190: LOOP
1191: UPDATE gms_summary_project_fundings
1192: SET total_billed_amount = decode(x_event_type,'INVOICE',
1193: (total_billed_amount - X_ei_rollback_inst_tab(i).rev_bill_amount),total_billed_amount),
1194: total_revenue_amount = decode(x_event_type,'REVENUE',
1195: (total_revenue_amount - X_ei_rollback_inst_tab(i).rev_bill_amount),total_revenue_amount)
1263: into
1264: X_Total_Funding_Amount,
1265: X_Total_Rev_Bill_Amount
1266: from
1267: gms_summary_project_fundings gmf
1268: where
1269: (gmf.installment_id = nvl(C_Installment_Id,0) -- 11.5 changes, hard limit to award level
1270: OR
1271: (C_Installment_Id is NULL
1624: select ins.installment_id installment_id,
1625: gmf.total_funding_amount total_funding_amount,
1626: decode(X_Calling_Process,'Invoice',nvl(gmf.total_billed_amount,0),'Revenue',nvl(gmf.total_revenue_amount,0)) Inv_Rev_Amount
1627: from gms_installments ins,
1628: gms_summary_project_fundings gmf
1629: where ins.award_id = X_award_id
1630: and trunc(ins.end_date_active) >= trunc(X_Expenditure_item_date)
1631: /* and ins.active_flag = 'Y' Bug 6878405 */
1632: and nvl(ins.billable_flag,'N') = 'Y'
2655: 1
2656: into
2657: X_Check_Row_Exists
2658: from
2659: gms_summary_project_fundings gmf
2660: where
2661: gmf.installment_id = C_Installment_Id
2662: and (
2663: (gmf.task_id = X_Task_Id)
3207: End If;
3208: Begin
3209: If X_Calling_Process = 'Invoice' then
3210:
3211: update GMS_SUMMARY_PROJECT_FUNDINGS spf
3212: set
3213: spf.TOTAL_BILLED_AMOUNT = (X_Rev_Bill_Amount + X_Total_Rev_Bill_Amount),
3214: spf.last_update_date = sysdate,
3215: spf.last_updated_by = fnd_global.user_id,
3227: --DECODE(TASK_ID,NULL,X_Task_Id,TASK_ID) = X_Task_Id
3228:
3229: Elsif X_Calling_Process = 'Revenue' then
3230:
3231: update GMS_SUMMARY_PROJECT_FUNDINGS spf
3232: set
3233: spf.TOTAL_REVENUE_AMOUNT = (X_Rev_Bill_Amount + X_Total_Rev_Bill_Amount),
3234: spf.last_update_date = sysdate,
3235: spf.last_updated_by = fnd_global.user_id,
3267: End;
3268:
3269: END UPDATE_GMS_SUMMARY_FUNDINGS;
3270:
3271: -- PROCEDURE: UPD_GSPF_WRAPPER, new procedure for updating gms_summary_project_fundings
3272:
3273: PROCEDURE UPD_GSPF_WRAPPER(X_Installment_Id IN NUMBER,
3274: X_Task_Id IN NUMBER,
3275: X_Actual_Project_Id IN NUMBER,
5109:
5110: END IF;
5111: /* bug 5242484 - end */
5112:
5113: --Updating GMS_SUMMARY_PROJECT_FUNDINGS Billed Amount with the Amount of the current transaction
5114:
5115: UPD_GSPF_WRAPPER(C_Installment_Id,
5116: X_Task_Id,
5117: X_Actual_Project_Id,
5557: and p.project_status_code <> 'CLOSED' -- Bug 3254097 : Modified 'CLOSED ' to 'CLOSED'
5558: and pt.project_type = p.project_type
5559: and pt.direct_flag = 'N'
5560: and exists ( select 1
5561: from gms_summary_project_fundings gspf
5562: where gspf.installment_id = C_installment_id
5563: and gspf.project_id = adl.project_id
5564: and (gspf.task_id is NULL or
5565: gspf.task_id = adl.task_id or
6004: END IF;
6005: /* bug 5242484 - end */
6006:
6007: ------------------------------------------------------------------------------
6008: --Updating GMS_SUMMARY_PROJECT_FUNDINGS Billed Amount with the Amount of the current transaction
6009:
6010: UPD_GSPF_WRAPPER(C_Installment_Id,
6011: X_Rev_Task_Id,
6012: X_Rev_Act_Project_Id,
6837: ||'and nvl(adl.billable_flag,''N'') = ''Y'' '
6838: ||'and adl.document_type = ''EXP'' '
6839: ||'and exists '
6840: ||'(select 1 '
6841: ||'from gms_summary_project_fundings gspf '
6842: ||'where gspf.installment_id = :C_Installment_Id '
6843: ||'and ( '
6844: ||' (gspf.task_id = adl.task_id) '
6845: ||'OR (gspf.task_id is NULL) '