[Home] [Help]
132: 'F',
133: l_rowid,
134: l_key_exists);
135:
136: IF FND_API.To_Boolean(l_key_exists) THEN
137: RAISE Label_Exists_Error;
138: END IF;
139:
140: INSERT INTO gr_phrase_concs
231: 'F',
232: l_rowid,
233: l_key_exists);
234:
235: IF FND_API.To_Boolean(l_key_exists) THEN
236: x_rowid := l_rowid;
237: ELSE
238: RAISE Row_Missing_Error;
239: END IF;
239: END IF;
240:
241: /* Check the commit flag and if set, then commit the work. */
242:
243: IF FND_API.To_Boolean(p_commit) THEN
244: COMMIT WORK;
245: END IF;
246:
247: EXCEPTION
254: 'GR_FOREIGN_KEY_ERROR');
255: FND_MESSAGE.SET_TOKEN('TEXT',
256: l_msg_data,
257: FALSE);
258: IF FND_API.To_Boolean(p_called_by_form) THEN
259: APP_EXCEPTION.Raise_Exception;
260: ELSE
261: x_msg_data := FND_MESSAGE.Get;
262: END IF;
269: 'GR_RECORD_EXISTS');
270: FND_MESSAGE.SET_TOKEN('CODE',
271: p_phrase_code,
272: FALSE);
273: IF FND_API.To_Boolean(p_called_by_form) THEN
274: APP_EXCEPTION.Raise_Exception;
275: ELSE
276: x_msg_data := FND_MESSAGE.Get;
277: END IF;
284: 'GR_NO_RECORD_INSERTED');
285: FND_MESSAGE.SET_TOKEN('CODE',
286: p_phrase_code,
287: FALSE);
288: IF FND_API.To_Boolean(p_called_by_form) THEN
289: APP_EXCEPTION.Raise_Exception;
290: ELSE
291: x_msg_data := FND_MESSAGE.Get;
292: END IF;
300: 'GR_UNEXPECTED_ERROR');
301: FND_MESSAGE.SET_TOKEN('TEXT',
302: l_msg_data,
303: FALSE);
304: IF FND_API.To_Boolean(p_called_by_form) THEN
305: APP_EXCEPTION.Raise_Exception;
306: ELSE
307: x_msg_data := FND_MESSAGE.Get;
308: END IF;
477: END IF;
478:
479: /* Check the commit flag and if set, then commit the work. */
480:
481: IF FND_API.To_Boolean(p_commit) THEN
482: COMMIT WORK;
483: END IF;
484:
485: EXCEPTION
492: 'GR_FOREIGN_KEY_ERROR');
493: FND_MESSAGE.SET_TOKEN('TEXT',
494: l_msg_data,
495: FALSE);
496: IF FND_API.To_Boolean(p_called_by_form) THEN
497: APP_EXCEPTION.Raise_Exception;
498: ELSE
499: x_msg_data := FND_MESSAGE.Get;
500: END IF;
507: 'GR_NO_RECORD_INSERTED');
508: FND_MESSAGE.SET_TOKEN('CODE',
509: p_phrase_code,
510: FALSE);
511: IF FND_API.To_Boolean(p_called_by_form) THEN
512: APP_EXCEPTION.Raise_Exception;
513: ELSE
514: x_msg_data := FND_MESSAGE.Get;
515: END IF;
523: 'GR_UNEXPECTED_ERROR');
524: FND_MESSAGE.SET_TOKEN('TEXT',
525: l_msg_data,
526: FALSE);
527: IF FND_API.To_Boolean(p_called_by_form) THEN
528: APP_EXCEPTION.Raise_Exception;
529: ELSE
530: x_msg_data := FND_MESSAGE.Get;
531: END IF;
628: IF LockConcRcd.last_update_date <> p_last_update_date THEN
629: RAISE RECORD_CHANGED_ERROR;
630: END IF;
631:
632: IF FND_API.To_Boolean(p_commit) THEN
633: COMMIT WORK;
634: END IF;
635:
636: EXCEPTION
642: 'GR_RECORD_NOT_FOUND');
643: FND_MESSAGE.SET_TOKEN('CODE',
644: p_phrase_code,
645: FALSE);
646: IF FND_API.To_Boolean(p_called_by_form) THEN
647: APP_EXCEPTION.Raise_Exception;
648: ELSE
649: x_msg_data := FND_MESSAGE.Get;
650: END IF;
653: ROLLBACK TO SAVEPOINT Lock_Row;
654: X_return_status := 'E';
655: FND_MESSAGE.SET_NAME('FND',
656: 'FORM_RECORD_CHANGED');
657: IF FND_API.To_Boolean(p_called_by_form) THEN
658: APP_EXCEPTION.Raise_Exception;
659: ELSE
660: x_msg_data := FND_MESSAGE.Get;
661: END IF;
662: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
663: ROLLBACK TO SAVEPOINT Lock_Row;
664: x_return_status := 'L';
665: x_oracle_error := APP_EXCEPTION.Get_Code;
666: IF NOT (FND_API.To_Boolean(p_called_by_form)) THEN
667: FND_MESSAGE.SET_NAME('GR',
668: 'GR_ROW_IS_LOCKED');
669: x_msg_data := FND_MESSAGE.Get;
670: END IF;
678: 'GR_UNEXPECTED_ERROR');
679: FND_MESSAGE.SET_TOKEN('TEXT',
680: l_msg_data,
681: FALSE);
682: IF FND_API.To_Boolean(p_called_by_form) THEN
683: APP_EXCEPTION.Raise_Exception;
684: ELSE
685: x_msg_data := FND_MESSAGE.Get;
686: END IF;
815: WHERE rowid = p_rowid;
816:
817: /* Check the commit flag and if set, then commit the work. */
818:
819: IF FND_API.TO_Boolean(p_commit) THEN
820: COMMIT WORK;
821: END IF;
822:
823: EXCEPTION
825: WHEN Check_Integrity_Error THEN
826: ROLLBACK TO SAVEPOINT Delete_Row;
827: x_return_status := l_return_status;
828: x_oracle_error := l_oracle_error;
829: IF FND_API.To_Boolean(p_called_by_form) THEN
830: APP_EXCEPTION.Raise_Exception;
831: ELSE
832: x_msg_data := FND_MESSAGE.Get;
833: END IF;
840: 'GR_RECORD_NOT_FOUND');
841: FND_MESSAGE.SET_TOKEN('CODE',
842: p_phrase_code,
843: FALSE);
844: IF FND_API.To_Boolean(p_called_by_form) THEN
845: APP_EXCEPTION.Raise_Exception;
846: ELSE
847: x_msg_data := FND_MESSAGE.Get;
848: END IF;
857: 'GR_UNEXPECTED_ERROR');
858: FND_MESSAGE.SET_TOKEN('TEXT',
859: l_msg_data,
860: FALSE);
861: IF FND_API.To_Boolean(p_called_by_form) THEN
862: APP_EXCEPTION.Raise_Exception;
863: ELSE
864: x_msg_data := FND_MESSAGE.Get;
865: END IF;
899:
900: DELETE FROM gr_phrase_concs
901: WHERE phrase_code = p_phrase_code;
902:
903: IF FND_API.To_Boolean(p_commit) THEN
904: COMMIT WORK;
905: END IF;
906:
907: EXCEPTION
915: 'GR_UNEXPECTED_ERROR');
916: FND_MESSAGE.SET_TOKEN('TEXT',
917: l_msg_token,
918: FALSE);
919: IF FND_API.To_Boolean(p_called_by_form) THEN
920: APP_EXCEPTION.Raise_Exception;
921: ELSE
922: x_msg_data := FND_MESSAGE.Get;
923: END IF;
998: l_rowid,
999: l_key_exists);
1000: END IF;
1001:
1002: IF NOT FND_API.To_Boolean(l_key_exists) THEN
1003: x_return_status := 'E';
1004: FND_MESSAGE.SET_NAME('GR',
1005: 'GR_RECORD_NOT_FOUND');
1006: FND_MESSAGE.SET_TOKEN('CODE',
1114: 'GR_UNEXPECTED_ERROR');
1115: FND_MESSAGE.SET_TOKEN('TEXT',
1116: l_msg_data,
1117: FALSE);
1118: IF FND_API.To_Boolean(p_called_by_form) THEN
1119: APP_EXCEPTION.Raise_Exception;
1120: ELSE
1121: x_msg_data := FND_MESSAGE.Get;
1122: END IF;
1176: 'GR_UNEXPECTED_ERROR');
1177: FND_MESSAGE.SET_TOKEN('TEXT',
1178: l_msg_data,
1179: FALSE);
1180: IF FND_API.To_Boolean(p_called_by_form) THEN
1181: APP_EXCEPTION.Raise_Exception;
1182: END IF;
1183:
1184: END Check_Primary_Key;