DBA Data[Home] [Help]

APPS.GR_SAFETY_CATEGORIES_TL_PKG dependencies on FND_MESSAGE

Line 124: FND_MESSAGE.SET_NAME('GR',

120: WHEN Foreign_Key_Error THEN
121: ROLLBACK TO SAVEPOINT Insert_Row;
122: x_return_status := l_return_status;
123: x_oracle_error := l_oracle_error;
124: FND_MESSAGE.SET_NAME('GR',
125: 'GR_FOREIGN_KEY_ERROR');
126: FND_MESSAGE.SET_TOKEN('TEXT',
127: l_msg_data,
128: FALSE);

Line 126: FND_MESSAGE.SET_TOKEN('TEXT',

122: x_return_status := l_return_status;
123: x_oracle_error := l_oracle_error;
124: FND_MESSAGE.SET_NAME('GR',
125: 'GR_FOREIGN_KEY_ERROR');
126: FND_MESSAGE.SET_TOKEN('TEXT',
127: l_msg_data,
128: FALSE);
129: IF FND_API.To_Boolean(p_called_by_form) THEN
130: APP_EXCEPTION.Raise_Exception;

Line 132: x_msg_data := FND_MESSAGE.Get;

128: FALSE);
129: IF FND_API.To_Boolean(p_called_by_form) THEN
130: APP_EXCEPTION.Raise_Exception;
131: ELSE
132: x_msg_data := FND_MESSAGE.Get;
133: END IF;
134:
135: WHEN Item_Exists_Error THEN
136: ROLLBACK TO SAVEPOINT Insert_Row;

Line 140: FND_MESSAGE.SET_NAME('GR',

136: ROLLBACK TO SAVEPOINT Insert_Row;
137: l_msg_token := p_safety_category_code;
138: x_return_status := 'E';
139: x_oracle_error := APP_EXCEPTION.Get_Code;
140: FND_MESSAGE.SET_NAME('GR',
141: 'GR_RECORD_EXISTS');
142: FND_MESSAGE.SET_TOKEN('CODE',
143: l_msg_token,
144: FALSE);

Line 142: FND_MESSAGE.SET_TOKEN('CODE',

138: x_return_status := 'E';
139: x_oracle_error := APP_EXCEPTION.Get_Code;
140: FND_MESSAGE.SET_NAME('GR',
141: 'GR_RECORD_EXISTS');
142: FND_MESSAGE.SET_TOKEN('CODE',
143: l_msg_token,
144: FALSE);
145: IF FND_API.To_Boolean(p_called_by_form) THEN
146: APP_EXCEPTION.Raise_Exception;

Line 148: x_msg_data := FND_MESSAGE.Get;

144: FALSE);
145: IF FND_API.To_Boolean(p_called_by_form) THEN
146: APP_EXCEPTION.Raise_Exception;
147: ELSE
148: x_msg_data := FND_MESSAGE.Get;
149: END IF;
150:
151: WHEN Row_Missing_Error THEN
152: ROLLBACK TO SAVEPOINT Insert_Row;

Line 156: FND_MESSAGE.SET_NAME('GR',

152: ROLLBACK TO SAVEPOINT Insert_Row;
153: l_msg_token := p_safety_category_code;
154: x_return_status := 'E';
155: x_oracle_error := APP_EXCEPTION.Get_Code;
156: FND_MESSAGE.SET_NAME('GR',
157: 'GR_NO_RECORD_INSERTED');
158: FND_MESSAGE.SET_TOKEN('CODE',
159: l_msg_token,
160: FALSE);

Line 158: FND_MESSAGE.SET_TOKEN('CODE',

154: x_return_status := 'E';
155: x_oracle_error := APP_EXCEPTION.Get_Code;
156: FND_MESSAGE.SET_NAME('GR',
157: 'GR_NO_RECORD_INSERTED');
158: FND_MESSAGE.SET_TOKEN('CODE',
159: l_msg_token,
160: FALSE);
161: IF FND_API.To_Boolean(p_called_by_form) THEN
162: APP_EXCEPTION.Raise_Exception;

Line 164: x_msg_data := FND_MESSAGE.Get;

160: FALSE);
161: IF FND_API.To_Boolean(p_called_by_form) THEN
162: APP_EXCEPTION.Raise_Exception;
163: ELSE
164: x_msg_data := FND_MESSAGE.Get;
165: END IF;
166:
167: WHEN OTHERS THEN
168: ROLLBACK TO SAVEPOINT Insert_Row;

Line 174: FND_MESSAGE.SET_NAME('GR',

170: x_return_status := 'U';
171: --B1052134 - changed APP_EXCEPTION.Get_Code to SQLCODE, added SQLERRM
172: x_oracle_error := SQLCODE;
173: l_msg_data := SUBSTR(SQLERRM, 1, 200);
174: FND_MESSAGE.SET_NAME('GR',
175: 'GR_UNEXPECTED_ERROR');
176: FND_MESSAGE.SET_TOKEN('TEXT',
177: l_msg_token||sqlerrm,
178: FALSE);

Line 176: FND_MESSAGE.SET_TOKEN('TEXT',

172: x_oracle_error := SQLCODE;
173: l_msg_data := SUBSTR(SQLERRM, 1, 200);
174: FND_MESSAGE.SET_NAME('GR',
175: 'GR_UNEXPECTED_ERROR');
176: FND_MESSAGE.SET_TOKEN('TEXT',
177: l_msg_token||sqlerrm,
178: FALSE);
179: IF FND_API.To_Boolean(p_called_by_form) THEN
180: APP_EXCEPTION.Raise_Exception;

Line 182: x_msg_data := FND_MESSAGE.Get;

178: FALSE);
179: IF FND_API.To_Boolean(p_called_by_form) THEN
180: APP_EXCEPTION.Raise_Exception;
181: ELSE
182: x_msg_data := FND_MESSAGE.Get;
183: END IF;
184:
185: END Insert_Row;
186:

Line 272: FND_MESSAGE.SET_NAME('GR',

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

Line 274: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 280: x_msg_data := FND_MESSAGE.Get;

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

Line 287: FND_MESSAGE.SET_NAME('GR',

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

Line 289: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 295: x_msg_data := FND_MESSAGE.Get;

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

Line 304: FND_MESSAGE.SET_NAME('GR',

300: x_return_status := 'U';
301: --B1052134 - changed APP_EXCEPTION to SQLCODE, added SQLERRM
302: x_oracle_error := SQLCODE;
303: l_msg_data := SUBSTR(SQLERRM, 1, 200);
304: FND_MESSAGE.SET_NAME('GR',
305: 'GR_UNEXPECTED_ERROR');
306: FND_MESSAGE.SET_TOKEN('TEXT',
307: l_msg_token ||sqlerrm,
308: FALSE);

Line 306: FND_MESSAGE.SET_TOKEN('TEXT',

302: x_oracle_error := SQLCODE;
303: l_msg_data := SUBSTR(SQLERRM, 1, 200);
304: FND_MESSAGE.SET_NAME('GR',
305: 'GR_UNEXPECTED_ERROR');
306: FND_MESSAGE.SET_TOKEN('TEXT',
307: l_msg_token ||sqlerrm,
308: FALSE);
309: IF FND_API.To_Boolean(p_called_by_form) THEN
310: APP_EXCEPTION.Raise_Exception;

Line 312: x_msg_data := FND_MESSAGE.Get;

308: FALSE);
309: IF FND_API.To_Boolean(p_called_by_form) THEN
310: APP_EXCEPTION.Raise_Exception;
311: ELSE
312: x_msg_data := FND_MESSAGE.Get;
313: END IF;
314:
315: END Update_Row;
316:

Line 486: FND_MESSAGE.SET_NAME('GR',

482: WHEN Language_Missing_Error THEN
483: ROLLBACK TO SAVEPOINT Add_Language;
484: x_return_status := 'E';
485: x_oracle_error := APP_EXCEPTION.Get_Code;
486: FND_MESSAGE.SET_NAME('GR',
487: 'GR_RECORD_NOT_FOUND');
488: FND_MESSAGE.SET_TOKEN('CODE',
489: l_msg_token,
490: FALSE);

Line 488: FND_MESSAGE.SET_TOKEN('CODE',

484: x_return_status := 'E';
485: x_oracle_error := APP_EXCEPTION.Get_Code;
486: FND_MESSAGE.SET_NAME('GR',
487: 'GR_RECORD_NOT_FOUND');
488: FND_MESSAGE.SET_TOKEN('CODE',
489: l_msg_token,
490: FALSE);
491: IF FND_API.To_Boolean(p_called_by_form) THEN
492: APP_EXCEPTION.Raise_Exception;

Line 494: x_msg_data := FND_MESSAGE.Get;

490: FALSE);
491: IF FND_API.To_Boolean(p_called_by_form) THEN
492: APP_EXCEPTION.Raise_Exception;
493: ELSE
494: x_msg_data := FND_MESSAGE.Get;
495: END IF;
496:
497: WHEN OTHERS THEN
498: ROLLBACK TO SAVEPOINT Add_Language;

Line 502: FND_MESSAGE.SET_NAME('GR',

498: ROLLBACK TO SAVEPOINT Add_Language;
499: x_return_status := 'U';
500: x_oracle_error := SQLCODE;
501: l_msg_data := SUBSTR(SQLERRM, 1, 200);
502: FND_MESSAGE.SET_NAME('GR',
503: 'GR_UNEXPECTED_ERROR');
504: FND_MESSAGE.SET_TOKEN('TEXT',
505: l_msg_token||sqlerrm,
506: FALSE);

Line 504: FND_MESSAGE.SET_TOKEN('TEXT',

500: x_oracle_error := SQLCODE;
501: l_msg_data := SUBSTR(SQLERRM, 1, 200);
502: FND_MESSAGE.SET_NAME('GR',
503: 'GR_UNEXPECTED_ERROR');
504: FND_MESSAGE.SET_TOKEN('TEXT',
505: l_msg_token||sqlerrm,
506: FALSE);
507: IF FND_API.To_Boolean(p_called_by_form) THEN
508: APP_EXCEPTION.Raise_Exception;

Line 510: x_msg_data := FND_MESSAGE.Get;

506: FALSE);
507: IF FND_API.To_Boolean(p_called_by_form) THEN
508: APP_EXCEPTION.Raise_Exception;
509: ELSE
510: x_msg_data := FND_MESSAGE.Get;
511: END IF;
512:
513: END Add_Language;
514:

Line 588: FND_MESSAGE.SET_NAME('GR',

584:
585: WHEN No_Data_Found_Error THEN
586: ROLLBACK TO SAVEPOINT Lock_Row;
587: x_return_status := 'E';
588: FND_MESSAGE.SET_NAME('GR',
589: 'GR_RECORD_NOT_FOUND');
590: FND_MESSAGE.SET_TOKEN('CODE',
591: l_msg_token,
592: FALSE);

Line 590: FND_MESSAGE.SET_TOKEN('CODE',

586: ROLLBACK TO SAVEPOINT Lock_Row;
587: x_return_status := 'E';
588: FND_MESSAGE.SET_NAME('GR',
589: 'GR_RECORD_NOT_FOUND');
590: FND_MESSAGE.SET_TOKEN('CODE',
591: l_msg_token,
592: FALSE);
593: IF FND_API.To_Boolean(p_called_by_form) THEN
594: APP_EXCEPTION.Raise_Exception;

Line 596: x_msg_data := FND_MESSAGE.Get;

592: FALSE);
593: IF FND_API.To_Boolean(p_called_by_form) THEN
594: APP_EXCEPTION.Raise_Exception;
595: ELSE
596: x_msg_data := FND_MESSAGE.Get;
597: END IF;
598:
599: WHEN Row_Already_Locked_Error THEN
600: ROLLBACK TO SAVEPOINT Lock_Row;

Line 603: FND_MESSAGE.SET_NAME('GR',

599: WHEN Row_Already_Locked_Error THEN
600: ROLLBACK TO SAVEPOINT Lock_Row;
601: x_return_status := 'E';
602: x_oracle_error := APP_EXCEPTION.Get_Code;
603: FND_MESSAGE.SET_NAME('GR',
604: 'GR_ROW_IS_LOCKED');
605: IF FND_API.To_Boolean(p_called_by_form) THEN
606: APP_EXCEPTION.Raise_Exception;
607: ELSE

Line 608: x_msg_data := FND_MESSAGE.Get;

604: 'GR_ROW_IS_LOCKED');
605: IF FND_API.To_Boolean(p_called_by_form) THEN
606: APP_EXCEPTION.Raise_Exception;
607: ELSE
608: x_msg_data := FND_MESSAGE.Get;
609: END IF;
610:
611: WHEN OTHERS THEN
612: ROLLBACK TO SAVEPOINT Lock_Row;

Line 616: FND_MESSAGE.SET_NAME('GR',

612: ROLLBACK TO SAVEPOINT Lock_Row;
613: x_return_status := 'U';
614: x_oracle_error := SQLCODE;
615: l_msg_data := SUBSTR(SQLERRM, 1, 200);
616: FND_MESSAGE.SET_NAME('GR',
617: 'GR_UNEXPECTED_ERROR');
618: FND_MESSAGE.SET_TOKEN('TEXT',
619: l_msg_token ||sqlerrm,
620: FALSE);

Line 618: FND_MESSAGE.SET_TOKEN('TEXT',

614: x_oracle_error := SQLCODE;
615: l_msg_data := SUBSTR(SQLERRM, 1, 200);
616: FND_MESSAGE.SET_NAME('GR',
617: 'GR_UNEXPECTED_ERROR');
618: FND_MESSAGE.SET_TOKEN('TEXT',
619: l_msg_token ||sqlerrm,
620: FALSE);
621: IF FND_API.To_Boolean(p_called_by_form) THEN
622: APP_EXCEPTION.Raise_Exception;

Line 624: x_msg_data := FND_MESSAGE.Get;

620: FALSE);
621: IF FND_API.To_Boolean(p_called_by_form) THEN
622: APP_EXCEPTION.Raise_Exception;
623: ELSE
624: x_msg_data := FND_MESSAGE.Get;
625: END IF;
626:
627: END Lock_Row;
628:

Line 711: x_msg_data := FND_MESSAGE.Get;

707: x_oracle_error := l_oracle_error;
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: WHEN Row_Missing_Error THEN
715: ROLLBACK TO SAVEPOINT Delete_Row;

Line 718: FND_MESSAGE.SET_NAME('GR',

714: WHEN Row_Missing_Error THEN
715: ROLLBACK TO SAVEPOINT Delete_Row;
716: x_return_status := 'E';
717: x_oracle_error := APP_EXCEPTION.Get_Code;
718: FND_MESSAGE.SET_NAME('GR',
719: 'GR_RECORD_NOT_FOUND');
720: FND_MESSAGE.SET_TOKEN('CODE',
721: l_msg_token,
722: FALSE);

Line 720: FND_MESSAGE.SET_TOKEN('CODE',

716: x_return_status := 'E';
717: x_oracle_error := APP_EXCEPTION.Get_Code;
718: FND_MESSAGE.SET_NAME('GR',
719: 'GR_RECORD_NOT_FOUND');
720: FND_MESSAGE.SET_TOKEN('CODE',
721: l_msg_token,
722: FALSE);
723: IF FND_API.To_Boolean(p_called_by_form) THEN
724: APP_EXCEPTION.Raise_Exception;

Line 726: x_msg_data := FND_MESSAGE.Get;

722: FALSE);
723: IF FND_API.To_Boolean(p_called_by_form) THEN
724: APP_EXCEPTION.Raise_Exception;
725: ELSE
726: x_msg_data := FND_MESSAGE.Get;
727: END IF;
728:
729: WHEN OTHERS THEN
730: ROLLBACK TO SAVEPOINT Delete_Row;

Line 734: FND_MESSAGE.SET_NAME('GR',

730: ROLLBACK TO SAVEPOINT Delete_Row;
731: x_return_status := 'U';
732: x_oracle_error := SQLCODE;
733: l_msg_data := SUBSTR(SQLERRM, 1, 200);
734: FND_MESSAGE.SET_NAME('GR',
735: 'GR_UNEXPECTED_ERROR');
736: FND_MESSAGE.SET_TOKEN('TEXT',
737: l_msg_data,
738: FALSE);

Line 736: FND_MESSAGE.SET_TOKEN('TEXT',

732: x_oracle_error := SQLCODE;
733: l_msg_data := SUBSTR(SQLERRM, 1, 200);
734: FND_MESSAGE.SET_NAME('GR',
735: 'GR_UNEXPECTED_ERROR');
736: FND_MESSAGE.SET_TOKEN('TEXT',
737: l_msg_data,
738: FALSE);
739: IF FND_API.To_Boolean(p_called_by_form) THEN
740: APP_EXCEPTION.Raise_Exception;

Line 742: x_msg_data := FND_MESSAGE.Get;

738: FALSE);
739: IF FND_API.To_Boolean(p_called_by_form) THEN
740: APP_EXCEPTION.Raise_Exception;
741: ELSE
742: x_msg_data := FND_MESSAGE.Get;
743: END IF;
744:
745: END Delete_Row;
746:

Line 792: FND_MESSAGE.SET_NAME('GR',

788: ROLLBACK TO SAVEPOINT Delete_Rows;
789: x_return_status := 'U';
790: x_oracle_error := SQLCODE;
791: l_msg_data := SUBSTR(SQLERRM, 1, 200);
792: FND_MESSAGE.SET_NAME('GR',
793: 'GR_UNEXPECTED_ERROR');
794: FND_MESSAGE.SET_TOKEN('TEXT',
795: l_msg_token||sqlerrm,
796: FALSE);

Line 794: FND_MESSAGE.SET_TOKEN('TEXT',

790: x_oracle_error := SQLCODE;
791: l_msg_data := SUBSTR(SQLERRM, 1, 200);
792: FND_MESSAGE.SET_NAME('GR',
793: 'GR_UNEXPECTED_ERROR');
794: FND_MESSAGE.SET_TOKEN('TEXT',
795: l_msg_token||sqlerrm,
796: FALSE);
797: IF FND_API.To_Boolean(p_called_by_form) THEN
798: APP_EXCEPTION.Raise_Exception;

Line 800: x_msg_data := FND_MESSAGE.Get;

796: FALSE);
797: IF FND_API.To_Boolean(p_called_by_form) THEN
798: APP_EXCEPTION.Raise_Exception;
799: ELSE
800: x_msg_data := FND_MESSAGE.Get;
801: END IF;
802:
803: END Delete_Rows;
804:

Line 877: FND_MESSAGE.SET_NAME('GR',

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

Line 879: FND_MESSAGE.SET_TOKEN('CODE',

875: x_return_status := 'E';
876: x_oracle_error := APP_EXCEPTION.Get_Code;
877: FND_MESSAGE.SET_NAME('GR',
878: 'GR_RECORD_NOT_FOUND');
879: FND_MESSAGE.SET_TOKEN('CODE',
880: l_msg_token,
881: FALSE);
882: x_msg_data := FND_MESSAGE.Get;
883:

Line 882: x_msg_data := FND_MESSAGE.Get;

878: 'GR_RECORD_NOT_FOUND');
879: FND_MESSAGE.SET_TOKEN('CODE',
880: l_msg_token,
881: FALSE);
882: x_msg_data := FND_MESSAGE.Get;
883:
884: WHEN OTHERS THEN
885: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
886: x_return_status := 'U';

Line 889: FND_MESSAGE.SET_NAME('GR',

885: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
886: x_return_status := 'U';
887: x_oracle_error := SQLCODE;
888: l_msg_data := SUBSTR(SQLERRM, 1, 200);
889: FND_MESSAGE.SET_NAME('GR',
890: 'GR_UNEXPECTED_ERROR');
891: FND_MESSAGE.SET_TOKEN('TEXT',
892: l_msg_token||sqlerrm,
893: FALSE);

Line 891: FND_MESSAGE.SET_TOKEN('TEXT',

887: x_oracle_error := SQLCODE;
888: l_msg_data := SUBSTR(SQLERRM, 1, 200);
889: FND_MESSAGE.SET_NAME('GR',
890: 'GR_UNEXPECTED_ERROR');
891: FND_MESSAGE.SET_TOKEN('TEXT',
892: l_msg_token||sqlerrm,
893: FALSE);
894: x_msg_data := FND_MESSAGE.Get;
895:

Line 894: x_msg_data := FND_MESSAGE.Get;

890: 'GR_UNEXPECTED_ERROR');
891: FND_MESSAGE.SET_TOKEN('TEXT',
892: l_msg_token||sqlerrm,
893: FALSE);
894: x_msg_data := FND_MESSAGE.Get;
895:
896: END Check_Foreign_Keys;
897:
898: PROCEDURE Check_Integrity

Line 959: FND_MESSAGE.SET_NAME('GR',

955:
956: WHEN Installed_Language_Error THEN
957: ROLLBACK TO SAVEPOINT Check_Integrity;
958: x_return_status := 'E';
959: FND_MESSAGE.SET_NAME('GR',
960: 'GR_INSTALLED_LANG');
961: FND_MESSAGE.SET_TOKEN('CODE',
962: p_language,
963: FALSE);

Line 961: FND_MESSAGE.SET_TOKEN('CODE',

957: ROLLBACK TO SAVEPOINT Check_Integrity;
958: x_return_status := 'E';
959: FND_MESSAGE.SET_NAME('GR',
960: 'GR_INSTALLED_LANG');
961: FND_MESSAGE.SET_TOKEN('CODE',
962: p_language,
963: FALSE);
964: IF FND_API.To_Boolean(p_called_by_form) THEN
965: APP_EXCEPTION.Raise_Exception;

Line 967: x_msg_data := FND_MESSAGE.Get;

963: FALSE);
964: IF FND_API.To_Boolean(p_called_by_form) THEN
965: APP_EXCEPTION.Raise_Exception;
966: ELSE
967: x_msg_data := FND_MESSAGE.Get;
968: END IF;
969:
970: WHEN OTHERS THEN
971: ROLLBACK TO SAVEPOINT Check_Integrity;

Line 975: FND_MESSAGE.SET_NAME('GR',

971: ROLLBACK TO SAVEPOINT Check_Integrity;
972: x_return_status := 'U';
973: x_oracle_error := SQLCODE;
974: l_msg_data := SUBSTR(SQLERRM, 1, 200);
975: FND_MESSAGE.SET_NAME('GR',
976: 'GR_UNEXPECTED_ERROR');
977: FND_MESSAGE.SET_TOKEN('TEXT',
978: l_msg_data,
979: FALSE);

Line 977: FND_MESSAGE.SET_TOKEN('TEXT',

973: x_oracle_error := SQLCODE;
974: l_msg_data := SUBSTR(SQLERRM, 1, 200);
975: FND_MESSAGE.SET_NAME('GR',
976: 'GR_UNEXPECTED_ERROR');
977: FND_MESSAGE.SET_TOKEN('TEXT',
978: l_msg_data,
979: FALSE);
980: IF FND_API.To_Boolean(p_called_by_form) THEN
981: APP_EXCEPTION.Raise_Exception;

Line 983: x_msg_data := FND_MESSAGE.Get;

979: FALSE);
980: IF FND_API.To_Boolean(p_called_by_form) THEN
981: APP_EXCEPTION.Raise_Exception;
982: ELSE
983: x_msg_data := FND_MESSAGE.Get;
984: END IF;
985:
986: END Check_Integrity;
987:

Line 1035: FND_MESSAGE.SET_NAME('GR',

1031: EXCEPTION
1032:
1033: WHEN Others THEN
1034: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1035: FND_MESSAGE.SET_NAME('GR',
1036: 'GR_UNEXPECTED_ERROR');
1037: FND_MESSAGE.SET_TOKEN('TEXT',
1038: l_msg_data,
1039: FALSE);

Line 1037: FND_MESSAGE.SET_TOKEN('TEXT',

1033: WHEN Others THEN
1034: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1035: FND_MESSAGE.SET_NAME('GR',
1036: 'GR_UNEXPECTED_ERROR');
1037: FND_MESSAGE.SET_TOKEN('TEXT',
1038: l_msg_data,
1039: FALSE);
1040: IF FND_API.To_Boolean(p_called_by_form) THEN
1041: APP_EXCEPTION.Raise_Exception;