DBA Data[Home] [Help]

APPS.GR_PROPERTIES_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_property_id || ' ' || p_language;
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_property_id || ' ' || p_language;
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 173: FND_MESSAGE.SET_NAME('GR',

169: l_msg_token := p_property_id || ' ' || p_language;
170: x_return_status := 'U';
171: x_oracle_error := SQLCODE;
172: l_msg_data := SUBSTR(SQLERRM, 1, 200);
173: FND_MESSAGE.SET_NAME('GR',
174: 'GR_UNEXPECTED_ERROR');
175: FND_MESSAGE.SET_TOKEN('TEXT',
176: l_msg_token,
177: FALSE);

Line 175: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 181: x_msg_data := FND_MESSAGE.Get;

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

Line 271: FND_MESSAGE.SET_NAME('GR',

267: WHEN Foreign_Key_Error THEN
268: ROLLBACK TO SAVEPOINT Update_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 Row_Missing_Error THEN
283: ROLLBACK TO SAVEPOINT Update_Row;

Line 286: FND_MESSAGE.SET_NAME('GR',

282: WHEN Row_Missing_Error THEN
283: ROLLBACK TO SAVEPOINT Update_Row;
284: x_return_status := 'E';
285: x_oracle_error := APP_EXCEPTION.Get_Code;
286: FND_MESSAGE.SET_NAME('GR',
287: 'GR_NO_RECORD_INSERTED');
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_NO_RECORD_INSERTED');
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 OTHERS THEN
298: ROLLBACK TO SAVEPOINT Update_Row;

Line 302: FND_MESSAGE.SET_NAME('GR',

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

Line 304: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 310: x_msg_data := FND_MESSAGE.Get;

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

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 586: FND_MESSAGE.SET_NAME('GR',

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

Line 588: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 594: x_msg_data := FND_MESSAGE.Get;

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

Line 601: FND_MESSAGE.SET_NAME('GR',

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

Line 606: x_msg_data := FND_MESSAGE.Get;

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

Line 614: FND_MESSAGE.SET_NAME('GR',

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

Line 616: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 622: x_msg_data := FND_MESSAGE.Get;

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

Line 709: x_msg_data := FND_MESSAGE.Get;

705: x_oracle_error := l_oracle_error;
706: IF FND_API.To_Boolean(p_called_by_form) THEN
707: APP_EXCEPTION.Raise_Exception;
708: ELSE
709: x_msg_data := FND_MESSAGE.Get;
710: END IF;
711:
712: WHEN Row_Missing_Error THEN
713: ROLLBACK TO SAVEPOINT Delete_Row;

Line 716: FND_MESSAGE.SET_NAME('GR',

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

Line 718: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 724: x_msg_data := FND_MESSAGE.Get;

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

Line 733: FND_MESSAGE.SET_NAME('GR',

729: x_return_status := 'U';
730: x_oracle_error := SQLCODE;
731: l_msg_data := SUBSTR(SQLERRM, 1, 200);
732: l_msg_data := APP_EXCEPTION.Get_Text;
733: FND_MESSAGE.SET_NAME('GR',
734: 'GR_UNEXPECTED_ERROR');
735: FND_MESSAGE.SET_TOKEN('TEXT',
736: l_msg_token,
737: FALSE);

Line 735: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 741: x_msg_data := FND_MESSAGE.Get;

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

Line 791: FND_MESSAGE.SET_NAME('GR',

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

Line 793: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 799: x_msg_data := FND_MESSAGE.Get;

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

Line 876: FND_MESSAGE.SET_NAME('GR',

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

Line 878: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 881: x_msg_data := FND_MESSAGE.Get;

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

Line 888: FND_MESSAGE.SET_NAME('GR',

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

Line 890: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 893: x_msg_data := FND_MESSAGE.Get;

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

Line 958: FND_MESSAGE.SET_NAME('GR',

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

Line 960: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 966: x_msg_data := FND_MESSAGE.Get;

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

Line 974: FND_MESSAGE.SET_NAME('GR',

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

Line 976: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 982: x_msg_data := FND_MESSAGE.Get;

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

Line 1034: FND_MESSAGE.SET_NAME('GR',

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

Line 1036: FND_MESSAGE.SET_TOKEN('TEXT',

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