DBA Data[Home] [Help]

APPS.GR_EIN_ASL_CONCS_PKG dependencies on FND_MESSAGE

Line 142: FND_MESSAGE.SET_NAME('GR',

138: WHEN Foreign_Key_Error THEN
139: ROLLBACK TO SAVEPOINT Insert_Row;
140: x_return_status := l_return_status;
141: x_oracle_error := l_oracle_error;
142: FND_MESSAGE.SET_NAME('GR',
143: 'GR_FOREIGN_KEY_ERROR');
144: FND_MESSAGE.SET_TOKEN('TEXT',
145: l_msg_data,
146: FALSE);

Line 144: FND_MESSAGE.SET_TOKEN('TEXT',

140: x_return_status := l_return_status;
141: x_oracle_error := l_oracle_error;
142: FND_MESSAGE.SET_NAME('GR',
143: 'GR_FOREIGN_KEY_ERROR');
144: FND_MESSAGE.SET_TOKEN('TEXT',
145: l_msg_data,
146: FALSE);
147: IF FND_API.To_Boolean(p_called_by_form) THEN
148: APP_EXCEPTION.Raise_Exception;

Line 150: x_msg_data := FND_MESSAGE.Get;

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

Line 157: FND_MESSAGE.SET_NAME('GR',

153: WHEN Item_Exists_Error THEN
154: ROLLBACK TO SAVEPOINT Insert_Row;
155: x_return_status := 'E';
156: x_oracle_error := APP_EXCEPTION.Get_Code;
157: FND_MESSAGE.SET_NAME('GR',
158: 'GR_RECORD_EXISTS');
159: FND_MESSAGE.SET_TOKEN('CODE',
160: p_european_index_number||' '||p_hazard_classification_code,
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_RECORD_EXISTS');
159: FND_MESSAGE.SET_TOKEN('CODE',
160: p_european_index_number||' '||p_hazard_classification_code,
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 Row_Missing_Error THEN
169: ROLLBACK TO SAVEPOINT Insert_Row;

Line 172: FND_MESSAGE.SET_NAME('GR',

168: WHEN Row_Missing_Error THEN
169: ROLLBACK TO SAVEPOINT Insert_Row;
170: x_return_status := 'E';
171: x_oracle_error := APP_EXCEPTION.Get_Code;
172: FND_MESSAGE.SET_NAME('GR',
173: 'GR_NO_RECORD_INSERTED');
174: FND_MESSAGE.SET_TOKEN('CODE',
175: p_european_index_number,
176: FALSE);

Line 174: FND_MESSAGE.SET_TOKEN('CODE',

170: x_return_status := 'E';
171: x_oracle_error := APP_EXCEPTION.Get_Code;
172: FND_MESSAGE.SET_NAME('GR',
173: 'GR_NO_RECORD_INSERTED');
174: FND_MESSAGE.SET_TOKEN('CODE',
175: p_european_index_number,
176: FALSE);
177: x_msg_data := FND_MESSAGE.Get;
178: IF FND_API.To_Boolean(p_called_by_form) THEN

Line 177: x_msg_data := FND_MESSAGE.Get;

173: 'GR_NO_RECORD_INSERTED');
174: FND_MESSAGE.SET_TOKEN('CODE',
175: p_european_index_number,
176: FALSE);
177: x_msg_data := FND_MESSAGE.Get;
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;

Line 181: x_msg_data := FND_MESSAGE.Get;

177: x_msg_data := FND_MESSAGE.Get;
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: WHEN OTHERS THEN
185: ROLLBACK TO SAVEPOINT Insert_Row;

Line 189: FND_MESSAGE.SET_NAME('GR',

185: ROLLBACK TO SAVEPOINT Insert_Row;
186: x_return_status := 'U';
187: x_oracle_error := SQLCODE;
188: l_msg_data := SUBSTR(sqlerrm, 1, 200);
189: FND_MESSAGE.SET_NAME('GR',
190: 'GR_UNEXPECTED_ERROR');
191: FND_MESSAGE.SET_TOKEN('TEXT',
192: l_msg_data,
193: FALSE);

Line 191: FND_MESSAGE.SET_TOKEN('TEXT',

187: x_oracle_error := SQLCODE;
188: l_msg_data := SUBSTR(sqlerrm, 1, 200);
189: FND_MESSAGE.SET_NAME('GR',
190: 'GR_UNEXPECTED_ERROR');
191: FND_MESSAGE.SET_TOKEN('TEXT',
192: l_msg_data,
193: FALSE);
194: IF FND_API.To_Boolean(p_called_by_form) THEN
195: APP_EXCEPTION.Raise_Exception;

Line 197: x_msg_data := FND_MESSAGE.Get;

193: FALSE);
194: IF FND_API.To_Boolean(p_called_by_form) THEN
195: APP_EXCEPTION.Raise_Exception;
196: ELSE
197: x_msg_data := FND_MESSAGE.Get;
198: END IF;
199:
200: END Insert_Row;
201:

Line 290: FND_MESSAGE.SET_NAME('GR',

286: WHEN Foreign_Key_Error THEN
287: ROLLBACK TO SAVEPOINT Update_Row;
288: x_return_status := l_return_status;
289: x_oracle_error := l_oracle_error;
290: FND_MESSAGE.SET_NAME('GR',
291: 'GR_FOREIGN_KEY_ERROR');
292: FND_MESSAGE.SET_TOKEN('TEXT',
293: l_msg_data,
294: FALSE);

Line 292: FND_MESSAGE.SET_TOKEN('TEXT',

288: x_return_status := l_return_status;
289: x_oracle_error := l_oracle_error;
290: FND_MESSAGE.SET_NAME('GR',
291: 'GR_FOREIGN_KEY_ERROR');
292: FND_MESSAGE.SET_TOKEN('TEXT',
293: l_msg_data,
294: FALSE);
295: IF FND_API.To_Boolean(p_called_by_form) THEN
296: APP_EXCEPTION.Raise_Exception;

Line 298: x_msg_data := FND_MESSAGE.Get;

294: FALSE);
295: IF FND_API.To_Boolean(p_called_by_form) THEN
296: APP_EXCEPTION.Raise_Exception;
297: ELSE
298: x_msg_data := FND_MESSAGE.Get;
299: END IF;
300:
301: WHEN Row_Missing_Error THEN
302: ROLLBACK TO SAVEPOINT Update_Row;

Line 305: FND_MESSAGE.SET_NAME('GR',

301: WHEN Row_Missing_Error THEN
302: ROLLBACK TO SAVEPOINT Update_Row;
303: x_return_status := 'E';
304: x_oracle_error := APP_EXCEPTION.Get_Code;
305: FND_MESSAGE.SET_NAME('GR',
306: 'GR_NO_RECORD_INSERTED');
307: FND_MESSAGE.SET_TOKEN('CODE',
308: p_european_index_number||' '||TO_CHAR(p_concentration_low)||'-'||TO_CHAR(p_concentration_high),
309: FALSE);

Line 307: FND_MESSAGE.SET_TOKEN('CODE',

303: x_return_status := 'E';
304: x_oracle_error := APP_EXCEPTION.Get_Code;
305: FND_MESSAGE.SET_NAME('GR',
306: 'GR_NO_RECORD_INSERTED');
307: FND_MESSAGE.SET_TOKEN('CODE',
308: p_european_index_number||' '||TO_CHAR(p_concentration_low)||'-'||TO_CHAR(p_concentration_high),
309: FALSE);
310: IF FND_API.To_Boolean(p_called_by_form) THEN
311: APP_EXCEPTION.Raise_Exception;

Line 313: x_msg_data := FND_MESSAGE.Get;

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

Line 321: FND_MESSAGE.SET_NAME('GR',

317: ROLLBACK TO SAVEPOINT Update_Row;
318: x_return_status := 'U';
319: x_oracle_error := SQLCODE;
320: l_msg_data := SUBSTR(SQLERRM, 1, 200);
321: FND_MESSAGE.SET_NAME('GR',
322: 'GR_UNEXPECTED_ERROR');
323: FND_MESSAGE.SET_TOKEN('TEXT',
324: l_msg_data,
325: FALSE);

Line 323: FND_MESSAGE.SET_TOKEN('TEXT',

319: x_oracle_error := SQLCODE;
320: l_msg_data := SUBSTR(SQLERRM, 1, 200);
321: FND_MESSAGE.SET_NAME('GR',
322: 'GR_UNEXPECTED_ERROR');
323: FND_MESSAGE.SET_TOKEN('TEXT',
324: l_msg_data,
325: FALSE);
326: IF FND_API.To_Boolean(p_called_by_form) THEN
327: APP_EXCEPTION.Raise_Exception;

Line 329: x_msg_data := FND_MESSAGE.Get;

325: FALSE);
326: IF FND_API.To_Boolean(p_called_by_form) THEN
327: APP_EXCEPTION.Raise_Exception;
328: ELSE
329: x_msg_data := FND_MESSAGE.Get;
330: END IF;
331:
332: END Update_Row;
333:

Line 411: FND_MESSAGE.SET_NAME('GR',

407:
408: WHEN No_Data_Found_Error THEN
409: ROLLBACK TO SAVEPOINT Lock_Row;
410: x_return_status := 'E';
411: FND_MESSAGE.SET_NAME('GR',
412: 'GR_RECORD_NOT_FOUND');
413: FND_MESSAGE.SET_TOKEN('CODE',
414: p_european_index_number||' '||TO_CHAR(p_concentration_low)||'-'||TO_CHAR(p_concentration_high),
415: FALSE);

Line 413: FND_MESSAGE.SET_TOKEN('CODE',

409: ROLLBACK TO SAVEPOINT Lock_Row;
410: x_return_status := 'E';
411: FND_MESSAGE.SET_NAME('GR',
412: 'GR_RECORD_NOT_FOUND');
413: FND_MESSAGE.SET_TOKEN('CODE',
414: p_european_index_number||' '||TO_CHAR(p_concentration_low)||'-'||TO_CHAR(p_concentration_high),
415: FALSE);
416: IF FND_API.To_Boolean(p_called_by_form) THEN
417: APP_EXCEPTION.Raise_Exception;

Line 419: x_msg_data := FND_MESSAGE.Get;

415: FALSE);
416: IF FND_API.To_Boolean(p_called_by_form) THEN
417: APP_EXCEPTION.Raise_Exception;
418: ELSE
419: x_msg_data := FND_MESSAGE.Get;
420: END IF;
421: WHEN RECORD_CHANGED_ERROR THEN
422: ROLLBACK TO SAVEPOINT Lock_Row;
423: X_return_status := 'E';

Line 424: FND_MESSAGE.SET_NAME('FND',

420: END IF;
421: WHEN RECORD_CHANGED_ERROR THEN
422: ROLLBACK TO SAVEPOINT Lock_Row;
423: X_return_status := 'E';
424: FND_MESSAGE.SET_NAME('FND',
425: 'FORM_RECORD_CHANGED');
426: IF FND_API.To_Boolean(p_called_by_form) THEN
427: APP_EXCEPTION.Raise_Exception;
428: ELSE

Line 429: x_msg_data := FND_MESSAGE.Get;

425: 'FORM_RECORD_CHANGED');
426: IF FND_API.To_Boolean(p_called_by_form) THEN
427: APP_EXCEPTION.Raise_Exception;
428: ELSE
429: x_msg_data := FND_MESSAGE.Get;
430: END IF;
431: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
432: ROLLBACK TO SAVEPOINT Lock_Row;
433: x_return_status := 'L';

Line 436: FND_MESSAGE.SET_NAME('GR',

432: ROLLBACK TO SAVEPOINT Lock_Row;
433: x_return_status := 'L';
434: x_oracle_error := APP_EXCEPTION.Get_Code;
435: IF NOT (FND_API.To_Boolean(p_called_by_form)) THEN
436: FND_MESSAGE.SET_NAME('GR',
437: 'GR_ROW_IS_LOCKED');
438: x_msg_data := FND_MESSAGE.Get;
439: END IF;
440: WHEN OTHERS THEN

Line 438: x_msg_data := FND_MESSAGE.Get;

434: x_oracle_error := APP_EXCEPTION.Get_Code;
435: IF NOT (FND_API.To_Boolean(p_called_by_form)) THEN
436: FND_MESSAGE.SET_NAME('GR',
437: 'GR_ROW_IS_LOCKED');
438: x_msg_data := FND_MESSAGE.Get;
439: END IF;
440: WHEN OTHERS THEN
441: ROLLBACK TO SAVEPOINT Lock_Row;
442: x_return_status := 'U';

Line 445: FND_MESSAGE.SET_NAME('GR',

441: ROLLBACK TO SAVEPOINT Lock_Row;
442: x_return_status := 'U';
443: x_oracle_error := SQLCODE;
444: l_msg_data := SUBSTR(sqlerrm, 1, 200);
445: FND_MESSAGE.SET_NAME('GR',
446: 'GR_UNEXPECTED_ERROR');
447: FND_MESSAGE.SET_TOKEN('TEXT',
448: l_msg_data,
449: FALSE);

Line 447: FND_MESSAGE.SET_TOKEN('TEXT',

443: x_oracle_error := SQLCODE;
444: l_msg_data := SUBSTR(sqlerrm, 1, 200);
445: FND_MESSAGE.SET_NAME('GR',
446: 'GR_UNEXPECTED_ERROR');
447: FND_MESSAGE.SET_TOKEN('TEXT',
448: l_msg_data,
449: FALSE);
450: IF FND_API.To_Boolean(p_called_by_form) THEN
451: APP_EXCEPTION.Raise_Exception;

Line 453: x_msg_data := FND_MESSAGE.Get;

449: FALSE);
450: IF FND_API.To_Boolean(p_called_by_form) THEN
451: APP_EXCEPTION.Raise_Exception;
452: ELSE
453: x_msg_data := FND_MESSAGE.Get;
454: END IF;
455:
456: END Lock_Row;
457:

Line 534: x_msg_data := FND_MESSAGE.Get;

530: x_oracle_error := l_oracle_error;
531: IF FND_API.To_Boolean(p_called_by_form) THEN
532: APP_EXCEPTION.Raise_Exception;
533: ELSE
534: x_msg_data := FND_MESSAGE.Get;
535: END IF;
536:
537: WHEN Row_Missing_Error THEN
538: ROLLBACK TO SAVEPOINT Delete_Row;

Line 541: FND_MESSAGE.SET_NAME('GR',

537: WHEN Row_Missing_Error THEN
538: ROLLBACK TO SAVEPOINT Delete_Row;
539: x_return_status := 'E';
540: x_oracle_error := APP_EXCEPTION.Get_Code;
541: FND_MESSAGE.SET_NAME('GR',
542: 'GR_RECORD_NOT_FOUND');
543: FND_MESSAGE.SET_TOKEN('CODE',
544: p_european_index_number||' '||TO_CHAR(p_concentration_low)||'-'||TO_CHAR(p_concentration_high),
545: FALSE);

Line 543: FND_MESSAGE.SET_TOKEN('CODE',

539: x_return_status := 'E';
540: x_oracle_error := APP_EXCEPTION.Get_Code;
541: FND_MESSAGE.SET_NAME('GR',
542: 'GR_RECORD_NOT_FOUND');
543: FND_MESSAGE.SET_TOKEN('CODE',
544: p_european_index_number||' '||TO_CHAR(p_concentration_low)||'-'||TO_CHAR(p_concentration_high),
545: FALSE);
546: IF FND_API.To_Boolean(p_called_by_form) THEN
547: APP_EXCEPTION.Raise_Exception;

Line 549: x_msg_data := FND_MESSAGE.Get;

545: FALSE);
546: IF FND_API.To_Boolean(p_called_by_form) THEN
547: APP_EXCEPTION.Raise_Exception;
548: ELSE
549: x_msg_data := FND_MESSAGE.Get;
550: END IF;
551:
552: WHEN OTHERS THEN
553: ROLLBACK TO SAVEPOINT Delete_Row;

Line 557: FND_MESSAGE.SET_NAME('GR',

553: ROLLBACK TO SAVEPOINT Delete_Row;
554: x_return_status := 'U';
555: x_oracle_error := SQLCODE;
556: l_msg_data := SUBSTR(sqlerrm, 1, 200);
557: FND_MESSAGE.SET_NAME('GR',
558: 'GR_UNEXPECTED_ERROR');
559: FND_MESSAGE.SET_TOKEN('TEXT',
560: l_msg_data,
561: FALSE);

Line 559: FND_MESSAGE.SET_TOKEN('TEXT',

555: x_oracle_error := SQLCODE;
556: l_msg_data := SUBSTR(sqlerrm, 1, 200);
557: FND_MESSAGE.SET_NAME('GR',
558: 'GR_UNEXPECTED_ERROR');
559: FND_MESSAGE.SET_TOKEN('TEXT',
560: l_msg_data,
561: FALSE);
562: IF FND_API.To_Boolean(p_called_by_form) THEN
563: APP_EXCEPTION.Raise_Exception;

Line 565: x_msg_data := FND_MESSAGE.Get;

561: FALSE);
562: IF FND_API.To_Boolean(p_called_by_form) THEN
563: APP_EXCEPTION.Raise_Exception;
564: ELSE
565: x_msg_data := FND_MESSAGE.Get;
566: END IF;
567:
568: END Delete_Row;
569:

Line 615: FND_MESSAGE.SET_NAME('GR',

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

Line 617: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 623: x_msg_data := FND_MESSAGE.Get;

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

Line 674: FND_MESSAGE.SET_NAME('GR',

670: IF c_get_hazards%NOTFOUND THEN
671: l_msg_token := p_hazard_classification_code;
672: x_return_status := 'E';
673: x_oracle_error := APP_EXCEPTION.Get_Code;
674: FND_MESSAGE.SET_NAME('GR',
675: 'GR_RECORD_NOT_FOUND');
676: FND_MESSAGE.SET_TOKEN('CODE',
677: l_msg_token,
678: FALSE);

Line 676: FND_MESSAGE.SET_TOKEN('CODE',

672: x_return_status := 'E';
673: x_oracle_error := APP_EXCEPTION.Get_Code;
674: FND_MESSAGE.SET_NAME('GR',
675: 'GR_RECORD_NOT_FOUND');
676: FND_MESSAGE.SET_TOKEN('CODE',
677: l_msg_token,
678: FALSE);
679: l_msg_data := FND_MESSAGE.Get;
680: END IF;

Line 679: l_msg_data := FND_MESSAGE.Get;

675: 'GR_RECORD_NOT_FOUND');
676: FND_MESSAGE.SET_TOKEN('CODE',
677: l_msg_token,
678: FALSE);
679: l_msg_data := FND_MESSAGE.Get;
680: END IF;
681: CLOSE c_get_hazards;
682: END IF;
683: IF x_return_status <> 'S' THEN

Line 694: FND_MESSAGE.SET_NAME('GR',

690: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
691: x_return_status := 'U';
692: x_oracle_error := SQLCODE;
693: l_msg_data := SUBSTR(sqlerrm, 1, 200);
694: FND_MESSAGE.SET_NAME('GR',
695: 'GR_UNEXPECTED_ERROR');
696: FND_MESSAGE.SET_TOKEN('TEXT',
697: l_msg_data,
698: FALSE);

Line 696: FND_MESSAGE.SET_TOKEN('TEXT',

692: x_oracle_error := SQLCODE;
693: l_msg_data := SUBSTR(sqlerrm, 1, 200);
694: FND_MESSAGE.SET_NAME('GR',
695: 'GR_UNEXPECTED_ERROR');
696: FND_MESSAGE.SET_TOKEN('TEXT',
697: l_msg_data,
698: FALSE);
699: x_msg_data := FND_MESSAGE.Get;
700:

Line 699: x_msg_data := FND_MESSAGE.Get;

695: 'GR_UNEXPECTED_ERROR');
696: FND_MESSAGE.SET_TOKEN('TEXT',
697: l_msg_data,
698: FALSE);
699: x_msg_data := FND_MESSAGE.Get;
700:
701: END Check_Foreign_Keys;
702:
703: PROCEDURE Check_Integrity

Line 748: FND_MESSAGE.SET_NAME('GR',

744: EXCEPTION
745:
746: WHEN INTEGRITY_ERROR THEN
747: x_return_status := 'E';
748: FND_MESSAGE.SET_NAME('GR',
749: 'GR_INTEGRITY_HEADER');
750: FND_MESSAGE.SET_TOKEN('CODE',
751: p_european_index_number||' '||p_hazard_classification_code,
752: FALSE);

Line 750: FND_MESSAGE.SET_TOKEN('CODE',

746: WHEN INTEGRITY_ERROR THEN
747: x_return_status := 'E';
748: FND_MESSAGE.SET_NAME('GR',
749: 'GR_INTEGRITY_HEADER');
750: FND_MESSAGE.SET_TOKEN('CODE',
751: p_european_index_number||' '||p_hazard_classification_code,
752: FALSE);
753: FND_MESSAGE.SET_TOKEN('TABLES',
754: l_msg_data,

Line 753: FND_MESSAGE.SET_TOKEN('TABLES',

749: 'GR_INTEGRITY_HEADER');
750: FND_MESSAGE.SET_TOKEN('CODE',
751: p_european_index_number||' '||p_hazard_classification_code,
752: FALSE);
753: FND_MESSAGE.SET_TOKEN('TABLES',
754: l_msg_data,
755: FALSE);
756: IF FND_API.To_Boolean(p_called_by_form) THEN
757: APP_EXCEPTION.Raise_Exception;

Line 759: x_msg_data := FND_MESSAGE.Get;

755: FALSE);
756: IF FND_API.To_Boolean(p_called_by_form) THEN
757: APP_EXCEPTION.Raise_Exception;
758: ELSE
759: x_msg_data := FND_MESSAGE.Get;
760: END IF;
761: WHEN OTHERS THEN
762: ROLLBACK TO SAVEPOINT Check_Integrity;
763: x_return_status := 'U';

Line 766: FND_MESSAGE.SET_NAME('GR',

762: ROLLBACK TO SAVEPOINT Check_Integrity;
763: x_return_status := 'U';
764: x_oracle_error := SQLCODE;
765: l_msg_data := SUBSTR(sqlerrm, 1, 200);
766: FND_MESSAGE.SET_NAME('GR',
767: 'GR_UNEXPECTED_ERROR');
768: FND_MESSAGE.SET_TOKEN('TEXT',
769: l_msg_data,
770: FALSE);

Line 768: FND_MESSAGE.SET_TOKEN('TEXT',

764: x_oracle_error := SQLCODE;
765: l_msg_data := SUBSTR(sqlerrm, 1, 200);
766: FND_MESSAGE.SET_NAME('GR',
767: 'GR_UNEXPECTED_ERROR');
768: FND_MESSAGE.SET_TOKEN('TEXT',
769: l_msg_data,
770: FALSE);
771: IF FND_API.To_Boolean(p_called_by_form) THEN
772: APP_EXCEPTION.Raise_Exception;

Line 774: x_msg_data := FND_MESSAGE.Get;

770: FALSE);
771: IF FND_API.To_Boolean(p_called_by_form) THEN
772: APP_EXCEPTION.Raise_Exception;
773: ELSE
774: x_msg_data := FND_MESSAGE.Get;
775: END IF;
776:
777: END Check_Integrity;
778:

Line 824: FND_MESSAGE.SET_NAME('GR',

820: EXCEPTION
821:
822: WHEN Others THEN
823: l_msg_data := sqlerrm;
824: FND_MESSAGE.SET_NAME('GR',
825: 'GR_UNEXPECTED_ERROR');
826: FND_MESSAGE.SET_TOKEN('TEXT',
827: l_msg_data,
828: FALSE);

Line 826: FND_MESSAGE.SET_TOKEN('TEXT',

822: WHEN Others THEN
823: l_msg_data := sqlerrm;
824: FND_MESSAGE.SET_NAME('GR',
825: 'GR_UNEXPECTED_ERROR');
826: FND_MESSAGE.SET_TOKEN('TEXT',
827: l_msg_data,
828: FALSE);
829: IF FND_API.To_Boolean(p_called_by_form) THEN
830: APP_EXCEPTION.Raise_Exception;