77: 'F',
78: l_rowid,
79: l_key_exists);
80:
81: IF FND_API.To_Boolean(l_key_exists) THEN
82: RAISE Item_Exists_Error;
83: END IF;
84:
85: INSERT INTO gr_item_risk_phrases
113: 'F',
114: l_rowid,
115: l_key_exists);
116:
117: IF FND_API.To_Boolean(l_key_exists) THEN
118: x_rowid := l_rowid;
119: ELSE
120: RAISE Row_Missing_Error;
121: END IF;
121: END IF;
122:
123: /* Check the commit flag and if set, then commit the work. */
124:
125: IF FND_API.To_Boolean(p_commit) THEN
126: COMMIT WORK;
127: END IF;
128:
129: EXCEPTION
136: 'GR_FOREIGN_KEY_ERROR');
137: FND_MESSAGE.SET_TOKEN('TEXT',
138: l_msg_data,
139: FALSE);
140: IF FND_API.To_Boolean(p_called_by_form) THEN
141: APP_EXCEPTION.Raise_Exception;
142: ELSE
143: x_msg_data := FND_MESSAGE.Get;
144: 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;
166: 'GR_NO_RECORD_INSERTED');
167: FND_MESSAGE.SET_TOKEN('CODE',
168: l_msg_token,
169: FALSE);
170: IF FND_API.To_Boolean(p_called_by_form) THEN
171: APP_EXCEPTION.Raise_Exception;
172: ELSE
173: x_msg_data := FND_MESSAGE.Get;
174: END IF;
182: 'GR_UNEXPECTED_ERROR');
183: FND_MESSAGE.SET_TOKEN('TEXT',
184: l_msg_token,
185: FALSE);
186: IF FND_API.To_Boolean(p_called_by_form) THEN
187: APP_EXCEPTION.Raise_Exception;
188: ELSE
189: x_msg_data := FND_MESSAGE.Get;
190: END IF;
272: END IF;
273:
274: /* Check the commit flag and if set, then commit the work. */
275:
276: IF FND_API.To_Boolean(p_commit) THEN
277: COMMIT WORK;
278: END IF;
279:
280: EXCEPTION
287: 'GR_FOREIGN_KEY_ERROR');
288: FND_MESSAGE.SET_TOKEN('TEXT',
289: l_msg_data,
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;
302: 'GR_NO_RECORD_INSERTED');
303: FND_MESSAGE.SET_TOKEN('CODE',
304: l_msg_token,
305: FALSE);
306: IF FND_API.To_Boolean(p_called_by_form) THEN
307: APP_EXCEPTION.Raise_Exception;
308: ELSE
309: x_msg_data := FND_MESSAGE.Get;
310: END IF;
318: 'GR_UNEXPECTED_ERROR');
319: FND_MESSAGE.SET_TOKEN('TEXT',
320: l_msg_token,
321: FALSE);
322: IF FND_API.To_Boolean(p_called_by_form) THEN
323: APP_EXCEPTION.Raise_Exception;
324: ELSE
325: x_msg_data := FND_MESSAGE.Get;
326: END IF;
390: RAISE No_Data_Found_Error;
391: END IF;
392: CLOSE c_lock_item_risks;
393:
394: IF FND_API.To_Boolean(p_commit) THEN
395: COMMIT WORK;
396: END IF;
397:
398: EXCEPTION
404: 'GR_RECORD_NOT_FOUND');
405: FND_MESSAGE.SET_TOKEN('CODE',
406: l_msg_token,
407: FALSE);
408: IF FND_API.To_Boolean(p_called_by_form) THEN
409: APP_EXCEPTION.Raise_Exception;
410: ELSE
411: x_msg_data := FND_MESSAGE.Get;
412: END IF;
416: x_return_status := 'E';
417: x_oracle_error := APP_EXCEPTION.Get_Code;
418: FND_MESSAGE.SET_NAME('GR',
419: 'GR_ROW_IS_LOCKED');
420: IF FND_API.To_Boolean(p_called_by_form) THEN
421: APP_EXCEPTION.Raise_Exception;
422: ELSE
423: x_msg_data := FND_MESSAGE.Get;
424: END IF;
432: 'GR_UNEXPECTED_ERROR');
433: FND_MESSAGE.SET_TOKEN('TEXT',
434: l_msg_token,
435: FALSE);
436: IF FND_API.To_Boolean(p_called_by_form) THEN
437: APP_EXCEPTION.Raise_Exception;
438: ELSE
439: x_msg_data := FND_MESSAGE.Get;
440: END IF;
513: WHERE rowid = p_rowid;
514:
515: /* Check the commit flag and if set, then commit the work. */
516:
517: IF FND_API.TO_Boolean(p_commit) THEN
518: COMMIT WORK;
519: END IF;
520:
521: EXCEPTION
524: ROLLBACK TO SAVEPOINT Delete_Row;
525: x_return_status := l_return_status;
526: x_oracle_error := l_oracle_error;
527: x_msg_data := l_msg_data;
528: IF FND_API.To_Boolean(p_called_by_form) THEN
529: APP_EXCEPTION.Raise_Exception;
530: END IF;
531:
532: WHEN Row_Missing_Error THEN
537: 'GR_RECORD_NOT_FOUND');
538: FND_MESSAGE.SET_TOKEN('CODE',
539: l_msg_token,
540: FALSE);
541: IF FND_API.To_Boolean(p_called_by_form) THEN
542: APP_EXCEPTION.Raise_Exception;
543: ELSE
544: x_msg_data := FND_MESSAGE.Get;
545: END IF;
554: 'GR_UNEXPECTED_ERROR');
555: FND_MESSAGE.SET_TOKEN('TEXT',
556: l_msg_token,
557: FALSE);
558: IF FND_API.To_Boolean(p_called_by_form) THEN
559: APP_EXCEPTION.Raise_Exception;
560: ELSE
561: x_msg_data := FND_MESSAGE.Get;
562: END IF;
635: 'GR_NULL_VALUE');
636: FND_MESSAGE.SET_TOKEN('CODE',
637: l_msg_token,
638: FALSE);
639: IF FND_API.To_Boolean(p_called_by_form) THEN
640: APP_EXCEPTION.Raise_Exception;
641: ELSE
642: x_msg_data := FND_MESSAGE.Get;
643: END IF;
651: 'GR_UNEXPECTED_ERROR');
652: FND_MESSAGE.SET_TOKEN('TEXT',
653: l_msg_token,
654: FALSE);
655: IF FND_API.To_Boolean(p_called_by_form) THEN
656: APP_EXCEPTION.Raise_Exception;
657: ELSE
658: x_msg_data := FND_MESSAGE.Get;
659: END IF;
707: 'F',
708: l_rowid,
709: l_key_exists);
710:
711: IF NOT FND_API.To_Boolean(l_key_exists) THEN
712: x_return_status := 'E';
713: FND_MESSAGE.SET_NAME('GR',
714: 'GR_RECORD_NOT_FOUND');
715: FND_MESSAGE.SET_TOKEN('CODE',
725: 'F',
726: l_rowid,
727: l_key_exists);
728:
729: IF NOT FND_API.To_Boolean(l_key_exists) THEN
730: x_return_status := 'E';
731: FND_MESSAGE.SET_NAME('GR',
732: 'GR_RECORD_NOT_FOUND');
733: FND_MESSAGE.SET_TOKEN('CODE',
744: 'F',
745: l_rowid,
746: l_key_exists);
747:
748: IF NOT FND_API.To_Boolean(l_key_exists) THEN
749: x_return_status := 'E';
750: FND_MESSAGE.SET_NAME('GR',
751: 'GR_RECORD_NOT_FOUND');
752: FND_MESSAGE.SET_TOKEN('CODE',
825: 'GR_UNEXPECTED_ERROR');
826: FND_MESSAGE.SET_TOKEN('TEXT',
827: l_msg_data,
828: FALSE);
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;
885: 'GR_UNEXPECTED_ERROR');
886: FND_MESSAGE.SET_TOKEN('TEXT',
887: l_msg_data,
888: FALSE);
889: IF FND_API.To_Boolean(p_called_by_form) THEN
890: APP_EXCEPTION.Raise_Exception;
891: END IF;
892:
893: END Check_Primary_Key;