10: G_AMEND_CODE_DELETED CONSTANT VARCHAR2(30) := 'DELETED';
11: ------------------------------------------------------------------------------
12: -- GLOBAL CONSTANTS
13: ------------------------------------------------------------------------------
14: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
15: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
16: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
11: ------------------------------------------------------------------------------
12: -- GLOBAL CONSTANTS
13: ------------------------------------------------------------------------------
14: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
15: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
16: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
12: -- GLOBAL CONSTANTS
13: ------------------------------------------------------------------------------
14: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
15: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
16: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
20: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
13: ------------------------------------------------------------------------------
14: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
15: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
16: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
20: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
14: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
15: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
16: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
20: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
16: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
20: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23:
24: G_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
17: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
20: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23:
24: G_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
25: G_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
18: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
19:
20: G_RET_STS_SUCCESS CONSTANT varchar2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT varchar2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23:
24: G_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
25: G_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: G_EXCP_LEVEL NUMBER := FND_LOG.LEVEL_EXCEPTION;
126: p_object_version_number => cr.object_version_number
127: );
128: --------------------------------------------
129: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
131: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
132: RAISE FND_API.G_EXC_ERROR ;
133: END IF;
134: --------------------------------------------
128: --------------------------------------------
129: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
131: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
132: RAISE FND_API.G_EXC_ERROR ;
133: END IF;
134: --------------------------------------------
135:
136: --------------------------------------------
141: p_scn_id => cr.id
142: );
143: --------------------------------------------
144: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
146: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
147: RAISE FND_API.G_EXC_ERROR ;
148: END IF;
149: --------------------------------------------
143: --------------------------------------------
144: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
145: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
146: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
147: RAISE FND_API.G_EXC_ERROR ;
148: END IF;
149: --------------------------------------------
150:
151: --------------------------------------------
156: p_scn_id => cr.id
157: );
158: --------------------------------------------
159: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
161: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
162: RAISE FND_API.G_EXC_ERROR ;
163: END IF;
164: ELSE
158: --------------------------------------------
159: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
161: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
162: RAISE FND_API.G_EXC_ERROR ;
163: END IF;
164: ELSE
165: --------------------------------------------
166: -- Update section
176: p_object_version_number => cr.object_version_number
177: );
178: --------------------------------------------
179: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
180: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
181: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
182: RAISE FND_API.G_EXC_ERROR ;
183: END IF;
184: --------------------------------------------
178: --------------------------------------------
179: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
180: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
181: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
182: RAISE FND_API.G_EXC_ERROR ;
183: END IF;
184: --------------------------------------------
185: END IF;
186: END LOOP;
199: p_object_version_number => cr.object_version_number
200: );
201: --------------------------------------------
202: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
204: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
205: RAISE FND_API.G_EXC_ERROR ;
206: END IF;
207: --------------------------------------------
201: --------------------------------------------
202: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
203: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
204: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
205: RAISE FND_API.G_EXC_ERROR ;
206: END IF;
207: --------------------------------------------
208:
209: --------------------------------------------
214: p_cat_id => cr.id
215: );
216: --------------------------------------------
217: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
219: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
220: RAISE FND_API.G_EXC_ERROR ;
221: END IF;
222: --------------------------------------------
216: --------------------------------------------
217: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
218: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
219: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
220: RAISE FND_API.G_EXC_ERROR ;
221: END IF;
222: --------------------------------------------
223: ELSE
224: --------------------------------------------
237: p_object_version_number => cr.object_version_number
238: );
239: --------------------------------------------
240: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
242: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
243: RAISE FND_API.G_EXC_ERROR ;
244: END IF;
245: --------------------------------------------
239: --------------------------------------------
240: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
242: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
243: RAISE FND_API.G_EXC_ERROR ;
244: END IF;
245: --------------------------------------------
246: END IF;
247: END LOOP;
267: p_object_version_number => cr.object_version_number
268: );
269: --------------------------------------------
270: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
272: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
273: RAISE FND_API.G_EXC_ERROR ;
274: END IF;
275: --------------------------------------------
269: --------------------------------------------
270: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
271: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
272: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
273: RAISE FND_API.G_EXC_ERROR ;
274: END IF;
275: --------------------------------------------
276:
277: --------------------------------------------
282: p_scn_id => cr.id
283: );
284: --------------------------------------------
285: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
286: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
287: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
288: RAISE FND_API.G_EXC_ERROR ;
289: END IF;
290: --------------------------------------------
284: --------------------------------------------
285: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
286: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
287: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
288: RAISE FND_API.G_EXC_ERROR ;
289: END IF;
290: --------------------------------------------
291:
292: --------------------------------------------
297: p_scn_id => cr.id
298: );
299: --------------------------------------------
300: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
302: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
303: RAISE FND_API.G_EXC_ERROR ;
304: END IF;
305:
299: --------------------------------------------
300: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
301: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
302: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
303: RAISE FND_API.G_EXC_ERROR ;
304: END IF;
305:
306: END LOOP;
307:
315: p_object_version_number => cr.object_version_number
316: );
317: --------------------------------------------
318: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
320: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
321: RAISE FND_API.G_EXC_ERROR ;
322: END IF;
323: --------------------------------------------
317: --------------------------------------------
318: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
319: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
320: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
321: RAISE FND_API.G_EXC_ERROR ;
322: END IF;
323: --------------------------------------------
324:
325: --------------------------------------------
330: p_cat_id => cr.id
331: );
332: --------------------------------------------
333: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
335: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
336: RAISE FND_API.G_EXC_ERROR ;
337: END IF;
338: --------------------------------------------
332: --------------------------------------------
333: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
334: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
335: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
336: RAISE FND_API.G_EXC_ERROR ;
337: END IF;
338: --------------------------------------------
339: END LOOP;
340:
351: p_object_version_number => cr.object_version_number
352: );
353: --------------------------------------------
354: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
356: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
357: RAISE FND_API.G_EXC_ERROR ;
358: END IF;
359: --------------------------------------------
353: --------------------------------------------
354: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
355: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
356: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
357: RAISE FND_API.G_EXC_ERROR ;
358: END IF;
359: --------------------------------------------
360: END LOOP;
361:
375: p_object_version_number => cr.object_version_number
376: );
377: --------------------------------------------
378: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
380: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
381: RAISE FND_API.G_EXC_ERROR ;
382: END IF;
383: END LOOP;
377: --------------------------------------------
378: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
380: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
381: RAISE FND_API.G_EXC_ERROR ;
382: END IF;
383: END LOOP;
384:
385:
393: CLOSE l_ctrt_src_crs;
394:
395: IF(l_contract_source_code = 'ATTACHED') THEN
396: OKC_TEMPLATE_USAGES_PVT.update_row(
397: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
398: x_return_status => x_return_status,
399: p_document_type => p_doc_type,
400: p_document_id => p_doc_id,
401: p_source_change_allowed_flag => 'N');
416: G_PKG_NAME, '300: Leaving clear_amendment' );
417: END IF;
418:
419: EXCEPTION
420: WHEN FND_API.G_EXC_ERROR THEN
421: /*IF (l_debug = 'Y') THEN
422: okc_debug.log('400: Leaving clear_amendment : OKC_API.G_EXCEPTION_ERROR Exception', 2);
423: END IF;*/
424:
429: x_return_status := G_RET_STS_ERROR ;
430: IF l_ctrt_src_crs%ISOPEN THEN
431: CLOSE l_ctrt_src_crs;
432: END IF;
433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
434: /*IF (l_debug = 'Y') THEN
435: okc_debug.log('500: Leaving clear_amendment : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
436: END IF;*/
437:
529: p_major_version => p_version_number
530: );
531: --------------------------------------------
532: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
534: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
535: RAISE FND_API.G_EXC_ERROR ;
536: END IF;
537: --------------------------------------------
531: --------------------------------------------
532: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
534: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
535: RAISE FND_API.G_EXC_ERROR ;
536: END IF;
537: --------------------------------------------
538:
539: --------------------------------------------
554: p_major_version => p_version_number
555: );
556: --------------------------------------------
557: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
559: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
560: RAISE FND_API.G_EXC_ERROR ;
561: END IF;
562: --------------------------------------------
556: --------------------------------------------
557: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
558: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
559: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
560: RAISE FND_API.G_EXC_ERROR ;
561: END IF;
562: --------------------------------------------
563:
564: --------------------------------------------
579: p_major_version => p_version_number
580: );
581: --------------------------------------------
582: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
584: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
585: RAISE FND_API.G_EXC_ERROR ;
586: END IF;
587: --------------------------------------------
581: --------------------------------------------
582: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
583: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
584: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
585: RAISE FND_API.G_EXC_ERROR ;
586: END IF;
587: --------------------------------------------
588:
589: --------------------------------------------
604: p_major_version => p_version_number
605: );
606: --------------------------------------------
607: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
609: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
610: RAISE FND_API.G_EXC_ERROR ;
611: END IF;
612: --------------------------------------------
606: --------------------------------------------
607: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
608: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
609: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
610: RAISE FND_API.G_EXC_ERROR ;
611: END IF;
612: --------------------------------------------
613:
614: /********************
623: p_object_version_number => cr.object_version_number
624: );
625: --------------------------------------------
626: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
628: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
629: RAISE FND_API.G_EXC_ERROR ;
630: END IF;
631: --------------------------------------------
625: --------------------------------------------
626: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
628: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
629: RAISE FND_API.G_EXC_ERROR ;
630: END IF;
631: --------------------------------------------
632:
633: --------------------------------------------
638: p_scn_id => cr.id
639: );
640: --------------------------------------------
641: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
642: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
643: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
644: RAISE FND_API.G_EXC_ERROR ;
645: END IF;
646: --------------------------------------------
640: --------------------------------------------
641: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
642: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
643: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
644: RAISE FND_API.G_EXC_ERROR ;
645: END IF;
646: --------------------------------------------
647:
648: --------------------------------------------
653: p_scn_id => cr.id
654: );
655: --------------------------------------------
656: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
658: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
659: RAISE FND_API.G_EXC_ERROR ;
660: END IF;
661:
655: --------------------------------------------
656: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
657: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
658: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
659: RAISE FND_API.G_EXC_ERROR ;
660: END IF;
661:
662: END LOOP;
663:
671: p_object_version_number => cr.object_version_number
672: );
673: --------------------------------------------
674: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
676: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
677: RAISE FND_API.G_EXC_ERROR ;
678: END IF;
679: --------------------------------------------
673: --------------------------------------------
674: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
675: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
676: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
677: RAISE FND_API.G_EXC_ERROR ;
678: END IF;
679: --------------------------------------------
680:
681: --------------------------------------------
686: p_cat_id => cr.id
687: );
688: --------------------------------------------
689: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
691: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
692: RAISE FND_API.G_EXC_ERROR ;
693: END IF;
694: --------------------------------------------
688: --------------------------------------------
689: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
691: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
692: RAISE FND_API.G_EXC_ERROR ;
693: END IF;
694: --------------------------------------------
695: END LOOP;
696:
705: p_object_version_number => cr.object_version_number
706: );
707: --------------------------------------------
708: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
709: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
710: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
711: RAISE FND_API.G_EXC_ERROR ;
712: END IF;
713: --------------------------------------------
707: --------------------------------------------
708: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
709: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
710: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
711: RAISE FND_API.G_EXC_ERROR ;
712: END IF;
713: --------------------------------------------
714: END LOOP;
715:
727: p_object_version_number => cr.object_version_number
728: );
729: --------------------------------------------
730: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
732: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
733: RAISE FND_API.G_EXC_ERROR ;
734: END IF;
735: END LOOP;
729: --------------------------------------------
730: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
732: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
733: RAISE FND_API.G_EXC_ERROR ;
734: END IF;
735: END LOOP;
736: ****************************************/
737:
746: G_PKG_NAME, '300: Leaving Version_Doc' );
747: END IF;
748:
749: EXCEPTION
750: WHEN FND_API.G_EXC_ERROR THEN
751: /*IF (l_debug = 'Y') THEN
752: okc_debug.log('400: Leaving Version_Doc : OKC_API.G_EXCEPTION_ERROR Exception', 2);
753: END IF;*/
754:
757: G_PKG_NAME, '400: Leaving Version_Doc : OKC_API.G_EXCEPTION_ERROR Exception' );
758: END IF;
759: x_return_status := G_RET_STS_ERROR ;
760:
761: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
762: /*IF (l_debug = 'Y') THEN
763: okc_debug.log('500: Leaving Version_Doc : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
764: END IF;*/
765:
819: p_major_version => p_version_number
820: );
821: --------------------------------------------
822: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
824: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
825: RAISE FND_API.G_EXC_ERROR ;
826: END IF;
827: --------------------------------------------
821: --------------------------------------------
822: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
823: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
824: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
825: RAISE FND_API.G_EXC_ERROR ;
826: END IF;
827: --------------------------------------------
828:
829: --------------------------------------------
844: p_major_version => p_version_number
845: );
846: --------------------------------------------
847: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
848: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
849: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
850: RAISE FND_API.G_EXC_ERROR ;
851: END IF;
852: --------------------------------------------
846: --------------------------------------------
847: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
848: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
849: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
850: RAISE FND_API.G_EXC_ERROR ;
851: END IF;
852: --------------------------------------------
853:
854: --------------------------------------------
868: p_major_version => p_version_number
869: );
870: --------------------------------------------
871: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
872: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
873: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
874: RAISE FND_API.G_EXC_ERROR ;
875: END IF;
876: --------------------------------------------
870: --------------------------------------------
871: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
872: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
873: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
874: RAISE FND_API.G_EXC_ERROR ;
875: END IF;
876: --------------------------------------------
877:
878: --------------------------------------------
892: p_major_version => p_version_number
893: );
894: --------------------------------------------
895: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
897: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
898: RAISE FND_API.G_EXC_ERROR ;
899: END IF;
900: --------------------------------------------
894: --------------------------------------------
895: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
897: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
898: RAISE FND_API.G_EXC_ERROR ;
899: END IF;
900: --------------------------------------------
901:
902: -- Standard call to get message count and if count is 1, get message info.
909: G_PKG_NAME, '300: Leaving Restore_Doc_Version');
910: END IF;
911:
912: EXCEPTION
913: WHEN FND_API.G_EXC_ERROR THEN
914: /*IF (l_debug = 'Y') THEN
915: okc_debug.log('400: Leaving Restore_Doc_Version : OKC_API.G_EXCEPTION_ERROR Exception', 2);
916: END IF;*/
917:
920: G_PKG_NAME, '400: Leaving Restore_Doc_Version : OKC_API.G_EXCEPTION_ERROR Exception');
921: END IF;
922: x_return_status := G_RET_STS_ERROR ;
923:
924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
925: /*IF (l_debug = 'Y') THEN
926: okc_debug.log('500: Leaving Restore_Doc_Version : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
927: END IF;*/
928:
983: p_major_version => p_version_number
984: );
985: --------------------------------------------
986: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
988: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
989: RAISE FND_API.G_EXC_ERROR ;
990: END IF;
991: --------------------------------------------
985: --------------------------------------------
986: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
987: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
988: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
989: RAISE FND_API.G_EXC_ERROR ;
990: END IF;
991: --------------------------------------------
992:
993: -- Bug 5171866 - Correct Sequence of call is
1007: p_major_version => p_version_number
1008: );
1009: --------------------------------------------
1010: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1012: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1013: RAISE FND_API.G_EXC_ERROR ;
1014: END IF;
1015: --------------------------------------------
1009: --------------------------------------------
1010: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1011: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1012: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1013: RAISE FND_API.G_EXC_ERROR ;
1014: END IF;
1015: --------------------------------------------
1016:
1017: --------------------------------------------
1028: p_major_version => p_version_number
1029: );
1030: --------------------------------------------
1031: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1032: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1033: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1034: RAISE FND_API.G_EXC_ERROR ;
1035: END IF;
1036: --------------------------------------------
1030: --------------------------------------------
1031: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1032: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1033: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1034: RAISE FND_API.G_EXC_ERROR ;
1035: END IF;
1036: --------------------------------------------
1037:
1038: --------------------------------------------
1052: p_major_version => p_version_number
1053: );
1054: --------------------------------------------
1055: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1057: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1058: RAISE FND_API.G_EXC_ERROR ;
1059: END IF;
1060: --------------------------------------------
1054: --------------------------------------------
1055: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1056: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1057: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1058: RAISE FND_API.G_EXC_ERROR ;
1059: END IF;
1060: --------------------------------------------
1061:
1062: -- Standard call to get message count and if count is 1, get message info.
1069: G_PKG_NAME, '300: Leaving Delete_Doc_Version' );
1070: END IF;
1071:
1072: EXCEPTION
1073: WHEN FND_API.G_EXC_ERROR THEN
1074: /*IF (l_debug = 'Y') THEN
1075: okc_debug.log('400: Leaving Delete_Doc_Version : OKC_API.G_EXCEPTION_ERROR Exception', 2);
1076: END IF;*/
1077:
1080: G_PKG_NAME, '400: Leaving Delete_Doc_Version : OKC_API.G_EXCEPTION_ERROR Exception' );
1081: END IF;
1082: x_return_status := G_RET_STS_ERROR ;
1083:
1084: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1085: /*IF (l_debug = 'Y') THEN
1086: okc_debug.log('500: Leaving Delete_Doc_Version : OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1087: END IF;*/
1088: