DBA Data[Home] [Help]

APPS.GR_DOCUMENT_CODES_PKG dependencies on FND_MESSAGE

Line 405: FND_MESSAGE.SET_NAME('GR',

401: WHEN Foreign_Key_Error THEN
402: ROLLBACK TO SAVEPOINT Insert_Row;
403: x_return_status := l_return_status;
404: x_oracle_error := l_oracle_error;
405: FND_MESSAGE.SET_NAME('GR',
406: 'GR_FOREIGN_KEY_ERROR');
407: FND_MESSAGE.SET_TOKEN('TEXT',
408: l_msg_data,
409: FALSE);

Line 407: FND_MESSAGE.SET_TOKEN('TEXT',

403: x_return_status := l_return_status;
404: x_oracle_error := l_oracle_error;
405: FND_MESSAGE.SET_NAME('GR',
406: 'GR_FOREIGN_KEY_ERROR');
407: FND_MESSAGE.SET_TOKEN('TEXT',
408: l_msg_data,
409: FALSE);
410: IF FND_API.To_Boolean(p_called_by_form) THEN
411: APP_EXCEPTION.Raise_Exception;

Line 413: x_msg_data := FND_MESSAGE.Get;

409: FALSE);
410: IF FND_API.To_Boolean(p_called_by_form) THEN
411: APP_EXCEPTION.Raise_Exception;
412: ELSE
413: x_msg_data := FND_MESSAGE.Get;
414: END IF;
415:
416: WHEN Label_Exists_Error THEN
417: ROLLBACK TO SAVEPOINT Insert_Row;

Line 420: FND_MESSAGE.SET_NAME('GR',

416: WHEN Label_Exists_Error THEN
417: ROLLBACK TO SAVEPOINT Insert_Row;
418: x_return_status := 'E';
419: x_oracle_error := APP_EXCEPTION.Get_Code;
420: FND_MESSAGE.SET_NAME('GR',
421: 'GR_RECORD_EXISTS');
422: FND_MESSAGE.SET_TOKEN('CODE',
423: p_document_code,
424: FALSE);

Line 422: FND_MESSAGE.SET_TOKEN('CODE',

418: x_return_status := 'E';
419: x_oracle_error := APP_EXCEPTION.Get_Code;
420: FND_MESSAGE.SET_NAME('GR',
421: 'GR_RECORD_EXISTS');
422: FND_MESSAGE.SET_TOKEN('CODE',
423: p_document_code,
424: FALSE);
425: IF FND_API.To_Boolean(p_called_by_form) THEN
426: APP_EXCEPTION.Raise_Exception;

Line 428: x_msg_data := FND_MESSAGE.Get;

424: FALSE);
425: IF FND_API.To_Boolean(p_called_by_form) THEN
426: APP_EXCEPTION.Raise_Exception;
427: ELSE
428: x_msg_data := FND_MESSAGE.Get;
429: END IF;
430:
431: WHEN Row_Missing_Error THEN
432: ROLLBACK TO SAVEPOINT Insert_Row;

Line 435: FND_MESSAGE.SET_NAME('GR',

431: WHEN Row_Missing_Error THEN
432: ROLLBACK TO SAVEPOINT Insert_Row;
433: x_return_status := 'E';
434: x_oracle_error := APP_EXCEPTION.Get_Code;
435: FND_MESSAGE.SET_NAME('GR',
436: 'GR_NO_RECORD_INSERTED');
437: FND_MESSAGE.SET_TOKEN('CODE',
438: p_document_code,
439: FALSE);

Line 437: FND_MESSAGE.SET_TOKEN('CODE',

433: x_return_status := 'E';
434: x_oracle_error := APP_EXCEPTION.Get_Code;
435: FND_MESSAGE.SET_NAME('GR',
436: 'GR_NO_RECORD_INSERTED');
437: FND_MESSAGE.SET_TOKEN('CODE',
438: p_document_code,
439: FALSE);
440: IF FND_API.To_Boolean(p_called_by_form) THEN
441: APP_EXCEPTION.Raise_Exception;

Line 443: x_msg_data := FND_MESSAGE.Get;

439: FALSE);
440: IF FND_API.To_Boolean(p_called_by_form) THEN
441: APP_EXCEPTION.Raise_Exception;
442: ELSE
443: x_msg_data := FND_MESSAGE.Get;
444: END IF;
445:
446: WHEN OTHERS THEN
447: ROLLBACK TO SAVEPOINT Insert_Row;

Line 451: FND_MESSAGE.SET_NAME('GR',

447: ROLLBACK TO SAVEPOINT Insert_Row;
448: x_return_status := 'U';
449: x_oracle_error := SQLCODE;
450: l_msg_data := SUBSTR(SQLERRM, 1, 200);
451: FND_MESSAGE.SET_NAME('GR',
452: 'GR_UNEXPECTED_ERROR');
453: FND_MESSAGE.SET_TOKEN('TEXT',
454: l_msg_data,
455: FALSE);

Line 453: FND_MESSAGE.SET_TOKEN('TEXT',

449: x_oracle_error := SQLCODE;
450: l_msg_data := SUBSTR(SQLERRM, 1, 200);
451: FND_MESSAGE.SET_NAME('GR',
452: 'GR_UNEXPECTED_ERROR');
453: FND_MESSAGE.SET_TOKEN('TEXT',
454: l_msg_data,
455: FALSE);
456: IF FND_API.To_Boolean(p_called_by_form) THEN
457: APP_EXCEPTION.Raise_Exception;

Line 459: x_msg_data := FND_MESSAGE.Get;

455: FALSE);
456: IF FND_API.To_Boolean(p_called_by_form) THEN
457: APP_EXCEPTION.Raise_Exception;
458: ELSE
459: x_msg_data := FND_MESSAGE.Get;
460: END IF;
461:
462: END Insert_Row;
463:

Line 760: FND_MESSAGE.SET_NAME('GR',

756: WHEN Foreign_Key_Error THEN
757: ROLLBACK TO SAVEPOINT Update_Row;
758: x_return_status := l_return_status;
759: x_oracle_error := l_oracle_error;
760: FND_MESSAGE.SET_NAME('GR',
761: 'GR_FOREIGN_KEY_ERROR');
762: FND_MESSAGE.SET_TOKEN('TEXT',
763: l_msg_data,
764: FALSE);

Line 762: FND_MESSAGE.SET_TOKEN('TEXT',

758: x_return_status := l_return_status;
759: x_oracle_error := l_oracle_error;
760: FND_MESSAGE.SET_NAME('GR',
761: 'GR_FOREIGN_KEY_ERROR');
762: FND_MESSAGE.SET_TOKEN('TEXT',
763: l_msg_data,
764: FALSE);
765: IF FND_API.To_Boolean(p_called_by_form) THEN
766: APP_EXCEPTION.Raise_Exception;

Line 768: x_msg_data := FND_MESSAGE.Get;

764: FALSE);
765: IF FND_API.To_Boolean(p_called_by_form) THEN
766: APP_EXCEPTION.Raise_Exception;
767: ELSE
768: x_msg_data := FND_MESSAGE.Get;
769: END IF;
770:
771: WHEN Row_Missing_Error THEN
772: ROLLBACK TO SAVEPOINT Update_Row;

Line 775: FND_MESSAGE.SET_NAME('GR',

771: WHEN Row_Missing_Error THEN
772: ROLLBACK TO SAVEPOINT Update_Row;
773: x_return_status := 'E';
774: x_oracle_error := APP_EXCEPTION.Get_Code;
775: FND_MESSAGE.SET_NAME('GR',
776: 'GR_NO_RECORD_INSERTED');
777: FND_MESSAGE.SET_TOKEN('CODE',
778: p_document_code,
779: FALSE);

Line 777: FND_MESSAGE.SET_TOKEN('CODE',

773: x_return_status := 'E';
774: x_oracle_error := APP_EXCEPTION.Get_Code;
775: FND_MESSAGE.SET_NAME('GR',
776: 'GR_NO_RECORD_INSERTED');
777: FND_MESSAGE.SET_TOKEN('CODE',
778: p_document_code,
779: FALSE);
780: IF FND_API.To_Boolean(p_called_by_form) THEN
781: APP_EXCEPTION.Raise_Exception;

Line 783: x_msg_data := FND_MESSAGE.Get;

779: FALSE);
780: IF FND_API.To_Boolean(p_called_by_form) THEN
781: APP_EXCEPTION.Raise_Exception;
782: ELSE
783: x_msg_data := FND_MESSAGE.Get;
784: END IF;
785:
786: WHEN OTHERS THEN
787: ROLLBACK TO SAVEPOINT Update_Row;

Line 791: FND_MESSAGE.SET_NAME('GR',

787: ROLLBACK TO SAVEPOINT Update_Row;
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_data,
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_data,
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 Update_Row;
803:

Line 946: FND_MESSAGE.SET_NAME('GR',

942:
943: WHEN No_Data_Found_Error THEN
944: ROLLBACK TO SAVEPOINT Lock_Row;
945: x_return_status := 'E';
946: FND_MESSAGE.SET_NAME('GR',
947: 'GR_RECORD_NOT_FOUND');
948: FND_MESSAGE.SET_TOKEN('CODE',
949: p_document_code,
950: FALSE);

Line 948: FND_MESSAGE.SET_TOKEN('CODE',

944: ROLLBACK TO SAVEPOINT Lock_Row;
945: x_return_status := 'E';
946: FND_MESSAGE.SET_NAME('GR',
947: 'GR_RECORD_NOT_FOUND');
948: FND_MESSAGE.SET_TOKEN('CODE',
949: p_document_code,
950: FALSE);
951: IF FND_API.To_Boolean(p_called_by_form) THEN
952: APP_EXCEPTION.Raise_Exception;

Line 954: x_msg_data := FND_MESSAGE.Get;

950: FALSE);
951: IF FND_API.To_Boolean(p_called_by_form) THEN
952: APP_EXCEPTION.Raise_Exception;
953: ELSE
954: x_msg_data := FND_MESSAGE.Get;
955: END IF;
956:
957: WHEN Row_Already_Locked_Error THEN
958: ROLLBACK TO SAVEPOINT Lock_Row;

Line 961: FND_MESSAGE.SET_NAME('GR',

957: WHEN Row_Already_Locked_Error THEN
958: ROLLBACK TO SAVEPOINT Lock_Row;
959: x_return_status := 'E';
960: x_oracle_error := APP_EXCEPTION.Get_Code;
961: FND_MESSAGE.SET_NAME('GR',
962: 'GR_ROW_IS_LOCKED');
963: IF FND_API.To_Boolean(p_called_by_form) THEN
964: APP_EXCEPTION.Raise_Exception;
965: ELSE

Line 966: x_msg_data := FND_MESSAGE.Get;

962: 'GR_ROW_IS_LOCKED');
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 Lock_Row;

Line 974: FND_MESSAGE.SET_NAME('GR',

970: ROLLBACK TO SAVEPOINT Lock_Row;
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 Lock_Row;
986:

Line 1207: x_msg_data := FND_MESSAGE.Get;

1203: x_oracle_error := l_oracle_error;
1204: IF FND_API.To_Boolean(p_called_by_form) THEN
1205: APP_EXCEPTION.Raise_Exception;
1206: ELSE
1207: x_msg_data := FND_MESSAGE.Get;
1208: END IF;
1209:
1210: WHEN Row_Missing_Error THEN
1211: ROLLBACK TO SAVEPOINT Delete_Row;

Line 1214: FND_MESSAGE.SET_NAME('GR',

1210: WHEN Row_Missing_Error THEN
1211: ROLLBACK TO SAVEPOINT Delete_Row;
1212: x_return_status := 'E';
1213: x_oracle_error := APP_EXCEPTION.Get_Code;
1214: FND_MESSAGE.SET_NAME('GR',
1215: 'GR_RECORD_NOT_FOUND');
1216: FND_MESSAGE.SET_TOKEN('CODE',
1217: p_document_code,
1218: FALSE);

Line 1216: FND_MESSAGE.SET_TOKEN('CODE',

1212: x_return_status := 'E';
1213: x_oracle_error := APP_EXCEPTION.Get_Code;
1214: FND_MESSAGE.SET_NAME('GR',
1215: 'GR_RECORD_NOT_FOUND');
1216: FND_MESSAGE.SET_TOKEN('CODE',
1217: p_document_code,
1218: FALSE);
1219: IF FND_API.To_Boolean(p_called_by_form) THEN
1220: APP_EXCEPTION.Raise_Exception;

Line 1222: x_msg_data := FND_MESSAGE.Get;

1218: FALSE);
1219: IF FND_API.To_Boolean(p_called_by_form) THEN
1220: APP_EXCEPTION.Raise_Exception;
1221: ELSE
1222: x_msg_data := FND_MESSAGE.Get;
1223: END IF;
1224:
1225: WHEN OTHERS THEN
1226: ROLLBACK TO SAVEPOINT Delete_Row;

Line 1230: FND_MESSAGE.SET_NAME('GR',

1226: ROLLBACK TO SAVEPOINT Delete_Row;
1227: x_return_status := 'U';
1228: x_oracle_error := SQLCODE;
1229: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1230: FND_MESSAGE.SET_NAME('GR',
1231: 'GR_UNEXPECTED_ERROR');
1232: FND_MESSAGE.SET_TOKEN('TEXT',
1233: l_msg_data,
1234: FALSE);

Line 1232: FND_MESSAGE.SET_TOKEN('TEXT',

1228: x_oracle_error := SQLCODE;
1229: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1230: FND_MESSAGE.SET_NAME('GR',
1231: 'GR_UNEXPECTED_ERROR');
1232: FND_MESSAGE.SET_TOKEN('TEXT',
1233: l_msg_data,
1234: FALSE);
1235: IF FND_API.To_Boolean(p_called_by_form) THEN
1236: APP_EXCEPTION.Raise_Exception;

Line 1238: x_msg_data := FND_MESSAGE.Get;

1234: FALSE);
1235: IF FND_API.To_Boolean(p_called_by_form) THEN
1236: APP_EXCEPTION.Raise_Exception;
1237: ELSE
1238: x_msg_data := FND_MESSAGE.Get;
1239: END IF;
1240:
1241: END Delete_Row;
1242:

Line 1372: FND_MESSAGE.SET_NAME('GR',

1368: OPEN c_get_main_heading;
1369: FETCH c_get_main_heading INTO MainHdgRcd;
1370: IF c_get_main_heading%NOTFOUND THEN
1371: x_return_status := 'E';
1372: FND_MESSAGE.SET_NAME('GR',
1373: 'GR_RECORD_NOT_FOUND');
1374: FND_MESSAGE.SET_TOKEN('CODE',
1375: l_heading,
1376: FALSE);

Line 1374: FND_MESSAGE.SET_TOKEN('CODE',

1370: IF c_get_main_heading%NOTFOUND THEN
1371: x_return_status := 'E';
1372: FND_MESSAGE.SET_NAME('GR',
1373: 'GR_RECORD_NOT_FOUND');
1374: FND_MESSAGE.SET_TOKEN('CODE',
1375: l_heading,
1376: FALSE);
1377: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1378: END IF;

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

1373: 'GR_RECORD_NOT_FOUND');
1374: FND_MESSAGE.SET_TOKEN('CODE',
1375: l_heading,
1376: FALSE);
1377: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1378: END IF;
1379: CLOSE c_get_main_heading;
1380: END IF;
1381:

Line 1390: FND_MESSAGE.SET_NAME('GR',

1386: OPEN c_get_main_heading;
1387: FETCH c_get_main_heading INTO MainHdgRcd;
1388: IF c_get_main_heading%NOTFOUND THEN
1389: x_return_status := 'E';
1390: FND_MESSAGE.SET_NAME('GR',
1391: 'GR_RECORD_NOT_FOUND');
1392: FND_MESSAGE.SET_TOKEN('CODE',
1393: l_heading,
1394: FALSE);

Line 1392: FND_MESSAGE.SET_TOKEN('CODE',

1388: IF c_get_main_heading%NOTFOUND THEN
1389: x_return_status := 'E';
1390: FND_MESSAGE.SET_NAME('GR',
1391: 'GR_RECORD_NOT_FOUND');
1392: FND_MESSAGE.SET_TOKEN('CODE',
1393: l_heading,
1394: FALSE);
1395: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1396: END IF;

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

1391: 'GR_RECORD_NOT_FOUND');
1392: FND_MESSAGE.SET_TOKEN('CODE',
1393: l_heading,
1394: FALSE);
1395: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1396: END IF;
1397: CLOSE c_get_main_heading;
1398: END IF;
1399:

Line 1408: FND_MESSAGE.SET_NAME('GR',

1404: OPEN c_get_main_heading;
1405: FETCH c_get_main_heading INTO MainHdgRcd;
1406: IF c_get_main_heading%NOTFOUND THEN
1407: x_return_status := 'E';
1408: FND_MESSAGE.SET_NAME('GR',
1409: 'GR_RECORD_NOT_FOUND');
1410: FND_MESSAGE.SET_TOKEN('CODE',
1411: l_heading,
1412: FALSE);

Line 1410: FND_MESSAGE.SET_TOKEN('CODE',

1406: IF c_get_main_heading%NOTFOUND THEN
1407: x_return_status := 'E';
1408: FND_MESSAGE.SET_NAME('GR',
1409: 'GR_RECORD_NOT_FOUND');
1410: FND_MESSAGE.SET_TOKEN('CODE',
1411: l_heading,
1412: FALSE);
1413: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1414: END IF;

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

1409: 'GR_RECORD_NOT_FOUND');
1410: FND_MESSAGE.SET_TOKEN('CODE',
1411: l_heading,
1412: FALSE);
1413: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1414: END IF;
1415: CLOSE c_get_main_heading;
1416: END IF;
1417:

Line 1424: FND_MESSAGE.SET_NAME('GR',

1420: OPEN c_get_user_id;
1421: FETCH c_get_user_id INTO UserRcd;
1422: IF c_get_user_id%NOTFOUND THEN
1423: x_return_status := 'E';
1424: FND_MESSAGE.SET_NAME('GR',
1425: 'GR_RECORD_NOT_FOUND');
1426: FND_MESSAGE.SET_TOKEN('CODE',
1427: p_user_id,
1428: FALSE);

Line 1426: FND_MESSAGE.SET_TOKEN('CODE',

1422: IF c_get_user_id%NOTFOUND THEN
1423: x_return_status := 'E';
1424: FND_MESSAGE.SET_NAME('GR',
1425: 'GR_RECORD_NOT_FOUND');
1426: FND_MESSAGE.SET_TOKEN('CODE',
1427: p_user_id,
1428: FALSE);
1429: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1430: END IF;

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

1425: 'GR_RECORD_NOT_FOUND');
1426: FND_MESSAGE.SET_TOKEN('CODE',
1427: p_user_id,
1428: FALSE);
1429: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1430: END IF;
1431: CLOSE c_get_user_id;
1432:
1433: IF x_return_status <> 'S' THEN

Line 1444: FND_MESSAGE.SET_NAME('GR',

1440: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
1441: x_return_status := 'U';
1442: x_oracle_error := SQLCODE;
1443: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1444: FND_MESSAGE.SET_NAME('GR',
1445: 'GR_UNEXPECTED_ERROR');
1446: FND_MESSAGE.SET_TOKEN('TEXT',
1447: l_msg_data,
1448: FALSE);

Line 1446: FND_MESSAGE.SET_TOKEN('TEXT',

1442: x_oracle_error := SQLCODE;
1443: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1444: FND_MESSAGE.SET_NAME('GR',
1445: 'GR_UNEXPECTED_ERROR');
1446: FND_MESSAGE.SET_TOKEN('TEXT',
1447: l_msg_data,
1448: FALSE);
1449: x_msg_data := FND_MESSAGE.Get;
1450:

Line 1449: x_msg_data := FND_MESSAGE.Get;

1445: 'GR_UNEXPECTED_ERROR');
1446: FND_MESSAGE.SET_TOKEN('TEXT',
1447: l_msg_data,
1448: FALSE);
1449: x_msg_data := FND_MESSAGE.Get;
1450:
1451: END Check_Foreign_Keys;
1452:
1453: PROCEDURE Check_Integrity

Line 1604: FND_MESSAGE.SET_NAME('GR',

1600: x_return_status := 'S';
1601: x_oracle_error := 0;
1602: x_msg_data := NULL;
1603:
1604: FND_MESSAGE.SET_NAME('GR',
1605: 'GR_INTEGRITY_HEADER');
1606: FND_MESSAGE.SET_TOKEN('CODE',
1607: p_document_code,
1608: FALSE);

Line 1606: FND_MESSAGE.SET_TOKEN('CODE',

1602: x_msg_data := NULL;
1603:
1604: FND_MESSAGE.SET_NAME('GR',
1605: 'GR_INTEGRITY_HEADER');
1606: FND_MESSAGE.SET_TOKEN('CODE',
1607: p_document_code,
1608: FALSE);
1609: l_msg_data := FND_MESSAGE.Get;
1610:

Line 1609: l_msg_data := FND_MESSAGE.Get;

1605: 'GR_INTEGRITY_HEADER');
1606: FND_MESSAGE.SET_TOKEN('CODE',
1607: p_document_code,
1608: FALSE);
1609: l_msg_data := FND_MESSAGE.Get;
1610:
1611: /* Now read the cursors to make sure the item code isn't used. */
1612: /* Dispatch Histories */
1613:

Line 1698: FND_MESSAGE.SET_NAME('GR',

1694: ROLLBACK TO SAVEPOINT Check_Integrity;
1695: x_return_status := 'U';
1696: x_oracle_error := SQLCODE;
1697: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1698: FND_MESSAGE.SET_NAME('GR',
1699: 'GR_UNEXPECTED_ERROR');
1700: FND_MESSAGE.SET_TOKEN('TEXT',
1701: l_msg_data,
1702: FALSE);

Line 1700: FND_MESSAGE.SET_TOKEN('TEXT',

1696: x_oracle_error := SQLCODE;
1697: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1698: FND_MESSAGE.SET_NAME('GR',
1699: 'GR_UNEXPECTED_ERROR');
1700: FND_MESSAGE.SET_TOKEN('TEXT',
1701: l_msg_data,
1702: FALSE);
1703: IF FND_API.To_Boolean(p_called_by_form) THEN
1704: APP_EXCEPTION.Raise_Exception;

Line 1706: x_msg_data := FND_MESSAGE.Get;

1702: FALSE);
1703: IF FND_API.To_Boolean(p_called_by_form) THEN
1704: APP_EXCEPTION.Raise_Exception;
1705: ELSE
1706: x_msg_data := FND_MESSAGE.Get;
1707: END IF;
1708:
1709: END Check_Integrity;
1710:

Line 1754: FND_MESSAGE.SET_NAME('GR',

1750: EXCEPTION
1751:
1752: WHEN Others THEN
1753: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1754: FND_MESSAGE.SET_NAME('GR',
1755: 'GR_UNEXPECTED_ERROR');
1756: FND_MESSAGE.SET_TOKEN('TEXT',
1757: l_msg_data,
1758: FALSE);

Line 1756: FND_MESSAGE.SET_TOKEN('TEXT',

1752: WHEN Others THEN
1753: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1754: FND_MESSAGE.SET_NAME('GR',
1755: 'GR_UNEXPECTED_ERROR');
1756: FND_MESSAGE.SET_TOKEN('TEXT',
1757: l_msg_data,
1758: FALSE);
1759: IF FND_API.To_Boolean(p_called_by_form) THEN
1760: APP_EXCEPTION.Raise_Exception;