76: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
77: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_REPORT_270: INSERT_GMS_270_HISTORY');
78: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
79: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
80: RAISE FND_API.G_EXC_ERROR;
81: End;
82:
83: EXCEPTION
84: WHEN FND_API.G_EXC_ERROR THEN
80: RAISE FND_API.G_EXC_ERROR;
81: End;
82:
83: EXCEPTION
84: WHEN FND_API.G_EXC_ERROR THEN
85: RETURN;
86:
87: End INSERT_GMS_270_HISTORY;
88:
286: -- ,X_Payee_Address_Id
287: ,X_Err_Code
288: ,X_Err_Buff);
289: If X_Err_Code <> 'S' then
290: RAISE FND_API.G_EXC_ERROR;
291: End If;
292:
293: X_Status_Code := 'D';
294: INSERT_GMS_270_HISTORY(X_Award_Id
302: ,X_Err_Code
303: ,X_Err_Buff);
304:
305: If X_Err_Code <> 'S' then
306: RAISE FND_API.G_EXC_ERROR;
307: End If;
308:
309:
310: End;
309:
310: End;
311:
312: EXCEPTION
313: WHEN FND_API.G_EXC_ERROR THEN
314: RETCODE := X_Err_Code;
315: ERRBUF := X_Err_Buff;
316:
317: End Populate_270_History;