233: /*Commenting the exception block for the bug 3355209 since it is again standards
234: Exception
235: When Others Then
236: Bug2510641 Begin
237: -- FND_MESSAGE.SET_NAME('PA' ,SQLERRM);
238: FND_MESSAGE.SET_NAME('PA' ,'PA_UNEXPECTED_ERROR_WTH_TKNS');
239: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','PA_Resource_List_tbl_Pkg');
240: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','Insert_Row');
241: FND_MESSAGE.SET_TOKEN('ERROR_TEXT ',SQLERRM);
234: Exception
235: When Others Then
236: Bug2510641 Begin
237: -- FND_MESSAGE.SET_NAME('PA' ,SQLERRM);
238: FND_MESSAGE.SET_NAME('PA' ,'PA_UNEXPECTED_ERROR_WTH_TKNS');
239: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','PA_Resource_List_tbl_Pkg');
240: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','Insert_Row');
241: FND_MESSAGE.SET_TOKEN('ERROR_TEXT ',SQLERRM);
242: Bug2510641 End
235: When Others Then
236: Bug2510641 Begin
237: -- FND_MESSAGE.SET_NAME('PA' ,SQLERRM);
238: FND_MESSAGE.SET_NAME('PA' ,'PA_UNEXPECTED_ERROR_WTH_TKNS');
239: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','PA_Resource_List_tbl_Pkg');
240: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','Insert_Row');
241: FND_MESSAGE.SET_TOKEN('ERROR_TEXT ',SQLERRM);
242: Bug2510641 End
243: APP_EXCEPTION.RAISE_EXCEPTION;*/
236: Bug2510641 Begin
237: -- FND_MESSAGE.SET_NAME('PA' ,SQLERRM);
238: FND_MESSAGE.SET_NAME('PA' ,'PA_UNEXPECTED_ERROR_WTH_TKNS');
239: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','PA_Resource_List_tbl_Pkg');
240: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','Insert_Row');
241: FND_MESSAGE.SET_TOKEN('ERROR_TEXT ',SQLERRM);
242: Bug2510641 End
243: APP_EXCEPTION.RAISE_EXCEPTION;*/
244: END Insert_Row;
237: -- FND_MESSAGE.SET_NAME('PA' ,SQLERRM);
238: FND_MESSAGE.SET_NAME('PA' ,'PA_UNEXPECTED_ERROR_WTH_TKNS');
239: FND_MESSAGE.SET_TOKEN('PACKAGE_NAME','PA_Resource_List_tbl_Pkg');
240: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME','Insert_Row');
241: FND_MESSAGE.SET_TOKEN('ERROR_TEXT ',SQLERRM);
242: Bug2510641 End
243: APP_EXCEPTION.RAISE_EXCEPTION;*/
244: END Insert_Row;
245:
336: FETCH C INTO Recinfo;
337: If (C%NOTFOUND) THEN
338: --hr_utility.trace('NOT FOUND');
339: Close C;
340: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_DELETED');
341: APP_EXCEPTION.RAISE_EXCEPTION;
342: END If;
343: CLOSE C;
344: IF (
364: ) Then
365: Return;
366: Else
367: --hr_utility.trace('ELSE IF');
368: FND_MESSAGE.SET_NAME('FND','FORM_RECORD_CHANGED');
369: APP_EXCEPTION.RAISE_EXCEPTION;
370: END If;
371:
372: End Lock_Row;