DBA Data[Home] [Help]

APPS.GR_ITEM_EXPOSURE_PKG dependencies on FND_MESSAGE

Line 271: FND_MESSAGE.SET_NAME('GR',

267: WHEN Foreign_Key_Error THEN
268: ROLLBACK TO SAVEPOINT Insert_Row;
269: x_return_status := l_return_status;
270: x_oracle_error := l_oracle_error;
271: FND_MESSAGE.SET_NAME('GR',
272: 'GR_FOREIGN_KEY_ERROR');
273: FND_MESSAGE.SET_TOKEN('TEXT',
274: l_msg_data,
275: FALSE);

Line 273: FND_MESSAGE.SET_TOKEN('TEXT',

269: x_return_status := l_return_status;
270: x_oracle_error := l_oracle_error;
271: FND_MESSAGE.SET_NAME('GR',
272: 'GR_FOREIGN_KEY_ERROR');
273: FND_MESSAGE.SET_TOKEN('TEXT',
274: l_msg_data,
275: FALSE);
276: IF FND_API.To_Boolean(p_called_by_form) THEN
277: APP_EXCEPTION.Raise_Exception;

Line 279: x_msg_data := FND_MESSAGE.Get;

275: FALSE);
276: IF FND_API.To_Boolean(p_called_by_form) THEN
277: APP_EXCEPTION.Raise_Exception;
278: ELSE
279: x_msg_data := FND_MESSAGE.Get;
280: END IF;
281:
282: WHEN Item_Exists_Error THEN
283: ROLLBACK TO SAVEPOINT Insert_Row;

Line 286: FND_MESSAGE.SET_NAME('GR',

282: WHEN Item_Exists_Error THEN
283: ROLLBACK TO SAVEPOINT Insert_Row;
284: x_return_status := 'E';
285: x_oracle_error := APP_EXCEPTION.Get_Code;
286: FND_MESSAGE.SET_NAME('GR',
287: 'GR_RECORD_EXISTS');
288: FND_MESSAGE.SET_TOKEN('CODE',
289: l_msg_token,
290: FALSE);

Line 288: FND_MESSAGE.SET_TOKEN('CODE',

284: x_return_status := 'E';
285: x_oracle_error := APP_EXCEPTION.Get_Code;
286: FND_MESSAGE.SET_NAME('GR',
287: 'GR_RECORD_EXISTS');
288: FND_MESSAGE.SET_TOKEN('CODE',
289: l_msg_token,
290: FALSE);
291: IF FND_API.To_Boolean(p_called_by_form) THEN
292: APP_EXCEPTION.Raise_Exception;

Line 294: x_msg_data := FND_MESSAGE.Get;

290: FALSE);
291: IF FND_API.To_Boolean(p_called_by_form) THEN
292: APP_EXCEPTION.Raise_Exception;
293: ELSE
294: x_msg_data := FND_MESSAGE.Get;
295: END IF;
296:
297: WHEN Row_Missing_Error THEN
298: ROLLBACK TO SAVEPOINT Insert_Row;

Line 301: FND_MESSAGE.SET_NAME('GR',

297: WHEN Row_Missing_Error THEN
298: ROLLBACK TO SAVEPOINT Insert_Row;
299: x_return_status := 'E';
300: x_oracle_error := APP_EXCEPTION.Get_Code;
301: FND_MESSAGE.SET_NAME('GR',
302: 'GR_NO_RECORD_INSERTED');
303: FND_MESSAGE.SET_TOKEN('CODE',
304: l_msg_token,
305: FALSE);

Line 303: FND_MESSAGE.SET_TOKEN('CODE',

299: x_return_status := 'E';
300: x_oracle_error := APP_EXCEPTION.Get_Code;
301: FND_MESSAGE.SET_NAME('GR',
302: 'GR_NO_RECORD_INSERTED');
303: FND_MESSAGE.SET_TOKEN('CODE',
304: l_msg_token,
305: FALSE);
306: IF FND_API.To_Boolean(p_called_by_form) THEN
307: APP_EXCEPTION.Raise_Exception;

Line 309: x_msg_data := FND_MESSAGE.Get;

305: FALSE);
306: IF FND_API.To_Boolean(p_called_by_form) THEN
307: APP_EXCEPTION.Raise_Exception;
308: ELSE
309: x_msg_data := FND_MESSAGE.Get;
310: END IF;
311:
312: WHEN OTHERS THEN
313: ROLLBACK TO SAVEPOINT Insert_Row;

Line 317: FND_MESSAGE.SET_NAME('GR',

313: ROLLBACK TO SAVEPOINT Insert_Row;
314: x_return_status := 'U';
315: x_oracle_error := APP_EXCEPTION.Get_Code;
316: l_msg_data := APP_EXCEPTION.Get_Text;
317: FND_MESSAGE.SET_NAME('GR',
318: 'GR_UNEXPECTED_ERROR');
319: FND_MESSAGE.SET_TOKEN('TEXT',
320: l_msg_token,
321: FALSE);

Line 319: FND_MESSAGE.SET_TOKEN('TEXT',

315: x_oracle_error := APP_EXCEPTION.Get_Code;
316: l_msg_data := APP_EXCEPTION.Get_Text;
317: FND_MESSAGE.SET_NAME('GR',
318: 'GR_UNEXPECTED_ERROR');
319: FND_MESSAGE.SET_TOKEN('TEXT',
320: l_msg_token,
321: FALSE);
322: IF FND_API.To_Boolean(p_called_by_form) THEN
323: APP_EXCEPTION.Raise_Exception;

Line 325: x_msg_data := FND_MESSAGE.Get;

321: FALSE);
322: IF FND_API.To_Boolean(p_called_by_form) THEN
323: APP_EXCEPTION.Raise_Exception;
324: ELSE
325: x_msg_data := FND_MESSAGE.Get;
326: END IF;
327:
328: END Insert_Row;
329:

Line 522: FND_MESSAGE.SET_NAME('GR',

518: WHEN Foreign_Key_Error THEN
519: ROLLBACK TO SAVEPOINT Update_Row;
520: x_return_status := l_return_status;
521: x_oracle_error := l_oracle_error;
522: FND_MESSAGE.SET_NAME('GR',
523: 'GR_FOREIGN_KEY_ERROR');
524: FND_MESSAGE.SET_TOKEN('TEXT',
525: l_msg_data,
526: FALSE);

Line 524: FND_MESSAGE.SET_TOKEN('TEXT',

520: x_return_status := l_return_status;
521: x_oracle_error := l_oracle_error;
522: FND_MESSAGE.SET_NAME('GR',
523: 'GR_FOREIGN_KEY_ERROR');
524: FND_MESSAGE.SET_TOKEN('TEXT',
525: l_msg_data,
526: FALSE);
527: IF FND_API.To_Boolean(p_called_by_form) THEN
528: APP_EXCEPTION.Raise_Exception;

Line 530: x_msg_data := FND_MESSAGE.Get;

526: FALSE);
527: IF FND_API.To_Boolean(p_called_by_form) THEN
528: APP_EXCEPTION.Raise_Exception;
529: ELSE
530: x_msg_data := FND_MESSAGE.Get;
531: END IF;
532:
533: WHEN Row_Missing_Error THEN
534: ROLLBACK TO SAVEPOINT Update_Row;

Line 537: FND_MESSAGE.SET_NAME('GR',

533: WHEN Row_Missing_Error THEN
534: ROLLBACK TO SAVEPOINT Update_Row;
535: x_return_status := 'E';
536: x_oracle_error := APP_EXCEPTION.Get_Code;
537: FND_MESSAGE.SET_NAME('GR',
538: 'GR_NO_RECORD_INSERTED');
539: FND_MESSAGE.SET_TOKEN('CODE',
540: l_msg_token,
541: FALSE);

Line 539: FND_MESSAGE.SET_TOKEN('CODE',

535: x_return_status := 'E';
536: x_oracle_error := APP_EXCEPTION.Get_Code;
537: FND_MESSAGE.SET_NAME('GR',
538: 'GR_NO_RECORD_INSERTED');
539: FND_MESSAGE.SET_TOKEN('CODE',
540: l_msg_token,
541: FALSE);
542: IF FND_API.To_Boolean(p_called_by_form) THEN
543: APP_EXCEPTION.Raise_Exception;

Line 545: x_msg_data := FND_MESSAGE.Get;

541: FALSE);
542: IF FND_API.To_Boolean(p_called_by_form) THEN
543: APP_EXCEPTION.Raise_Exception;
544: ELSE
545: x_msg_data := FND_MESSAGE.Get;
546: END IF;
547:
548: WHEN OTHERS THEN
549: ROLLBACK TO SAVEPOINT Update_Row;

Line 553: FND_MESSAGE.SET_NAME('GR',

549: ROLLBACK TO SAVEPOINT Update_Row;
550: x_return_status := 'U';
551: x_oracle_error := APP_EXCEPTION.Get_Code;
552: l_msg_data := APP_EXCEPTION.Get_Text;
553: FND_MESSAGE.SET_NAME('GR',
554: 'GR_UNEXPECTED_ERROR');
555: FND_MESSAGE.SET_TOKEN('TEXT',
556: l_msg_token,
557: FALSE);

Line 555: FND_MESSAGE.SET_TOKEN('TEXT',

551: x_oracle_error := APP_EXCEPTION.Get_Code;
552: l_msg_data := APP_EXCEPTION.Get_Text;
553: FND_MESSAGE.SET_NAME('GR',
554: 'GR_UNEXPECTED_ERROR');
555: FND_MESSAGE.SET_TOKEN('TEXT',
556: l_msg_token,
557: FALSE);
558: IF FND_API.To_Boolean(p_called_by_form) THEN
559: APP_EXCEPTION.Raise_Exception;

Line 561: x_msg_data := FND_MESSAGE.Get;

557: FALSE);
558: IF FND_API.To_Boolean(p_called_by_form) THEN
559: APP_EXCEPTION.Raise_Exception;
560: ELSE
561: x_msg_data := FND_MESSAGE.Get;
562: END IF;
563:
564: END Update_Row;
565:

Line 675: FND_MESSAGE.SET_NAME('GR',

671:
672: WHEN No_Data_Found_Error THEN
673: ROLLBACK TO SAVEPOINT Lock_Row;
674: x_return_status := 'E';
675: FND_MESSAGE.SET_NAME('GR',
676: 'GR_RECORD_NOT_FOUND');
677: FND_MESSAGE.SET_TOKEN('CODE',
678: l_msg_token,
679: FALSE);

Line 677: FND_MESSAGE.SET_TOKEN('CODE',

673: ROLLBACK TO SAVEPOINT Lock_Row;
674: x_return_status := 'E';
675: FND_MESSAGE.SET_NAME('GR',
676: 'GR_RECORD_NOT_FOUND');
677: FND_MESSAGE.SET_TOKEN('CODE',
678: l_msg_token,
679: FALSE);
680: IF FND_API.To_Boolean(p_called_by_form) THEN
681: APP_EXCEPTION.Raise_Exception;

Line 683: x_msg_data := FND_MESSAGE.Get;

679: FALSE);
680: IF FND_API.To_Boolean(p_called_by_form) THEN
681: APP_EXCEPTION.Raise_Exception;
682: ELSE
683: x_msg_data := FND_MESSAGE.Get;
684: END IF;
685:
686: WHEN Row_Already_Locked_Error THEN
687: ROLLBACK TO SAVEPOINT Lock_Row;

Line 690: FND_MESSAGE.SET_NAME('GR',

686: WHEN Row_Already_Locked_Error THEN
687: ROLLBACK TO SAVEPOINT Lock_Row;
688: x_return_status := 'E';
689: x_oracle_error := APP_EXCEPTION.Get_Code;
690: FND_MESSAGE.SET_NAME('GR',
691: 'GR_ROW_IS_LOCKED');
692: IF FND_API.To_Boolean(p_called_by_form) THEN
693: APP_EXCEPTION.Raise_Exception;
694: ELSE

Line 695: x_msg_data := FND_MESSAGE.Get;

691: 'GR_ROW_IS_LOCKED');
692: IF FND_API.To_Boolean(p_called_by_form) THEN
693: APP_EXCEPTION.Raise_Exception;
694: ELSE
695: x_msg_data := FND_MESSAGE.Get;
696: END IF;
697:
698: WHEN OTHERS THEN
699: ROLLBACK TO SAVEPOINT Lock_Row;

Line 703: FND_MESSAGE.SET_NAME('GR',

699: ROLLBACK TO SAVEPOINT Lock_Row;
700: x_return_status := 'U';
701: x_oracle_error := APP_EXCEPTION.Get_Code;
702: l_msg_data := APP_EXCEPTION.Get_Text;
703: FND_MESSAGE.SET_NAME('GR',
704: 'GR_UNEXPECTED_ERROR');
705: FND_MESSAGE.SET_TOKEN('TEXT',
706: l_msg_token,
707: FALSE);

Line 705: FND_MESSAGE.SET_TOKEN('TEXT',

701: x_oracle_error := APP_EXCEPTION.Get_Code;
702: l_msg_data := APP_EXCEPTION.Get_Text;
703: FND_MESSAGE.SET_NAME('GR',
704: 'GR_UNEXPECTED_ERROR');
705: FND_MESSAGE.SET_TOKEN('TEXT',
706: l_msg_token,
707: FALSE);
708: IF FND_API.To_Boolean(p_called_by_form) THEN
709: APP_EXCEPTION.Raise_Exception;

Line 711: x_msg_data := FND_MESSAGE.Get;

707: FALSE);
708: IF FND_API.To_Boolean(p_called_by_form) THEN
709: APP_EXCEPTION.Raise_Exception;
710: ELSE
711: x_msg_data := FND_MESSAGE.Get;
712: END IF;
713:
714: END Lock_Row;
715:

Line 868: x_msg_data := FND_MESSAGE.Get;

864: x_oracle_error := l_oracle_error;
865: IF FND_API.To_Boolean(p_called_by_form) THEN
866: APP_EXCEPTION.Raise_Exception;
867: ELSE
868: x_msg_data := FND_MESSAGE.Get;
869: END IF;
870:
871: WHEN Row_Missing_Error THEN
872: ROLLBACK TO SAVEPOINT Delete_Row;

Line 875: FND_MESSAGE.SET_NAME('GR',

871: WHEN Row_Missing_Error THEN
872: ROLLBACK TO SAVEPOINT Delete_Row;
873: x_return_status := 'E';
874: x_oracle_error := APP_EXCEPTION.Get_Code;
875: FND_MESSAGE.SET_NAME('GR',
876: 'GR_RECORD_NOT_FOUND');
877: FND_MESSAGE.SET_TOKEN('CODE',
878: l_msg_token,
879: FALSE);

Line 877: FND_MESSAGE.SET_TOKEN('CODE',

873: x_return_status := 'E';
874: x_oracle_error := APP_EXCEPTION.Get_Code;
875: FND_MESSAGE.SET_NAME('GR',
876: 'GR_RECORD_NOT_FOUND');
877: FND_MESSAGE.SET_TOKEN('CODE',
878: l_msg_token,
879: FALSE);
880: IF FND_API.To_Boolean(p_called_by_form) THEN
881: APP_EXCEPTION.Raise_Exception;

Line 883: x_msg_data := FND_MESSAGE.Get;

879: FALSE);
880: IF FND_API.To_Boolean(p_called_by_form) THEN
881: APP_EXCEPTION.Raise_Exception;
882: ELSE
883: x_msg_data := FND_MESSAGE.Get;
884: END IF;
885:
886: WHEN OTHERS THEN
887: ROLLBACK TO SAVEPOINT Delete_Row;

Line 892: FND_MESSAGE.SET_NAME('GR',

888: x_return_status := 'U';
889: x_oracle_error := APP_EXCEPTION.Get_Code;
890: l_msg_data := APP_EXCEPTION.Get_Text;
891: l_msg_data := APP_EXCEPTION.Get_Text;
892: FND_MESSAGE.SET_NAME('GR',
893: 'GR_UNEXPECTED_ERROR');
894: FND_MESSAGE.SET_TOKEN('TEXT',
895: l_msg_token,
896: FALSE);

Line 894: FND_MESSAGE.SET_TOKEN('TEXT',

890: l_msg_data := APP_EXCEPTION.Get_Text;
891: l_msg_data := APP_EXCEPTION.Get_Text;
892: FND_MESSAGE.SET_NAME('GR',
893: 'GR_UNEXPECTED_ERROR');
894: FND_MESSAGE.SET_TOKEN('TEXT',
895: l_msg_token,
896: FALSE);
897: IF FND_API.To_Boolean(p_called_by_form) THEN
898: APP_EXCEPTION.Raise_Exception;

Line 900: x_msg_data := FND_MESSAGE.Get;

896: FALSE);
897: IF FND_API.To_Boolean(p_called_by_form) THEN
898: APP_EXCEPTION.Raise_Exception;
899: ELSE
900: x_msg_data := FND_MESSAGE.Get;
901: END IF;
902:
903: END Delete_Row;
904:

Line 1020: FND_MESSAGE.SET_NAME('GR',

1016:
1017: WHEN Null_Delete_Option_Error THEN
1018: x_return_status := 'E';
1019: x_oracle_error := APP_EXCEPTION.Get_Code;
1020: FND_MESSAGE.SET_NAME('GR',
1021: 'GR_NULL_VALUE');
1022: FND_MESSAGE.SET_TOKEN('CODE',
1023: l_msg_token,
1024: FALSE);

Line 1022: FND_MESSAGE.SET_TOKEN('CODE',

1018: x_return_status := 'E';
1019: x_oracle_error := APP_EXCEPTION.Get_Code;
1020: FND_MESSAGE.SET_NAME('GR',
1021: 'GR_NULL_VALUE');
1022: FND_MESSAGE.SET_TOKEN('CODE',
1023: l_msg_token,
1024: FALSE);
1025: IF FND_API.To_Boolean(p_called_by_form) THEN
1026: APP_EXCEPTION.Raise_Exception;

Line 1028: x_msg_data := FND_MESSAGE.Get;

1024: FALSE);
1025: IF FND_API.To_Boolean(p_called_by_form) THEN
1026: APP_EXCEPTION.Raise_Exception;
1027: ELSE
1028: x_msg_data := FND_MESSAGE.Get;
1029: END IF;
1030:
1031: WHEN OTHERS THEN
1032: ROLLBACK TO SAVEPOINT Delete_Rows;

Line 1036: FND_MESSAGE.SET_NAME('GR',

1032: ROLLBACK TO SAVEPOINT Delete_Rows;
1033: x_return_status := 'U';
1034: x_oracle_error := APP_EXCEPTION.Get_Code;
1035: l_msg_data := APP_EXCEPTION.Get_Text;
1036: FND_MESSAGE.SET_NAME('GR',
1037: 'GR_UNEXPECTED_ERROR');
1038: FND_MESSAGE.SET_TOKEN('TEXT',
1039: l_msg_token,
1040: FALSE);

Line 1038: FND_MESSAGE.SET_TOKEN('TEXT',

1034: x_oracle_error := APP_EXCEPTION.Get_Code;
1035: l_msg_data := APP_EXCEPTION.Get_Text;
1036: FND_MESSAGE.SET_NAME('GR',
1037: 'GR_UNEXPECTED_ERROR');
1038: FND_MESSAGE.SET_TOKEN('TEXT',
1039: l_msg_token,
1040: FALSE);
1041: IF FND_API.To_Boolean(p_called_by_form) THEN
1042: APP_EXCEPTION.Raise_Exception;

Line 1044: x_msg_data := FND_MESSAGE.Get;

1040: FALSE);
1041: IF FND_API.To_Boolean(p_called_by_form) THEN
1042: APP_EXCEPTION.Raise_Exception;
1043: ELSE
1044: x_msg_data := FND_MESSAGE.Get;
1045: END IF;
1046:
1047: END Delete_Rows;
1048:

Line 1182: FND_MESSAGE.SET_NAME('GR',

1178:
1179: WHEN Row_Missing_Error THEN
1180: x_return_status := 'E';
1181: x_oracle_error := APP_EXCEPTION.Get_Code;
1182: FND_MESSAGE.SET_NAME('GR',
1183: 'GR_RECORD_NOT_FOUND');
1184: FND_MESSAGE.SET_TOKEN('CODE',
1185: l_msg_token,
1186: FALSE);

Line 1184: FND_MESSAGE.SET_TOKEN('CODE',

1180: x_return_status := 'E';
1181: x_oracle_error := APP_EXCEPTION.Get_Code;
1182: FND_MESSAGE.SET_NAME('GR',
1183: 'GR_RECORD_NOT_FOUND');
1184: FND_MESSAGE.SET_TOKEN('CODE',
1185: l_msg_token,
1186: FALSE);
1187: x_msg_data := FND_MESSAGE.Get;
1188:

Line 1187: x_msg_data := FND_MESSAGE.Get;

1183: 'GR_RECORD_NOT_FOUND');
1184: FND_MESSAGE.SET_TOKEN('CODE',
1185: l_msg_token,
1186: FALSE);
1187: x_msg_data := FND_MESSAGE.Get;
1188:
1189: WHEN OTHERS THEN
1190: x_return_status := 'U';
1191: x_oracle_error := APP_EXCEPTION.Get_Code;

Line 1193: FND_MESSAGE.SET_NAME('GR',

1189: WHEN OTHERS THEN
1190: x_return_status := 'U';
1191: x_oracle_error := APP_EXCEPTION.Get_Code;
1192: l_msg_data := APP_EXCEPTION.Get_Text;
1193: FND_MESSAGE.SET_NAME('GR',
1194: 'GR_UNEXPECTED_ERROR');
1195: FND_MESSAGE.SET_TOKEN('TEXT',
1196: l_msg_token,
1197: FALSE);

Line 1195: FND_MESSAGE.SET_TOKEN('TEXT',

1191: x_oracle_error := APP_EXCEPTION.Get_Code;
1192: l_msg_data := APP_EXCEPTION.Get_Text;
1193: FND_MESSAGE.SET_NAME('GR',
1194: 'GR_UNEXPECTED_ERROR');
1195: FND_MESSAGE.SET_TOKEN('TEXT',
1196: l_msg_token,
1197: FALSE);
1198: x_msg_data := FND_MESSAGE.Get;
1199:

Line 1198: x_msg_data := FND_MESSAGE.Get;

1194: 'GR_UNEXPECTED_ERROR');
1195: FND_MESSAGE.SET_TOKEN('TEXT',
1196: l_msg_token,
1197: FALSE);
1198: x_msg_data := FND_MESSAGE.Get;
1199:
1200: END Check_Foreign_Keys;
1201:
1202: PROCEDURE Check_Integrity

Line 1281: FND_MESSAGE.SET_NAME('GR',

1277: ROLLBACK TO SAVEPOINT Check_Integrity;
1278: x_return_status := 'U';
1279: x_oracle_error := APP_EXCEPTION.Get_Code;
1280: l_msg_data := APP_EXCEPTION.Get_Text;
1281: FND_MESSAGE.SET_NAME('GR',
1282: 'GR_UNEXPECTED_ERROR');
1283: FND_MESSAGE.SET_TOKEN('TEXT',
1284: l_msg_data,
1285: FALSE);

Line 1283: FND_MESSAGE.SET_TOKEN('TEXT',

1279: x_oracle_error := APP_EXCEPTION.Get_Code;
1280: l_msg_data := APP_EXCEPTION.Get_Text;
1281: FND_MESSAGE.SET_NAME('GR',
1282: 'GR_UNEXPECTED_ERROR');
1283: FND_MESSAGE.SET_TOKEN('TEXT',
1284: l_msg_data,
1285: FALSE);
1286: IF FND_API.To_Boolean(p_called_by_form) THEN
1287: APP_EXCEPTION.Raise_Exception;

Line 1289: x_msg_data := FND_MESSAGE.Get;

1285: FALSE);
1286: IF FND_API.To_Boolean(p_called_by_form) THEN
1287: APP_EXCEPTION.Raise_Exception;
1288: ELSE
1289: x_msg_data := FND_MESSAGE.Get;
1290: END IF;
1291:
1292: END Check_Integrity;
1293:

Line 1349: FND_MESSAGE.SET_NAME('GR',

1345: EXCEPTION
1346:
1347: WHEN Others THEN
1348: l_msg_data := APP_EXCEPTION.Get_Text;
1349: FND_MESSAGE.SET_NAME('GR',
1350: 'GR_UNEXPECTED_ERROR');
1351: FND_MESSAGE.SET_TOKEN('TEXT',
1352: l_msg_data,
1353: FALSE);

Line 1351: FND_MESSAGE.SET_TOKEN('TEXT',

1347: WHEN Others THEN
1348: l_msg_data := APP_EXCEPTION.Get_Text;
1349: FND_MESSAGE.SET_NAME('GR',
1350: 'GR_UNEXPECTED_ERROR');
1351: FND_MESSAGE.SET_TOKEN('TEXT',
1352: l_msg_data,
1353: FALSE);
1354: IF FND_API.To_Boolean(p_called_by_form) THEN
1355: APP_EXCEPTION.Raise_Exception;