[Home] [Help]
71: 'F',
72: l_rowid,
73: l_key_exists);
74:
75: IF FND_API.To_Boolean(l_key_exists) THEN
76: RAISE Item_Exists_Error;
77: END IF;
78:
79: INSERT INTO gr_item_classns
101: 'F',
102: l_rowid,
103: l_key_exists);
104:
105: IF FND_API.To_Boolean(l_key_exists) THEN
106: x_rowid := l_rowid;
107: ELSE
108: RAISE Row_Missing_Error;
109: END IF;
109: END IF;
110:
111: /* Check the commit flag and if set, then commit the work. */
112:
113: IF FND_API.To_Boolean(p_commit) THEN
114: COMMIT WORK;
115: END IF;
116:
117: EXCEPTION
124: 'GR_FOREIGN_KEY_ERROR');
125: FND_MESSAGE.SET_TOKEN('TEXT',
126: l_msg_data,
127: FALSE);
128: IF FND_API.To_Boolean(p_called_by_form) THEN
129: APP_EXCEPTION.Raise_Exception;
130: ELSE
131: x_msg_data := FND_MESSAGE.Get;
132: END IF;
139: 'GR_RECORD_EXISTS');
140: FND_MESSAGE.SET_TOKEN('CODE',
141: l_msg_token,
142: FALSE);
143: IF FND_API.To_Boolean(p_called_by_form) THEN
144: APP_EXCEPTION.Raise_Exception;
145: ELSE
146: x_msg_data := FND_MESSAGE.Get;
147: END IF;
154: 'GR_NO_RECORD_INSERTED');
155: FND_MESSAGE.SET_TOKEN('CODE',
156: l_msg_token,
157: FALSE);
158: IF FND_API.To_Boolean(p_called_by_form) THEN
159: APP_EXCEPTION.Raise_Exception;
160: ELSE
161: x_msg_data := FND_MESSAGE.Get;
162: END IF;
170: 'GR_UNEXPECTED_ERROR');
171: FND_MESSAGE.SET_TOKEN('TEXT',
172: l_msg_token,
173: FALSE);
174: IF FND_API.To_Boolean(p_called_by_form) THEN
175: APP_EXCEPTION.Raise_Exception;
176: ELSE
177: x_msg_data := FND_MESSAGE.Get;
178: END IF;
251: END IF;
252:
253: /* Check the commit flag and if set, then commit the work. */
254:
255: IF FND_API.To_Boolean(p_commit) THEN
256: COMMIT WORK;
257: END IF;
258:
259: EXCEPTION
266: 'GR_FOREIGN_KEY_ERROR');
267: FND_MESSAGE.SET_TOKEN('TEXT',
268: l_msg_data,
269: FALSE);
270: IF FND_API.To_Boolean(p_called_by_form) THEN
271: APP_EXCEPTION.Raise_Exception;
272: ELSE
273: x_msg_data := FND_MESSAGE.Get;
274: END IF;
281: 'GR_NO_RECORD_INSERTED');
282: FND_MESSAGE.SET_TOKEN('CODE',
283: l_msg_token,
284: FALSE);
285: IF FND_API.To_Boolean(p_called_by_form) THEN
286: APP_EXCEPTION.Raise_Exception;
287: ELSE
288: x_msg_data := FND_MESSAGE.Get;
289: END IF;
297: 'GR_UNEXPECTED_ERROR');
298: FND_MESSAGE.SET_TOKEN('TEXT',
299: l_msg_token,
300: FALSE);
301: IF FND_API.To_Boolean(p_called_by_form) THEN
302: APP_EXCEPTION.Raise_Exception;
303: ELSE
304: x_msg_data := FND_MESSAGE.Get;
305: END IF;
366: RAISE No_Data_Found_Error;
367: END IF;
368: CLOSE c_lock_item_classns;
369:
370: IF FND_API.To_Boolean(p_commit) THEN
371: COMMIT WORK;
372: END IF;
373:
374: EXCEPTION
380: 'GR_RECORD_NOT_FOUND');
381: FND_MESSAGE.SET_TOKEN('CODE',
382: l_msg_token,
383: FALSE);
384: IF FND_API.To_Boolean(p_called_by_form) THEN
385: APP_EXCEPTION.Raise_Exception;
386: ELSE
387: x_msg_data := FND_MESSAGE.Get;
388: END IF;
392: x_return_status := 'E';
393: x_oracle_error := APP_EXCEPTION.Get_Code;
394: FND_MESSAGE.SET_NAME('GR',
395: 'GR_ROW_IS_LOCKED');
396: IF FND_API.To_Boolean(p_called_by_form) THEN
397: APP_EXCEPTION.Raise_Exception;
398: ELSE
399: x_msg_data := FND_MESSAGE.Get;
400: END IF;
408: 'GR_UNEXPECTED_ERROR');
409: FND_MESSAGE.SET_TOKEN('TEXT',
410: l_msg_token,
411: FALSE);
412: IF FND_API.To_Boolean(p_called_by_form) THEN
413: APP_EXCEPTION.Raise_Exception;
414: ELSE
415: x_msg_data := FND_MESSAGE.Get;
416: END IF;
483: WHERE rowid = p_rowid;
484:
485: /* Check the commit flag and if set, then commit the work. */
486:
487: IF FND_API.TO_Boolean(p_commit) THEN
488: COMMIT WORK;
489: END IF;
490:
491: EXCEPTION
494: ROLLBACK TO SAVEPOINT Delete_Row;
495: x_return_status := l_return_status;
496: x_oracle_error := l_oracle_error;
497: x_msg_data := l_msg_data;
498: IF FND_API.To_Boolean(p_called_by_form) THEN
499: APP_EXCEPTION.Raise_Exception;
500: END IF;
501:
502: WHEN Row_Missing_Error THEN
507: 'GR_RECORD_NOT_FOUND');
508: FND_MESSAGE.SET_TOKEN('CODE',
509: l_msg_token,
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;
524: 'GR_UNEXPECTED_ERROR');
525: FND_MESSAGE.SET_TOKEN('TEXT',
526: l_msg_token,
527: FALSE);
528: IF FND_API.To_Boolean(p_called_by_form) THEN
529: APP_EXCEPTION.Raise_Exception;
530: ELSE
531: x_msg_data := FND_MESSAGE.Get;
532: END IF;
605: 'GR_NULL_VALUE');
606: FND_MESSAGE.SET_TOKEN('CODE',
607: l_msg_token,
608: FALSE);
609: IF FND_API.To_Boolean(p_called_by_form) THEN
610: APP_EXCEPTION.Raise_Exception;
611: ELSE
612: x_msg_data := FND_MESSAGE.Get;
613: END IF;
621: 'GR_UNEXPECTED_ERROR');
622: FND_MESSAGE.SET_TOKEN('TEXT',
623: l_msg_token,
624: FALSE);
625: IF FND_API.To_Boolean(p_called_by_form) THEN
626: APP_EXCEPTION.Raise_Exception;
627: ELSE
628: x_msg_data := FND_MESSAGE.Get;
629: END IF;
674: 'F',
675: l_rowid,
676: l_key_exists);
677:
678: IF NOT FND_API.To_Boolean(l_key_exists) THEN
679: x_return_status := 'E';
680: FND_MESSAGE.SET_NAME('GR',
681: 'GR_RECORD_NOT_FOUND');
682: FND_MESSAGE.SET_TOKEN('CODE',
692: 'F',
693: l_rowid,
694: l_key_exists);
695:
696: IF NOT FND_API.To_Boolean(l_key_exists) THEN
697: x_return_status := 'E';
698: FND_MESSAGE.SET_NAME('GR',
699: 'GR_RECORD_NOT_FOUND');
700: FND_MESSAGE.SET_TOKEN('CODE',
769: 'GR_UNEXPECTED_ERROR');
770: FND_MESSAGE.SET_TOKEN('TEXT',
771: l_msg_data,
772: FALSE);
773: IF FND_API.To_Boolean(p_called_by_form) THEN
774: APP_EXCEPTION.Raise_Exception;
775: ELSE
776: x_msg_data := FND_MESSAGE.Get;
777: END IF;
829: 'GR_UNEXPECTED_ERROR');
830: FND_MESSAGE.SET_TOKEN('TEXT',
831: l_msg_data,
832: FALSE);
833: IF FND_API.To_Boolean(p_called_by_form) THEN
834: APP_EXCEPTION.Raise_Exception;
835: END IF;
836:
837: END Check_Primary_Key;