120: X_Err_Code IN OUT NOCOPY NUMBER,
121: X_Err_Buff IN OUT NOCOPY VARCHAR2) IS
122:
123: Begin
124: /* Inserting into gms_billing_cancellations table */
125:
126: INSERT INTO GMS_BILLING_CANCELLATIONS (AWARD_PROJECT_ID,
127: EVENT_NUM,
128: EXPENDITURE_ITEM_ID,
122:
123: Begin
124: /* Inserting into gms_billing_cancellations table */
125:
126: INSERT INTO GMS_BILLING_CANCELLATIONS (AWARD_PROJECT_ID,
127: EVENT_NUM,
128: EXPENDITURE_ITEM_ID,
129: ADL_LINE_NUM,
130: BILL_AMOUNT,
1794: End If;
1795:
1796: If F_Rev_Accumulated ='Y' then
1797:
1798: /* Create negative entry in gms_billing_cancellations
1799: for ASI to backout revenue accumulated */
1800: INSERT_BILL_CANCEL(F_Award_Project_id,
1801: F_Event_Num,
1802: F_Expenditure_Item_Id,
1900: End If;
1901:
1902: If F_Rev_Revenue_Accumulated ='Y' then
1903:
1904: /* Create negative entry in gms_billing_cancellations
1905: for ASI to backout revenue accumulated */
1906: INSERT_BILL_CANCEL(F_Award_Project_id,
1907: F_Event_Num,
1908: F_Rev_Burd_Expend_Item_Id,
1995: End If;
1996:
1997: If X_Revenue_Accumulated ='Y' then
1998:
1999: /* Create negative entry in gms_billing_cancellations
2000: for ASI to backout revenue accumulated */
2001: INSERT_BILL_CANCEL(F_Award_Project_id,
2002: F_Event_Num,
2003: NULL, -- expenditure_id