APPS.GMS_REPORT_SF272 dependencies on GMS_272_HISTORY

Line 4: Procedure INSERT_GMS_272_HISTORY(X_Award_Id IN NUMBER

1: PACKAGE BODY GMS_REPORT_SF272 AS
2: --$Header: gmsgrfcb.pls 120.1 2006/02/14 01:50:15 lveerubh noship $
3:
4: Procedure INSERT_GMS_272_HISTORY(X_Award_Id IN NUMBER
5: ,X_Document_Number IN VARCHAR2
6: ,X_Total_Actuals IN NUMBER
7: ,X_Cash_On_Hand_Beginning IN NUMBER
8: ,X_Version IN NUMBER

Line 19: INSERT INTO GMS_272_HISTORY

15:
16: Begin
17:
18: Begin
19: INSERT INTO GMS_272_HISTORY
20: (
21: AWARD_ID
22: ,VERSION
23: ,STATUS_CODE

Line 92: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_REPORT_272: INSERT_GMS_272_HISTORY');

88: EXCEPTION
89: WHEN OTHERS THEN
90: X_Err_Code := 'U';
91: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
92: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_REPORT_272: INSERT_GMS_272_HISTORY');
93: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
94: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
95: RAISE FND_API.G_EXC_ERROR;
96: End;

Line 102: End INSERT_GMS_272_HISTORY;

98: EXCEPTION
99: WHEN FND_API.G_EXC_ERROR THEN
100: RETURN;
101:
102: End INSERT_GMS_272_HISTORY;
103:
104:
105:
106:

Line 188: L_Report_Start_Date gms_272_history.report_start_date%type;

184: LEAST(X_Report_End_Date, end_date_active)
185: FROM gms_awards
186: WHERE award_id = X_Award_Id;
187:
188: L_Report_Start_Date gms_272_history.report_start_date%type;
189: L_Report_End_Date gms_272_history.report_end_date%type;
190:
191: /* End of changes for BUG : 2357578 */
192:

Line 189: L_Report_End_Date gms_272_history.report_end_date%type;

185: FROM gms_awards
186: WHERE award_id = X_Award_Id;
187:
188: L_Report_Start_Date gms_272_history.report_start_date%type;
189: L_Report_End_Date gms_272_history.report_end_date%type;
190:
191: /* End of changes for BUG : 2357578 */
192:
193: X_Expenditure_Item_Id NUMBER := NULL;

Line 253: from gms_272_history

249: /* To get the cash_in_hand at the beginning of the reporting period */
250:
251: select nvl(CASH_IN_HAND_END,0)
252: into X_Cash_On_hand_beginning
253: from gms_272_history
254: where award_id = X_Award_Id
255: and status_code = 'F'
256: and version = (select max(version) from gms_272_history gh
257: where gh.award_id = X_Award_Id

Line 256: and version = (select max(version) from gms_272_history gh

252: into X_Cash_On_hand_beginning
253: from gms_272_history
254: where award_id = X_Award_Id
255: and status_code = 'F'
256: and version = (select max(version) from gms_272_history gh
257: where gh.award_id = X_Award_Id
258: and status_code = 'F');
259: EXCEPTION
260: WHEN NO_DATA_FOUND THEN

Line 269: from gms_272_history

265: /* Getting the latest version to be inserted */
266: select (nvl(max(version),0) +1)
267: into
268: X_Version
269: from gms_272_history
270: where award_id = X_Award_Id
271: and status_code = 'O';
272: End;
273:

Line 274: /* Inserting TWO Rows in GMS_272_HISTORY Table, one with a status of 'O' and one with a status of 'D' */

270: where award_id = X_Award_Id
271: and status_code = 'O';
272: End;
273:
274: /* Inserting TWO Rows in GMS_272_HISTORY Table, one with a status of 'O' and one with a status of 'D' */
275: Begin
276: X_Status_Code := 'O';
277: INSERT_GMS_272_HISTORY(X_Award_Id
278: ,X_Document_Number

Line 277: INSERT_GMS_272_HISTORY(X_Award_Id

273:
274: /* Inserting TWO Rows in GMS_272_HISTORY Table, one with a status of 'O' and one with a status of 'D' */
275: Begin
276: X_Status_Code := 'O';
277: INSERT_GMS_272_HISTORY(X_Award_Id
278: ,X_Document_Number
279: ,X_Total_actuals
280: ,X_Cash_On_Hand_Beginning
281: ,X_Version

Line 292: INSERT_GMS_272_HISTORY(X_Award_Id

288: RAISE FND_API.G_EXC_ERROR;
289: End If;
290:
291: X_Status_Code := 'D';
292: INSERT_GMS_272_HISTORY(X_Award_Id
293: ,X_Document_Number
294: ,X_Total_Actuals
295: ,X_Cash_On_Hand_Beginning
296: ,X_Version