256: FND_MESSAGE.SET_TOKEN('TEXT',
257: l_msg_data,
258: FALSE);
259: IF FND_API.To_Boolean(p_called_by_form) THEN
260: APP_EXCEPTION.Raise_Exception;
261: ELSE
262: x_msg_data := FND_MESSAGE.Get;
263: END IF;
264:
265: WHEN Item_Exists_Error THEN
266: ROLLBACK TO SAVEPOINT Insert_Row;
267: l_msg_token := p_item_code || ' ' || p_label_code || ' ' || p_language;
268: x_return_status := 'E';
269: x_oracle_error := APP_EXCEPTION.Get_Code;
270: FND_MESSAGE.SET_NAME('GR',
271: 'GR_RECORD_EXISTS');
272: FND_MESSAGE.SET_TOKEN('CODE',
273: l_msg_token,
272: FND_MESSAGE.SET_TOKEN('CODE',
273: l_msg_token,
274: FALSE);
275: IF FND_API.To_Boolean(p_called_by_form) THEN
276: APP_EXCEPTION.Raise_Exception;
277: ELSE
278: x_msg_data := FND_MESSAGE.Get;
279: END IF;
280:
281: WHEN Row_Missing_Error THEN
282: ROLLBACK TO SAVEPOINT Insert_Row;
283: l_msg_token := p_item_code || ' ' || p_label_code || ' ' || p_language;
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,
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;
293: ELSE
294: x_msg_data := FND_MESSAGE.Get;
295: END IF;
296:
297: WHEN OTHERS THEN
298: ROLLBACK TO SAVEPOINT Insert_Row;
299: l_msg_token := p_item_code || ' ' || p_label_code || ' ' || p_language;
300: x_return_status := 'U';
301: x_oracle_error := APP_EXCEPTION.Get_Code;
302: l_msg_data := APP_EXCEPTION.Get_Text;
303: FND_MESSAGE.SET_NAME('GR',
304: 'GR_UNEXPECTED_ERROR');
305: FND_MESSAGE.SET_TOKEN('TEXT',
298: ROLLBACK TO SAVEPOINT Insert_Row;
299: l_msg_token := p_item_code || ' ' || p_label_code || ' ' || p_language;
300: x_return_status := 'U';
301: x_oracle_error := APP_EXCEPTION.Get_Code;
302: l_msg_data := APP_EXCEPTION.Get_Text;
303: FND_MESSAGE.SET_NAME('GR',
304: 'GR_UNEXPECTED_ERROR');
305: FND_MESSAGE.SET_TOKEN('TEXT',
306: l_msg_token,
305: FND_MESSAGE.SET_TOKEN('TEXT',
306: l_msg_token,
307: FALSE);
308: IF FND_API.To_Boolean(p_called_by_form) THEN
309: APP_EXCEPTION.Raise_Exception;
310: ELSE
311: x_msg_data := FND_MESSAGE.Get;
312: END IF;
313:
499: FND_MESSAGE.SET_TOKEN('TEXT',
500: l_msg_data,
501: FALSE);
502: IF FND_API.To_Boolean(p_called_by_form) THEN
503: APP_EXCEPTION.Raise_Exception;
504: ELSE
505: x_msg_data := FND_MESSAGE.Get;
506: END IF;
507:
507:
508: WHEN Row_Missing_Error THEN
509: ROLLBACK TO SAVEPOINT Update_Row;
510: x_return_status := 'E';
511: x_oracle_error := APP_EXCEPTION.Get_Code;
512: FND_MESSAGE.SET_NAME('GR',
513: 'GR_NO_RECORD_INSERTED');
514: FND_MESSAGE.SET_TOKEN('CODE',
515: l_msg_token,
514: FND_MESSAGE.SET_TOKEN('CODE',
515: l_msg_token,
516: FALSE);
517: IF FND_API.To_Boolean(p_called_by_form) THEN
518: APP_EXCEPTION.Raise_Exception;
519: ELSE
520: x_msg_data := FND_MESSAGE.Get;
521: END IF;
522:
522:
523: WHEN OTHERS THEN
524: ROLLBACK TO SAVEPOINT Update_Row;
525: x_return_status := 'U';
526: x_oracle_error := APP_EXCEPTION.Get_Code;
527: l_msg_data := APP_EXCEPTION.Get_Text;
528: FND_MESSAGE.SET_NAME('GR',
529: 'GR_UNEXPECTED_ERROR');
530: FND_MESSAGE.SET_TOKEN('TEXT',
523: WHEN OTHERS THEN
524: ROLLBACK TO SAVEPOINT Update_Row;
525: x_return_status := 'U';
526: x_oracle_error := APP_EXCEPTION.Get_Code;
527: l_msg_data := APP_EXCEPTION.Get_Text;
528: FND_MESSAGE.SET_NAME('GR',
529: 'GR_UNEXPECTED_ERROR');
530: FND_MESSAGE.SET_TOKEN('TEXT',
531: l_msg_token,
530: FND_MESSAGE.SET_TOKEN('TEXT',
531: l_msg_token,
532: FALSE);
533: IF FND_API.To_Boolean(p_called_by_form) THEN
534: APP_EXCEPTION.Raise_Exception;
535: ELSE
536: x_msg_data := FND_MESSAGE.Get;
537: END IF;
538:
875:
876: WHEN Language_Missing_Error THEN
877: ROLLBACK TO SAVEPOINT Add_Language;
878: x_return_status := 'E';
879: x_oracle_error := APP_EXCEPTION.Get_Code;
880: FND_MESSAGE.SET_NAME('GR',
881: 'GR_RECORD_NOT_FOUND');
882: FND_MESSAGE.SET_TOKEN('CODE',
883: l_msg_token,
882: FND_MESSAGE.SET_TOKEN('CODE',
883: l_msg_token,
884: FALSE);
885: IF FND_API.To_Boolean(p_called_by_form) THEN
886: APP_EXCEPTION.Raise_Exception;
887: ELSE
888: x_msg_data := FND_MESSAGE.Get;
889: END IF;
890:
890:
891: WHEN OTHERS THEN
892: ROLLBACK TO SAVEPOINT Add_Language;
893: x_return_status := 'U';
894: x_oracle_error := APP_EXCEPTION.Get_Code;
895: FND_MESSAGE.SET_NAME('GR',
896: 'GR_UNEXPECTED_ERROR');
897: FND_MESSAGE.SET_TOKEN('TEXT',
898: l_msg_token,
897: FND_MESSAGE.SET_TOKEN('TEXT',
898: l_msg_token,
899: FALSE);
900: IF FND_API.To_Boolean(p_called_by_form) THEN
901: APP_EXCEPTION.Raise_Exception;
902: ELSE
903: x_msg_data := FND_MESSAGE.Get;
904: END IF;
905:
1015: FND_MESSAGE.SET_TOKEN('CODE',
1016: l_msg_token,
1017: FALSE);
1018: IF FND_API.To_Boolean(p_called_by_form) THEN
1019: APP_EXCEPTION.Raise_Exception;
1020: ELSE
1021: x_msg_data := FND_MESSAGE.Get;
1022: END IF;
1023:
1023:
1024: WHEN Row_Already_Locked_Error THEN
1025: ROLLBACK TO SAVEPOINT Lock_Row;
1026: x_return_status := 'E';
1027: x_oracle_error := APP_EXCEPTION.Get_Code;
1028: FND_MESSAGE.SET_NAME('GR',
1029: 'GR_ROW_IS_LOCKED');
1030: IF FND_API.To_Boolean(p_called_by_form) THEN
1031: APP_EXCEPTION.Raise_Exception;
1027: x_oracle_error := APP_EXCEPTION.Get_Code;
1028: FND_MESSAGE.SET_NAME('GR',
1029: 'GR_ROW_IS_LOCKED');
1030: IF FND_API.To_Boolean(p_called_by_form) THEN
1031: APP_EXCEPTION.Raise_Exception;
1032: ELSE
1033: x_msg_data := FND_MESSAGE.Get;
1034: END IF;
1035:
1035:
1036: WHEN OTHERS THEN
1037: ROLLBACK TO SAVEPOINT Lock_Row;
1038: x_return_status := 'U';
1039: x_oracle_error := APP_EXCEPTION.Get_Code;
1040: l_msg_data := APP_EXCEPTION.Get_Text;
1041: FND_MESSAGE.SET_NAME('GR',
1042: 'GR_UNEXPECTED_ERROR');
1043: FND_MESSAGE.SET_TOKEN('TEXT',
1036: WHEN OTHERS THEN
1037: ROLLBACK TO SAVEPOINT Lock_Row;
1038: x_return_status := 'U';
1039: x_oracle_error := APP_EXCEPTION.Get_Code;
1040: l_msg_data := APP_EXCEPTION.Get_Text;
1041: FND_MESSAGE.SET_NAME('GR',
1042: 'GR_UNEXPECTED_ERROR');
1043: FND_MESSAGE.SET_TOKEN('TEXT',
1044: l_msg_token,
1043: FND_MESSAGE.SET_TOKEN('TEXT',
1044: l_msg_token,
1045: FALSE);
1046: IF FND_API.To_Boolean(p_called_by_form) THEN
1047: APP_EXCEPTION.Raise_Exception;
1048: ELSE
1049: x_msg_data := FND_MESSAGE.Get;
1050: END IF;
1051:
1194: ROLLBACK TO SAVEPOINT Delete_Row;
1195: x_return_status := l_return_status;
1196: x_oracle_error := l_oracle_error;
1197: IF FND_API.To_Boolean(p_called_by_form) THEN
1198: APP_EXCEPTION.Raise_Exception;
1199: ELSE
1200: x_msg_data := FND_MESSAGE.Get;
1201: END IF;
1202:
1202:
1203: WHEN Row_Missing_Error THEN
1204: ROLLBACK TO SAVEPOINT Delete_Row;
1205: x_return_status := 'E';
1206: x_oracle_error := APP_EXCEPTION.Get_Code;
1207: FND_MESSAGE.SET_NAME('GR',
1208: 'GR_RECORD_NOT_FOUND');
1209: FND_MESSAGE.SET_TOKEN('CODE',
1210: l_msg_token,
1209: FND_MESSAGE.SET_TOKEN('CODE',
1210: l_msg_token,
1211: FALSE);
1212: IF FND_API.To_Boolean(p_called_by_form) THEN
1213: APP_EXCEPTION.Raise_Exception;
1214: ELSE
1215: x_msg_data := FND_MESSAGE.Get;
1216: END IF;
1217:
1217:
1218: WHEN OTHERS THEN
1219: ROLLBACK TO SAVEPOINT Delete_Row;
1220: x_return_status := 'U';
1221: x_oracle_error := APP_EXCEPTION.Get_Code;
1222: l_msg_data := APP_EXCEPTION.Get_Text;
1223: l_msg_data := APP_EXCEPTION.Get_Text;
1224: FND_MESSAGE.SET_NAME('GR',
1225: 'GR_UNEXPECTED_ERROR');
1218: WHEN OTHERS THEN
1219: ROLLBACK TO SAVEPOINT Delete_Row;
1220: x_return_status := 'U';
1221: x_oracle_error := APP_EXCEPTION.Get_Code;
1222: l_msg_data := APP_EXCEPTION.Get_Text;
1223: l_msg_data := APP_EXCEPTION.Get_Text;
1224: FND_MESSAGE.SET_NAME('GR',
1225: 'GR_UNEXPECTED_ERROR');
1226: FND_MESSAGE.SET_TOKEN('TEXT',
1219: ROLLBACK TO SAVEPOINT Delete_Row;
1220: x_return_status := 'U';
1221: x_oracle_error := APP_EXCEPTION.Get_Code;
1222: l_msg_data := APP_EXCEPTION.Get_Text;
1223: l_msg_data := APP_EXCEPTION.Get_Text;
1224: FND_MESSAGE.SET_NAME('GR',
1225: 'GR_UNEXPECTED_ERROR');
1226: FND_MESSAGE.SET_TOKEN('TEXT',
1227: l_msg_token,
1226: FND_MESSAGE.SET_TOKEN('TEXT',
1227: l_msg_token,
1228: FALSE);
1229: IF FND_API.To_Boolean(p_called_by_form) THEN
1230: APP_EXCEPTION.Raise_Exception;
1231: ELSE
1232: x_msg_data := FND_MESSAGE.Get;
1233: END IF;
1234:
1318: EXCEPTION
1319:
1320: WHEN Null_Delete_Option_Error THEN
1321: x_return_status := 'E';
1322: x_oracle_error := APP_EXCEPTION.Get_Code;
1323: FND_MESSAGE.SET_NAME('GR',
1324: 'GR_NULL_VALUE');
1325: FND_MESSAGE.SET_TOKEN('CODE',
1326: l_msg_token,
1325: FND_MESSAGE.SET_TOKEN('CODE',
1326: l_msg_token,
1327: FALSE);
1328: IF FND_API.To_Boolean(p_called_by_form) THEN
1329: APP_EXCEPTION.Raise_Exception;
1330: ELSE
1331: x_msg_data := FND_MESSAGE.Get;
1332: END IF;
1333:
1333:
1334: WHEN OTHERS THEN
1335: ROLLBACK TO SAVEPOINT Delete_Rows;
1336: x_return_status := 'U';
1337: x_oracle_error := APP_EXCEPTION.Get_Code;
1338: l_msg_data := APP_EXCEPTION.Get_Text;
1339: FND_MESSAGE.SET_NAME('GR',
1340: 'GR_UNEXPECTED_ERROR');
1341: FND_MESSAGE.SET_TOKEN('TEXT',
1334: WHEN OTHERS THEN
1335: ROLLBACK TO SAVEPOINT Delete_Rows;
1336: x_return_status := 'U';
1337: x_oracle_error := APP_EXCEPTION.Get_Code;
1338: l_msg_data := APP_EXCEPTION.Get_Text;
1339: FND_MESSAGE.SET_NAME('GR',
1340: 'GR_UNEXPECTED_ERROR');
1341: FND_MESSAGE.SET_TOKEN('TEXT',
1342: l_msg_token,
1341: FND_MESSAGE.SET_TOKEN('TEXT',
1342: l_msg_token,
1343: FALSE);
1344: IF FND_API.To_Boolean(p_called_by_form) THEN
1345: APP_EXCEPTION.Raise_Exception;
1346: ELSE
1347: x_msg_data := FND_MESSAGE.Get;
1348: END IF;
1349:
1489:
1490: WHEN Row_Missing_Error THEN
1491: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
1492: x_return_status := 'E';
1493: x_oracle_error := APP_EXCEPTION.Get_Code;
1494: FND_MESSAGE.SET_NAME('GR',
1495: 'GR_RECORD_NOT_FOUND');
1496: FND_MESSAGE.SET_TOKEN('CODE',
1497: l_msg_token,
1500:
1501: WHEN OTHERS THEN
1502: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
1503: x_return_status := 'U';
1504: x_oracle_error := APP_EXCEPTION.Get_Code;
1505: l_msg_data := APP_EXCEPTION.Get_Text;
1506: FND_MESSAGE.SET_NAME('GR',
1507: 'GR_UNEXPECTED_ERROR');
1508: FND_MESSAGE.SET_TOKEN('TEXT',
1501: WHEN OTHERS THEN
1502: ROLLBACK TO SAVEPOINT Check_Foreign_Keys;
1503: x_return_status := 'U';
1504: x_oracle_error := APP_EXCEPTION.Get_Code;
1505: l_msg_data := APP_EXCEPTION.Get_Text;
1506: FND_MESSAGE.SET_NAME('GR',
1507: 'GR_UNEXPECTED_ERROR');
1508: FND_MESSAGE.SET_TOKEN('TEXT',
1509: l_msg_token,
1610: FND_MESSAGE.SET_TOKEN('CODE',
1611: p_language,
1612: FALSE);
1613: IF FND_API.To_Boolean(p_called_by_form) THEN
1614: APP_EXCEPTION.Raise_Exception;
1615: ELSE
1616: x_msg_data := FND_MESSAGE.Get;
1617: END IF;
1618:
1618:
1619: WHEN OTHERS THEN
1620: ROLLBACK TO SAVEPOINT Check_Integrity;
1621: x_return_status := 'U';
1622: x_oracle_error := APP_EXCEPTION.Get_Code;
1623: l_msg_data := APP_EXCEPTION.Get_Text;
1624: FND_MESSAGE.SET_NAME('GR',
1625: 'GR_UNEXPECTED_ERROR');
1626: FND_MESSAGE.SET_TOKEN('TEXT',
1619: WHEN OTHERS THEN
1620: ROLLBACK TO SAVEPOINT Check_Integrity;
1621: x_return_status := 'U';
1622: x_oracle_error := APP_EXCEPTION.Get_Code;
1623: l_msg_data := APP_EXCEPTION.Get_Text;
1624: FND_MESSAGE.SET_NAME('GR',
1625: 'GR_UNEXPECTED_ERROR');
1626: FND_MESSAGE.SET_TOKEN('TEXT',
1627: l_msg_data,
1626: FND_MESSAGE.SET_TOKEN('TEXT',
1627: l_msg_data,
1628: FALSE);
1629: IF FND_API.To_Boolean(p_called_by_form) THEN
1630: APP_EXCEPTION.Raise_Exception;
1631: ELSE
1632: x_msg_data := FND_MESSAGE.Get;
1633: END IF;
1634:
1682:
1683: EXCEPTION
1684:
1685: WHEN Others THEN
1686: l_msg_data := APP_EXCEPTION.Get_Text;
1687: FND_MESSAGE.SET_NAME('GR',
1688: 'GR_UNEXPECTED_ERROR');
1689: FND_MESSAGE.SET_TOKEN('TEXT',
1690: l_msg_data,
1689: FND_MESSAGE.SET_TOKEN('TEXT',
1690: l_msg_data,
1691: FALSE);
1692: IF FND_API.To_Boolean(p_called_by_form) THEN
1693: APP_EXCEPTION.Raise_Exception;
1694: END IF;
1695:
1696: END Check_Primary_Key;
1697: