73: 'F',
74: l_rowid,
75: l_key_exists);
76:
77: IF FND_API.To_Boolean(l_key_exists) THEN
78: RAISE Item_Exists_Error;
79: END IF;
80:
81: INSERT INTO gr_property_values_tl
112: 'F',
113: l_rowid,
114: l_key_exists);
115:
116: IF FND_API.To_Boolean(l_key_exists) THEN
117: x_rowid := l_rowid;
118: ELSE
119: RAISE Row_Missing_Error;
120: END IF;
120: END IF;
121:
122: /* Check the commit flag and if set, then commit the work. */
123:
124: IF FND_API.To_Boolean(p_commit) THEN
125: COMMIT WORK;
126: END IF;
127:
128: EXCEPTION
135: 'GR_FOREIGN_KEY_ERROR');
136: FND_MESSAGE.SET_TOKEN('TEXT',
137: l_msg_data,
138: FALSE);
139: IF FND_API.To_Boolean(p_called_by_form) THEN
140: APP_EXCEPTION.Raise_Exception;
141: ELSE
142: x_msg_data := FND_MESSAGE.Get;
143: END IF;
151: 'GR_RECORD_EXISTS');
152: FND_MESSAGE.SET_TOKEN('CODE',
153: l_msg_token,
154: FALSE);
155: IF FND_API.To_Boolean(p_called_by_form) THEN
156: APP_EXCEPTION.Raise_Exception;
157: ELSE
158: x_msg_data := FND_MESSAGE.Get;
159: END IF;
167: 'GR_NO_RECORD_INSERTED');
168: FND_MESSAGE.SET_TOKEN('CODE',
169: l_msg_token,
170: FALSE);
171: IF FND_API.To_Boolean(p_called_by_form) THEN
172: APP_EXCEPTION.Raise_Exception;
173: ELSE
174: x_msg_data := FND_MESSAGE.Get;
175: END IF;
184: 'GR_UNEXPECTED_ERROR');
185: FND_MESSAGE.SET_TOKEN('TEXT',
186: l_msg_token,
187: FALSE);
188: IF FND_API.To_Boolean(p_called_by_form) THEN
189: APP_EXCEPTION.Raise_Exception;
190: ELSE
191: x_msg_data := FND_MESSAGE.Get;
192: END IF;
273: END IF;
274:
275: /* Check the commit flag and if set, then commit the work. */
276:
277: IF FND_API.To_Boolean(p_commit) THEN
278: COMMIT WORK;
279: END IF;
280:
281: EXCEPTION
288: 'GR_FOREIGN_KEY_ERROR');
289: FND_MESSAGE.SET_TOKEN('TEXT',
290: l_msg_data,
291: FALSE);
292: IF FND_API.To_Boolean(p_called_by_form) THEN
293: APP_EXCEPTION.Raise_Exception;
294: ELSE
295: x_msg_data := FND_MESSAGE.Get;
296: END IF;
303: 'GR_NO_RECORD_INSERTED');
304: FND_MESSAGE.SET_TOKEN('CODE',
305: l_msg_token,
306: FALSE);
307: IF FND_API.To_Boolean(p_called_by_form) THEN
308: APP_EXCEPTION.Raise_Exception;
309: ELSE
310: x_msg_data := FND_MESSAGE.Get;
311: END IF;
319: 'GR_UNEXPECTED_ERROR');
320: FND_MESSAGE.SET_TOKEN('TEXT',
321: l_msg_token,
322: FALSE);
323: IF FND_API.To_Boolean(p_called_by_form) THEN
324: APP_EXCEPTION.Raise_Exception;
325: ELSE
326: x_msg_data := FND_MESSAGE.Get;
327: END IF;
512: END IF;
513: CLOSE c_get_installed_languages;
514: END LOOP;
515: CLOSE c_get_descs;
516: IF FND_API.To_Boolean(p_commit) THEN
517: COMMIT WORK;
518: END IF;
519:
520: EXCEPTION
527: 'GR_RECORD_NOT_FOUND');
528: FND_MESSAGE.SET_TOKEN('CODE',
529: l_msg_token,
530: FALSE);
531: IF FND_API.To_Boolean(p_called_by_form) THEN
532: APP_EXCEPTION.Raise_Exception;
533: ELSE
534: x_msg_data := FND_MESSAGE.Get;
535: END IF;
543: 'GR_UNEXPECTED_ERROR');
544: FND_MESSAGE.SET_TOKEN('TEXT',
545: l_msg_token,
546: FALSE);
547: IF FND_API.To_Boolean(p_called_by_form) THEN
548: APP_EXCEPTION.Raise_Exception;
549: ELSE
550: x_msg_data := FND_MESSAGE.Get;
551: END IF;
616: RAISE No_Data_Found_Error;
617: END IF;
618: CLOSE c_lock_property_values;
619:
620: IF FND_API.To_Boolean(p_commit) THEN
621: COMMIT WORK;
622: END IF;
623:
624: EXCEPTION
630: 'GR_RECORD_NOT_FOUND');
631: FND_MESSAGE.SET_TOKEN('CODE',
632: l_msg_token,
633: FALSE);
634: IF FND_API.To_Boolean(p_called_by_form) THEN
635: APP_EXCEPTION.Raise_Exception;
636: ELSE
637: x_msg_data := FND_MESSAGE.Get;
638: END IF;
642: x_return_status := 'E';
643: x_oracle_error := APP_EXCEPTION.Get_Code;
644: FND_MESSAGE.SET_NAME('GR',
645: 'GR_ROW_IS_LOCKED');
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;
658: 'GR_UNEXPECTED_ERROR');
659: FND_MESSAGE.SET_TOKEN('TEXT',
660: l_msg_token,
661: FALSE);
662: IF FND_API.To_Boolean(p_called_by_form) THEN
663: APP_EXCEPTION.Raise_Exception;
664: ELSE
665: x_msg_data := FND_MESSAGE.Get;
666: END IF;
739: WHERE rowid = p_rowid;
740:
741: /* Check the commit flag and if set, then commit the work. */
742:
743: IF FND_API.TO_Boolean(p_commit) THEN
744: COMMIT WORK;
745: END IF;
746:
747: EXCEPTION
749: WHEN Check_Integrity_Error THEN
750: ROLLBACK TO SAVEPOINT Delete_Row;
751: x_return_status := l_return_status;
752: x_oracle_error := l_oracle_error;
753: IF FND_API.To_Boolean(p_called_by_form) THEN
754: APP_EXCEPTION.Raise_Exception;
755: ELSE
756: x_msg_data := FND_MESSAGE.Get;
757: END IF;
764: 'GR_RECORD_NOT_FOUND');
765: FND_MESSAGE.SET_TOKEN('CODE',
766: l_msg_token,
767: FALSE);
768: IF FND_API.To_Boolean(p_called_by_form) THEN
769: APP_EXCEPTION.Raise_Exception;
770: ELSE
771: x_msg_data := FND_MESSAGE.Get;
772: END IF;
780: 'GR_UNEXPECTED_ERROR');
781: FND_MESSAGE.SET_TOKEN('TEXT',
782: l_msg_token,
783: FALSE);
784: IF FND_API.To_Boolean(p_called_by_form) THEN
785: APP_EXCEPTION.Raise_Exception;
786: ELSE
787: x_msg_data := FND_MESSAGE.Get;
788: END IF;
822:
823: DELETE FROM gr_property_values_tl
824: WHERE property_id = p_property_id;
825:
826: IF FND_API.To_Boolean(p_commit) THEN
827: COMMIT WORK;
828: END IF;
829:
830: EXCEPTION
838: 'GR_UNEXPECTED_ERROR');
839: FND_MESSAGE.SET_TOKEN('TEXT',
840: l_msg_token,
841: FALSE);
842: IF FND_API.To_Boolean(p_called_by_form) THEN
843: APP_EXCEPTION.Raise_Exception;
844: ELSE
845: x_msg_data := FND_MESSAGE.Get;
846: END IF;
1007: 'GR_INSTALLED_LANG');
1008: FND_MESSAGE.SET_TOKEN('CODE',
1009: p_language,
1010: FALSE);
1011: IF FND_API.To_Boolean(p_called_by_form) THEN
1012: APP_EXCEPTION.Raise_Exception;
1013: ELSE
1014: x_msg_data := FND_MESSAGE.Get;
1015: END IF;
1023: 'GR_UNEXPECTED_ERROR');
1024: FND_MESSAGE.SET_TOKEN('TEXT',
1025: l_msg_data,
1026: FALSE);
1027: IF FND_API.To_Boolean(p_called_by_form) THEN
1028: APP_EXCEPTION.Raise_Exception;
1029: ELSE
1030: x_msg_data := FND_MESSAGE.Get;
1031: END IF;
1085: 'GR_UNEXPECTED_ERROR');
1086: FND_MESSAGE.SET_TOKEN('TEXT',
1087: l_msg_data,
1088: FALSE);
1089: IF FND_API.To_Boolean(p_called_by_form) THEN
1090: APP_EXCEPTION.Raise_Exception;
1091: END IF;
1092:
1093: END Check_Primary_Key;