DBA Data[Home] [Help]

APPS.GR_TOXIC_SPECIES_TL_PKG dependencies on FND_MESSAGE

Line 125: FND_MESSAGE.SET_NAME('GR',

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

Line 127: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 133: x_msg_data := FND_MESSAGE.Get;

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

Line 141: FND_MESSAGE.SET_NAME('GR',

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

Line 143: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 149: x_msg_data := FND_MESSAGE.Get;

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

Line 157: FND_MESSAGE.SET_NAME('GR',

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

Line 159: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 165: x_msg_data := FND_MESSAGE.Get;

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

Line 174: FND_MESSAGE.SET_NAME('GR',

170: l_msg_token := p_toxic_species_code || ' ' || p_language;
171: x_return_status := 'U';
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,
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,
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 303: FND_MESSAGE.SET_NAME('GR',

299: ROLLBACK TO SAVEPOINT Update_Row;
300: x_return_status := 'U';
301: x_oracle_error := SQLCODE;
302: l_msg_data := SUBSTR(SQLERRM, 1, 200);
303: FND_MESSAGE.SET_NAME('GR',
304: 'GR_UNEXPECTED_ERROR');
305: FND_MESSAGE.SET_TOKEN('TEXT',
306: l_msg_token,
307: FALSE);

Line 305: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 311: x_msg_data := FND_MESSAGE.Get;

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

Line 485: FND_MESSAGE.SET_NAME('GR',

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

Line 487: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 493: x_msg_data := FND_MESSAGE.Get;

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

Line 501: FND_MESSAGE.SET_NAME('GR',

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

Line 503: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 509: x_msg_data := FND_MESSAGE.Get;

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

Line 591: FND_MESSAGE.SET_NAME('GR',

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

Line 593: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 599: x_msg_data := FND_MESSAGE.Get;

595: FALSE);
596: IF FND_API.To_Boolean(p_called_by_form) THEN
597: APP_EXCEPTION.Raise_Exception;
598: ELSE
599: x_msg_data := FND_MESSAGE.Get;
600: END IF;
601:
602: WHEN RECORD_CHANGED_ERROR THEN
603: ROLLBACK TO SAVEPOINT Lock_Row;

Line 605: FND_MESSAGE.SET_NAME('FND',

601:
602: WHEN RECORD_CHANGED_ERROR THEN
603: ROLLBACK TO SAVEPOINT Lock_Row;
604: X_return_status := 'E';
605: FND_MESSAGE.SET_NAME('FND',
606: 'FORM_RECORD_CHANGED');
607: IF FND_API.To_Boolean(p_called_by_form) THEN
608: APP_EXCEPTION.Raise_Exception;
609: ELSE

Line 610: x_msg_data := FND_MESSAGE.Get;

606: 'FORM_RECORD_CHANGED');
607: IF FND_API.To_Boolean(p_called_by_form) THEN
608: APP_EXCEPTION.Raise_Exception;
609: ELSE
610: x_msg_data := FND_MESSAGE.Get;
611: END IF;
612: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
613: ROLLBACK TO SAVEPOINT Lock_Row;
614: x_return_status := 'L';

Line 617: FND_MESSAGE.SET_NAME('GR',

613: ROLLBACK TO SAVEPOINT Lock_Row;
614: x_return_status := 'L';
615: x_oracle_error := APP_EXCEPTION.Get_Code;
616: IF NOT (FND_API.To_Boolean(p_called_by_form)) THEN
617: FND_MESSAGE.SET_NAME('GR',
618: 'GR_ROW_IS_LOCKED');
619: x_msg_data := FND_MESSAGE.Get;
620: END IF;
621:

Line 619: x_msg_data := FND_MESSAGE.Get;

615: x_oracle_error := APP_EXCEPTION.Get_Code;
616: IF NOT (FND_API.To_Boolean(p_called_by_form)) THEN
617: FND_MESSAGE.SET_NAME('GR',
618: 'GR_ROW_IS_LOCKED');
619: x_msg_data := FND_MESSAGE.Get;
620: END IF;
621:
622: WHEN OTHERS THEN
623: ROLLBACK TO SAVEPOINT Lock_Row;

Line 627: FND_MESSAGE.SET_NAME('GR',

623: ROLLBACK TO SAVEPOINT Lock_Row;
624: x_return_status := 'U';
625: x_oracle_error := SQLCODE;
626: l_msg_data := SUBSTR(SQLERRM, 1, 200);
627: FND_MESSAGE.SET_NAME('GR',
628: 'GR_UNEXPECTED_ERROR');
629: FND_MESSAGE.SET_TOKEN('TEXT',
630: l_msg_token,
631: FALSE);

Line 629: FND_MESSAGE.SET_TOKEN('TEXT',

625: x_oracle_error := SQLCODE;
626: l_msg_data := SUBSTR(SQLERRM, 1, 200);
627: FND_MESSAGE.SET_NAME('GR',
628: 'GR_UNEXPECTED_ERROR');
629: FND_MESSAGE.SET_TOKEN('TEXT',
630: l_msg_token,
631: FALSE);
632: IF FND_API.To_Boolean(p_called_by_form) THEN
633: APP_EXCEPTION.Raise_Exception;

Line 635: x_msg_data := FND_MESSAGE.Get;

631: FALSE);
632: IF FND_API.To_Boolean(p_called_by_form) THEN
633: APP_EXCEPTION.Raise_Exception;
634: ELSE
635: x_msg_data := FND_MESSAGE.Get;
636: END IF;
637:
638: END Lock_Row;
639:

Line 722: x_msg_data := FND_MESSAGE.Get;

718: x_oracle_error := l_oracle_error;
719: IF FND_API.To_Boolean(p_called_by_form) THEN
720: APP_EXCEPTION.Raise_Exception;
721: ELSE
722: x_msg_data := FND_MESSAGE.Get;
723: END IF;
724:
725: WHEN Row_Missing_Error THEN
726: ROLLBACK TO SAVEPOINT Delete_Row;

Line 729: FND_MESSAGE.SET_NAME('GR',

725: WHEN Row_Missing_Error THEN
726: ROLLBACK TO SAVEPOINT Delete_Row;
727: x_return_status := 'E';
728: x_oracle_error := APP_EXCEPTION.Get_Code;
729: FND_MESSAGE.SET_NAME('GR',
730: 'GR_RECORD_NOT_FOUND');
731: FND_MESSAGE.SET_TOKEN('CODE',
732: l_msg_token,
733: FALSE);

Line 731: FND_MESSAGE.SET_TOKEN('CODE',

727: x_return_status := 'E';
728: x_oracle_error := APP_EXCEPTION.Get_Code;
729: FND_MESSAGE.SET_NAME('GR',
730: 'GR_RECORD_NOT_FOUND');
731: FND_MESSAGE.SET_TOKEN('CODE',
732: l_msg_token,
733: FALSE);
734: IF FND_API.To_Boolean(p_called_by_form) THEN
735: APP_EXCEPTION.Raise_Exception;

Line 737: x_msg_data := FND_MESSAGE.Get;

733: FALSE);
734: IF FND_API.To_Boolean(p_called_by_form) THEN
735: APP_EXCEPTION.Raise_Exception;
736: ELSE
737: x_msg_data := FND_MESSAGE.Get;
738: END IF;
739:
740: WHEN OTHERS THEN
741: ROLLBACK TO SAVEPOINT Delete_Row;

Line 745: FND_MESSAGE.SET_NAME('GR',

741: ROLLBACK TO SAVEPOINT Delete_Row;
742: x_return_status := 'U';
743: x_oracle_error := SQLCODE;
744: l_msg_data := SUBSTR(SQLERRM, 1, 200);
745: FND_MESSAGE.SET_NAME('GR',
746: 'GR_UNEXPECTED_ERROR');
747: FND_MESSAGE.SET_TOKEN('TEXT',
748: l_msg_token,
749: FALSE);

Line 747: FND_MESSAGE.SET_TOKEN('TEXT',

743: x_oracle_error := SQLCODE;
744: l_msg_data := SUBSTR(SQLERRM, 1, 200);
745: FND_MESSAGE.SET_NAME('GR',
746: 'GR_UNEXPECTED_ERROR');
747: FND_MESSAGE.SET_TOKEN('TEXT',
748: l_msg_token,
749: FALSE);
750: IF FND_API.To_Boolean(p_called_by_form) THEN
751: APP_EXCEPTION.Raise_Exception;

Line 753: x_msg_data := FND_MESSAGE.Get;

749: FALSE);
750: IF FND_API.To_Boolean(p_called_by_form) THEN
751: APP_EXCEPTION.Raise_Exception;
752: ELSE
753: x_msg_data := FND_MESSAGE.Get;
754: END IF;
755:
756: END Delete_Row;
757:

Line 803: FND_MESSAGE.SET_NAME('GR',

799: ROLLBACK TO SAVEPOINT Delete_Rows;
800: x_return_status := 'U';
801: x_oracle_error := SQLCODE;
802: l_msg_data := SUBSTR(SQLERRM, 1, 200);
803: FND_MESSAGE.SET_NAME('GR',
804: 'GR_UNEXPECTED_ERROR');
805: FND_MESSAGE.SET_TOKEN('TEXT',
806: l_msg_token,
807: FALSE);

Line 805: FND_MESSAGE.SET_TOKEN('TEXT',

801: x_oracle_error := SQLCODE;
802: l_msg_data := SUBSTR(SQLERRM, 1, 200);
803: FND_MESSAGE.SET_NAME('GR',
804: 'GR_UNEXPECTED_ERROR');
805: FND_MESSAGE.SET_TOKEN('TEXT',
806: l_msg_token,
807: FALSE);
808: IF FND_API.To_Boolean(p_called_by_form) THEN
809: APP_EXCEPTION.Raise_Exception;

Line 811: x_msg_data := FND_MESSAGE.Get;

807: FALSE);
808: IF FND_API.To_Boolean(p_called_by_form) THEN
809: APP_EXCEPTION.Raise_Exception;
810: ELSE
811: x_msg_data := FND_MESSAGE.Get;
812: END IF;
813:
814: END Delete_Rows;
815:

Line 865: FND_MESSAGE.SET_NAME('GR',

861: IF c_get_language%NOTFOUND THEN
862: l_msg_token := l_language_code;
863: x_return_status := 'E';
864: x_oracle_error := APP_EXCEPTION.Get_Code;
865: FND_MESSAGE.SET_NAME('GR',
866: 'GR_RECORD_NOT_FOUND');
867: FND_MESSAGE.SET_TOKEN('CODE',
868: l_msg_token,
869: FALSE);

Line 867: FND_MESSAGE.SET_TOKEN('CODE',

863: x_return_status := 'E';
864: x_oracle_error := APP_EXCEPTION.Get_Code;
865: FND_MESSAGE.SET_NAME('GR',
866: 'GR_RECORD_NOT_FOUND');
867: FND_MESSAGE.SET_TOKEN('CODE',
868: l_msg_token,
869: FALSE);
870: l_msg_data := FND_MESSAGE.Get;
871: END IF;

Line 870: l_msg_data := FND_MESSAGE.Get;

866: 'GR_RECORD_NOT_FOUND');
867: FND_MESSAGE.SET_TOKEN('CODE',
868: l_msg_token,
869: FALSE);
870: l_msg_data := FND_MESSAGE.Get;
871: END IF;
872: CLOSE c_get_language;
873:
874: l_language_code := p_source_lang;

Line 881: FND_MESSAGE.SET_NAME('GR',

877: IF c_get_language%NOTFOUND THEN
878: l_msg_token := l_language_code;
879: x_return_status := 'E';
880: x_oracle_error := APP_EXCEPTION.Get_Code;
881: FND_MESSAGE.SET_NAME('GR',
882: 'GR_RECORD_NOT_FOUND');
883: FND_MESSAGE.SET_TOKEN('CODE',
884: l_msg_token,
885: FALSE);

Line 883: FND_MESSAGE.SET_TOKEN('CODE',

879: x_return_status := 'E';
880: x_oracle_error := APP_EXCEPTION.Get_Code;
881: FND_MESSAGE.SET_NAME('GR',
882: 'GR_RECORD_NOT_FOUND');
883: FND_MESSAGE.SET_TOKEN('CODE',
884: l_msg_token,
885: FALSE);
886: l_msg_data := FND_MESSAGE.Get;
887: END IF;

Line 886: l_msg_data := FND_MESSAGE.Get;

882: 'GR_RECORD_NOT_FOUND');
883: FND_MESSAGE.SET_TOKEN('CODE',
884: l_msg_token,
885: FALSE);
886: l_msg_data := FND_MESSAGE.Get;
887: END IF;
888: CLOSE c_get_language;
889:
890: IF x_return_status <> 'S' THEN

Line 901: FND_MESSAGE.SET_NAME('GR',

897: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
898: x_return_status := 'U';
899: x_oracle_error := SQLCODE;
900: l_msg_data := SUBSTR(SQLERRM, 1, 200);
901: FND_MESSAGE.SET_NAME('GR',
902: 'GR_UNEXPECTED_ERROR');
903: FND_MESSAGE.SET_TOKEN('TEXT',
904: l_msg_token,
905: FALSE);

Line 903: FND_MESSAGE.SET_TOKEN('TEXT',

899: x_oracle_error := SQLCODE;
900: l_msg_data := SUBSTR(SQLERRM, 1, 200);
901: FND_MESSAGE.SET_NAME('GR',
902: 'GR_UNEXPECTED_ERROR');
903: FND_MESSAGE.SET_TOKEN('TEXT',
904: l_msg_token,
905: FALSE);
906: x_msg_data := FND_MESSAGE.Get;
907:

Line 906: x_msg_data := FND_MESSAGE.Get;

902: 'GR_UNEXPECTED_ERROR');
903: FND_MESSAGE.SET_TOKEN('TEXT',
904: l_msg_token,
905: FALSE);
906: x_msg_data := FND_MESSAGE.Get;
907:
908: END Check_Foreign_Keys;
909:
910: PROCEDURE Check_Integrity

Line 970: FND_MESSAGE.SET_NAME('GR',

966:
967: WHEN Installed_Language_Error THEN
968: ROLLBACK TO SAVEPOINT Check_Integrity;
969: x_return_status := 'E';
970: FND_MESSAGE.SET_NAME('GR',
971: 'GR_INSTALLED_LANG');
972: FND_MESSAGE.SET_TOKEN('CODE',
973: p_language,
974: FALSE);

Line 972: FND_MESSAGE.SET_TOKEN('CODE',

968: ROLLBACK TO SAVEPOINT Check_Integrity;
969: x_return_status := 'E';
970: FND_MESSAGE.SET_NAME('GR',
971: 'GR_INSTALLED_LANG');
972: FND_MESSAGE.SET_TOKEN('CODE',
973: p_language,
974: FALSE);
975: IF FND_API.To_Boolean(p_called_by_form) THEN
976: APP_EXCEPTION.Raise_Exception;

Line 978: x_msg_data := FND_MESSAGE.Get;

974: FALSE);
975: IF FND_API.To_Boolean(p_called_by_form) THEN
976: APP_EXCEPTION.Raise_Exception;
977: ELSE
978: x_msg_data := FND_MESSAGE.Get;
979: END IF;
980:
981: WHEN OTHERS THEN
982: ROLLBACK TO SAVEPOINT Check_Integrity;

Line 986: FND_MESSAGE.SET_NAME('GR',

982: ROLLBACK TO SAVEPOINT Check_Integrity;
983: x_return_status := 'U';
984: x_oracle_error := SQLCODE;
985: l_msg_data := SUBSTR(SQLERRM, 1, 200);
986: FND_MESSAGE.SET_NAME('GR',
987: 'GR_UNEXPECTED_ERROR');
988: FND_MESSAGE.SET_TOKEN('TEXT',
989: l_msg_data,
990: FALSE);

Line 988: FND_MESSAGE.SET_TOKEN('TEXT',

984: x_oracle_error := SQLCODE;
985: l_msg_data := SUBSTR(SQLERRM, 1, 200);
986: FND_MESSAGE.SET_NAME('GR',
987: 'GR_UNEXPECTED_ERROR');
988: FND_MESSAGE.SET_TOKEN('TEXT',
989: l_msg_data,
990: FALSE);
991: IF FND_API.To_Boolean(p_called_by_form) THEN
992: APP_EXCEPTION.Raise_Exception;

Line 994: x_msg_data := FND_MESSAGE.Get;

990: FALSE);
991: IF FND_API.To_Boolean(p_called_by_form) THEN
992: APP_EXCEPTION.Raise_Exception;
993: ELSE
994: x_msg_data := FND_MESSAGE.Get;
995: END IF;
996:
997: END Check_Integrity;
998:

Line 1046: FND_MESSAGE.SET_NAME('GR',

1042: EXCEPTION
1043:
1044: WHEN Others THEN
1045: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1046: FND_MESSAGE.SET_NAME('GR',
1047: 'GR_UNEXPECTED_ERROR');
1048: FND_MESSAGE.SET_TOKEN('TEXT',
1049: l_msg_data,
1050: FALSE);

Line 1048: FND_MESSAGE.SET_TOKEN('TEXT',

1044: WHEN Others THEN
1045: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1046: FND_MESSAGE.SET_NAME('GR',
1047: 'GR_UNEXPECTED_ERROR');
1048: FND_MESSAGE.SET_TOKEN('TEXT',
1049: l_msg_data,
1050: FALSE);
1051: IF FND_API.To_Boolean(p_called_by_form) THEN
1052: APP_EXCEPTION.Raise_Exception;