46: BEGIN
47:
48: SAVEPOINT create_acct_event;
49:
50: x_return_status := FND_API.G_RET_STS_SUCCESS;
51:
52:
53: -- customer pre-processing
54:
120:
121:
122:
123: EXCEPTION
124: WHEN FND_API.G_EXC_ERROR THEN
125: ROLLBACK TO create_acct_event;
126: x_return_status := FND_API.G_RET_STS_ERROR;
127:
128: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
122:
123: EXCEPTION
124: WHEN FND_API.G_EXC_ERROR THEN
125: ROLLBACK TO create_acct_event;
126: x_return_status := FND_API.G_RET_STS_ERROR;
127:
128: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
129: ,p_count => x_msg_count
130: ,p_data => x_msg_data);
128: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
129: ,p_count => x_msg_count
130: ,p_data => x_msg_data);
131:
132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
133: ROLLBACK TO create_acct_event;
134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
135: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
136: ,p_count => x_msg_count
130: ,p_data => x_msg_data);
131:
132: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
133: ROLLBACK TO create_acct_event;
134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
135: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
136: ,p_count => x_msg_count
137: ,p_data => x_msg_data);
138:
142: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
143: ,p_count => x_msg_count
144: ,p_data => x_msg_data);
145: -- notify caller of an UNEXPECTED error
146: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
147:
148:
149: END create_acct_event;
150:
177: BEGIN
178:
179: SAVEPOINT create_acct_event;
180:
181: x_return_status := FND_API.G_RET_STS_SUCCESS;
182:
183:
184:
185: -- customer pre-processing
217: );
218:
219:
220:
221: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
222: RAISE FND_API.G_EXC_ERROR;
223: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
225: END IF;
218:
219:
220:
221: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
222: RAISE FND_API.G_EXC_ERROR;
223: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
225: END IF;
226:
219:
220:
221: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
222: RAISE FND_API.G_EXC_ERROR;
223: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
225: END IF;
226:
227: l_aetv_rec := x_aetv_rec;
220:
221: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
222: RAISE FND_API.G_EXC_ERROR;
223: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
224: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
225: END IF;
226:
227: l_aetv_rec := x_aetv_rec;
228:
240:
241:
242:
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: ROLLBACK TO create_acct_event;
246: x_return_status := FND_API.G_RET_STS_ERROR;
247:
248: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
242:
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: ROLLBACK TO create_acct_event;
246: x_return_status := FND_API.G_RET_STS_ERROR;
247:
248: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
249: ,p_count => x_msg_count
250: ,p_data => x_msg_data);
248: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
249: ,p_count => x_msg_count
250: ,p_data => x_msg_data);
251:
252: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
253: ROLLBACK TO create_acct_event;
254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
255: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
256: ,p_count => x_msg_count
250: ,p_data => x_msg_data);
251:
252: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
253: ROLLBACK TO create_acct_event;
254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
255: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
256: ,p_count => x_msg_count
257: ,p_data => x_msg_data);
258:
262: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
263: ,p_count => x_msg_count
264: ,p_data => x_msg_data);
265: -- notify caller of an UNEXPECTED error
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
267:
268: END create_acct_event;
269:
270:
302: --Initialize the return status
303:
304: SAVEPOINT create_acct_event;
305:
306: x_return_status := FND_API.G_RET_STS_SUCCESS;
307:
308:
309:
310: -- customer pre-processing
360: END IF;
361:
362: x_return_status := l_overall_status;
363:
364: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
365: RAISE FND_API.G_EXC_ERROR;
366: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
368: END IF;
361:
362: x_return_status := l_overall_status;
363:
364: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
365: RAISE FND_API.G_EXC_ERROR;
366: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
368: END IF;
369:
362: x_return_status := l_overall_status;
363:
364: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
365: RAISE FND_API.G_EXC_ERROR;
366: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
368: END IF;
369:
370:
363:
364: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
365: RAISE FND_API.G_EXC_ERROR;
366: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
368: END IF;
369:
370:
371: l_aetv_tbl := x_aetv_tbl;
384:
385:
386: EXCEPTION
387:
388: WHEN FND_API.G_EXC_ERROR THEN
389: ROLLBACK TO create_acct_event;
390: x_return_status := FND_API.G_RET_STS_ERROR;
391:
392: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
386: EXCEPTION
387:
388: WHEN FND_API.G_EXC_ERROR THEN
389: ROLLBACK TO create_acct_event;
390: x_return_status := FND_API.G_RET_STS_ERROR;
391:
392: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
393: ,p_count => x_msg_count
394: ,p_data => x_msg_data);
392: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
393: ,p_count => x_msg_count
394: ,p_data => x_msg_data);
395:
396: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
397: ROLLBACK TO create_acct_event;
398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
399: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
400: ,p_count => x_msg_count
394: ,p_data => x_msg_data);
395:
396: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
397: ROLLBACK TO create_acct_event;
398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
399: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
400: ,p_count => x_msg_count
401: ,p_data => x_msg_data);
402:
406: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
407: ,p_count => x_msg_count
408: ,p_data => x_msg_data);
409: -- notify caller of an UNEXPECTED error
410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
411:
412: END create_acct_event;
413:
414:
453:
454: BEGIN
455:
456: SAVEPOINT update_acct_event;
457: x_return_status := FND_API.G_RET_STS_SUCCESS;
458:
459:
460: -- customer pre-processing
461:
500: ,x_aelv_tbl => x_aelv_tbl
501:
502: );
503:
504: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
505: RAISE FND_API.G_EXC_ERROR;
506: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: END IF;
501:
502: );
503:
504: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
505: RAISE FND_API.G_EXC_ERROR;
506: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: END IF;
509:
502: );
503:
504: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
505: RAISE FND_API.G_EXC_ERROR;
506: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: END IF;
509:
510: l_aetv_rec := x_aetv_rec;
503:
504: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
505: RAISE FND_API.G_EXC_ERROR;
506: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
508: END IF;
509:
510: l_aetv_rec := x_aetv_rec;
511: l_aehv_tbl := x_aehv_tbl;
526:
527:
528: EXCEPTION
529:
530: WHEN FND_API.G_EXC_ERROR THEN
531: ROLLBACK TO update_acct_event;
532: x_return_status := FND_API.G_RET_STS_ERROR;
533:
534: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
528: EXCEPTION
529:
530: WHEN FND_API.G_EXC_ERROR THEN
531: ROLLBACK TO update_acct_event;
532: x_return_status := FND_API.G_RET_STS_ERROR;
533:
534: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
535: ,p_count => x_msg_count
536: ,p_data => x_msg_data);
534: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
535: ,p_count => x_msg_count
536: ,p_data => x_msg_data);
537:
538: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
539: ROLLBACK TO update_acct_event;
540: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
541: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
542: ,p_count => x_msg_count
536: ,p_data => x_msg_data);
537:
538: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
539: ROLLBACK TO update_acct_event;
540: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
541: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
542: ,p_count => x_msg_count
543: ,p_data => x_msg_data);
544:
548: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
549: ,p_count => x_msg_count
550: ,p_data => x_msg_data);
551: -- notify caller of an UNEXPECTED error
552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
553:
554: END update_acct_event;
555:
556:
589:
590: BEGIN
591:
592: SAVEPOINT validate_acct_event;
593: x_return_status := FND_API.G_RET_STS_SUCCESS;
594:
595:
596:
597: -- customer pre-processing
631: );
632:
633:
634:
635: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
632:
633:
634:
635: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640:
633:
634:
635: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640:
641:
634:
635: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
639: END IF;
640:
641:
642:
655:
656:
657: EXCEPTION
658:
659: WHEN FND_API.G_EXC_ERROR THEN
660: ROLLBACK TO validate_acct_event;
661: x_return_status := FND_API.G_RET_STS_ERROR;
662:
663: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
657: EXCEPTION
658:
659: WHEN FND_API.G_EXC_ERROR THEN
660: ROLLBACK TO validate_acct_event;
661: x_return_status := FND_API.G_RET_STS_ERROR;
662:
663: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
664: ,p_count => x_msg_count
665: ,p_data => x_msg_data);
663: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
664: ,p_count => x_msg_count
665: ,p_data => x_msg_data);
666:
667: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
668: ROLLBACK TO validate_acct_event;
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
671: ,p_count => x_msg_count
665: ,p_data => x_msg_data);
666:
667: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
668: ROLLBACK TO validate_acct_event;
669: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
670: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
671: ,p_count => x_msg_count
672: ,p_data => x_msg_data);
673:
677: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
678: ,p_count => x_msg_count
679: ,p_data => x_msg_data);
680: -- notify caller of an UNEXPECTED error
681: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
682:
683: END validate_acct_event;
684:
685:
704:
705:
706: BEGIN
707:
708: x_return_status := FND_API.G_RET_STS_SUCCESS;
709: SAVEPOINT lock_acct_event;
710:
711: okl_acct_event_pvt.lock_acct_event(
712:
723: ,p_aetv_rec => p_aetv_rec
724:
725: );
726:
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END IF;
724:
725: );
726:
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END IF;
732:
725: );
726:
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END IF;
732:
733: EXCEPTION
726:
727: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
728: RAISE FND_API.G_EXC_ERROR;
729: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END IF;
732:
733: EXCEPTION
734: WHEN FND_API.G_EXC_ERROR THEN
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END IF;
732:
733: EXCEPTION
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO lock_acct_event;
736: x_return_status := FND_API.G_RET_STS_ERROR;
737:
738: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
732:
733: EXCEPTION
734: WHEN FND_API.G_EXC_ERROR THEN
735: ROLLBACK TO lock_acct_event;
736: x_return_status := FND_API.G_RET_STS_ERROR;
737:
738: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
739: ,p_count => x_msg_count
740: ,p_data => x_msg_data);
738: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
739: ,p_count => x_msg_count
740: ,p_data => x_msg_data);
741:
742: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
743: ROLLBACK TO lock_acct_event;
744: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
745: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
746: ,p_count => x_msg_count
740: ,p_data => x_msg_data);
741:
742: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
743: ROLLBACK TO lock_acct_event;
744: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
745: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
746: ,p_count => x_msg_count
747: ,p_data => x_msg_data);
748:
752: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
753: ,p_count => x_msg_count
754: ,p_data => x_msg_data);
755: -- notify caller of an UNEXPECTED error
756: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
757:
758: END lock_acct_event;
759:
760:
782: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
783:
784: BEGIN
785:
786: x_return_status := FND_API.G_RET_STS_SUCCESS;
787: SAVEPOINT lock_acct_event;
788:
789: IF (p_aetv_tbl.COUNT > 0) THEN
790:
807: ,p_aetv_rec => p_aetv_tbl(i)
808:
809: );
810: -- store the highest degree of error
811: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
812: IF l_overall_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
813: l_overall_status := l_return_status;
814: END IF;
815: END IF;
808:
809: );
810: -- store the highest degree of error
811: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
812: IF l_overall_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
813: l_overall_status := l_return_status;
814: END IF;
815: END IF;
816:
823: l_return_status := l_overall_status;
824:
825: END IF;
826:
827: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
828: RAISE FND_API.G_EXC_ERROR;
829: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
831: END IF;
824:
825: END IF;
826:
827: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
828: RAISE FND_API.G_EXC_ERROR;
829: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
831: END IF;
832:
825: END IF;
826:
827: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
828: RAISE FND_API.G_EXC_ERROR;
829: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
831: END IF;
832:
833: EXCEPTION
826:
827: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
828: RAISE FND_API.G_EXC_ERROR;
829: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
831: END IF;
832:
833: EXCEPTION
834: WHEN FND_API.G_EXC_ERROR THEN
830: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
831: END IF;
832:
833: EXCEPTION
834: WHEN FND_API.G_EXC_ERROR THEN
835: ROLLBACK TO lock_acct_event;
836: x_return_status := FND_API.G_RET_STS_ERROR;
837:
838: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
832:
833: EXCEPTION
834: WHEN FND_API.G_EXC_ERROR THEN
835: ROLLBACK TO lock_acct_event;
836: x_return_status := FND_API.G_RET_STS_ERROR;
837:
838: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
839: ,p_count => x_msg_count
840: ,p_data => x_msg_data);
838: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
839: ,p_count => x_msg_count
840: ,p_data => x_msg_data);
841:
842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
843: ROLLBACK TO lock_acct_event;
844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
845: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
846: ,p_count => x_msg_count
840: ,p_data => x_msg_data);
841:
842: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
843: ROLLBACK TO lock_acct_event;
844: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
845: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
846: ,p_count => x_msg_count
847: ,p_data => x_msg_data);
848:
852: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
853: ,p_count => x_msg_count
854: ,p_data => x_msg_data);
855: -- notify caller of an UNEXPECTED error
856: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
857:
858: END lock_acct_event;
859:
860:
885:
886: BEGIN
887:
888: SAVEPOINT update_acct_event;
889: x_return_status := FND_API.G_RET_STS_SUCCESS;
890:
891:
892:
893: -- customer pre-processing
923: ,x_aetv_rec => x_aetv_rec
924:
925: );
926:
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
931: END IF;
924:
925: );
926:
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
931: END IF;
932:
925: );
926:
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
931: END IF;
932:
933: l_aetv_rec := x_aetv_rec;
926:
927: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
928: RAISE FND_API.G_EXC_ERROR;
929: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
931: END IF;
932:
933: l_aetv_rec := x_aetv_rec;
934:
947:
948:
949: EXCEPTION
950:
951: WHEN FND_API.G_EXC_ERROR THEN
952: ROLLBACK TO update_acct_event;
953: x_return_status := FND_API.G_RET_STS_ERROR;
954:
955: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
949: EXCEPTION
950:
951: WHEN FND_API.G_EXC_ERROR THEN
952: ROLLBACK TO update_acct_event;
953: x_return_status := FND_API.G_RET_STS_ERROR;
954:
955: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
956: ,p_count => x_msg_count
957: ,p_data => x_msg_data);
955: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
956: ,p_count => x_msg_count
957: ,p_data => x_msg_data);
958:
959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
960: ROLLBACK TO update_acct_event;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
963: ,p_count => x_msg_count
957: ,p_data => x_msg_data);
958:
959: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
960: ROLLBACK TO update_acct_event;
961: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
962: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
963: ,p_count => x_msg_count
964: ,p_data => x_msg_data);
965:
969: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
970: ,p_count => x_msg_count
971: ,p_data => x_msg_data);
972: -- notify caller of an UNEXPECTED error
973: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
974:
975: END update_acct_event;
976:
977:
1005:
1006: --Initialize the return status
1007:
1008: SAVEPOINT update_acct_event;
1009: x_return_status := FND_API.G_RET_STS_SUCCESS;
1010:
1011:
1012:
1013: -- customer pre-processing
1063: END IF;
1064:
1065: x_return_status := l_overall_Status;
1066:
1067: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1068: RAISE FND_API.G_EXC_ERROR;
1069: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1070: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1071: END IF;
1064:
1065: x_return_status := l_overall_Status;
1066:
1067: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1068: RAISE FND_API.G_EXC_ERROR;
1069: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1070: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1071: END IF;
1072:
1065: x_return_status := l_overall_Status;
1066:
1067: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1068: RAISE FND_API.G_EXC_ERROR;
1069: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1070: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1071: END IF;
1072:
1073: l_aetv_tbl := x_aetv_tbl;
1066:
1067: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1068: RAISE FND_API.G_EXC_ERROR;
1069: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1070: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1071: END IF;
1072:
1073: l_aetv_tbl := x_aetv_tbl;
1074:
1085:
1086:
1087: EXCEPTION
1088:
1089: WHEN FND_API.G_EXC_ERROR THEN
1090: ROLLBACK TO update_acct_event;
1091: x_return_status := FND_API.G_RET_STS_ERROR;
1092:
1093: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1087: EXCEPTION
1088:
1089: WHEN FND_API.G_EXC_ERROR THEN
1090: ROLLBACK TO update_acct_event;
1091: x_return_status := FND_API.G_RET_STS_ERROR;
1092:
1093: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1094: ,p_count => x_msg_count
1095: ,p_data => x_msg_data);
1093: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1094: ,p_count => x_msg_count
1095: ,p_data => x_msg_data);
1096:
1097: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1098: ROLLBACK TO update_acct_event;
1099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1100: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1101: ,p_count => x_msg_count
1095: ,p_data => x_msg_data);
1096:
1097: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1098: ROLLBACK TO update_acct_event;
1099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1100: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1101: ,p_count => x_msg_count
1102: ,p_data => x_msg_data);
1103:
1107: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1108: ,p_count => x_msg_count
1109: ,p_data => x_msg_data);
1110: -- notify caller of an UNEXPECTED error
1111: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1112:
1113: END update_acct_event;
1114:
1115:
1144:
1145: BEGIN
1146:
1147: SAVEPOINT delete_acct_event;
1148: x_return_status := FND_API.G_RET_STS_SUCCESS;
1149:
1150:
1151: -- customer pre-processing
1152:
1181: );
1182:
1183:
1184:
1185: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1182:
1183:
1184:
1185: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1190:
1183:
1184:
1185: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1190:
1191:
1184:
1185: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1186: RAISE FND_API.G_EXC_ERROR;
1187: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1189: END IF;
1190:
1191:
1192:
1204:
1205:
1206: EXCEPTION
1207:
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: ROLLBACK TO delete_acct_event;
1210: x_return_status := FND_API.G_RET_STS_ERROR;
1211:
1212: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1206: EXCEPTION
1207:
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: ROLLBACK TO delete_acct_event;
1210: x_return_status := FND_API.G_RET_STS_ERROR;
1211:
1212: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1213: ,p_count => x_msg_count
1214: ,p_data => x_msg_data);
1212: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1213: ,p_count => x_msg_count
1214: ,p_data => x_msg_data);
1215:
1216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1217: ROLLBACK TO delete_acct_event;
1218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1219: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1220: ,p_count => x_msg_count
1214: ,p_data => x_msg_data);
1215:
1216: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1217: ROLLBACK TO delete_acct_event;
1218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1219: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1220: ,p_count => x_msg_count
1221: ,p_data => x_msg_data);
1222:
1226: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1227: ,p_count => x_msg_count
1228: ,p_data => x_msg_data);
1229: -- notify caller of an UNEXPECTED error
1230: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1231:
1232: END delete_acct_event;
1233:
1234:
1260:
1261: --Initialize the return status
1262:
1263: SAVEPOINT delete_acct_event;
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265:
1266:
1267: -- customer pre-processing
1268:
1315: END IF;
1316:
1317: x_return_status := l_overall_status;
1318:
1319: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1316:
1317: x_return_status := l_overall_status;
1318:
1319: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:
1317: x_return_status := l_overall_status;
1318:
1319: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:
1325:
1318:
1319: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1320: RAISE FND_API.G_EXC_ERROR;
1321: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1323: END IF;
1324:
1325:
1326:
1337:
1338:
1339: EXCEPTION
1340:
1341: WHEN FND_API.G_EXC_ERROR THEN
1342: ROLLBACK TO delete_acct_event;
1343: x_return_status := FND_API.G_RET_STS_ERROR;
1344:
1345: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1339: EXCEPTION
1340:
1341: WHEN FND_API.G_EXC_ERROR THEN
1342: ROLLBACK TO delete_acct_event;
1343: x_return_status := FND_API.G_RET_STS_ERROR;
1344:
1345: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1346: ,p_count => x_msg_count
1347: ,p_data => x_msg_data);
1345: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1346: ,p_count => x_msg_count
1347: ,p_data => x_msg_data);
1348:
1349: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1350: ROLLBACK TO delete_acct_event;
1351: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1352: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1353: ,p_count => x_msg_count
1347: ,p_data => x_msg_data);
1348:
1349: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1350: ROLLBACK TO delete_acct_event;
1351: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1352: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1353: ,p_count => x_msg_count
1354: ,p_data => x_msg_data);
1355:
1359: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1360: ,p_count => x_msg_count
1361: ,p_data => x_msg_data);
1362: -- notify caller of an UNEXPECTED error
1363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1364:
1365:
1366: END delete_acct_event;
1367:
1391:
1392: BEGIN
1393:
1394: SAVEPOINT validate_acct_event;
1395: x_return_status := FND_API.G_RET_STS_SUCCESS;
1396:
1397:
1398:
1399: -- customer pre-processing
1429: ,p_aetv_rec => l_aetv_rec
1430:
1431: );
1432:
1433: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1434: RAISE FND_API.G_EXC_ERROR;
1435: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437: END IF;
1430:
1431: );
1432:
1433: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1434: RAISE FND_API.G_EXC_ERROR;
1435: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437: END IF;
1438:
1431: );
1432:
1433: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1434: RAISE FND_API.G_EXC_ERROR;
1435: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437: END IF;
1438:
1439:
1432:
1433: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1434: RAISE FND_API.G_EXC_ERROR;
1435: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1437: END IF;
1438:
1439:
1440:
1453:
1454:
1455: EXCEPTION
1456:
1457: WHEN FND_API.G_EXC_ERROR THEN
1458: ROLLBACK TO validate_acct_event;
1459: x_return_status := FND_API.G_RET_STS_ERROR;
1460:
1461: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1455: EXCEPTION
1456:
1457: WHEN FND_API.G_EXC_ERROR THEN
1458: ROLLBACK TO validate_acct_event;
1459: x_return_status := FND_API.G_RET_STS_ERROR;
1460:
1461: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1462: ,p_count => x_msg_count
1463: ,p_data => x_msg_data);
1461: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1462: ,p_count => x_msg_count
1463: ,p_data => x_msg_data);
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1466: ROLLBACK TO validate_acct_event;
1467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1468: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1469: ,p_count => x_msg_count
1463: ,p_data => x_msg_data);
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1466: ROLLBACK TO validate_acct_event;
1467: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1468: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1469: ,p_count => x_msg_count
1470: ,p_data => x_msg_data);
1471:
1475: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1476: ,p_count => x_msg_count
1477: ,p_data => x_msg_data);
1478: -- notify caller of an UNEXPECTED error
1479: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1480:
1481: END validate_acct_event;
1482:
1483:
1509:
1510: --Initialize the return status
1511:
1512: SAVEPOINT validate_acct_event;
1513: x_return_status := FND_API.G_RET_STS_SUCCESS;
1514:
1515:
1516:
1517: -- customer pre-processing
1565: END IF;
1566:
1567: x_return_status := l_overall_status;
1568:
1569: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1570: RAISE FND_API.G_EXC_ERROR;
1571: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1573: END IF;
1566:
1567: x_return_status := l_overall_status;
1568:
1569: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1570: RAISE FND_API.G_EXC_ERROR;
1571: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1573: END IF;
1574:
1567: x_return_status := l_overall_status;
1568:
1569: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1570: RAISE FND_API.G_EXC_ERROR;
1571: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1573: END IF;
1574:
1575:
1568:
1569: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1570: RAISE FND_API.G_EXC_ERROR;
1571: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1572: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1573: END IF;
1574:
1575:
1576:
1587:
1588:
1589: EXCEPTION
1590:
1591: WHEN FND_API.G_EXC_ERROR THEN
1592: ROLLBACK TO validate_acct_event;
1593: x_return_status := FND_API.G_RET_STS_ERROR;
1594:
1595: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1589: EXCEPTION
1590:
1591: WHEN FND_API.G_EXC_ERROR THEN
1592: ROLLBACK TO validate_acct_event;
1593: x_return_status := FND_API.G_RET_STS_ERROR;
1594:
1595: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1596: ,p_count => x_msg_count
1597: ,p_data => x_msg_data);
1595: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1596: ,p_count => x_msg_count
1597: ,p_data => x_msg_data);
1598:
1599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1600: ROLLBACK TO validate_acct_event;
1601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1602: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1603: ,p_count => x_msg_count
1597: ,p_data => x_msg_data);
1598:
1599: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1600: ROLLBACK TO validate_acct_event;
1601: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1602: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1603: ,p_count => x_msg_count
1604: ,p_data => x_msg_data);
1605:
1609: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1610: ,p_count => x_msg_count
1611: ,p_data => x_msg_data);
1612: -- notify caller of an UNEXPECTED error
1613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1614:
1615: END validate_acct_event;
1616:
1617:
1644:
1645: BEGIN
1646:
1647: SAVEPOINT create_acct_header;
1648: x_return_status := FND_API.G_RET_STS_SUCCESS;
1649:
1650:
1651:
1652: -- customer pre-processing
1686: ,x_aehv_rec => x_aehv_rec
1687:
1688: );
1689:
1690: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1691: RAISE FND_API.G_EXC_ERROR;
1692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1694: END IF;
1687:
1688: );
1689:
1690: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1691: RAISE FND_API.G_EXC_ERROR;
1692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1694: END IF;
1695:
1688: );
1689:
1690: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1691: RAISE FND_API.G_EXC_ERROR;
1692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1694: END IF;
1695:
1696: l_aehv_rec := x_aehv_rec;
1689:
1690: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1691: RAISE FND_API.G_EXC_ERROR;
1692: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1694: END IF;
1695:
1696: l_aehv_rec := x_aehv_rec;
1697:
1710:
1711:
1712: EXCEPTION
1713:
1714: WHEN FND_API.G_EXC_ERROR THEN
1715: ROLLBACK TO create_acct_header;
1716: x_return_status := FND_API.G_RET_STS_ERROR;
1717:
1718: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1712: EXCEPTION
1713:
1714: WHEN FND_API.G_EXC_ERROR THEN
1715: ROLLBACK TO create_acct_header;
1716: x_return_status := FND_API.G_RET_STS_ERROR;
1717:
1718: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1719: ,p_count => x_msg_count
1720: ,p_data => x_msg_data);
1718: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1719: ,p_count => x_msg_count
1720: ,p_data => x_msg_data);
1721:
1722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1723: ROLLBACK TO create_acct_header;
1724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1725: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1726: ,p_count => x_msg_count
1720: ,p_data => x_msg_data);
1721:
1722: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1723: ROLLBACK TO create_acct_header;
1724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1725: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1726: ,p_count => x_msg_count
1727: ,p_data => x_msg_data);
1728:
1732: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1733: ,p_count => x_msg_count
1734: ,p_data => x_msg_data);
1735: -- notify caller of an UNEXPECTED error
1736: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1737:
1738: END create_acct_header;
1739:
1740:
1768:
1769: --Initialize the return status
1770:
1771: SAVEPOINT create_acct_header;
1772: x_return_status := FND_API.G_RET_STS_SUCCESS;
1773:
1774:
1775:
1776: -- customer pre-processing
1826: END IF;
1827:
1828: x_return_status := l_overall_status;
1829:
1830: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1831: RAISE FND_API.G_EXC_ERROR;
1832: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1834: END IF;
1827:
1828: x_return_status := l_overall_status;
1829:
1830: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1831: RAISE FND_API.G_EXC_ERROR;
1832: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1834: END IF;
1835:
1828: x_return_status := l_overall_status;
1829:
1830: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1831: RAISE FND_API.G_EXC_ERROR;
1832: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1834: END IF;
1835:
1836: l_aehv_tbl := x_aehv_tbl;
1829:
1830: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1831: RAISE FND_API.G_EXC_ERROR;
1832: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1834: END IF;
1835:
1836: l_aehv_tbl := x_aehv_tbl;
1837:
1848:
1849:
1850: EXCEPTION
1851:
1852: WHEN FND_API.G_EXC_ERROR THEN
1853: ROLLBACK TO create_acct_header;
1854: x_return_status := FND_API.G_RET_STS_ERROR;
1855:
1856: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1850: EXCEPTION
1851:
1852: WHEN FND_API.G_EXC_ERROR THEN
1853: ROLLBACK TO create_acct_header;
1854: x_return_status := FND_API.G_RET_STS_ERROR;
1855:
1856: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1857: ,p_count => x_msg_count
1858: ,p_data => x_msg_data);
1856: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1857: ,p_count => x_msg_count
1858: ,p_data => x_msg_data);
1859:
1860: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1861: ROLLBACK TO create_acct_header;
1862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1863: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1864: ,p_count => x_msg_count
1858: ,p_data => x_msg_data);
1859:
1860: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1861: ROLLBACK TO create_acct_header;
1862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1863: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1864: ,p_count => x_msg_count
1865: ,p_data => x_msg_data);
1866:
1870: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1871: ,p_count => x_msg_count
1872: ,p_data => x_msg_data);
1873: -- notify caller of an UNEXPECTED error
1874: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1875:
1876: END create_acct_header;
1877:
1878:
1896: l_api_name CONSTANT VARCHAR2(30) := 'lock_acct_header';
1897:
1898: BEGIN
1899:
1900: x_return_status := FND_API.G_RET_STS_SUCCESS;
1901: SAVEPOINT lock_acct_header;
1902:
1903:
1904: okl_acct_event_pvt.lock_acct_header(
1916: ,p_aehv_rec => p_aehv_rec
1917:
1918: );
1919:
1920: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1921: RAISE FND_API.G_EXC_ERROR;
1922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1923: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1924: END IF;
1917:
1918: );
1919:
1920: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1921: RAISE FND_API.G_EXC_ERROR;
1922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1923: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1924: END IF;
1925:
1918: );
1919:
1920: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1921: RAISE FND_API.G_EXC_ERROR;
1922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1923: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1924: END IF;
1925:
1926: EXCEPTION
1919:
1920: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1921: RAISE FND_API.G_EXC_ERROR;
1922: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1923: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1924: END IF;
1925:
1926: EXCEPTION
1927: WHEN FND_API.G_EXC_ERROR THEN
1923: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1924: END IF;
1925:
1926: EXCEPTION
1927: WHEN FND_API.G_EXC_ERROR THEN
1928: ROLLBACK TO lock_acct_header;
1929: x_return_status := FND_API.G_RET_STS_ERROR;
1930:
1931: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1925:
1926: EXCEPTION
1927: WHEN FND_API.G_EXC_ERROR THEN
1928: ROLLBACK TO lock_acct_header;
1929: x_return_status := FND_API.G_RET_STS_ERROR;
1930:
1931: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1932: ,p_count => x_msg_count
1933: ,p_data => x_msg_data);
1931: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1932: ,p_count => x_msg_count
1933: ,p_data => x_msg_data);
1934:
1935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1936: ROLLBACK TO lock_acct_header;
1937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1938: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1939: ,p_count => x_msg_count
1933: ,p_data => x_msg_data);
1934:
1935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1936: ROLLBACK TO lock_acct_header;
1937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1938: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1939: ,p_count => x_msg_count
1940: ,p_data => x_msg_data);
1941:
1945: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
1946: ,p_count => x_msg_count
1947: ,p_data => x_msg_data);
1948: -- notify caller of an UNEXPECTED error
1949: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1950:
1951: END lock_acct_header;
1952:
1953:
1975: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1976:
1977: BEGIN
1978:
1979: x_return_status := FND_API.G_RET_STS_SUCCESS;
1980: SAVEPOINT lock_acct_header;
1981:
1982: IF (p_aehv_tbl.COUNT > 0) THEN
1983:
2001:
2002: );
2003:
2004: -- store the highest degree of error
2005: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2006: IF l_overall_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2007: l_overall_status := l_return_status;
2008: END IF;
2009: END IF;
2002: );
2003:
2004: -- store the highest degree of error
2005: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2006: IF l_overall_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
2007: l_overall_status := l_return_status;
2008: END IF;
2009: END IF;
2010: EXIT WHEN (i = p_aehv_tbl.LAST);
2016: l_return_status := l_overall_status;
2017:
2018: END IF;
2019:
2020: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2021: RAISE FND_API.G_EXC_ERROR;
2022: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2024: END IF;
2017:
2018: END IF;
2019:
2020: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2021: RAISE FND_API.G_EXC_ERROR;
2022: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2024: END IF;
2025:
2018: END IF;
2019:
2020: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2021: RAISE FND_API.G_EXC_ERROR;
2022: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2024: END IF;
2025:
2026: EXCEPTION
2019:
2020: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2021: RAISE FND_API.G_EXC_ERROR;
2022: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2023: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2024: END IF;
2025:
2026: EXCEPTION
2027: WHEN FND_API.G_EXC_ERROR THEN
2023: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2024: END IF;
2025:
2026: EXCEPTION
2027: WHEN FND_API.G_EXC_ERROR THEN
2028: ROLLBACK TO lock_acct_header;
2029: x_return_status := FND_API.G_RET_STS_ERROR;
2030:
2031: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2025:
2026: EXCEPTION
2027: WHEN FND_API.G_EXC_ERROR THEN
2028: ROLLBACK TO lock_acct_header;
2029: x_return_status := FND_API.G_RET_STS_ERROR;
2030:
2031: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2032: ,p_count => x_msg_count
2033: ,p_data => x_msg_data);
2031: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2032: ,p_count => x_msg_count
2033: ,p_data => x_msg_data);
2034:
2035: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2036: ROLLBACK TO lock_acct_header;
2037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2038: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2039: ,p_count => x_msg_count
2033: ,p_data => x_msg_data);
2034:
2035: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2036: ROLLBACK TO lock_acct_header;
2037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2038: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2039: ,p_count => x_msg_count
2040: ,p_data => x_msg_data);
2041:
2045: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2046: ,p_count => x_msg_count
2047: ,p_data => x_msg_data);
2048: -- notify caller of an UNEXPECTED error
2049: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2050:
2051: END lock_acct_header;
2052:
2053:
2076:
2077: BEGIN
2078:
2079: SAVEPOINT update_acct_header;
2080: x_return_status := FND_API.G_RET_STS_SUCCESS;
2081:
2082:
2083:
2084: -- customer pre-processing
2114: ,x_aehv_rec => x_aehv_rec
2115:
2116: );
2117:
2118: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2119: RAISE FND_API.G_EXC_ERROR;
2120: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2122: END IF;
2115:
2116: );
2117:
2118: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2119: RAISE FND_API.G_EXC_ERROR;
2120: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2122: END IF;
2123:
2116: );
2117:
2118: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2119: RAISE FND_API.G_EXC_ERROR;
2120: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2122: END IF;
2123:
2124:
2117:
2118: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2119: RAISE FND_API.G_EXC_ERROR;
2120: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2122: END IF;
2123:
2124:
2125: l_aehv_rec := x_aehv_rec;
2139:
2140:
2141: EXCEPTION
2142:
2143: WHEN FND_API.G_EXC_ERROR THEN
2144: ROLLBACK TO update_acct_header;
2145: x_return_status := FND_API.G_RET_STS_ERROR;
2146:
2147: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2141: EXCEPTION
2142:
2143: WHEN FND_API.G_EXC_ERROR THEN
2144: ROLLBACK TO update_acct_header;
2145: x_return_status := FND_API.G_RET_STS_ERROR;
2146:
2147: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2148: ,p_count => x_msg_count
2149: ,p_data => x_msg_data);
2147: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2148: ,p_count => x_msg_count
2149: ,p_data => x_msg_data);
2150:
2151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2152: ROLLBACK TO update_acct_header;
2153: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2154: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2155: ,p_count => x_msg_count
2149: ,p_data => x_msg_data);
2150:
2151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2152: ROLLBACK TO update_acct_header;
2153: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2154: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2155: ,p_count => x_msg_count
2156: ,p_data => x_msg_data);
2157:
2161: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2162: ,p_count => x_msg_count
2163: ,p_data => x_msg_data);
2164: -- notify caller of an UNEXPECTED error
2165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2166:
2167: END update_acct_header;
2168:
2169:
2199:
2200: --Initialize the return status
2201:
2202: SAVEPOINT update_acct_header;
2203: x_return_status := FND_API.G_RET_STS_SUCCESS;
2204:
2205:
2206:
2207: -- customer pre-processing
2255: END IF;
2256:
2257: x_return_status := l_overall_status;
2258:
2259: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2260: RAISE FND_API.G_EXC_ERROR;
2261: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2263: END IF;
2256:
2257: x_return_status := l_overall_status;
2258:
2259: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2260: RAISE FND_API.G_EXC_ERROR;
2261: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2263: END IF;
2264:
2257: x_return_status := l_overall_status;
2258:
2259: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2260: RAISE FND_API.G_EXC_ERROR;
2261: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2263: END IF;
2264:
2265:
2258:
2259: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2260: RAISE FND_API.G_EXC_ERROR;
2261: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2262: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2263: END IF;
2264:
2265:
2266: l_aehv_tbl := x_aehv_tbl;
2279:
2280:
2281: EXCEPTION
2282:
2283: WHEN FND_API.G_EXC_ERROR THEN
2284: ROLLBACK TO update_acct_header;
2285: x_return_status := FND_API.G_RET_STS_ERROR;
2286:
2287: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2281: EXCEPTION
2282:
2283: WHEN FND_API.G_EXC_ERROR THEN
2284: ROLLBACK TO update_acct_header;
2285: x_return_status := FND_API.G_RET_STS_ERROR;
2286:
2287: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2288: ,p_count => x_msg_count
2289: ,p_data => x_msg_data);
2287: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2288: ,p_count => x_msg_count
2289: ,p_data => x_msg_data);
2290:
2291: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2292: ROLLBACK TO update_acct_header;
2293: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2294: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2295: ,p_count => x_msg_count
2289: ,p_data => x_msg_data);
2290:
2291: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2292: ROLLBACK TO update_acct_header;
2293: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2294: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2295: ,p_count => x_msg_count
2296: ,p_data => x_msg_data);
2297:
2301: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2302: ,p_count => x_msg_count
2303: ,p_data => x_msg_data);
2304: -- notify caller of an UNEXPECTED error
2305: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2306:
2307: END update_acct_header;
2308:
2309:
2334:
2335: BEGIN
2336:
2337: SAVEPOINT delete_acct_header;
2338: x_return_status := FND_API.G_RET_STS_SUCCESS;
2339:
2340:
2341:
2342: -- customer pre-processing
2370: ,x_msg_data => x_msg_data
2371:
2372: ,p_aehv_rec => l_aehv_rec);
2373:
2374: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2375: RAISE FND_API.G_EXC_ERROR;
2376: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: END IF;
2371:
2372: ,p_aehv_rec => l_aehv_rec);
2373:
2374: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2375: RAISE FND_API.G_EXC_ERROR;
2376: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: END IF;
2379:
2372: ,p_aehv_rec => l_aehv_rec);
2373:
2374: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2375: RAISE FND_API.G_EXC_ERROR;
2376: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: END IF;
2379:
2380:
2373:
2374: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2375: RAISE FND_API.G_EXC_ERROR;
2376: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2377: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2378: END IF;
2379:
2380:
2381:
2394:
2395:
2396: EXCEPTION
2397:
2398: WHEN FND_API.G_EXC_ERROR THEN
2399: ROLLBACK TO delete_acct_header;
2400: x_return_status := FND_API.G_RET_STS_ERROR;
2401:
2402: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2396: EXCEPTION
2397:
2398: WHEN FND_API.G_EXC_ERROR THEN
2399: ROLLBACK TO delete_acct_header;
2400: x_return_status := FND_API.G_RET_STS_ERROR;
2401:
2402: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2403: ,p_count => x_msg_count
2404: ,p_data => x_msg_data);
2402: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2403: ,p_count => x_msg_count
2404: ,p_data => x_msg_data);
2405:
2406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2407: ROLLBACK TO delete_acct_header;
2408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2409: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2410: ,p_count => x_msg_count
2404: ,p_data => x_msg_data);
2405:
2406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2407: ROLLBACK TO delete_acct_header;
2408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2409: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2410: ,p_count => x_msg_count
2411: ,p_data => x_msg_data);
2412:
2416: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2417: ,p_count => x_msg_count
2418: ,p_data => x_msg_data);
2419: -- notify caller of an UNEXPECTED error
2420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2421:
2422: END delete_acct_header;
2423:
2424:
2453:
2454: --Initialize the return status
2455:
2456: SAVEPOINT delete_acct_header;
2457: x_return_status := FND_API.G_RET_STS_SUCCESS;
2458:
2459:
2460:
2461: -- customer pre-processing
2508: END IF;
2509:
2510: x_return_status := l_overall_status;
2511:
2512: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2516: END IF;
2509:
2510: x_return_status := l_overall_status;
2511:
2512: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2516: END IF;
2517:
2510: x_return_status := l_overall_status;
2511:
2512: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2516: END IF;
2517:
2518:
2511:
2512: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2515: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2516: END IF;
2517:
2518:
2519:
2531:
2532:
2533: EXCEPTION
2534:
2535: WHEN FND_API.G_EXC_ERROR THEN
2536: ROLLBACK TO delete_acct_header;
2537: x_return_status := FND_API.G_RET_STS_ERROR;
2538:
2539: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2533: EXCEPTION
2534:
2535: WHEN FND_API.G_EXC_ERROR THEN
2536: ROLLBACK TO delete_acct_header;
2537: x_return_status := FND_API.G_RET_STS_ERROR;
2538:
2539: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2540: ,p_count => x_msg_count
2541: ,p_data => x_msg_data);
2539: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2540: ,p_count => x_msg_count
2541: ,p_data => x_msg_data);
2542:
2543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2544: ROLLBACK TO delete_acct_header;
2545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2546: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2547: ,p_count => x_msg_count
2541: ,p_data => x_msg_data);
2542:
2543: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2544: ROLLBACK TO delete_acct_header;
2545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2546: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2547: ,p_count => x_msg_count
2548: ,p_data => x_msg_data);
2549:
2553: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2554: ,p_count => x_msg_count
2555: ,p_data => x_msg_data);
2556: -- notify caller of an UNEXPECTED error
2557: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2558:
2559: END delete_acct_header;
2560:
2561:
2582:
2583: BEGIN
2584:
2585: SAVEPOINT validate_acct_header;
2586: x_return_status := FND_API.G_RET_STS_SUCCESS;
2587:
2588:
2589:
2590: -- customer pre-processing
2620: ,p_aehv_rec => l_aehv_rec
2621:
2622: );
2623:
2624: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2625: RAISE FND_API.G_EXC_ERROR;
2626: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2628: END IF;
2621:
2622: );
2623:
2624: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2625: RAISE FND_API.G_EXC_ERROR;
2626: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2628: END IF;
2629:
2622: );
2623:
2624: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2625: RAISE FND_API.G_EXC_ERROR;
2626: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2628: END IF;
2629:
2630:
2623:
2624: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2625: RAISE FND_API.G_EXC_ERROR;
2626: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2627: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2628: END IF;
2629:
2630:
2631:
2644:
2645:
2646: EXCEPTION
2647:
2648: WHEN FND_API.G_EXC_ERROR THEN
2649: ROLLBACK TO validate_acct_header;
2650: x_return_status := FND_API.G_RET_STS_ERROR;
2651:
2652: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2646: EXCEPTION
2647:
2648: WHEN FND_API.G_EXC_ERROR THEN
2649: ROLLBACK TO validate_acct_header;
2650: x_return_status := FND_API.G_RET_STS_ERROR;
2651:
2652: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2653: ,p_count => x_msg_count
2654: ,p_data => x_msg_data);
2652: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2653: ,p_count => x_msg_count
2654: ,p_data => x_msg_data);
2655:
2656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2657: ROLLBACK TO validate_acct_header;
2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2659: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2660: ,p_count => x_msg_count
2654: ,p_data => x_msg_data);
2655:
2656: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2657: ROLLBACK TO validate_acct_header;
2658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2659: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2660: ,p_count => x_msg_count
2661: ,p_data => x_msg_data);
2662:
2666: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2667: ,p_count => x_msg_count
2668: ,p_data => x_msg_data);
2669: -- notify caller of an UNEXPECTED error
2670: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2671:
2672: END validate_acct_header;
2673:
2674:
2702: --Initialize the return status
2703:
2704:
2705: SAVEPOINT validate_acct_header;
2706: x_return_status := FND_API.G_RET_STS_SUCCESS;
2707:
2708:
2709:
2710: -- customer pre-processing
2760: END IF;
2761:
2762: x_return_status := l_overall_status;
2763:
2764: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2765: RAISE FND_API.G_EXC_ERROR;
2766: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2768: END IF;
2761:
2762: x_return_status := l_overall_status;
2763:
2764: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2765: RAISE FND_API.G_EXC_ERROR;
2766: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2768: END IF;
2769:
2762: x_return_status := l_overall_status;
2763:
2764: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2765: RAISE FND_API.G_EXC_ERROR;
2766: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2768: END IF;
2769:
2770:
2763:
2764: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2765: RAISE FND_API.G_EXC_ERROR;
2766: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2768: END IF;
2769:
2770:
2771:
2784:
2785:
2786: EXCEPTION
2787:
2788: WHEN FND_API.G_EXC_ERROR THEN
2789: ROLLBACK TO validate_acct_header;
2790: x_return_status := FND_API.G_RET_STS_ERROR;
2791:
2792: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2786: EXCEPTION
2787:
2788: WHEN FND_API.G_EXC_ERROR THEN
2789: ROLLBACK TO validate_acct_header;
2790: x_return_status := FND_API.G_RET_STS_ERROR;
2791:
2792: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2793: ,p_count => x_msg_count
2794: ,p_data => x_msg_data);
2792: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2793: ,p_count => x_msg_count
2794: ,p_data => x_msg_data);
2795:
2796: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2797: ROLLBACK TO validate_acct_header;
2798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2799: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2800: ,p_count => x_msg_count
2794: ,p_data => x_msg_data);
2795:
2796: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2797: ROLLBACK TO validate_acct_header;
2798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2799: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2800: ,p_count => x_msg_count
2801: ,p_data => x_msg_data);
2802:
2806: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2807: ,p_count => x_msg_count
2808: ,p_data => x_msg_data);
2809: -- notify caller of an UNEXPECTED error
2810: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2811:
2812: END validate_acct_header;
2813:
2814:
2840:
2841: BEGIN
2842:
2843: SAVEPOINT create_acct_lines;
2844: x_return_status := FND_API.G_RET_STS_SUCCESS;
2845:
2846:
2847:
2848:
2883: ,x_aelv_rec => x_aelv_rec
2884:
2885: );
2886:
2887: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2888: RAISE FND_API.G_EXC_ERROR;
2889: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2891: END IF;
2884:
2885: );
2886:
2887: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2888: RAISE FND_API.G_EXC_ERROR;
2889: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2891: END IF;
2892:
2885: );
2886:
2887: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2888: RAISE FND_API.G_EXC_ERROR;
2889: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2891: END IF;
2892:
2893: l_aelv_rec := x_aelv_rec;
2886:
2887: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2888: RAISE FND_API.G_EXC_ERROR;
2889: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2890: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2891: END IF;
2892:
2893: l_aelv_rec := x_aelv_rec;
2894:
2907:
2908:
2909: EXCEPTION
2910:
2911: WHEN FND_API.G_EXC_ERROR THEN
2912: ROLLBACK TO create_acct_lines;
2913: x_return_status := FND_API.G_RET_STS_ERROR;
2914:
2915: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2909: EXCEPTION
2910:
2911: WHEN FND_API.G_EXC_ERROR THEN
2912: ROLLBACK TO create_acct_lines;
2913: x_return_status := FND_API.G_RET_STS_ERROR;
2914:
2915: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2916: ,p_count => x_msg_count
2917: ,p_data => x_msg_data);
2915: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2916: ,p_count => x_msg_count
2917: ,p_data => x_msg_data);
2918:
2919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2920: ROLLBACK TO create_acct_lines;
2921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2922: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2923: ,p_count => x_msg_count
2917: ,p_data => x_msg_data);
2918:
2919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2920: ROLLBACK TO create_acct_lines;
2921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2922: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2923: ,p_count => x_msg_count
2924: ,p_data => x_msg_data);
2925:
2929: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
2930: ,p_count => x_msg_count
2931: ,p_data => x_msg_data);
2932: -- notify caller of an UNEXPECTED error
2933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2934:
2935: END create_acct_lines;
2936:
2937:
2965:
2966: --Initialize the return status
2967:
2968: SAVEPOINT create_acct_lines;
2969: x_return_status := FND_API.G_RET_STS_SUCCESS;
2970:
2971:
2972:
2973:
3024: END IF;
3025:
3026: x_return_status := l_overall_status;
3027:
3028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3029: RAISE FND_API.G_EXC_ERROR;
3030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3032: END IF;
3025:
3026: x_return_status := l_overall_status;
3027:
3028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3029: RAISE FND_API.G_EXC_ERROR;
3030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3032: END IF;
3033:
3026: x_return_status := l_overall_status;
3027:
3028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3029: RAISE FND_API.G_EXC_ERROR;
3030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3032: END IF;
3033:
3034: l_aelv_tbl := x_aelv_tbl;
3027:
3028: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3029: RAISE FND_API.G_EXC_ERROR;
3030: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3031: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3032: END IF;
3033:
3034: l_aelv_tbl := x_aelv_tbl;
3035:
3049:
3050:
3051: EXCEPTION
3052:
3053: WHEN FND_API.G_EXC_ERROR THEN
3054: ROLLBACK TO create_acct_lines;
3055: x_return_status := FND_API.G_RET_STS_ERROR;
3056:
3057: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3051: EXCEPTION
3052:
3053: WHEN FND_API.G_EXC_ERROR THEN
3054: ROLLBACK TO create_acct_lines;
3055: x_return_status := FND_API.G_RET_STS_ERROR;
3056:
3057: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3058: ,p_count => x_msg_count
3059: ,p_data => x_msg_data);
3057: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3058: ,p_count => x_msg_count
3059: ,p_data => x_msg_data);
3060:
3061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3062: ROLLBACK TO create_acct_lines;
3063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3064: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3065: ,p_count => x_msg_count
3059: ,p_data => x_msg_data);
3060:
3061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3062: ROLLBACK TO create_acct_lines;
3063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3064: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3065: ,p_count => x_msg_count
3066: ,p_data => x_msg_data);
3067:
3071: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3072: ,p_count => x_msg_count
3073: ,p_data => x_msg_data);
3074: -- notify caller of an UNEXPECTED error
3075: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3076:
3077: END create_acct_lines;
3078:
3079:
3097: l_api_name CONSTANT VARCHAR2(30) := 'lock_acct_lines';
3098:
3099: BEGIN
3100:
3101: x_return_status := FND_API.G_RET_STS_SUCCESS;
3102: SAVEPOINT lock_acct_header;
3103:
3104: okl_acct_event_pvt.lock_acct_lines(
3105:
3116: ,p_aelv_rec => p_aelv_rec
3117:
3118: );
3119:
3120: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3121: RAISE FND_API.G_EXC_ERROR;
3122: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3124: END IF;
3117:
3118: );
3119:
3120: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3121: RAISE FND_API.G_EXC_ERROR;
3122: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3124: END IF;
3125:
3118: );
3119:
3120: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3121: RAISE FND_API.G_EXC_ERROR;
3122: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3124: END IF;
3125:
3126: EXCEPTION
3119:
3120: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3121: RAISE FND_API.G_EXC_ERROR;
3122: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3124: END IF;
3125:
3126: EXCEPTION
3127: WHEN FND_API.G_EXC_ERROR THEN
3123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3124: END IF;
3125:
3126: EXCEPTION
3127: WHEN FND_API.G_EXC_ERROR THEN
3128: ROLLBACK TO lock_acct_lines;
3129: x_return_status := FND_API.G_RET_STS_ERROR;
3130:
3131: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3125:
3126: EXCEPTION
3127: WHEN FND_API.G_EXC_ERROR THEN
3128: ROLLBACK TO lock_acct_lines;
3129: x_return_status := FND_API.G_RET_STS_ERROR;
3130:
3131: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3132: ,p_count => x_msg_count
3133: ,p_data => x_msg_data);
3131: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3132: ,p_count => x_msg_count
3133: ,p_data => x_msg_data);
3134:
3135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3136: ROLLBACK TO lock_acct_lines;
3137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3138: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3139: ,p_count => x_msg_count
3133: ,p_data => x_msg_data);
3134:
3135: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3136: ROLLBACK TO lock_acct_lines;
3137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3138: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3139: ,p_count => x_msg_count
3140: ,p_data => x_msg_data);
3141:
3145: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3146: ,p_count => x_msg_count
3147: ,p_data => x_msg_data);
3148: -- notify caller of an UNEXPECTED error
3149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3150:
3151: END lock_acct_lines;
3152:
3153:
3175: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3176:
3177: BEGIN
3178:
3179: x_return_status := FND_API.G_RET_STS_SUCCESS;
3180: SAVEPOINT lock_acct_lines;
3181:
3182: IF (p_aelv_tbl.COUNT > 0) THEN
3183:
3201:
3202: );
3203:
3204: -- store the highest degree of error
3205: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3206: IF l_overall_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
3207: l_overall_status := l_return_status;
3208: END IF;
3209: END IF;
3202: );
3203:
3204: -- store the highest degree of error
3205: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3206: IF l_overall_status <> FND_API.G_RET_STS_UNEXP_ERROR THEN
3207: l_overall_status := l_return_status;
3208: END IF;
3209: END IF;
3210: EXIT WHEN (i = p_aelv_tbl.LAST);
3216: l_return_status := l_overall_status;
3217:
3218: END IF;
3219:
3220: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3221: RAISE FND_API.G_EXC_ERROR;
3222: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3217:
3218: END IF;
3219:
3220: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3221: RAISE FND_API.G_EXC_ERROR;
3222: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3225:
3218: END IF;
3219:
3220: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3221: RAISE FND_API.G_EXC_ERROR;
3222: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3225:
3226: EXCEPTION
3219:
3220: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3221: RAISE FND_API.G_EXC_ERROR;
3222: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3225:
3226: EXCEPTION
3227: WHEN FND_API.G_EXC_ERROR THEN
3223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3224: END IF;
3225:
3226: EXCEPTION
3227: WHEN FND_API.G_EXC_ERROR THEN
3228: ROLLBACK TO lock_acct_lines;
3229: x_return_status := FND_API.G_RET_STS_ERROR;
3230:
3231: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3225:
3226: EXCEPTION
3227: WHEN FND_API.G_EXC_ERROR THEN
3228: ROLLBACK TO lock_acct_lines;
3229: x_return_status := FND_API.G_RET_STS_ERROR;
3230:
3231: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3232: ,p_count => x_msg_count
3233: ,p_data => x_msg_data);
3231: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3232: ,p_count => x_msg_count
3233: ,p_data => x_msg_data);
3234:
3235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3236: ROLLBACK TO lock_acct_lines;
3237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3238: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3239: ,p_count => x_msg_count
3233: ,p_data => x_msg_data);
3234:
3235: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3236: ROLLBACK TO lock_acct_lines;
3237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3238: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3239: ,p_count => x_msg_count
3240: ,p_data => x_msg_data);
3241:
3245: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3246: ,p_count => x_msg_count
3247: ,p_data => x_msg_data);
3248: -- notify caller of an UNEXPECTED error
3249: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3250:
3251: END lock_acct_lines;
3252:
3253:
3276:
3277: BEGIN
3278:
3279: SAVEPOINT update_acct_lines;
3280: x_return_status := FND_API.G_RET_STS_SUCCESS;
3281:
3282:
3283:
3284: -- customer pre-processing
3314: ,x_aelv_rec => x_aelv_rec
3315:
3316: );
3317:
3318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3319: RAISE FND_API.G_EXC_ERROR;
3320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3322: END IF;
3315:
3316: );
3317:
3318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3319: RAISE FND_API.G_EXC_ERROR;
3320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3322: END IF;
3323:
3316: );
3317:
3318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3319: RAISE FND_API.G_EXC_ERROR;
3320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3322: END IF;
3323:
3324:
3317:
3318: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3319: RAISE FND_API.G_EXC_ERROR;
3320: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3322: END IF;
3323:
3324:
3325: l_aelv_rec := x_aelv_rec;
3339:
3340:
3341: EXCEPTION
3342:
3343: WHEN FND_API.G_EXC_ERROR THEN
3344: ROLLBACK TO update_acct_lines;
3345: x_return_status := FND_API.G_RET_STS_ERROR;
3346:
3347: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3341: EXCEPTION
3342:
3343: WHEN FND_API.G_EXC_ERROR THEN
3344: ROLLBACK TO update_acct_lines;
3345: x_return_status := FND_API.G_RET_STS_ERROR;
3346:
3347: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3348: ,p_count => x_msg_count
3349: ,p_data => x_msg_data);
3347: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3348: ,p_count => x_msg_count
3349: ,p_data => x_msg_data);
3350:
3351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3352: ROLLBACK TO update_acct_lines;
3353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3354: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3355: ,p_count => x_msg_count
3349: ,p_data => x_msg_data);
3350:
3351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3352: ROLLBACK TO update_acct_lines;
3353: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3354: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3355: ,p_count => x_msg_count
3356: ,p_data => x_msg_data);
3357:
3361: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3362: ,p_count => x_msg_count
3363: ,p_data => x_msg_data);
3364: -- notify caller of an UNEXPECTED error
3365: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3366:
3367: END update_acct_lines;
3368:
3369:
3396: BEGIN
3397:
3398: --Initialize the return status
3399: SAVEPOINT update_acct_lines;
3400: x_return_status := FND_API.G_RET_STS_SUCCESS;
3401:
3402:
3403:
3404: -- customer pre-processing
3454: END IF;
3455:
3456: x_return_status := l_overall_status;
3457:
3458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3459: RAISE FND_API.G_EXC_ERROR;
3460: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3462: END IF;
3455:
3456: x_return_status := l_overall_status;
3457:
3458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3459: RAISE FND_API.G_EXC_ERROR;
3460: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3462: END IF;
3463:
3456: x_return_status := l_overall_status;
3457:
3458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3459: RAISE FND_API.G_EXC_ERROR;
3460: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3462: END IF;
3463:
3464:
3457:
3458: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3459: RAISE FND_API.G_EXC_ERROR;
3460: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3461: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3462: END IF;
3463:
3464:
3465: l_aelv_tbl := x_aelv_tbl;
3481:
3482:
3483: EXCEPTION
3484:
3485: WHEN FND_API.G_EXC_ERROR THEN
3486: ROLLBACK TO update_acct_lines;
3487: x_return_status := FND_API.G_RET_STS_ERROR;
3488:
3489: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3483: EXCEPTION
3484:
3485: WHEN FND_API.G_EXC_ERROR THEN
3486: ROLLBACK TO update_acct_lines;
3487: x_return_status := FND_API.G_RET_STS_ERROR;
3488:
3489: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3490: ,p_count => x_msg_count
3491: ,p_data => x_msg_data);
3489: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3490: ,p_count => x_msg_count
3491: ,p_data => x_msg_data);
3492:
3493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3494: ROLLBACK TO update_acct_lines;
3495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3496: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3497: ,p_count => x_msg_count
3491: ,p_data => x_msg_data);
3492:
3493: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3494: ROLLBACK TO update_acct_lines;
3495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3496: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3497: ,p_count => x_msg_count
3498: ,p_data => x_msg_data);
3499:
3503: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3504: ,p_count => x_msg_count
3505: ,p_data => x_msg_data);
3506: -- notify caller of an UNEXPECTED error
3507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3508:
3509: END update_acct_lines;
3510:
3511:
3536:
3537: BEGIN
3538:
3539: SAVEPOINT delete_acct_lines;
3540: x_return_status := FND_API.G_RET_STS_SUCCESS;
3541:
3542:
3543:
3544: -- customer pre-processing
3572: ,x_msg_data => x_msg_data
3573:
3574: ,p_aelv_rec => l_aelv_rec);
3575:
3576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3577: RAISE FND_API.G_EXC_ERROR;
3578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3580: END IF;
3573:
3574: ,p_aelv_rec => l_aelv_rec);
3575:
3576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3577: RAISE FND_API.G_EXC_ERROR;
3578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3580: END IF;
3581:
3574: ,p_aelv_rec => l_aelv_rec);
3575:
3576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3577: RAISE FND_API.G_EXC_ERROR;
3578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3580: END IF;
3581:
3582:
3575:
3576: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3577: RAISE FND_API.G_EXC_ERROR;
3578: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3579: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3580: END IF;
3581:
3582:
3583:
3596:
3597:
3598: EXCEPTION
3599:
3600: WHEN FND_API.G_EXC_ERROR THEN
3601: ROLLBACK TO delete_acct_lines;
3602: x_return_status := FND_API.G_RET_STS_ERROR;
3603:
3604: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3598: EXCEPTION
3599:
3600: WHEN FND_API.G_EXC_ERROR THEN
3601: ROLLBACK TO delete_acct_lines;
3602: x_return_status := FND_API.G_RET_STS_ERROR;
3603:
3604: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3605: ,p_count => x_msg_count
3606: ,p_data => x_msg_data);
3604: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3605: ,p_count => x_msg_count
3606: ,p_data => x_msg_data);
3607:
3608: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3609: ROLLBACK TO delete_acct_lines;
3610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3611: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3612: ,p_count => x_msg_count
3606: ,p_data => x_msg_data);
3607:
3608: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3609: ROLLBACK TO delete_acct_lines;
3610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3611: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3612: ,p_count => x_msg_count
3613: ,p_data => x_msg_data);
3614:
3618: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3619: ,p_count => x_msg_count
3620: ,p_data => x_msg_data);
3621: -- notify caller of an UNEXPECTED error
3622: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3623:
3624: END delete_acct_lines;
3625:
3626:
3654:
3655: --Initialize the return status
3656:
3657: SAVEPOINT delete_acct_lines;
3658: x_return_status := FND_API.G_RET_STS_SUCCESS;
3659:
3660:
3661:
3662: -- customer pre-processing
3709: END IF;
3710:
3711: x_return_status := l_overall_status;
3712:
3713: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3714: RAISE FND_API.G_EXC_ERROR;
3715: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3717: END IF;
3710:
3711: x_return_status := l_overall_status;
3712:
3713: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3714: RAISE FND_API.G_EXC_ERROR;
3715: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3717: END IF;
3718:
3711: x_return_status := l_overall_status;
3712:
3713: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3714: RAISE FND_API.G_EXC_ERROR;
3715: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3717: END IF;
3718:
3719:
3712:
3713: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3714: RAISE FND_API.G_EXC_ERROR;
3715: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3717: END IF;
3718:
3719:
3720:
3735:
3736:
3737: EXCEPTION
3738:
3739: WHEN FND_API.G_EXC_ERROR THEN
3740: ROLLBACK TO delete_acct_lines;
3741: x_return_status := FND_API.G_RET_STS_ERROR;
3742:
3743: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3737: EXCEPTION
3738:
3739: WHEN FND_API.G_EXC_ERROR THEN
3740: ROLLBACK TO delete_acct_lines;
3741: x_return_status := FND_API.G_RET_STS_ERROR;
3742:
3743: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3744: ,p_count => x_msg_count
3745: ,p_data => x_msg_data);
3743: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3744: ,p_count => x_msg_count
3745: ,p_data => x_msg_data);
3746:
3747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3748: ROLLBACK TO delete_acct_lines;
3749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3750: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3751: ,p_count => x_msg_count
3745: ,p_data => x_msg_data);
3746:
3747: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3748: ROLLBACK TO delete_acct_lines;
3749: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3750: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3751: ,p_count => x_msg_count
3752: ,p_data => x_msg_data);
3753:
3757: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3758: ,p_count => x_msg_count
3759: ,p_data => x_msg_data);
3760: -- notify caller of an UNEXPECTED error
3761: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3762:
3763: END delete_acct_lines;
3764:
3765:
3786:
3787: BEGIN
3788:
3789: SAVEPOINT validate_acct_lines;
3790: x_return_status := FND_API.G_RET_STS_SUCCESS;
3791:
3792:
3793:
3794: -- customer pre-processing
3824: ,p_aelv_rec => l_aelv_rec
3825:
3826: );
3827:
3828: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3829: RAISE FND_API.G_EXC_ERROR;
3830: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3831: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3832: END IF;
3825:
3826: );
3827:
3828: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3829: RAISE FND_API.G_EXC_ERROR;
3830: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3831: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3832: END IF;
3833:
3826: );
3827:
3828: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3829: RAISE FND_API.G_EXC_ERROR;
3830: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3831: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3832: END IF;
3833:
3834:
3827:
3828: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3829: RAISE FND_API.G_EXC_ERROR;
3830: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3831: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3832: END IF;
3833:
3834:
3835:
3848:
3849:
3850: EXCEPTION
3851:
3852: WHEN FND_API.G_EXC_ERROR THEN
3853: ROLLBACK TO validate_acct_lines;
3854: x_return_status := FND_API.G_RET_STS_ERROR;
3855:
3856: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3850: EXCEPTION
3851:
3852: WHEN FND_API.G_EXC_ERROR THEN
3853: ROLLBACK TO validate_acct_lines;
3854: x_return_status := FND_API.G_RET_STS_ERROR;
3855:
3856: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3857: ,p_count => x_msg_count
3858: ,p_data => x_msg_data);
3856: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3857: ,p_count => x_msg_count
3858: ,p_data => x_msg_data);
3859:
3860: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3861: ROLLBACK TO validate_acct_lines;
3862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3863: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3864: ,p_count => x_msg_count
3858: ,p_data => x_msg_data);
3859:
3860: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3861: ROLLBACK TO validate_acct_lines;
3862: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3863: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3864: ,p_count => x_msg_count
3865: ,p_data => x_msg_data);
3866:
3870: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3871: ,p_count => x_msg_count
3872: ,p_data => x_msg_data);
3873: -- notify caller of an UNEXPECTED error
3874: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3875:
3876: END validate_acct_lines;
3877:
3878:
3905:
3906: --Initialize the return status
3907:
3908: SAVEPOINT validate_acct_lines;
3909: x_return_status := FND_API.G_RET_STS_SUCCESS;
3910:
3911:
3912:
3913: -- customer pre-processing
3959: END IF;
3960:
3961: x_return_status := l_overall_status;
3962:
3963: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3964: RAISE FND_API.G_EXC_ERROR;
3965: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3966: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3967: END IF;
3960:
3961: x_return_status := l_overall_status;
3962:
3963: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3964: RAISE FND_API.G_EXC_ERROR;
3965: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3966: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3967: END IF;
3968:
3961: x_return_status := l_overall_status;
3962:
3963: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3964: RAISE FND_API.G_EXC_ERROR;
3965: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3966: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3967: END IF;
3968:
3969:
3962:
3963: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
3964: RAISE FND_API.G_EXC_ERROR;
3965: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3966: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3967: END IF;
3968:
3969:
3970: -- vertical industry-post-processing
3980:
3981:
3982: EXCEPTION
3983:
3984: WHEN FND_API.G_EXC_ERROR THEN
3985: ROLLBACK TO validate_acct_lines;
3986: x_return_status := FND_API.G_RET_STS_ERROR;
3987:
3988: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3982: EXCEPTION
3983:
3984: WHEN FND_API.G_EXC_ERROR THEN
3985: ROLLBACK TO validate_acct_lines;
3986: x_return_status := FND_API.G_RET_STS_ERROR;
3987:
3988: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3989: ,p_count => x_msg_count
3990: ,p_data => x_msg_data);
3988: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3989: ,p_count => x_msg_count
3990: ,p_data => x_msg_data);
3991:
3992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3993: ROLLBACK TO validate_acct_lines;
3994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3995: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3996: ,p_count => x_msg_count
3990: ,p_data => x_msg_data);
3991:
3992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3993: ROLLBACK TO validate_acct_lines;
3994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3995: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
3996: ,p_count => x_msg_count
3997: ,p_data => x_msg_data);
3998:
4002: FND_MSG_PUB.Count_and_get(p_encoded => OKC_API.G_FALSE
4003: ,p_count => x_msg_count
4004: ,p_data => x_msg_data);
4005: -- notify caller of an UNEXPECTED error
4006: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4007:
4008: END validate_acct_lines;
4009:
4010: