DBA Data[Home] [Help]

APPS.GR_DOCUMENT_PRINT_PKG dependencies on FND_MESSAGE

Line 274: FND_MESSAGE.SET_NAME('GR',

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

Line 276: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 282: x_msg_data := FND_MESSAGE.Get;

278: FALSE);
279: IF FND_API.To_Boolean(p_called_by_form) THEN
280: APP_EXCEPTION.Raise_Exception;
281: ELSE
282: x_msg_data := FND_MESSAGE.Get;
283: END IF;
284:
285: WHEN Label_Exists_Error THEN
286: ROLLBACK TO SAVEPOINT Insert_Row;

Line 289: FND_MESSAGE.SET_NAME('GR',

285: WHEN Label_Exists_Error THEN
286: ROLLBACK TO SAVEPOINT Insert_Row;
287: x_return_status := 'E';
288: x_oracle_error := APP_EXCEPTION.Get_Code;
289: FND_MESSAGE.SET_NAME('GR',
290: 'GR_RECORD_EXISTS');
291: FND_MESSAGE.SET_TOKEN('CODE',
292: p_document_code || ' ' || p_item_code,
293: FALSE);

Line 291: FND_MESSAGE.SET_TOKEN('CODE',

287: x_return_status := 'E';
288: x_oracle_error := APP_EXCEPTION.Get_Code;
289: FND_MESSAGE.SET_NAME('GR',
290: 'GR_RECORD_EXISTS');
291: FND_MESSAGE.SET_TOKEN('CODE',
292: p_document_code || ' ' || p_item_code,
293: FALSE);
294: IF FND_API.To_Boolean(p_called_by_form) THEN
295: APP_EXCEPTION.Raise_Exception;

Line 297: x_msg_data := FND_MESSAGE.Get;

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

Line 304: FND_MESSAGE.SET_NAME('GR',

300: WHEN Row_Missing_Error THEN
301: ROLLBACK TO SAVEPOINT Insert_Row;
302: x_return_status := 'E';
303: x_oracle_error := APP_EXCEPTION.Get_Code;
304: FND_MESSAGE.SET_NAME('GR',
305: 'GR_NO_RECORD_INSERTED');
306: FND_MESSAGE.SET_TOKEN('CODE',
307: p_document_code || ' ' || p_item_code,
308: FALSE);

Line 306: FND_MESSAGE.SET_TOKEN('CODE',

302: x_return_status := 'E';
303: x_oracle_error := APP_EXCEPTION.Get_Code;
304: FND_MESSAGE.SET_NAME('GR',
305: 'GR_NO_RECORD_INSERTED');
306: FND_MESSAGE.SET_TOKEN('CODE',
307: p_document_code || ' ' || p_item_code,
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: WHEN OTHERS THEN
316: ROLLBACK TO SAVEPOINT Insert_Row;

Line 320: FND_MESSAGE.SET_NAME('GR',

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

Line 322: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 328: x_msg_data := FND_MESSAGE.Get;

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

Line 524: FND_MESSAGE.SET_NAME('GR',

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

Line 526: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 532: x_msg_data := FND_MESSAGE.Get;

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

Line 539: FND_MESSAGE.SET_NAME('GR',

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

Line 541: FND_MESSAGE.SET_TOKEN('CODE',

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

Line 547: x_msg_data := FND_MESSAGE.Get;

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

Line 555: FND_MESSAGE.SET_NAME('GR',

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

Line 557: FND_MESSAGE.SET_TOKEN('TEXT',

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

Line 563: x_msg_data := FND_MESSAGE.Get;

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

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

688: x_return_status := 'E';
689: -- x_oracle_error := APP_EXCEPTION.Get_Code;
690: x_oracle_error := SQLCODE;
691: -- Bug #2180453 (JKB)
692: FND_MESSAGE.SET_NAME('GR',
693: 'GR_ROW_IS_LOCKED');
694: IF FND_API.To_Boolean(p_called_by_form) THEN
695: APP_EXCEPTION.Raise_Exception;
696: ELSE

Line 697: x_msg_data := FND_MESSAGE.Get;

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

Line 705: FND_MESSAGE.SET_NAME('GR',

701: ROLLBACK TO SAVEPOINT Lock_Row;
702: x_return_status := 'U';
703: x_oracle_error := SQLCODE;
704: l_msg_data := SUBSTR(SQLERRM, 1, 200);
705: FND_MESSAGE.SET_NAME('GR',
706: 'GR_UNEXPECTED_ERROR');
707: FND_MESSAGE.SET_TOKEN('TEXT',
708: l_msg_data,
709: FALSE);

Line 707: FND_MESSAGE.SET_TOKEN('TEXT',

703: x_oracle_error := SQLCODE;
704: l_msg_data := SUBSTR(SQLERRM, 1, 200);
705: FND_MESSAGE.SET_NAME('GR',
706: 'GR_UNEXPECTED_ERROR');
707: FND_MESSAGE.SET_TOKEN('TEXT',
708: l_msg_data,
709: FALSE);
710: IF FND_API.To_Boolean(p_called_by_form) THEN
711: APP_EXCEPTION.Raise_Exception;

Line 713: x_msg_data := FND_MESSAGE.Get;

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

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

887: ROLLBACK TO SAVEPOINT Delete_Row;
888: x_return_status := 'U';
889: x_oracle_error := SQLCODE;
890: l_msg_data := SUBSTR(SQLERRM, 1, 200);
891: FND_MESSAGE.SET_NAME('GR',
892: 'GR_UNEXPECTED_ERROR');
893: FND_MESSAGE.SET_TOKEN('TEXT',
894: l_msg_data,
895: FALSE);

Line 893: FND_MESSAGE.SET_TOKEN('TEXT',

889: x_oracle_error := SQLCODE;
890: l_msg_data := SUBSTR(SQLERRM, 1, 200);
891: FND_MESSAGE.SET_NAME('GR',
892: 'GR_UNEXPECTED_ERROR');
893: FND_MESSAGE.SET_TOKEN('TEXT',
894: l_msg_data,
895: FALSE);
896: IF FND_API.To_Boolean(p_called_by_form) THEN
897: APP_EXCEPTION.Raise_Exception;

Line 899: x_msg_data := FND_MESSAGE.Get;

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

Line 1011: FND_MESSAGE.SET_NAME('GR',

1007:
1008: WHEN Null_Delete_Option_Error THEN
1009: x_return_status := 'E';
1010: x_oracle_error := APP_EXCEPTION.Get_Code;
1011: FND_MESSAGE.SET_NAME('GR',
1012: 'GR_NULL_VALUE');
1013: FND_MESSAGE.SET_TOKEN('CODE',
1014: l_msg_token,
1015: FALSE);

Line 1013: FND_MESSAGE.SET_TOKEN('CODE',

1009: x_return_status := 'E';
1010: x_oracle_error := APP_EXCEPTION.Get_Code;
1011: FND_MESSAGE.SET_NAME('GR',
1012: 'GR_NULL_VALUE');
1013: FND_MESSAGE.SET_TOKEN('CODE',
1014: l_msg_token,
1015: FALSE);
1016: IF FND_API.To_Boolean(p_called_by_form) THEN
1017: APP_EXCEPTION.Raise_Exception;

Line 1019: x_msg_data := FND_MESSAGE.Get;

1015: FALSE);
1016: IF FND_API.To_Boolean(p_called_by_form) THEN
1017: APP_EXCEPTION.Raise_Exception;
1018: ELSE
1019: x_msg_data := FND_MESSAGE.Get;
1020: END IF;
1021:
1022: WHEN OTHERS THEN
1023: ROLLBACK TO SAVEPOINT Delete_Rows;

Line 1027: FND_MESSAGE.SET_NAME('GR',

1023: ROLLBACK TO SAVEPOINT Delete_Rows;
1024: x_return_status := 'U';
1025: x_oracle_error := SQLCODE;
1026: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1027: FND_MESSAGE.SET_NAME('GR',
1028: 'GR_UNEXPECTED_ERROR');
1029: FND_MESSAGE.SET_TOKEN('TEXT',
1030: l_msg_token,
1031: FALSE);

Line 1029: FND_MESSAGE.SET_TOKEN('TEXT',

1025: x_oracle_error := SQLCODE;
1026: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1027: FND_MESSAGE.SET_NAME('GR',
1028: 'GR_UNEXPECTED_ERROR');
1029: FND_MESSAGE.SET_TOKEN('TEXT',
1030: l_msg_token,
1031: FALSE);
1032: IF FND_API.To_Boolean(p_called_by_form) THEN
1033: APP_EXCEPTION.Raise_Exception;

Line 1035: x_msg_data := FND_MESSAGE.Get;

1031: FALSE);
1032: IF FND_API.To_Boolean(p_called_by_form) THEN
1033: APP_EXCEPTION.Raise_Exception;
1034: ELSE
1035: x_msg_data := FND_MESSAGE.Get;
1036: END IF;
1037:
1038: END Delete_Rows;
1039:

Line 1152: FND_MESSAGE.SET_NAME('GR',

1148: OPEN c_get_item;
1149: FETCH c_get_item INTO LocalItemRecord;
1150: IF c_get_item%NOTFOUND THEN
1151: x_return_status := 'E';
1152: FND_MESSAGE.SET_NAME('GR',
1153: 'GR_RECORD_NOT_FOUND');
1154: FND_MESSAGE.SET_TOKEN('CODE',
1155: p_item_code,
1156: FALSE);

Line 1154: FND_MESSAGE.SET_TOKEN('CODE',

1150: IF c_get_item%NOTFOUND THEN
1151: x_return_status := 'E';
1152: FND_MESSAGE.SET_NAME('GR',
1153: 'GR_RECORD_NOT_FOUND');
1154: FND_MESSAGE.SET_TOKEN('CODE',
1155: p_item_code,
1156: FALSE);
1157: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1158: END IF;

Line 1157: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';

1153: 'GR_RECORD_NOT_FOUND');
1154: FND_MESSAGE.SET_TOKEN('CODE',
1155: p_item_code,
1156: FALSE);
1157: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1158: END IF;
1159: CLOSE c_get_item;
1160: END IF;
1161:

Line 1171: FND_MESSAGE.SET_NAME('GR',

1167: l_rowid,
1168: l_key_exists);
1169: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1170: x_return_status := 'E';
1171: FND_MESSAGE.SET_NAME('GR',
1172: 'GR_RECORD_NOT_FOUND');
1173: FND_MESSAGE.SET_TOKEN('CODE',
1174: p_document_code,
1175: FALSE);

Line 1173: FND_MESSAGE.SET_TOKEN('CODE',

1169: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1170: x_return_status := 'E';
1171: FND_MESSAGE.SET_NAME('GR',
1172: 'GR_RECORD_NOT_FOUND');
1173: FND_MESSAGE.SET_TOKEN('CODE',
1174: p_document_code,
1175: FALSE);
1176: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1177: END IF;

Line 1176: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';

1172: 'GR_RECORD_NOT_FOUND');
1173: FND_MESSAGE.SET_TOKEN('CODE',
1174: p_document_code,
1175: FALSE);
1176: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1177: END IF;
1178:
1179: /* Check the language codes */
1180:

Line 1186: FND_MESSAGE.SET_NAME('GR',

1182: FETCH c_get_language INTO LangRecord;
1183: IF c_get_language%NOTFOUND THEN
1184: x_return_status := 'E';
1185: x_oracle_error := APP_EXCEPTION.Get_Code;
1186: FND_MESSAGE.SET_NAME('GR',
1187: 'GR_RECORD_NOT_FOUND');
1188: FND_MESSAGE.SET_TOKEN('CODE',
1189: p_language,
1190: FALSE);

Line 1188: FND_MESSAGE.SET_TOKEN('CODE',

1184: x_return_status := 'E';
1185: x_oracle_error := APP_EXCEPTION.Get_Code;
1186: FND_MESSAGE.SET_NAME('GR',
1187: 'GR_RECORD_NOT_FOUND');
1188: FND_MESSAGE.SET_TOKEN('CODE',
1189: p_language,
1190: FALSE);
1191: l_msg_data := FND_MESSAGE.Get;
1192: END IF;

Line 1191: l_msg_data := FND_MESSAGE.Get;

1187: 'GR_RECORD_NOT_FOUND');
1188: FND_MESSAGE.SET_TOKEN('CODE',
1189: p_language,
1190: FALSE);
1191: l_msg_data := FND_MESSAGE.Get;
1192: END IF;
1193: CLOSE c_get_language;
1194:
1195: /* Check the country disclosure codes */

Line 1203: FND_MESSAGE.SET_NAME('GR',

1199: FETCH c_get_disclosure INTO DisclosureRecord;
1200: IF c_get_disclosure%NOTFOUND THEN
1201: x_return_status := 'E';
1202: x_oracle_error := APP_EXCEPTION.Get_Code;
1203: FND_MESSAGE.SET_NAME('GR',
1204: 'GR_RECORD_NOT_FOUND');
1205: FND_MESSAGE.SET_TOKEN('CODE',
1206: l_disclosure_code,
1207: FALSE);

Line 1205: FND_MESSAGE.SET_TOKEN('CODE',

1201: x_return_status := 'E';
1202: x_oracle_error := APP_EXCEPTION.Get_Code;
1203: FND_MESSAGE.SET_NAME('GR',
1204: 'GR_RECORD_NOT_FOUND');
1205: FND_MESSAGE.SET_TOKEN('CODE',
1206: l_disclosure_code,
1207: FALSE);
1208: l_msg_data := FND_MESSAGE.Get;
1209: END IF;

Line 1208: l_msg_data := FND_MESSAGE.Get;

1204: 'GR_RECORD_NOT_FOUND');
1205: FND_MESSAGE.SET_TOKEN('CODE',
1206: l_disclosure_code,
1207: FALSE);
1208: l_msg_data := FND_MESSAGE.Get;
1209: END IF;
1210: CLOSE c_get_disclosure;
1211:
1212: /* Check the recipient disclosure codes */

Line 1220: FND_MESSAGE.SET_NAME('GR',

1216: FETCH c_get_disclosure INTO DisclosureRecord;
1217: IF c_get_disclosure%NOTFOUND THEN
1218: x_return_status := 'E';
1219: x_oracle_error := APP_EXCEPTION.Get_Code;
1220: FND_MESSAGE.SET_NAME('GR',
1221: 'GR_RECORD_NOT_FOUND');
1222: FND_MESSAGE.SET_TOKEN('CODE',
1223: l_disclosure_code,
1224: FALSE);

Line 1222: FND_MESSAGE.SET_TOKEN('CODE',

1218: x_return_status := 'E';
1219: x_oracle_error := APP_EXCEPTION.Get_Code;
1220: FND_MESSAGE.SET_NAME('GR',
1221: 'GR_RECORD_NOT_FOUND');
1222: FND_MESSAGE.SET_TOKEN('CODE',
1223: l_disclosure_code,
1224: FALSE);
1225: l_msg_data := FND_MESSAGE.Get;
1226: END IF;

Line 1225: l_msg_data := FND_MESSAGE.Get;

1221: 'GR_RECORD_NOT_FOUND');
1222: FND_MESSAGE.SET_TOKEN('CODE',
1223: l_disclosure_code,
1224: FALSE);
1225: l_msg_data := FND_MESSAGE.Get;
1226: END IF;
1227: CLOSE c_get_disclosure;
1228:
1229: /* Handle any error routines. */

Line 1242: FND_MESSAGE.SET_NAME('GR',

1238: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
1239: x_return_status := 'U';
1240: x_oracle_error := SQLCODE;
1241: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1242: FND_MESSAGE.SET_NAME('GR',
1243: 'GR_UNEXPECTED_ERROR');
1244: FND_MESSAGE.SET_TOKEN('TEXT',
1245: l_msg_data,
1246: FALSE);

Line 1244: FND_MESSAGE.SET_TOKEN('TEXT',

1240: x_oracle_error := SQLCODE;
1241: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1242: FND_MESSAGE.SET_NAME('GR',
1243: 'GR_UNEXPECTED_ERROR');
1244: FND_MESSAGE.SET_TOKEN('TEXT',
1245: l_msg_data,
1246: FALSE);
1247: x_msg_data := FND_MESSAGE.Get;
1248:

Line 1247: x_msg_data := FND_MESSAGE.Get;

1243: 'GR_UNEXPECTED_ERROR');
1244: FND_MESSAGE.SET_TOKEN('TEXT',
1245: l_msg_data,
1246: FALSE);
1247: x_msg_data := FND_MESSAGE.Get;
1248:
1249: END Check_Foreign_Keys;
1250:
1251: PROCEDURE Check_Integrity

Line 1334: FND_MESSAGE.SET_NAME('GR',

1330: x_return_status := 'S';
1331: x_oracle_error := 0;
1332: x_msg_data := NULL;
1333:
1334: FND_MESSAGE.SET_NAME('GR',
1335: 'GR_INTEGRITY_HEADER');
1336: FND_MESSAGE.SET_TOKEN('CODE',
1337: p_document_code || ' ' || p_item_code,
1338: FALSE);

Line 1336: FND_MESSAGE.SET_TOKEN('CODE',

1332: x_msg_data := NULL;
1333:
1334: FND_MESSAGE.SET_NAME('GR',
1335: 'GR_INTEGRITY_HEADER');
1336: FND_MESSAGE.SET_TOKEN('CODE',
1337: p_document_code || ' ' || p_item_code,
1338: FALSE);
1339: l_msg_data := FND_MESSAGE.Get;
1340:

Line 1339: l_msg_data := FND_MESSAGE.Get;

1335: 'GR_INTEGRITY_HEADER');
1336: FND_MESSAGE.SET_TOKEN('CODE',
1337: p_document_code || ' ' || p_item_code,
1338: FALSE);
1339: l_msg_data := FND_MESSAGE.Get;
1340:
1341: /* Check the language isn't base or installed */
1342:
1343: OPEN c_get_language_code;

Line 1363: FND_MESSAGE.SET_NAME('GR',

1359:
1360: WHEN Installed_Language_Error THEN
1361: ROLLBACK TO SAVEPOINT Check_Integrity;
1362: x_return_status := 'E';
1363: FND_MESSAGE.SET_NAME('GR',
1364: 'GR_INSTALLED_LANG');
1365: FND_MESSAGE.SET_TOKEN('CODE',
1366: p_language,
1367: FALSE);

Line 1365: FND_MESSAGE.SET_TOKEN('CODE',

1361: ROLLBACK TO SAVEPOINT Check_Integrity;
1362: x_return_status := 'E';
1363: FND_MESSAGE.SET_NAME('GR',
1364: 'GR_INSTALLED_LANG');
1365: FND_MESSAGE.SET_TOKEN('CODE',
1366: p_language,
1367: FALSE);
1368: IF FND_API.To_Boolean(p_called_by_form) THEN
1369: APP_EXCEPTION.Raise_Exception;

Line 1371: x_msg_data := FND_MESSAGE.Get;

1367: FALSE);
1368: IF FND_API.To_Boolean(p_called_by_form) THEN
1369: APP_EXCEPTION.Raise_Exception;
1370: ELSE
1371: x_msg_data := FND_MESSAGE.Get;
1372: END IF;
1373:
1374: WHEN OTHERS THEN
1375: ROLLBACK TO SAVEPOINT Check_Integrity;

Line 1379: FND_MESSAGE.SET_NAME('GR',

1375: ROLLBACK TO SAVEPOINT Check_Integrity;
1376: x_return_status := 'U';
1377: x_oracle_error := SQLCODE;
1378: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1379: FND_MESSAGE.SET_NAME('GR',
1380: 'GR_UNEXPECTED_ERROR');
1381: FND_MESSAGE.SET_TOKEN('TEXT',
1382: l_msg_data,
1383: FALSE);

Line 1381: FND_MESSAGE.SET_TOKEN('TEXT',

1377: x_oracle_error := SQLCODE;
1378: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1379: FND_MESSAGE.SET_NAME('GR',
1380: 'GR_UNEXPECTED_ERROR');
1381: FND_MESSAGE.SET_TOKEN('TEXT',
1382: l_msg_data,
1383: FALSE);
1384: IF FND_API.To_Boolean(p_called_by_form) THEN
1385: APP_EXCEPTION.Raise_Exception;

Line 1387: x_msg_data := FND_MESSAGE.Get;

1383: FALSE);
1384: IF FND_API.To_Boolean(p_called_by_form) THEN
1385: APP_EXCEPTION.Raise_Exception;
1386: ELSE
1387: x_msg_data := FND_MESSAGE.Get;
1388: END IF;
1389:
1390: END Check_Integrity;
1391:

Line 1435: FND_MESSAGE.SET_NAME('GR',

1431: EXCEPTION
1432:
1433: WHEN Others THEN
1434: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1435: FND_MESSAGE.SET_NAME('GR',
1436: 'GR_UNEXPECTED_ERROR');
1437: FND_MESSAGE.SET_TOKEN('TEXT',
1438: l_msg_data,
1439: FALSE);

Line 1437: FND_MESSAGE.SET_TOKEN('TEXT',

1433: WHEN Others THEN
1434: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1435: FND_MESSAGE.SET_NAME('GR',
1436: 'GR_UNEXPECTED_ERROR');
1437: FND_MESSAGE.SET_TOKEN('TEXT',
1438: l_msg_data,
1439: FALSE);
1440: IF FND_API.To_Boolean(p_called_by_form) THEN
1441: APP_EXCEPTION.Raise_Exception;