DBA Data[Home] [Help]

APPS.GR_LABELS_B_PKG dependencies on FND_MESSAGE

Line 295: FND_MESSAGE.SET_NAME('GR',

291: WHEN Foreign_Key_Error THEN
292: ROLLBACK TO SAVEPOINT Insert_Row;
293: x_return_status := l_return_status;
294: x_oracle_error := l_oracle_error;
295: FND_MESSAGE.SET_NAME('GR',
296: 'GR_FOREIGN_KEY_ERROR');
297: FND_MESSAGE.SET_TOKEN('TEXT',
298: l_msg_data,
299: FALSE);

Line 297: FND_MESSAGE.SET_TOKEN('TEXT',

293: x_return_status := l_return_status;
294: x_oracle_error := l_oracle_error;
295: FND_MESSAGE.SET_NAME('GR',
296: 'GR_FOREIGN_KEY_ERROR');
297: FND_MESSAGE.SET_TOKEN('TEXT',
298: l_msg_data,
299: FALSE);
300: IF FND_API.To_Boolean(p_called_by_form) THEN
301: APP_EXCEPTION.Raise_Exception;

Line 303: x_msg_data := FND_MESSAGE.Get;

299: FALSE);
300: IF FND_API.To_Boolean(p_called_by_form) THEN
301: APP_EXCEPTION.Raise_Exception;
302: ELSE
303: x_msg_data := FND_MESSAGE.Get;
304: END IF;
305:
306: WHEN Label_Exists_Error THEN
307: ROLLBACK TO SAVEPOINT Insert_Row;

Line 310: FND_MESSAGE.SET_NAME('GR',

306: WHEN Label_Exists_Error THEN
307: ROLLBACK TO SAVEPOINT Insert_Row;
308: x_return_status := 'E';
309: x_oracle_error := APP_EXCEPTION.Get_Code;
310: FND_MESSAGE.SET_NAME('GR',
311: 'GR_RECORD_EXISTS');
312: FND_MESSAGE.SET_TOKEN('CODE',
313: p_label_code,
314: FALSE);

Line 312: FND_MESSAGE.SET_TOKEN('CODE',

308: x_return_status := 'E';
309: x_oracle_error := APP_EXCEPTION.Get_Code;
310: FND_MESSAGE.SET_NAME('GR',
311: 'GR_RECORD_EXISTS');
312: FND_MESSAGE.SET_TOKEN('CODE',
313: p_label_code,
314: FALSE);
315: IF FND_API.To_Boolean(p_called_by_form) THEN
316: APP_EXCEPTION.Raise_Exception;

Line 318: x_msg_data := FND_MESSAGE.Get;

314: FALSE);
315: IF FND_API.To_Boolean(p_called_by_form) THEN
316: APP_EXCEPTION.Raise_Exception;
317: ELSE
318: x_msg_data := FND_MESSAGE.Get;
319: END IF;
320:
321: WHEN Row_Missing_Error THEN
322: ROLLBACK TO SAVEPOINT Insert_Row;

Line 325: FND_MESSAGE.SET_NAME('GR',

321: WHEN Row_Missing_Error THEN
322: ROLLBACK TO SAVEPOINT Insert_Row;
323: x_return_status := 'E';
324: x_oracle_error := APP_EXCEPTION.Get_Code;
325: FND_MESSAGE.SET_NAME('GR',
326: 'GR_NO_RECORD_INSERTED');
327: FND_MESSAGE.SET_TOKEN('CODE',
328: p_label_code,
329: FALSE);

Line 327: FND_MESSAGE.SET_TOKEN('CODE',

323: x_return_status := 'E';
324: x_oracle_error := APP_EXCEPTION.Get_Code;
325: FND_MESSAGE.SET_NAME('GR',
326: 'GR_NO_RECORD_INSERTED');
327: FND_MESSAGE.SET_TOKEN('CODE',
328: p_label_code,
329: FALSE);
330: IF FND_API.To_Boolean(p_called_by_form) THEN
331: APP_EXCEPTION.Raise_Exception;

Line 333: x_msg_data := FND_MESSAGE.Get;

329: FALSE);
330: IF FND_API.To_Boolean(p_called_by_form) THEN
331: APP_EXCEPTION.Raise_Exception;
332: ELSE
333: x_msg_data := FND_MESSAGE.Get;
334: END IF;
335:
336: WHEN OTHERS THEN
337: ROLLBACK TO SAVEPOINT Insert_Row;

Line 341: FND_MESSAGE.SET_NAME('GR',

337: ROLLBACK TO SAVEPOINT Insert_Row;
338: x_return_status := 'U';
339: x_oracle_error := SQLCODE;
340: l_msg_data := SUBSTR(SQLERRM, 1, 200);
341: FND_MESSAGE.SET_NAME('GR',
342: 'GR_UNEXPECTED_ERROR');
343: FND_MESSAGE.SET_TOKEN('TEXT',
344: l_msg_data,
345: FALSE);

Line 343: FND_MESSAGE.SET_TOKEN('TEXT',

339: x_oracle_error := SQLCODE;
340: l_msg_data := SUBSTR(SQLERRM, 1, 200);
341: FND_MESSAGE.SET_NAME('GR',
342: 'GR_UNEXPECTED_ERROR');
343: FND_MESSAGE.SET_TOKEN('TEXT',
344: l_msg_data,
345: FALSE);
346: IF FND_API.To_Boolean(p_called_by_form) THEN
347: APP_EXCEPTION.Raise_Exception;

Line 349: x_msg_data := FND_MESSAGE.Get;

345: FALSE);
346: IF FND_API.To_Boolean(p_called_by_form) THEN
347: APP_EXCEPTION.Raise_Exception;
348: ELSE
349: x_msg_data := FND_MESSAGE.Get;
350: END IF;
351:
352: END Insert_Row;
353:

Line 568: FND_MESSAGE.SET_NAME('GR',

564: WHEN Foreign_Key_Error THEN
565: ROLLBACK TO SAVEPOINT Update_Row;
566: x_return_status := l_return_status;
567: x_oracle_error := l_oracle_error;
568: FND_MESSAGE.SET_NAME('GR',
569: 'GR_FOREIGN_KEY_ERROR');
570: FND_MESSAGE.SET_TOKEN('TEXT',
571: l_msg_data,
572: FALSE);

Line 570: FND_MESSAGE.SET_TOKEN('TEXT',

566: x_return_status := l_return_status;
567: x_oracle_error := l_oracle_error;
568: FND_MESSAGE.SET_NAME('GR',
569: 'GR_FOREIGN_KEY_ERROR');
570: FND_MESSAGE.SET_TOKEN('TEXT',
571: l_msg_data,
572: FALSE);
573: IF FND_API.To_Boolean(p_called_by_form) THEN
574: APP_EXCEPTION.Raise_Exception;

Line 576: x_msg_data := FND_MESSAGE.Get;

572: FALSE);
573: IF FND_API.To_Boolean(p_called_by_form) THEN
574: APP_EXCEPTION.Raise_Exception;
575: ELSE
576: x_msg_data := FND_MESSAGE.Get;
577: END IF;
578:
579: WHEN Row_Missing_Error THEN
580: ROLLBACK TO SAVEPOINT Update_Row;

Line 583: FND_MESSAGE.SET_NAME('GR',

579: WHEN Row_Missing_Error THEN
580: ROLLBACK TO SAVEPOINT Update_Row;
581: x_return_status := 'E';
582: x_oracle_error := APP_EXCEPTION.Get_Code;
583: FND_MESSAGE.SET_NAME('GR',
584: 'GR_NO_RECORD_INSERTED');
585: FND_MESSAGE.SET_TOKEN('CODE',
586: p_label_code,
587: FALSE);

Line 585: FND_MESSAGE.SET_TOKEN('CODE',

581: x_return_status := 'E';
582: x_oracle_error := APP_EXCEPTION.Get_Code;
583: FND_MESSAGE.SET_NAME('GR',
584: 'GR_NO_RECORD_INSERTED');
585: FND_MESSAGE.SET_TOKEN('CODE',
586: p_label_code,
587: FALSE);
588: IF FND_API.To_Boolean(p_called_by_form) THEN
589: APP_EXCEPTION.Raise_Exception;

Line 591: x_msg_data := FND_MESSAGE.Get;

587: FALSE);
588: IF FND_API.To_Boolean(p_called_by_form) THEN
589: APP_EXCEPTION.Raise_Exception;
590: ELSE
591: x_msg_data := FND_MESSAGE.Get;
592: END IF;
593:
594: WHEN OTHERS THEN
595: ROLLBACK TO SAVEPOINT Update_Row;

Line 599: FND_MESSAGE.SET_NAME('GR',

595: ROLLBACK TO SAVEPOINT Update_Row;
596: x_return_status := 'U';
597: x_oracle_error := SQLCODE;
598: l_msg_data := SUBSTR(SQLERRM, 1, 200);
599: FND_MESSAGE.SET_NAME('GR',
600: 'GR_UNEXPECTED_ERROR');
601: FND_MESSAGE.SET_TOKEN('TEXT',
602: l_msg_data,
603: FALSE);

Line 601: FND_MESSAGE.SET_TOKEN('TEXT',

597: x_oracle_error := SQLCODE;
598: l_msg_data := SUBSTR(SQLERRM, 1, 200);
599: FND_MESSAGE.SET_NAME('GR',
600: 'GR_UNEXPECTED_ERROR');
601: FND_MESSAGE.SET_TOKEN('TEXT',
602: l_msg_data,
603: FALSE);
604: IF FND_API.To_Boolean(p_called_by_form) THEN
605: APP_EXCEPTION.Raise_Exception;

Line 607: x_msg_data := FND_MESSAGE.Get;

603: FALSE);
604: IF FND_API.To_Boolean(p_called_by_form) THEN
605: APP_EXCEPTION.Raise_Exception;
606: ELSE
607: x_msg_data := FND_MESSAGE.Get;
608: END IF;
609:
610: END Update_Row;
611:

Line 726: FND_MESSAGE.SET_NAME('GR',

722:
723: WHEN No_Data_Found_Error THEN
724: ROLLBACK TO SAVEPOINT Lock_Row;
725: x_return_status := 'E';
726: FND_MESSAGE.SET_NAME('GR',
727: 'GR_RECORD_NOT_FOUND');
728: FND_MESSAGE.SET_TOKEN('CODE',
729: p_label_code,
730: FALSE);

Line 728: FND_MESSAGE.SET_TOKEN('CODE',

724: ROLLBACK TO SAVEPOINT Lock_Row;
725: x_return_status := 'E';
726: FND_MESSAGE.SET_NAME('GR',
727: 'GR_RECORD_NOT_FOUND');
728: FND_MESSAGE.SET_TOKEN('CODE',
729: p_label_code,
730: FALSE);
731: IF FND_API.To_Boolean(p_called_by_form) THEN
732: APP_EXCEPTION.Raise_Exception;

Line 734: x_msg_data := FND_MESSAGE.Get;

730: FALSE);
731: IF FND_API.To_Boolean(p_called_by_form) THEN
732: APP_EXCEPTION.Raise_Exception;
733: ELSE
734: x_msg_data := FND_MESSAGE.Get;
735: END IF;
736:
737: WHEN Row_Already_Locked_Error THEN
738: ROLLBACK TO SAVEPOINT Lock_Row;

Line 741: FND_MESSAGE.SET_NAME('GR',

737: WHEN Row_Already_Locked_Error THEN
738: ROLLBACK TO SAVEPOINT Lock_Row;
739: x_return_status := 'E';
740: x_oracle_error := APP_EXCEPTION.Get_Code;
741: FND_MESSAGE.SET_NAME('GR',
742: 'GR_ROW_IS_LOCKED');
743: IF FND_API.To_Boolean(p_called_by_form) THEN
744: APP_EXCEPTION.Raise_Exception;
745: ELSE

Line 746: x_msg_data := FND_MESSAGE.Get;

742: 'GR_ROW_IS_LOCKED');
743: IF FND_API.To_Boolean(p_called_by_form) THEN
744: APP_EXCEPTION.Raise_Exception;
745: ELSE
746: x_msg_data := FND_MESSAGE.Get;
747: END IF;
748:
749: WHEN OTHERS THEN
750: ROLLBACK TO SAVEPOINT Lock_Row;

Line 754: FND_MESSAGE.SET_NAME('GR',

750: ROLLBACK TO SAVEPOINT Lock_Row;
751: x_return_status := 'U';
752: x_oracle_error := SQLCODE;
753: l_msg_data := SUBSTR(SQLERRM, 1, 200);
754: FND_MESSAGE.SET_NAME('GR',
755: 'GR_UNEXPECTED_ERROR');
756: FND_MESSAGE.SET_TOKEN('TEXT',
757: l_msg_data,
758: FALSE);

Line 756: FND_MESSAGE.SET_TOKEN('TEXT',

752: x_oracle_error := SQLCODE;
753: l_msg_data := SUBSTR(SQLERRM, 1, 200);
754: FND_MESSAGE.SET_NAME('GR',
755: 'GR_UNEXPECTED_ERROR');
756: FND_MESSAGE.SET_TOKEN('TEXT',
757: l_msg_data,
758: FALSE);
759: IF FND_API.To_Boolean(p_called_by_form) THEN
760: APP_EXCEPTION.Raise_Exception;

Line 762: x_msg_data := FND_MESSAGE.Get;

758: FALSE);
759: IF FND_API.To_Boolean(p_called_by_form) THEN
760: APP_EXCEPTION.Raise_Exception;
761: ELSE
762: x_msg_data := FND_MESSAGE.Get;
763: END IF;
764:
765: END Lock_Row;
766:

Line 932: x_msg_data := FND_MESSAGE.Get;

928: x_oracle_error := l_oracle_error;
929: IF FND_API.To_Boolean(p_called_by_form) THEN
930: APP_EXCEPTION.Raise_Exception;
931: ELSE
932: x_msg_data := FND_MESSAGE.Get;
933: END IF;
934:
935: WHEN Row_Missing_Error THEN
936: ROLLBACK TO SAVEPOINT Delete_Row;

Line 939: FND_MESSAGE.SET_NAME('GR',

935: WHEN Row_Missing_Error THEN
936: ROLLBACK TO SAVEPOINT Delete_Row;
937: x_return_status := 'E';
938: x_oracle_error := APP_EXCEPTION.Get_Code;
939: FND_MESSAGE.SET_NAME('GR',
940: 'GR_RECORD_NOT_FOUND');
941: FND_MESSAGE.SET_TOKEN('CODE',
942: p_label_code,
943: FALSE);

Line 941: FND_MESSAGE.SET_TOKEN('CODE',

937: x_return_status := 'E';
938: x_oracle_error := APP_EXCEPTION.Get_Code;
939: FND_MESSAGE.SET_NAME('GR',
940: 'GR_RECORD_NOT_FOUND');
941: FND_MESSAGE.SET_TOKEN('CODE',
942: p_label_code,
943: FALSE);
944: IF FND_API.To_Boolean(p_called_by_form) THEN
945: APP_EXCEPTION.Raise_Exception;

Line 947: x_msg_data := FND_MESSAGE.Get;

943: FALSE);
944: IF FND_API.To_Boolean(p_called_by_form) THEN
945: APP_EXCEPTION.Raise_Exception;
946: ELSE
947: x_msg_data := FND_MESSAGE.Get;
948: END IF;
949:
950: WHEN OTHERS THEN
951: ROLLBACK TO SAVEPOINT Delete_Row;

Line 955: FND_MESSAGE.SET_NAME('GR',

951: ROLLBACK TO SAVEPOINT Delete_Row;
952: x_return_status := 'U';
953: x_oracle_error := SQLCODE;
954: l_msg_data := SUBSTR(SQLERRM, 1, 200);
955: FND_MESSAGE.SET_NAME('GR',
956: 'GR_UNEXPECTED_ERROR');
957: FND_MESSAGE.SET_TOKEN('TEXT',
958: l_msg_data,
959: FALSE);

Line 957: FND_MESSAGE.SET_TOKEN('TEXT',

953: x_oracle_error := SQLCODE;
954: l_msg_data := SUBSTR(SQLERRM, 1, 200);
955: FND_MESSAGE.SET_NAME('GR',
956: 'GR_UNEXPECTED_ERROR');
957: FND_MESSAGE.SET_TOKEN('TEXT',
958: l_msg_data,
959: FALSE);
960: IF FND_API.To_Boolean(p_called_by_form) THEN
961: APP_EXCEPTION.Raise_Exception;

Line 963: x_msg_data := FND_MESSAGE.Get;

959: FALSE);
960: IF FND_API.To_Boolean(p_called_by_form) THEN
961: APP_EXCEPTION.Raise_Exception;
962: ELSE
963: x_msg_data := FND_MESSAGE.Get;
964: END IF;
965:
966: END Delete_Row;
967:

Line 1066: FND_MESSAGE.SET_NAME('GR',

1062: OPEN c_get_safety_category;
1063: FETCH c_get_safety_category INTO SafetyCatRcd;
1064: IF c_get_safety_category%NOTFOUND THEN
1065: x_return_status := 'E';
1066: FND_MESSAGE.SET_NAME('GR',
1067: 'GR_RECORD_NOT_FOUND');
1068: FND_MESSAGE.SET_TOKEN('CODE',
1069: p_safety_category_code,
1070: FALSE);

Line 1068: FND_MESSAGE.SET_TOKEN('CODE',

1064: IF c_get_safety_category%NOTFOUND THEN
1065: x_return_status := 'E';
1066: FND_MESSAGE.SET_NAME('GR',
1067: 'GR_RECORD_NOT_FOUND');
1068: FND_MESSAGE.SET_TOKEN('CODE',
1069: p_safety_category_code,
1070: FALSE);
1071: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1072: END IF;

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

1067: 'GR_RECORD_NOT_FOUND');
1068: FND_MESSAGE.SET_TOKEN('CODE',
1069: p_safety_category_code,
1070: FALSE);
1071: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1072: END IF;
1073: CLOSE c_get_safety_category;
1074:
1075: /* Check the label class code */

Line 1081: FND_MESSAGE.SET_NAME('GR',

1077: OPEN c_get_label_class;
1078: FETCH c_get_label_class INTO LabelClsRcd;
1079: IF c_get_label_class%NOTFOUND THEN
1080: x_return_status := 'E';
1081: FND_MESSAGE.SET_NAME('GR',
1082: 'GR_RECORD_NOT_FOUND');
1083: FND_MESSAGE.SET_TOKEN('CODE',
1084: p_label_class_code,
1085: FALSE);

Line 1083: FND_MESSAGE.SET_TOKEN('CODE',

1079: IF c_get_label_class%NOTFOUND THEN
1080: x_return_status := 'E';
1081: FND_MESSAGE.SET_NAME('GR',
1082: 'GR_RECORD_NOT_FOUND');
1083: FND_MESSAGE.SET_TOKEN('CODE',
1084: p_label_class_code,
1085: FALSE);
1086: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1087: END IF;

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

1082: 'GR_RECORD_NOT_FOUND');
1083: FND_MESSAGE.SET_TOKEN('CODE',
1084: p_label_class_code,
1085: FALSE);
1086: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1087: END IF;
1088: CLOSE c_get_label_class;
1089:
1090: /* Check the ingredient label code if entered */

Line 1100: FND_MESSAGE.SET_NAME('GR',

1096: l_rowid,
1097: l_key_exists);
1098: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1099: x_return_status := 'E';
1100: FND_MESSAGE.SET_NAME('GR',
1101: 'GR_RECORD_NOT_FOUND');
1102: FND_MESSAGE.SET_TOKEN('CODE',
1103: p_ingredient_label_code,
1104: FALSE);

Line 1102: FND_MESSAGE.SET_TOKEN('CODE',

1098: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1099: x_return_status := 'E';
1100: FND_MESSAGE.SET_NAME('GR',
1101: 'GR_RECORD_NOT_FOUND');
1102: FND_MESSAGE.SET_TOKEN('CODE',
1103: p_ingredient_label_code,
1104: FALSE);
1105: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1106: END IF;

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

1101: 'GR_RECORD_NOT_FOUND');
1102: FND_MESSAGE.SET_TOKEN('CODE',
1103: p_ingredient_label_code,
1104: FALSE);
1105: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1106: END IF;
1107: END IF;
1108:
1109: /* Check the inherit from label code if entered */

Line 1119: FND_MESSAGE.SET_NAME('GR',

1115: l_rowid,
1116: l_key_exists);
1117: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1118: x_return_status := 'E';
1119: FND_MESSAGE.SET_NAME('GR',
1120: 'GR_RECORD_NOT_FOUND');
1121: FND_MESSAGE.SET_TOKEN('CODE',
1122: p_inherit_from_label_code,
1123: FALSE);

Line 1121: FND_MESSAGE.SET_TOKEN('CODE',

1117: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1118: x_return_status := 'E';
1119: FND_MESSAGE.SET_NAME('GR',
1120: 'GR_RECORD_NOT_FOUND');
1121: FND_MESSAGE.SET_TOKEN('CODE',
1122: p_inherit_from_label_code,
1123: FALSE);
1124: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1125: END IF;

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

1120: 'GR_RECORD_NOT_FOUND');
1121: FND_MESSAGE.SET_TOKEN('CODE',
1122: p_inherit_from_label_code,
1123: FALSE);
1124: l_msg_data := l_msg_data || FND_MESSAGE.Get || ' ';
1125: END IF;
1126: END IF;
1127:
1128: /* Check the not null columns */

Line 1132: FND_MESSAGE.SET_NAME('GR',

1128: /* Check the not null columns */
1129:
1130: IF p_data_position_indicator IS NULL THEN
1131: x_return_status := 'E';
1132: FND_MESSAGE.SET_NAME('GR',
1133: 'GR_NULL_VALUE');
1134: FND_MESSAGE.SET_TOKEN('CODE',
1135: 'Data Position Indicator',
1136: FALSE);

Line 1134: FND_MESSAGE.SET_TOKEN('CODE',

1130: IF p_data_position_indicator IS NULL THEN
1131: x_return_status := 'E';
1132: FND_MESSAGE.SET_NAME('GR',
1133: 'GR_NULL_VALUE');
1134: FND_MESSAGE.SET_TOKEN('CODE',
1135: 'Data Position Indicator',
1136: FALSE);
1137: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1138: END IF;

Line 1137: l_msg_data := l_msg_data || FND_MESSAGE.Get;

1133: 'GR_NULL_VALUE');
1134: FND_MESSAGE.SET_TOKEN('CODE',
1135: 'Data Position Indicator',
1136: FALSE);
1137: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1138: END IF;
1139:
1140: IF p_label_properties_flag IS NULL THEN
1141: x_return_status := 'E';

Line 1142: FND_MESSAGE.SET_NAME('GR',

1138: END IF;
1139:
1140: IF p_label_properties_flag IS NULL THEN
1141: x_return_status := 'E';
1142: FND_MESSAGE.SET_NAME('GR',
1143: 'GR_NULL_VALUE');
1144: FND_MESSAGE.SET_TOKEN('CODE',
1145: 'Label Properties Flag',
1146: FALSE);

Line 1144: FND_MESSAGE.SET_TOKEN('CODE',

1140: IF p_label_properties_flag IS NULL THEN
1141: x_return_status := 'E';
1142: FND_MESSAGE.SET_NAME('GR',
1143: 'GR_NULL_VALUE');
1144: FND_MESSAGE.SET_TOKEN('CODE',
1145: 'Label Properties Flag',
1146: FALSE);
1147: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1148: END IF;

Line 1147: l_msg_data := l_msg_data || FND_MESSAGE.Get;

1143: 'GR_NULL_VALUE');
1144: FND_MESSAGE.SET_TOKEN('CODE',
1145: 'Label Properties Flag',
1146: FALSE);
1147: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1148: END IF;
1149:
1150: IF p_item_properties_flag IS NULL THEN
1151: x_return_status := 'E';

Line 1152: FND_MESSAGE.SET_NAME('GR',

1148: END IF;
1149:
1150: IF p_item_properties_flag IS NULL THEN
1151: x_return_status := 'E';
1152: FND_MESSAGE.SET_NAME('GR',
1153: 'GR_NULL_VALUE');
1154: FND_MESSAGE.SET_TOKEN('CODE',
1155: 'Item Properties Flag',
1156: FALSE);

Line 1154: FND_MESSAGE.SET_TOKEN('CODE',

1150: IF p_item_properties_flag IS NULL THEN
1151: x_return_status := 'E';
1152: FND_MESSAGE.SET_NAME('GR',
1153: 'GR_NULL_VALUE');
1154: FND_MESSAGE.SET_TOKEN('CODE',
1155: 'Item Properties Flag',
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_NULL_VALUE');
1154: FND_MESSAGE.SET_TOKEN('CODE',
1155: 'Item Properties Flag',
1156: FALSE);
1157: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1158: END IF;
1159:
1160: IF p_ingredient_value_flag IS NULL THEN
1161: x_return_status := 'E';

Line 1162: FND_MESSAGE.SET_NAME('GR',

1158: END IF;
1159:
1160: IF p_ingredient_value_flag IS NULL THEN
1161: x_return_status := 'E';
1162: FND_MESSAGE.SET_NAME('GR',
1163: 'GR_NULL_VALUE');
1164: FND_MESSAGE.SET_TOKEN('CODE',
1165: 'Ingredient Value Flag',
1166: FALSE);

Line 1164: FND_MESSAGE.SET_TOKEN('CODE',

1160: IF p_ingredient_value_flag IS NULL THEN
1161: x_return_status := 'E';
1162: FND_MESSAGE.SET_NAME('GR',
1163: 'GR_NULL_VALUE');
1164: FND_MESSAGE.SET_TOKEN('CODE',
1165: 'Ingredient Value Flag',
1166: FALSE);
1167: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1168: END IF;

Line 1167: l_msg_data := l_msg_data || FND_MESSAGE.Get;

1163: 'GR_NULL_VALUE');
1164: FND_MESSAGE.SET_TOKEN('CODE',
1165: 'Ingredient Value Flag',
1166: FALSE);
1167: l_msg_data := l_msg_data || FND_MESSAGE.Get;
1168: END IF;
1169:
1170: IF x_return_status <> 'S' THEN
1171: x_msg_data := l_msg_data;

Line 1181: FND_MESSAGE.SET_NAME('GR',

1177: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
1178: x_return_status := 'U';
1179: x_oracle_error := SQLCODE;
1180: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1181: FND_MESSAGE.SET_NAME('GR',
1182: 'GR_UNEXPECTED_ERROR');
1183: FND_MESSAGE.SET_TOKEN('TEXT',
1184: l_msg_data,
1185: FALSE);

Line 1183: FND_MESSAGE.SET_TOKEN('TEXT',

1179: x_oracle_error := SQLCODE;
1180: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1181: FND_MESSAGE.SET_NAME('GR',
1182: 'GR_UNEXPECTED_ERROR');
1183: FND_MESSAGE.SET_TOKEN('TEXT',
1184: l_msg_data,
1185: FALSE);
1186: x_msg_data := FND_MESSAGE.Get;
1187:

Line 1186: x_msg_data := FND_MESSAGE.Get;

1182: 'GR_UNEXPECTED_ERROR');
1183: FND_MESSAGE.SET_TOKEN('TEXT',
1184: l_msg_data,
1185: FALSE);
1186: x_msg_data := FND_MESSAGE.Get;
1187:
1188: END Check_Foreign_Keys;
1189:
1190: PROCEDURE Check_Integrity

Line 1331: FND_MESSAGE.SET_NAME('GR',

1327: x_return_status := 'S';
1328: x_oracle_error := 0;
1329: x_msg_data := NULL;
1330:
1331: FND_MESSAGE.SET_NAME('GR',
1332: 'GR_INTEGRITY_HEADER');
1333: FND_MESSAGE.SET_TOKEN('CODE',
1334: p_label_code,
1335: FALSE);

Line 1333: FND_MESSAGE.SET_TOKEN('CODE',

1329: x_msg_data := NULL;
1330:
1331: FND_MESSAGE.SET_NAME('GR',
1332: 'GR_INTEGRITY_HEADER');
1333: FND_MESSAGE.SET_TOKEN('CODE',
1334: p_label_code,
1335: FALSE);
1336: l_msg_data := FND_MESSAGE.Get;
1337:

Line 1336: l_msg_data := FND_MESSAGE.Get;

1332: 'GR_INTEGRITY_HEADER');
1333: FND_MESSAGE.SET_TOKEN('CODE',
1334: p_label_code,
1335: FALSE);
1336: l_msg_data := FND_MESSAGE.Get;
1337:
1338: /* Now read the cursors to make sure the item code isn't used. */
1339: /* Audit Table */
1340:

Line 1446: FND_MESSAGE.SET_NAME('GR',

1442:
1443: EXCEPTION
1444: WHEN INTEGRITY_ERROR THEN
1445: x_return_status := 'E';
1446: FND_MESSAGE.SET_NAME('GR',
1447: 'GR_INTEGRITY_HEADER');
1448: FND_MESSAGE.SET_TOKEN('CODE',
1449: p_label_code,
1450: FALSE);

Line 1448: FND_MESSAGE.SET_TOKEN('CODE',

1444: WHEN INTEGRITY_ERROR THEN
1445: x_return_status := 'E';
1446: FND_MESSAGE.SET_NAME('GR',
1447: 'GR_INTEGRITY_HEADER');
1448: FND_MESSAGE.SET_TOKEN('CODE',
1449: p_label_code,
1450: FALSE);
1451: FND_MESSAGE.SET_TOKEN('TABLES',
1452: SUBSTR(l_msg_data,1,LENGTH(l_msg_data)-1),

Line 1451: FND_MESSAGE.SET_TOKEN('TABLES',

1447: 'GR_INTEGRITY_HEADER');
1448: FND_MESSAGE.SET_TOKEN('CODE',
1449: p_label_code,
1450: FALSE);
1451: FND_MESSAGE.SET_TOKEN('TABLES',
1452: SUBSTR(l_msg_data,1,LENGTH(l_msg_data)-1),
1453: FALSE);
1454: IF FND_API.To_Boolean(p_called_by_form) THEN
1455: APP_EXCEPTION.Raise_Exception;

Line 1457: x_msg_data := FND_MESSAGE.Get;

1453: FALSE);
1454: IF FND_API.To_Boolean(p_called_by_form) THEN
1455: APP_EXCEPTION.Raise_Exception;
1456: ELSE
1457: x_msg_data := FND_MESSAGE.Get;
1458: END IF;
1459:
1460: WHEN OTHERS THEN
1461: ROLLBACK TO SAVEPOINT Check_Integrity;

Line 1465: FND_MESSAGE.SET_NAME('GR',

1461: ROLLBACK TO SAVEPOINT Check_Integrity;
1462: x_return_status := 'U';
1463: x_oracle_error := SQLCODE;
1464: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1465: FND_MESSAGE.SET_NAME('GR',
1466: 'GR_UNEXPECTED_ERROR');
1467: FND_MESSAGE.SET_TOKEN('TEXT',
1468: l_msg_data,
1469: FALSE);

Line 1467: FND_MESSAGE.SET_TOKEN('TEXT',

1463: x_oracle_error := SQLCODE;
1464: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1465: FND_MESSAGE.SET_NAME('GR',
1466: 'GR_UNEXPECTED_ERROR');
1467: FND_MESSAGE.SET_TOKEN('TEXT',
1468: l_msg_data,
1469: FALSE);
1470: IF FND_API.To_Boolean(p_called_by_form) THEN
1471: APP_EXCEPTION.Raise_Exception;

Line 1473: x_msg_data := FND_MESSAGE.Get;

1469: FALSE);
1470: IF FND_API.To_Boolean(p_called_by_form) THEN
1471: APP_EXCEPTION.Raise_Exception;
1472: ELSE
1473: x_msg_data := FND_MESSAGE.Get;
1474: END IF;
1475:
1476: END Check_Integrity;
1477:

Line 1521: FND_MESSAGE.SET_NAME('GR',

1517: EXCEPTION
1518:
1519: WHEN Others THEN
1520: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1521: FND_MESSAGE.SET_NAME('GR',
1522: 'GR_UNEXPECTED_ERROR');
1523: FND_MESSAGE.SET_TOKEN('TEXT',
1524: l_msg_data,
1525: FALSE);

Line 1523: FND_MESSAGE.SET_TOKEN('TEXT',

1519: WHEN Others THEN
1520: l_msg_data := SUBSTR(SQLERRM, 1, 200);
1521: FND_MESSAGE.SET_NAME('GR',
1522: 'GR_UNEXPECTED_ERROR');
1523: FND_MESSAGE.SET_TOKEN('TEXT',
1524: l_msg_data,
1525: FALSE);
1526: IF FND_API.To_Boolean(p_called_by_form) THEN
1527: APP_EXCEPTION.Raise_Exception;