145: WHERE lrtv.id = p_id;
146: x_return_status := g_ret_sts_success;
147: RETURN l_lrtv_rec;
148: EXCEPTION
149: WHEN okl_api.g_exception_error THEN
150: x_return_status := g_ret_sts_error;
151: WHEN okl_api.g_exception_unexpected_error THEN
152: x_return_status := g_ret_sts_unexp_error;
153: WHEN OTHERS THEN
147: RETURN l_lrtv_rec;
148: EXCEPTION
149: WHEN okl_api.g_exception_error THEN
150: x_return_status := g_ret_sts_error;
151: WHEN okl_api.g_exception_unexpected_error THEN
152: x_return_status := g_ret_sts_unexp_error;
153: WHEN OTHERS THEN
154: okl_api.set_message(p_app_name => g_app_name
155: ,p_msg_name => g_db_error
150: x_return_status := g_ret_sts_error;
151: WHEN okl_api.g_exception_unexpected_error THEN
152: x_return_status := g_ret_sts_unexp_error;
153: WHEN OTHERS THEN
154: okl_api.set_message(p_app_name => g_app_name
155: ,p_msg_name => g_db_error
156: ,p_token1 => g_prog_name_token
157: ,p_token1_value => l_api_name
158: ,p_token2 => g_sqlcode_token
340:
341: BEGIN
342:
343: IF p_id IS NULL THEN
344: okl_api.set_message(p_app_name => g_app_name
345: ,p_msg_name => g_required_value
346: ,p_token1 => g_col_name_token
347: ,p_token1_value => 'id');
348: RAISE okl_api.g_exception_error;
344: okl_api.set_message(p_app_name => g_app_name
345: ,p_msg_name => g_required_value
346: ,p_token1 => g_col_name_token
347: ,p_token1_value => 'id');
348: RAISE okl_api.g_exception_error;
349: END IF;
350: x_return_status := g_ret_sts_success;
351: EXCEPTION
352: WHEN okl_api.g_exception_error THEN
348: RAISE okl_api.g_exception_error;
349: END IF;
350: x_return_status := g_ret_sts_success;
351: EXCEPTION
352: WHEN okl_api.g_exception_error THEN
353: x_return_status := g_ret_sts_error;
354: WHEN okl_api.g_exception_unexpected_error THEN
355: x_return_status := g_ret_sts_unexp_error;
356: WHEN OTHERS THEN
350: x_return_status := g_ret_sts_success;
351: EXCEPTION
352: WHEN okl_api.g_exception_error THEN
353: x_return_status := g_ret_sts_error;
354: WHEN okl_api.g_exception_unexpected_error THEN
355: x_return_status := g_ret_sts_unexp_error;
356: WHEN OTHERS THEN
357: okl_api.set_message(p_app_name => g_app_name
358: ,p_msg_name => g_db_error
353: x_return_status := g_ret_sts_error;
354: WHEN okl_api.g_exception_unexpected_error THEN
355: x_return_status := g_ret_sts_unexp_error;
356: WHEN OTHERS THEN
357: okl_api.set_message(p_app_name => g_app_name
358: ,p_msg_name => g_db_error
359: ,p_token1 => g_prog_name_token
360: ,p_token1_value => l_api_name
361: ,p_token2 => g_sqlcode_token
371:
372: BEGIN
373:
374: IF (p_object_version_number IS NULL) OR (p_object_version_number = g_miss_num) THEN
375: okl_api.set_message(p_app_name => g_app_name
376: ,p_msg_name => g_required_value
377: ,p_token1 => g_col_name_token
378: ,p_token1_value => 'object_version_number');
379: RAISE okl_api.g_exception_error;
375: okl_api.set_message(p_app_name => g_app_name
376: ,p_msg_name => g_required_value
377: ,p_token1 => g_col_name_token
378: ,p_token1_value => 'object_version_number');
379: RAISE okl_api.g_exception_error;
380: END IF;
381: x_return_status := g_ret_sts_success;
382: EXCEPTION
383: WHEN okl_api.g_exception_error THEN
379: RAISE okl_api.g_exception_error;
380: END IF;
381: x_return_status := g_ret_sts_success;
382: EXCEPTION
383: WHEN okl_api.g_exception_error THEN
384: x_return_status := g_ret_sts_error;
385: WHEN okl_api.g_exception_unexpected_error THEN
386: x_return_status := g_ret_sts_unexp_error;
387: WHEN OTHERS THEN
381: x_return_status := g_ret_sts_success;
382: EXCEPTION
383: WHEN okl_api.g_exception_error THEN
384: x_return_status := g_ret_sts_error;
385: WHEN okl_api.g_exception_unexpected_error THEN
386: x_return_status := g_ret_sts_unexp_error;
387: WHEN OTHERS THEN
388: okl_api.set_message(p_app_name => g_app_name
389: ,p_msg_name => g_db_error
384: x_return_status := g_ret_sts_error;
385: WHEN okl_api.g_exception_unexpected_error THEN
386: x_return_status := g_ret_sts_unexp_error;
387: WHEN OTHERS THEN
388: okl_api.set_message(p_app_name => g_app_name
389: ,p_msg_name => g_db_error
390: ,p_token1 => g_prog_name_token
391: ,p_token1_value => l_api_name
392: ,p_token2 => g_sqlcode_token
406:
407: BEGIN
408:
409: IF p_rate IS NULL THEN
410: okl_api.set_message(p_app_name => g_app_name
411: ,p_msg_name => g_required_value
412: ,p_token1 => g_col_name_token
413: ,p_token1_value => 'rate');
414: RAISE okl_api.g_exception_error;
410: okl_api.set_message(p_app_name => g_app_name
411: ,p_msg_name => g_required_value
412: ,p_token1 => g_col_name_token
413: ,p_token1_value => 'rate');
414: RAISE okl_api.g_exception_error;
415: END IF;
416: x_return_status := g_ret_sts_success;
417: EXCEPTION
418: WHEN okl_api.g_exception_error THEN
414: RAISE okl_api.g_exception_error;
415: END IF;
416: x_return_status := g_ret_sts_success;
417: EXCEPTION
418: WHEN okl_api.g_exception_error THEN
419: x_return_status := g_ret_sts_error;
420: WHEN okl_api.g_exception_unexpected_error THEN
421: x_return_status := g_ret_sts_unexp_error;
422: WHEN OTHERS THEN
416: x_return_status := g_ret_sts_success;
417: EXCEPTION
418: WHEN okl_api.g_exception_error THEN
419: x_return_status := g_ret_sts_error;
420: WHEN okl_api.g_exception_unexpected_error THEN
421: x_return_status := g_ret_sts_unexp_error;
422: WHEN OTHERS THEN
423: okl_api.set_message(p_app_name => g_app_name
424: ,p_msg_name => g_db_error
419: x_return_status := g_ret_sts_error;
420: WHEN okl_api.g_exception_unexpected_error THEN
421: x_return_status := g_ret_sts_unexp_error;
422: WHEN OTHERS THEN
423: okl_api.set_message(p_app_name => g_app_name
424: ,p_msg_name => g_db_error
425: ,p_token1 => g_prog_name_token
426: ,p_token1_value => l_api_name
427: ,p_token2 => g_sqlcode_token
447:
448: BEGIN
449:
450: IF p_arrears_yn IS NULL THEN
451: okl_api.set_message(p_app_name => g_app_name
452: ,p_msg_name => g_required_value
453: ,p_token1 => g_col_name_token
454: ,p_token1_value => 'arrears_yn');
455: RAISE okl_api.g_exception_error;
451: okl_api.set_message(p_app_name => g_app_name
452: ,p_msg_name => g_required_value
453: ,p_token1 => g_col_name_token
454: ,p_token1_value => 'arrears_yn');
455: RAISE okl_api.g_exception_error;
456: END IF;
457: OPEN c_yes_no;
458: FETCH c_yes_no INTO l_dummy ;
459: CLOSE c_yes_no;
458: FETCH c_yes_no INTO l_dummy ;
459: CLOSE c_yes_no;
460:
461: IF l_dummy IS NULL THEN
462: okl_api.set_message(p_app_name => g_app_name
463: ,p_msg_name => g_invalid_value
464: ,p_token1 => g_col_name_token
465: ,p_token1_value => 'arrears_yn');
466: RAISE okl_api.g_exception_error;
462: okl_api.set_message(p_app_name => g_app_name
463: ,p_msg_name => g_invalid_value
464: ,p_token1 => g_col_name_token
465: ,p_token1_value => 'arrears_yn');
466: RAISE okl_api.g_exception_error;
467: END IF;
468: x_return_status := g_ret_sts_success;
469: EXCEPTION
470: WHEN okl_api.g_exception_error THEN
466: RAISE okl_api.g_exception_error;
467: END IF;
468: x_return_status := g_ret_sts_success;
469: EXCEPTION
470: WHEN okl_api.g_exception_error THEN
471: x_return_status := g_ret_sts_error;
472: WHEN okl_api.g_exception_unexpected_error THEN
473: x_return_status := g_ret_sts_unexp_error;
474: WHEN OTHERS THEN
468: x_return_status := g_ret_sts_success;
469: EXCEPTION
470: WHEN okl_api.g_exception_error THEN
471: x_return_status := g_ret_sts_error;
472: WHEN okl_api.g_exception_unexpected_error THEN
473: x_return_status := g_ret_sts_unexp_error;
474: WHEN OTHERS THEN
475: okl_api.set_message(p_app_name => g_app_name
476: ,p_msg_name => g_db_error
471: x_return_status := g_ret_sts_error;
472: WHEN okl_api.g_exception_unexpected_error THEN
473: x_return_status := g_ret_sts_unexp_error;
474: WHEN OTHERS THEN
475: okl_api.set_message(p_app_name => g_app_name
476: ,p_msg_name => g_db_error
477: ,p_token1 => g_prog_name_token
478: ,p_token1_value => l_api_name
479: ,p_token2 => g_sqlcode_token
499:
500: BEGIN
501:
502: IF p_frq_code IS NULL THEN
503: okl_api.set_message(p_app_name => g_app_name
504: ,p_msg_name => g_required_value
505: ,p_token1 => g_col_name_token
506: ,p_token1_value => 'frq_code');
507: RAISE okl_api.g_exception_error;
503: okl_api.set_message(p_app_name => g_app_name
504: ,p_msg_name => g_required_value
505: ,p_token1 => g_col_name_token
506: ,p_token1_value => 'frq_code');
507: RAISE okl_api.g_exception_error;
508: END IF;
509: OPEN c_frq_code;
510: FETCH c_frq_code INTO l_dummy ;
511: CLOSE c_frq_code;
510: FETCH c_frq_code INTO l_dummy ;
511: CLOSE c_frq_code;
512:
513: IF l_dummy IS NULL THEN
514: okl_api.set_message(p_app_name => g_app_name
515: ,p_msg_name => g_invalid_value
516: ,p_token1 => g_col_name_token
517: ,p_token1_value => 'frq_code');
518: RAISE okl_api.g_exception_error;
514: okl_api.set_message(p_app_name => g_app_name
515: ,p_msg_name => g_invalid_value
516: ,p_token1 => g_col_name_token
517: ,p_token1_value => 'frq_code');
518: RAISE okl_api.g_exception_error;
519: END IF;
520: x_return_status := g_ret_sts_success;
521: EXCEPTION
522: WHEN okl_api.g_exception_error THEN
518: RAISE okl_api.g_exception_error;
519: END IF;
520: x_return_status := g_ret_sts_success;
521: EXCEPTION
522: WHEN okl_api.g_exception_error THEN
523: x_return_status := g_ret_sts_error;
524: WHEN okl_api.g_exception_unexpected_error THEN
525: x_return_status := g_ret_sts_unexp_error;
526: WHEN OTHERS THEN
520: x_return_status := g_ret_sts_success;
521: EXCEPTION
522: WHEN okl_api.g_exception_error THEN
523: x_return_status := g_ret_sts_error;
524: WHEN okl_api.g_exception_unexpected_error THEN
525: x_return_status := g_ret_sts_unexp_error;
526: WHEN OTHERS THEN
527: okl_api.set_message(p_app_name => g_app_name
528: ,p_msg_name => g_db_error
523: x_return_status := g_ret_sts_error;
524: WHEN okl_api.g_exception_unexpected_error THEN
525: x_return_status := g_ret_sts_unexp_error;
526: WHEN OTHERS THEN
527: okl_api.set_message(p_app_name => g_app_name
528: ,p_msg_name => g_db_error
529: ,p_token1 => g_prog_name_token
530: ,p_token1_value => l_api_name
531: ,p_token2 => g_sqlcode_token
545:
546: BEGIN
547:
548: IF p_name IS NULL THEN
549: okl_api.set_message(p_app_name => g_app_name
550: ,p_msg_name => g_required_value
551: ,p_token1 => g_col_name_token
552: ,p_token1_value => 'name');
553: RAISE okl_api.g_exception_error;
549: okl_api.set_message(p_app_name => g_app_name
550: ,p_msg_name => g_required_value
551: ,p_token1 => g_col_name_token
552: ,p_token1_value => 'name');
553: RAISE okl_api.g_exception_error;
554: END IF;
555: x_return_status := g_ret_sts_success;
556: EXCEPTION
557: WHEN okl_api.g_exception_error THEN
553: RAISE okl_api.g_exception_error;
554: END IF;
555: x_return_status := g_ret_sts_success;
556: EXCEPTION
557: WHEN okl_api.g_exception_error THEN
558: x_return_status := g_ret_sts_error;
559: WHEN okl_api.g_exception_unexpected_error THEN
560: x_return_status := g_ret_sts_unexp_error;
561: WHEN OTHERS THEN
555: x_return_status := g_ret_sts_success;
556: EXCEPTION
557: WHEN okl_api.g_exception_error THEN
558: x_return_status := g_ret_sts_error;
559: WHEN okl_api.g_exception_unexpected_error THEN
560: x_return_status := g_ret_sts_unexp_error;
561: WHEN OTHERS THEN
562: okl_api.set_message(p_app_name => g_app_name
563: ,p_msg_name => g_db_error
558: x_return_status := g_ret_sts_error;
559: WHEN okl_api.g_exception_unexpected_error THEN
560: x_return_status := g_ret_sts_unexp_error;
561: WHEN OTHERS THEN
562: okl_api.set_message(p_app_name => g_app_name
563: ,p_msg_name => g_db_error
564: ,p_token1 => g_prog_name_token
565: ,p_token1_value => l_api_name
566: ,p_token2 => g_sqlcode_token
586:
587: BEGIN
588:
589: IF p_type_code IS NULL THEN
590: okl_api.set_message(p_app_name => g_app_name
591: ,p_msg_name => g_required_value
592: ,p_token1 => g_col_name_token
593: ,p_token1_value => 'LRS_TYPE_CODE');
594: RAISE okl_api.g_exception_error;
590: okl_api.set_message(p_app_name => g_app_name
591: ,p_msg_name => g_required_value
592: ,p_token1 => g_col_name_token
593: ,p_token1_value => 'LRS_TYPE_CODE');
594: RAISE okl_api.g_exception_error;
595: END IF;
596: OPEN c_type_code;
597: FETCH c_type_code INTO l_dummy ;
598: CLOSE c_type_code;
597: FETCH c_type_code INTO l_dummy ;
598: CLOSE c_type_code;
599:
600: IF l_dummy = '?' THEN
601: okl_api.set_message(p_app_name => g_app_name
602: ,p_msg_name => g_invalid_value
603: ,p_token1 => g_col_name_token
604: ,p_token1_value => 'LRS_TYPE_CODE');
605: RAISE okl_api.g_exception_error;
601: okl_api.set_message(p_app_name => g_app_name
602: ,p_msg_name => g_invalid_value
603: ,p_token1 => g_col_name_token
604: ,p_token1_value => 'LRS_TYPE_CODE');
605: RAISE okl_api.g_exception_error;
606: END IF;
607: x_return_status := g_ret_sts_success;
608: EXCEPTION
609: WHEN okl_api.g_exception_error THEN
605: RAISE okl_api.g_exception_error;
606: END IF;
607: x_return_status := g_ret_sts_success;
608: EXCEPTION
609: WHEN okl_api.g_exception_error THEN
610: x_return_status := g_ret_sts_error;
611: WHEN okl_api.g_exception_unexpected_error THEN
612: x_return_status := g_ret_sts_unexp_error;
613: WHEN OTHERS THEN
607: x_return_status := g_ret_sts_success;
608: EXCEPTION
609: WHEN okl_api.g_exception_error THEN
610: x_return_status := g_ret_sts_error;
611: WHEN okl_api.g_exception_unexpected_error THEN
612: x_return_status := g_ret_sts_unexp_error;
613: WHEN OTHERS THEN
614: okl_api.set_message(p_app_name => g_app_name
615: ,p_msg_name => g_db_error
610: x_return_status := g_ret_sts_error;
611: WHEN okl_api.g_exception_unexpected_error THEN
612: x_return_status := g_ret_sts_unexp_error;
613: WHEN OTHERS THEN
614: okl_api.set_message(p_app_name => g_app_name
615: ,p_msg_name => g_db_error
616: ,p_token1 => g_prog_name_token
617: ,p_token1_value => l_api_name
618: ,p_token2 => g_sqlcode_token
638:
639: BEGIN
640:
641: IF p_sts_code IS NULL THEN
642: okl_api.set_message(p_app_name => g_app_name
643: ,p_msg_name => g_required_value
644: ,p_token1 => g_col_name_token
645: ,p_token1_value => 'STS_CODE');
646: RAISE okl_api.g_exception_error;
642: okl_api.set_message(p_app_name => g_app_name
643: ,p_msg_name => g_required_value
644: ,p_token1 => g_col_name_token
645: ,p_token1_value => 'STS_CODE');
646: RAISE okl_api.g_exception_error;
647: END IF;
648: OPEN c_sts_code;
649: FETCH c_sts_code INTO l_dummy ;
650: CLOSE c_sts_code;
649: FETCH c_sts_code INTO l_dummy ;
650: CLOSE c_sts_code;
651:
652: IF l_dummy IS NULL THEN
653: okl_api.set_message(p_app_name => g_app_name
654: ,p_msg_name => g_invalid_value
655: ,p_token1 => g_col_name_token
656: ,p_token1_value => 'STS_CODE');
657: RAISE okl_api.g_exception_error;
653: okl_api.set_message(p_app_name => g_app_name
654: ,p_msg_name => g_invalid_value
655: ,p_token1 => g_col_name_token
656: ,p_token1_value => 'STS_CODE');
657: RAISE okl_api.g_exception_error;
658: END IF;
659: x_return_status := g_ret_sts_success;
660: EXCEPTION
661: WHEN okl_api.g_exception_error THEN
657: RAISE okl_api.g_exception_error;
658: END IF;
659: x_return_status := g_ret_sts_success;
660: EXCEPTION
661: WHEN okl_api.g_exception_error THEN
662: x_return_status := g_ret_sts_error;
663: WHEN okl_api.g_exception_unexpected_error THEN
664: x_return_status := g_ret_sts_unexp_error;
665: WHEN OTHERS THEN
659: x_return_status := g_ret_sts_success;
660: EXCEPTION
661: WHEN okl_api.g_exception_error THEN
662: x_return_status := g_ret_sts_error;
663: WHEN okl_api.g_exception_unexpected_error THEN
664: x_return_status := g_ret_sts_unexp_error;
665: WHEN OTHERS THEN
666: okl_api.set_message(p_app_name => g_app_name
667: ,p_msg_name => g_db_error
662: x_return_status := g_ret_sts_error;
663: WHEN okl_api.g_exception_unexpected_error THEN
664: x_return_status := g_ret_sts_unexp_error;
665: WHEN OTHERS THEN
666: okl_api.set_message(p_app_name => g_app_name
667: ,p_msg_name => g_db_error
668: ,p_token1 => g_prog_name_token
669: ,p_token1_value => l_api_name
670: ,p_token2 => g_sqlcode_token
685:
686: BEGIN
687: l_return_status := okl_util.check_org_id(p_org_id, 'N');
688:
689: IF (l_return_status = okl_api.g_ret_sts_error) THEN
690: okl_api.set_message(p_app_name => g_app_name
691: ,p_msg_name => g_invalid_value
692: ,p_token1 => g_col_name_token
693: ,p_token1_value => 'org_id');
686: BEGIN
687: l_return_status := okl_util.check_org_id(p_org_id, 'N');
688:
689: IF (l_return_status = okl_api.g_ret_sts_error) THEN
690: okl_api.set_message(p_app_name => g_app_name
691: ,p_msg_name => g_invalid_value
692: ,p_token1 => g_col_name_token
693: ,p_token1_value => 'org_id');
694: RAISE okl_api.g_exception_error;
690: okl_api.set_message(p_app_name => g_app_name
691: ,p_msg_name => g_invalid_value
692: ,p_token1 => g_col_name_token
693: ,p_token1_value => 'org_id');
694: RAISE okl_api.g_exception_error;
695: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
696:
697: RAISE okl_api.g_exception_unexpected_error;
698: END IF;
691: ,p_msg_name => g_invalid_value
692: ,p_token1 => g_col_name_token
693: ,p_token1_value => 'org_id');
694: RAISE okl_api.g_exception_error;
695: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
696:
697: RAISE okl_api.g_exception_unexpected_error;
698: END IF;
699: x_return_status := g_ret_sts_success;
693: ,p_token1_value => 'org_id');
694: RAISE okl_api.g_exception_error;
695: ELSIF (l_return_status = okl_api.g_ret_sts_unexp_error) THEN
696:
697: RAISE okl_api.g_exception_unexpected_error;
698: END IF;
699: x_return_status := g_ret_sts_success;
700: EXCEPTION
701: WHEN okl_api.g_exception_error THEN
697: RAISE okl_api.g_exception_unexpected_error;
698: END IF;
699: x_return_status := g_ret_sts_success;
700: EXCEPTION
701: WHEN okl_api.g_exception_error THEN
702: x_return_status := g_ret_sts_error;
703: WHEN okl_api.g_exception_unexpected_error THEN
704: x_return_status := g_ret_sts_unexp_error;
705: WHEN OTHERS THEN
699: x_return_status := g_ret_sts_success;
700: EXCEPTION
701: WHEN okl_api.g_exception_error THEN
702: x_return_status := g_ret_sts_error;
703: WHEN okl_api.g_exception_unexpected_error THEN
704: x_return_status := g_ret_sts_unexp_error;
705: WHEN OTHERS THEN
706: okl_api.set_message(p_app_name => g_app_name
707: ,p_msg_name => g_db_error
702: x_return_status := g_ret_sts_error;
703: WHEN okl_api.g_exception_unexpected_error THEN
704: x_return_status := g_ret_sts_unexp_error;
705: WHEN OTHERS THEN
706: okl_api.set_message(p_app_name => g_app_name
707: ,p_msg_name => g_db_error
708: ,p_token1 => g_prog_name_token
709: ,p_token1_value => l_api_name
710: ,p_token2 => g_sqlcode_token
730:
731: BEGIN
732:
733: IF p_end_of_term_id IS NULL THEN
734: okl_api.set_message(p_app_name => g_app_name
735: ,p_msg_name => g_required_value
736: ,p_token1 => g_col_name_token
737: ,p_token1_value => 'END_OF_TERM_ID');
738: RAISE okl_api.g_exception_error;
734: okl_api.set_message(p_app_name => g_app_name
735: ,p_msg_name => g_required_value
736: ,p_token1 => g_col_name_token
737: ,p_token1_value => 'END_OF_TERM_ID');
738: RAISE okl_api.g_exception_error;
739: END IF;
740: OPEN c_end_of_term_id;
741: FETCH c_end_of_term_id INTO l_dummy ;
742: CLOSE c_end_of_term_id;
741: FETCH c_end_of_term_id INTO l_dummy ;
742: CLOSE c_end_of_term_id;
743:
744: IF l_dummy = '?' THEN
745: okl_api.set_message(p_app_name => okl_api.g_app_name
746: ,p_msg_name => 'OKC_NO_PARENT_RECORD'
747: ,p_token1 => okl_api.g_col_name_token
748: ,p_token1_value => 'END_OF_TERM_ID'
749: ,p_token2 => okl_api.g_child_table_token
743:
744: IF l_dummy = '?' THEN
745: okl_api.set_message(p_app_name => okl_api.g_app_name
746: ,p_msg_name => 'OKC_NO_PARENT_RECORD'
747: ,p_token1 => okl_api.g_col_name_token
748: ,p_token1_value => 'END_OF_TERM_ID'
749: ,p_token2 => okl_api.g_child_table_token
750: ,p_token2_value => 'OKL_LS_RT_FCTR_SETS_B'
751: ,p_token3 => okl_api.g_parent_table_token
745: okl_api.set_message(p_app_name => okl_api.g_app_name
746: ,p_msg_name => 'OKC_NO_PARENT_RECORD'
747: ,p_token1 => okl_api.g_col_name_token
748: ,p_token1_value => 'END_OF_TERM_ID'
749: ,p_token2 => okl_api.g_child_table_token
750: ,p_token2_value => 'OKL_LS_RT_FCTR_SETS_B'
751: ,p_token3 => okl_api.g_parent_table_token
752: ,p_token3_value => 'OKL_FE_EO_TERMS_V');
753: RAISE okl_api.g_exception_error;
747: ,p_token1 => okl_api.g_col_name_token
748: ,p_token1_value => 'END_OF_TERM_ID'
749: ,p_token2 => okl_api.g_child_table_token
750: ,p_token2_value => 'OKL_LS_RT_FCTR_SETS_B'
751: ,p_token3 => okl_api.g_parent_table_token
752: ,p_token3_value => 'OKL_FE_EO_TERMS_V');
753: RAISE okl_api.g_exception_error;
754: END IF;
755: x_return_status := g_ret_sts_success;
749: ,p_token2 => okl_api.g_child_table_token
750: ,p_token2_value => 'OKL_LS_RT_FCTR_SETS_B'
751: ,p_token3 => okl_api.g_parent_table_token
752: ,p_token3_value => 'OKL_FE_EO_TERMS_V');
753: RAISE okl_api.g_exception_error;
754: END IF;
755: x_return_status := g_ret_sts_success;
756: EXCEPTION
757: WHEN okl_api.g_exception_error THEN
753: RAISE okl_api.g_exception_error;
754: END IF;
755: x_return_status := g_ret_sts_success;
756: EXCEPTION
757: WHEN okl_api.g_exception_error THEN
758: x_return_status := g_ret_sts_error;
759: WHEN okl_api.g_exception_unexpected_error THEN
760: x_return_status := g_ret_sts_unexp_error;
761: WHEN OTHERS THEN
755: x_return_status := g_ret_sts_success;
756: EXCEPTION
757: WHEN okl_api.g_exception_error THEN
758: x_return_status := g_ret_sts_error;
759: WHEN okl_api.g_exception_unexpected_error THEN
760: x_return_status := g_ret_sts_unexp_error;
761: WHEN OTHERS THEN
762: okl_api.set_message(p_app_name => g_app_name
763: ,p_msg_name => g_db_error
758: x_return_status := g_ret_sts_error;
759: WHEN okl_api.g_exception_unexpected_error THEN
760: x_return_status := g_ret_sts_unexp_error;
761: WHEN OTHERS THEN
762: okl_api.set_message(p_app_name => g_app_name
763: ,p_msg_name => g_db_error
764: ,p_token1 => g_prog_name_token
765: ,p_token1_value => l_api_name
766: ,p_token2 => g_sqlcode_token
780:
781: BEGIN
782:
783: IF p_currency_code IS NULL THEN
784: okl_api.set_message(p_app_name => g_app_name
785: ,p_msg_name => g_required_value
786: ,p_token1 => g_col_name_token
787: ,p_token1_value => 'currency_code');
788: RAISE okl_api.g_exception_error;
784: okl_api.set_message(p_app_name => g_app_name
785: ,p_msg_name => g_required_value
786: ,p_token1 => g_col_name_token
787: ,p_token1_value => 'currency_code');
788: RAISE okl_api.g_exception_error;
789: END IF;
790: x_return_status := g_ret_sts_success;
791: EXCEPTION
792: WHEN okl_api.g_exception_error THEN
788: RAISE okl_api.g_exception_error;
789: END IF;
790: x_return_status := g_ret_sts_success;
791: EXCEPTION
792: WHEN okl_api.g_exception_error THEN
793: x_return_status := g_ret_sts_error;
794: WHEN okl_api.g_exception_unexpected_error THEN
795: x_return_status := g_ret_sts_unexp_error;
796: WHEN OTHERS THEN
790: x_return_status := g_ret_sts_success;
791: EXCEPTION
792: WHEN okl_api.g_exception_error THEN
793: x_return_status := g_ret_sts_error;
794: WHEN okl_api.g_exception_unexpected_error THEN
795: x_return_status := g_ret_sts_unexp_error;
796: WHEN OTHERS THEN
797: okl_api.set_message(p_app_name => g_app_name
798: ,p_msg_name => g_db_error
793: x_return_status := g_ret_sts_error;
794: WHEN okl_api.g_exception_unexpected_error THEN
795: x_return_status := g_ret_sts_unexp_error;
796: WHEN OTHERS THEN
797: okl_api.set_message(p_app_name => g_app_name
798: ,p_msg_name => g_db_error
799: ,p_token1 => g_prog_name_token
800: ,p_token1_value => l_api_name
801: ,p_token2 => g_sqlcode_token
819:
820: validate_id(x_return_status, p_lrtv_rec.id);
821:
822: IF x_return_status = g_ret_sts_error THEN
823: RAISE okl_api.g_exception_error;
824: ELSIF x_return_status = g_ret_sts_unexp_error THEN
825: RAISE okl_api.g_exception_unexpected_error;
826: END IF;
827:
821:
822: IF x_return_status = g_ret_sts_error THEN
823: RAISE okl_api.g_exception_error;
824: ELSIF x_return_status = g_ret_sts_unexp_error THEN
825: RAISE okl_api.g_exception_unexpected_error;
826: END IF;
827:
828: --
829:
830: validate_object_version_number(x_return_status
831: ,p_lrtv_rec.object_version_number);
832:
833: IF x_return_status = g_ret_sts_error THEN
834: RAISE okl_api.g_exception_error;
835: ELSIF x_return_status = g_ret_sts_unexp_error THEN
836: RAISE okl_api.g_exception_unexpected_error;
837: END IF;
838:
832:
833: IF x_return_status = g_ret_sts_error THEN
834: RAISE okl_api.g_exception_error;
835: ELSIF x_return_status = g_ret_sts_unexp_error THEN
836: RAISE okl_api.g_exception_unexpected_error;
837: END IF;
838:
839: validate_frq_code(x_return_status, p_lrtv_rec.frq_code);
840:
838:
839: validate_frq_code(x_return_status, p_lrtv_rec.frq_code);
840:
841: IF x_return_status = g_ret_sts_error THEN
842: RAISE okl_api.g_exception_error;
843: ELSIF x_return_status = g_ret_sts_unexp_error THEN
844: RAISE okl_api.g_exception_unexpected_error;
845: END IF;
846:
840:
841: IF x_return_status = g_ret_sts_error THEN
842: RAISE okl_api.g_exception_error;
843: ELSIF x_return_status = g_ret_sts_unexp_error THEN
844: RAISE okl_api.g_exception_unexpected_error;
845: END IF;
846:
847: validate_name(x_return_status, p_lrtv_rec.name);
848:
846:
847: validate_name(x_return_status, p_lrtv_rec.name);
848:
849: IF x_return_status = g_ret_sts_error THEN
850: RAISE okl_api.g_exception_error;
851: ELSIF x_return_status = g_ret_sts_unexp_error THEN
852: RAISE okl_api.g_exception_unexpected_error;
853: END IF;
854:
848:
849: IF x_return_status = g_ret_sts_error THEN
850: RAISE okl_api.g_exception_error;
851: ELSIF x_return_status = g_ret_sts_unexp_error THEN
852: RAISE okl_api.g_exception_unexpected_error;
853: END IF;
854:
855: validate_sts_code(x_return_status, p_lrtv_rec.sts_code);
856:
854:
855: validate_sts_code(x_return_status, p_lrtv_rec.sts_code);
856:
857: IF x_return_status = g_ret_sts_error THEN
858: RAISE okl_api.g_exception_error;
859: ELSIF x_return_status = g_ret_sts_unexp_error THEN
860: RAISE okl_api.g_exception_unexpected_error;
861: END IF;
862: validate_lrs_type_code(x_return_status, p_lrtv_rec.lrs_type_code);
856:
857: IF x_return_status = g_ret_sts_error THEN
858: RAISE okl_api.g_exception_error;
859: ELSIF x_return_status = g_ret_sts_unexp_error THEN
860: RAISE okl_api.g_exception_unexpected_error;
861: END IF;
862: validate_lrs_type_code(x_return_status, p_lrtv_rec.lrs_type_code);
863:
864: IF x_return_status = g_ret_sts_error THEN
861: END IF;
862: validate_lrs_type_code(x_return_status, p_lrtv_rec.lrs_type_code);
863:
864: IF x_return_status = g_ret_sts_error THEN
865: RAISE okl_api.g_exception_error;
866: ELSIF x_return_status = g_ret_sts_unexp_error THEN
867: RAISE okl_api.g_exception_unexpected_error;
868: END IF;
869:
863:
864: IF x_return_status = g_ret_sts_error THEN
865: RAISE okl_api.g_exception_error;
866: ELSIF x_return_status = g_ret_sts_unexp_error THEN
867: RAISE okl_api.g_exception_unexpected_error;
868: END IF;
869:
870: validate_org_id(x_return_status, p_lrtv_rec.org_id);
871:
869:
870: validate_org_id(x_return_status, p_lrtv_rec.org_id);
871:
872: IF x_return_status = g_ret_sts_error THEN
873: RAISE okl_api.g_exception_error;
874: ELSIF x_return_status = g_ret_sts_unexp_error THEN
875: RAISE okl_api.g_exception_unexpected_error;
876: END IF;
877: validate_end_of_term_id(x_return_status, p_lrtv_rec.end_of_term_id);
871:
872: IF x_return_status = g_ret_sts_error THEN
873: RAISE okl_api.g_exception_error;
874: ELSIF x_return_status = g_ret_sts_unexp_error THEN
875: RAISE okl_api.g_exception_unexpected_error;
876: END IF;
877: validate_end_of_term_id(x_return_status, p_lrtv_rec.end_of_term_id);
878:
879: IF x_return_status = g_ret_sts_error THEN
876: END IF;
877: validate_end_of_term_id(x_return_status, p_lrtv_rec.end_of_term_id);
878:
879: IF x_return_status = g_ret_sts_error THEN
880: RAISE okl_api.g_exception_error;
881: ELSIF x_return_status = g_ret_sts_unexp_error THEN
882: RAISE okl_api.g_exception_unexpected_error;
883: END IF;
884:
878:
879: IF x_return_status = g_ret_sts_error THEN
880: RAISE okl_api.g_exception_error;
881: ELSIF x_return_status = g_ret_sts_unexp_error THEN
882: RAISE okl_api.g_exception_unexpected_error;
883: END IF;
884:
885: validate_currency_code(x_return_status, p_lrtv_rec.currency_code);
886:
884:
885: validate_currency_code(x_return_status, p_lrtv_rec.currency_code);
886:
887: IF x_return_status = g_ret_sts_error THEN
888: RAISE okl_api.g_exception_error;
889: ELSIF x_return_status = g_ret_sts_unexp_error THEN
890: RAISE okl_api.g_exception_unexpected_error;
891: END IF;
892:
886:
887: IF x_return_status = g_ret_sts_error THEN
888: RAISE okl_api.g_exception_error;
889: ELSIF x_return_status = g_ret_sts_unexp_error THEN
890: RAISE okl_api.g_exception_unexpected_error;
891: END IF;
892:
893: RETURN g_ret_sts_success;
894: EXCEPTION
891: END IF;
892:
893: RETURN g_ret_sts_success;
894: EXCEPTION
895: WHEN okl_api.g_exception_error THEN
896: RETURN g_ret_sts_error;
897: WHEN okl_api.g_exception_unexpected_error THEN
898: RETURN g_ret_sts_unexp_error;
899: WHEN OTHERS THEN
893: RETURN g_ret_sts_success;
894: EXCEPTION
895: WHEN okl_api.g_exception_error THEN
896: RETURN g_ret_sts_error;
897: WHEN okl_api.g_exception_unexpected_error THEN
898: RETURN g_ret_sts_unexp_error;
899: WHEN OTHERS THEN
900: okl_api.set_message(p_app_name => g_app_name
901: ,p_msg_name => g_db_error
896: RETURN g_ret_sts_error;
897: WHEN okl_api.g_exception_unexpected_error THEN
898: RETURN g_ret_sts_unexp_error;
899: WHEN OTHERS THEN
900: okl_api.set_message(p_app_name => g_app_name
901: ,p_msg_name => g_db_error
902: ,p_token1 => g_prog_name_token
903: ,p_token1_value => l_api_name
904: ,p_token2 => g_sqlcode_token
917:
918: BEGIN
919: RETURN g_ret_sts_success;
920: EXCEPTION
921: WHEN okl_api.g_exception_error THEN
922: RETURN g_ret_sts_error;
923: WHEN okl_api.g_exception_unexpected_error THEN
924: RETURN g_ret_sts_unexp_error;
925: WHEN OTHERS THEN
919: RETURN g_ret_sts_success;
920: EXCEPTION
921: WHEN okl_api.g_exception_error THEN
922: RETURN g_ret_sts_error;
923: WHEN okl_api.g_exception_unexpected_error THEN
924: RETURN g_ret_sts_unexp_error;
925: WHEN OTHERS THEN
926: okl_api.set_message(p_app_name => g_app_name
927: ,p_msg_name => g_db_error
922: RETURN g_ret_sts_error;
923: WHEN okl_api.g_exception_unexpected_error THEN
924: RETURN g_ret_sts_unexp_error;
925: WHEN OTHERS THEN
926: okl_api.set_message(p_app_name => g_app_name
927: ,p_msg_name => g_db_error
928: ,p_token1 => g_prog_name_token
929: ,p_token1_value => l_api_name
930: ,p_token2 => g_sqlcode_token
1015: BEGIN
1016: l_return_status := validate_attributes(p_lrtv_rec);
1017:
1018: IF (l_return_status = g_ret_sts_unexp_error) THEN
1019: RAISE okl_api.g_exception_unexpected_error;
1020: ELSIF (l_return_status = g_ret_sts_error) THEN
1021: RAISE okl_api.g_exception_error;
1022: END IF;
1023: l_return_status := validate_record(p_lrtv_rec);
1017:
1018: IF (l_return_status = g_ret_sts_unexp_error) THEN
1019: RAISE okl_api.g_exception_unexpected_error;
1020: ELSIF (l_return_status = g_ret_sts_error) THEN
1021: RAISE okl_api.g_exception_error;
1022: END IF;
1023: l_return_status := validate_record(p_lrtv_rec);
1024:
1025: IF (l_return_status = g_ret_sts_unexp_error) THEN
1022: END IF;
1023: l_return_status := validate_record(p_lrtv_rec);
1024:
1025: IF (l_return_status = g_ret_sts_unexp_error) THEN
1026: RAISE okl_api.g_exception_unexpected_error;
1027: ELSIF (l_return_status = g_ret_sts_error) THEN
1028: RAISE okl_api.g_exception_error;
1029: END IF;
1030:
1024:
1025: IF (l_return_status = g_ret_sts_unexp_error) THEN
1026: RAISE okl_api.g_exception_unexpected_error;
1027: ELSIF (l_return_status = g_ret_sts_error) THEN
1028: RAISE okl_api.g_exception_error;
1029: END IF;
1030:
1031: EXCEPTION
1032: WHEN okl_api.g_exception_error THEN
1028: RAISE okl_api.g_exception_error;
1029: END IF;
1030:
1031: EXCEPTION
1032: WHEN okl_api.g_exception_error THEN
1033: x_return_status := g_ret_sts_error;
1034: WHEN okl_api.g_exception_unexpected_error THEN
1035: x_return_status := g_ret_sts_unexp_error;
1036: WHEN OTHERS THEN
1030:
1031: EXCEPTION
1032: WHEN okl_api.g_exception_error THEN
1033: x_return_status := g_ret_sts_error;
1034: WHEN okl_api.g_exception_unexpected_error THEN
1035: x_return_status := g_ret_sts_unexp_error;
1036: WHEN OTHERS THEN
1037: okl_api.set_message(p_app_name => g_app_name
1038: ,p_msg_name => g_db_error
1033: x_return_status := g_ret_sts_error;
1034: WHEN okl_api.g_exception_unexpected_error THEN
1035: x_return_status := g_ret_sts_unexp_error;
1036: WHEN OTHERS THEN
1037: okl_api.set_message(p_app_name => g_app_name
1038: ,p_msg_name => g_db_error
1039: ,p_token1 => g_prog_name_token
1040: ,p_token1_value => l_api_name
1041: ,p_token2 => g_sqlcode_token
1072: ,x_msg_count => x_msg_count
1073: ,x_msg_data => x_msg_data
1074: ,p_lrtv_rec => p_lrtv_tbl(i));
1075: IF l_return_status = g_ret_sts_error THEN
1076: RAISE okl_api.g_exception_error;
1077: ELSIF l_return_status = g_ret_sts_unexp_error THEN
1078: RAISE okl_api.g_exception_unexpected_error;
1079: END IF;
1080: EXIT WHEN i = p_lrtv_tbl.LAST;
1074: ,p_lrtv_rec => p_lrtv_tbl(i));
1075: IF l_return_status = g_ret_sts_error THEN
1076: RAISE okl_api.g_exception_error;
1077: ELSIF l_return_status = g_ret_sts_unexp_error THEN
1078: RAISE okl_api.g_exception_unexpected_error;
1079: END IF;
1080: EXIT WHEN i = p_lrtv_tbl.LAST;
1081: i := p_lrtv_tbl.next(i);
1082: END IF;
1084:
1085: END IF;
1086: x_return_status := l_return_status;
1087: EXCEPTION
1088: WHEN okl_api.g_exception_error THEN
1089: x_return_status := g_ret_sts_error;
1090: WHEN okl_api.g_exception_unexpected_error THEN
1091: x_return_status := g_ret_sts_unexp_error;
1092: WHEN OTHERS THEN
1086: x_return_status := l_return_status;
1087: EXCEPTION
1088: WHEN okl_api.g_exception_error THEN
1089: x_return_status := g_ret_sts_error;
1090: WHEN okl_api.g_exception_unexpected_error THEN
1091: x_return_status := g_ret_sts_unexp_error;
1092: WHEN OTHERS THEN
1093: okl_api.set_message(p_app_name => g_app_name
1094: ,p_msg_name => g_db_error
1089: x_return_status := g_ret_sts_error;
1090: WHEN okl_api.g_exception_unexpected_error THEN
1091: x_return_status := g_ret_sts_unexp_error;
1092: WHEN OTHERS THEN
1093: okl_api.set_message(p_app_name => g_app_name
1094: ,p_msg_name => g_db_error
1095: ,p_token1 => g_prog_name_token
1096: ,p_token1_value => l_api_name
1097: ,p_token2 => g_sqlcode_token
1188: ,l_lrt_rec.end_of_term_id
1189: ,l_lrt_rec.orig_rate_set_id);
1190: x_return_status := g_ret_sts_success;
1191: EXCEPTION
1192: WHEN okl_api.g_exception_error THEN
1193: x_return_status := g_ret_sts_error;
1194: WHEN okl_api.g_exception_unexpected_error THEN
1195: x_return_status := g_ret_sts_unexp_error;
1196: WHEN OTHERS THEN
1190: x_return_status := g_ret_sts_success;
1191: EXCEPTION
1192: WHEN okl_api.g_exception_error THEN
1193: x_return_status := g_ret_sts_error;
1194: WHEN okl_api.g_exception_unexpected_error THEN
1195: x_return_status := g_ret_sts_unexp_error;
1196: WHEN OTHERS THEN
1197: okl_api.set_message(p_app_name => g_app_name
1198: ,p_msg_name => g_db_error
1193: x_return_status := g_ret_sts_error;
1194: WHEN okl_api.g_exception_unexpected_error THEN
1195: x_return_status := g_ret_sts_unexp_error;
1196: WHEN OTHERS THEN
1197: okl_api.set_message(p_app_name => g_app_name
1198: ,p_msg_name => g_db_error
1199: ,p_token1 => g_prog_name_token
1200: ,p_token1_value => l_api_name
1201: ,p_token2 => g_sqlcode_token
1258:
1259: END LOOP;
1260:
1261: IF l_miss_flag = 'Y' THEN
1262: okl_api.set_message(p_app_name => g_app_name
1263: ,p_msg_name => 'OKL_LANG_NOT_INSTALLED'
1264: ,p_token1 => 'LANG_CODE'
1265: ,p_token1_value => userenv('LANG'));
1266: END IF;
1265: ,p_token1_value => userenv('LANG'));
1266: END IF;
1267: x_return_status := g_ret_sts_success;
1268: EXCEPTION
1269: WHEN okl_api.g_exception_error THEN
1270: x_return_status := g_ret_sts_error;
1271: WHEN okl_api.g_exception_unexpected_error THEN
1272: x_return_status := g_ret_sts_unexp_error;
1273: WHEN OTHERS THEN
1267: x_return_status := g_ret_sts_success;
1268: EXCEPTION
1269: WHEN okl_api.g_exception_error THEN
1270: x_return_status := g_ret_sts_error;
1271: WHEN okl_api.g_exception_unexpected_error THEN
1272: x_return_status := g_ret_sts_unexp_error;
1273: WHEN OTHERS THEN
1274: okl_api.set_message(p_app_name => g_app_name
1275: ,p_msg_name => g_db_error
1270: x_return_status := g_ret_sts_error;
1271: WHEN okl_api.g_exception_unexpected_error THEN
1272: x_return_status := g_ret_sts_unexp_error;
1273: WHEN OTHERS THEN
1274: okl_api.set_message(p_app_name => g_app_name
1275: ,p_msg_name => g_db_error
1276: ,p_token1 => g_prog_name_token
1277: ,p_token1_value => l_api_name
1278: ,p_token2 => g_sqlcode_token
1318: l_lrtv_rec.arrears_yn := 'NA';
1319: l_return_status := validate_attributes(l_lrtv_rec);
1320:
1321: IF (l_return_status = g_ret_sts_unexp_error) THEN
1322: RAISE okl_api.g_exception_unexpected_error;
1323: ELSIF (l_return_status = g_ret_sts_error) THEN
1324: RAISE okl_api.g_exception_error;
1325: END IF;
1326:
1320:
1321: IF (l_return_status = g_ret_sts_unexp_error) THEN
1322: RAISE okl_api.g_exception_unexpected_error;
1323: ELSIF (l_return_status = g_ret_sts_error) THEN
1324: RAISE okl_api.g_exception_error;
1325: END IF;
1326:
1327: l_return_status := validate_record(l_lrtv_rec);
1328:
1326:
1327: l_return_status := validate_record(l_lrtv_rec);
1328:
1329: IF (l_return_status = g_ret_sts_unexp_error) THEN
1330: RAISE okl_api.g_exception_unexpected_error;
1331: ELSIF (l_return_status = g_ret_sts_error) THEN
1332: RAISE okl_api.g_exception_error;
1333: END IF;
1334: migrate(l_lrtv_rec, l_lrt_rec);
1328:
1329: IF (l_return_status = g_ret_sts_unexp_error) THEN
1330: RAISE okl_api.g_exception_unexpected_error;
1331: ELSIF (l_return_status = g_ret_sts_error) THEN
1332: RAISE okl_api.g_exception_error;
1333: END IF;
1334: migrate(l_lrtv_rec, l_lrt_rec);
1335: migrate(l_lrtv_rec, l_lrttl_rec);
1336: insert_row(x_return_status => l_return_status
1336: insert_row(x_return_status => l_return_status
1337: ,p_lrt_rec => l_lrt_rec);
1338:
1339: IF (l_return_status = g_ret_sts_unexp_error) THEN
1340: RAISE okl_api.g_exception_unexpected_error;
1341: ELSIF (l_return_status = g_ret_sts_error) THEN
1342: RAISE okl_api.g_exception_error;
1343: END IF;
1344: insert_row(x_return_status => l_return_status
1338:
1339: IF (l_return_status = g_ret_sts_unexp_error) THEN
1340: RAISE okl_api.g_exception_unexpected_error;
1341: ELSIF (l_return_status = g_ret_sts_error) THEN
1342: RAISE okl_api.g_exception_error;
1343: END IF;
1344: insert_row(x_return_status => l_return_status
1345: ,p_lrttl_rec => l_lrttl_rec);
1346:
1344: insert_row(x_return_status => l_return_status
1345: ,p_lrttl_rec => l_lrttl_rec);
1346:
1347: IF (l_return_status = g_ret_sts_unexp_error) THEN
1348: RAISE okl_api.g_exception_unexpected_error;
1349: ELSIF (l_return_status = g_ret_sts_error) THEN
1350: RAISE okl_api.g_exception_error;
1351: END IF;
1352: x_lrtv_rec := l_lrtv_rec;
1346:
1347: IF (l_return_status = g_ret_sts_unexp_error) THEN
1348: RAISE okl_api.g_exception_unexpected_error;
1349: ELSIF (l_return_status = g_ret_sts_error) THEN
1350: RAISE okl_api.g_exception_error;
1351: END IF;
1352: x_lrtv_rec := l_lrtv_rec;
1353: x_return_status := l_return_status;
1354: EXCEPTION
1351: END IF;
1352: x_lrtv_rec := l_lrtv_rec;
1353: x_return_status := l_return_status;
1354: EXCEPTION
1355: WHEN okl_api.g_exception_error THEN
1356: x_return_status := g_ret_sts_error;
1357: WHEN okl_api.g_exception_unexpected_error THEN
1358: x_return_status := g_ret_sts_unexp_error;
1359: WHEN OTHERS THEN
1353: x_return_status := l_return_status;
1354: EXCEPTION
1355: WHEN okl_api.g_exception_error THEN
1356: x_return_status := g_ret_sts_error;
1357: WHEN okl_api.g_exception_unexpected_error THEN
1358: x_return_status := g_ret_sts_unexp_error;
1359: WHEN OTHERS THEN
1360: okl_api.set_message(p_app_name => g_app_name
1361: ,p_msg_name => g_db_error
1356: x_return_status := g_ret_sts_error;
1357: WHEN okl_api.g_exception_unexpected_error THEN
1358: x_return_status := g_ret_sts_unexp_error;
1359: WHEN OTHERS THEN
1360: okl_api.set_message(p_app_name => g_app_name
1361: ,p_msg_name => g_db_error
1362: ,p_token1 => g_prog_name_token
1363: ,p_token1_value => l_api_name
1364: ,p_token2 => g_sqlcode_token
1397: ,x_msg_data => x_msg_data
1398: ,p_lrtv_rec => p_lrtv_tbl(i)
1399: ,x_lrtv_rec => x_lrtv_tbl(i));
1400: IF l_return_status = g_ret_sts_unexp_error THEN
1401: RAISE okl_api.g_exception_unexpected_error;
1402: ELSIF l_return_status = g_ret_sts_error THEN
1403: RAISE okl_api.g_exception_error;
1404: END IF;
1405: EXIT WHEN(i = p_lrtv_tbl.LAST);
1399: ,x_lrtv_rec => x_lrtv_tbl(i));
1400: IF l_return_status = g_ret_sts_unexp_error THEN
1401: RAISE okl_api.g_exception_unexpected_error;
1402: ELSIF l_return_status = g_ret_sts_error THEN
1403: RAISE okl_api.g_exception_error;
1404: END IF;
1405: EXIT WHEN(i = p_lrtv_tbl.LAST);
1406: i := p_lrtv_tbl.next(i);
1407: END IF;
1409:
1410: END IF;
1411: x_return_status := g_ret_sts_success;
1412: EXCEPTION
1413: WHEN okl_api.g_exception_error THEN
1414: x_return_status := g_ret_sts_error;
1415: WHEN okl_api.g_exception_unexpected_error THEN
1416: x_return_status := g_ret_sts_unexp_error;
1417: WHEN OTHERS THEN
1411: x_return_status := g_ret_sts_success;
1412: EXCEPTION
1413: WHEN okl_api.g_exception_error THEN
1414: x_return_status := g_ret_sts_error;
1415: WHEN okl_api.g_exception_unexpected_error THEN
1416: x_return_status := g_ret_sts_unexp_error;
1417: WHEN OTHERS THEN
1418: okl_api.set_message(p_app_name => g_app_name
1419: ,p_msg_name => g_db_error
1414: x_return_status := g_ret_sts_error;
1415: WHEN okl_api.g_exception_unexpected_error THEN
1416: x_return_status := g_ret_sts_unexp_error;
1417: WHEN OTHERS THEN
1418: okl_api.set_message(p_app_name => g_app_name
1419: ,p_msg_name => g_db_error
1420: ,p_token1 => g_prog_name_token
1421: ,p_token1_value => l_api_name
1422: ,p_token2 => g_sqlcode_token
1479: END IF;
1480:
1481: IF (lc_row_notfound) THEN
1482: okc_api.set_message(g_fnd_app, g_form_record_deleted);
1483: RAISE okl_api.g_exception_error;
1484: ELSIF lc_object_version_number > p_lrt_rec.object_version_number THEN
1485: okc_api.set_message(g_fnd_app, g_form_record_changed);
1486: RAISE okl_api.g_exception_error;
1487: ELSIF lc_object_version_number <> p_lrt_rec.object_version_number THEN
1482: okc_api.set_message(g_fnd_app, g_form_record_deleted);
1483: RAISE okl_api.g_exception_error;
1484: ELSIF lc_object_version_number > p_lrt_rec.object_version_number THEN
1485: okc_api.set_message(g_fnd_app, g_form_record_changed);
1486: RAISE okl_api.g_exception_error;
1487: ELSIF lc_object_version_number <> p_lrt_rec.object_version_number THEN
1488: okc_api.set_message(g_fnd_app, g_form_record_changed);
1489: RAISE okl_api.g_exception_error;
1490: ELSIF lc_object_version_number = - 1 THEN
1485: okc_api.set_message(g_fnd_app, g_form_record_changed);
1486: RAISE okl_api.g_exception_error;
1487: ELSIF lc_object_version_number <> p_lrt_rec.object_version_number THEN
1488: okc_api.set_message(g_fnd_app, g_form_record_changed);
1489: RAISE okl_api.g_exception_error;
1490: ELSIF lc_object_version_number = - 1 THEN
1491: okc_api.set_message(g_app_name, g_record_logically_deleted);
1492: RAISE okl_api.g_exception_error;
1493: END IF;
1488: okc_api.set_message(g_fnd_app, g_form_record_changed);
1489: RAISE okl_api.g_exception_error;
1490: ELSIF lc_object_version_number = - 1 THEN
1491: okc_api.set_message(g_app_name, g_record_logically_deleted);
1492: RAISE okl_api.g_exception_error;
1493: END IF;
1494: x_return_status := l_return_status;
1495: EXCEPTION
1496: WHEN okl_api.g_exception_error THEN
1492: RAISE okl_api.g_exception_error;
1493: END IF;
1494: x_return_status := l_return_status;
1495: EXCEPTION
1496: WHEN okl_api.g_exception_error THEN
1497: x_return_status := g_ret_sts_error;
1498: WHEN okl_api.g_exception_unexpected_error THEN
1499: x_return_status := g_ret_sts_unexp_error;
1500: WHEN OTHERS THEN
1494: x_return_status := l_return_status;
1495: EXCEPTION
1496: WHEN okl_api.g_exception_error THEN
1497: x_return_status := g_ret_sts_error;
1498: WHEN okl_api.g_exception_unexpected_error THEN
1499: x_return_status := g_ret_sts_unexp_error;
1500: WHEN OTHERS THEN
1501: okl_api.set_message(p_app_name => g_app_name
1502: ,p_msg_name => g_db_error
1497: x_return_status := g_ret_sts_error;
1498: WHEN okl_api.g_exception_unexpected_error THEN
1499: x_return_status := g_ret_sts_unexp_error;
1500: WHEN OTHERS THEN
1501: okl_api.set_message(p_app_name => g_app_name
1502: ,p_msg_name => g_db_error
1503: ,p_token1 => g_prog_name_token
1504: ,p_token1_value => l_api_name
1505: ,p_token2 => g_sqlcode_token
1542:
1543: IF (lock_csr%ISOPEN) THEN
1544: CLOSE lock_csr;
1545: END IF;
1546: okl_api.set_message(g_fnd_app, g_form_unable_to_reserve_rec);
1547: RAISE app_exceptions.record_lock_exception;
1548: END;
1549:
1550: IF l_row_notfound THEN
1547: RAISE app_exceptions.record_lock_exception;
1548: END;
1549:
1550: IF l_row_notfound THEN
1551: okl_api.set_message(g_fnd_app, g_form_record_deleted);
1552: RAISE okl_api.g_exception_error;
1553: END IF;
1554: x_return_status := l_return_status;
1555: EXCEPTION
1548: END;
1549:
1550: IF l_row_notfound THEN
1551: okl_api.set_message(g_fnd_app, g_form_record_deleted);
1552: RAISE okl_api.g_exception_error;
1553: END IF;
1554: x_return_status := l_return_status;
1555: EXCEPTION
1556: WHEN okl_api.g_exception_error THEN
1552: RAISE okl_api.g_exception_error;
1553: END IF;
1554: x_return_status := l_return_status;
1555: EXCEPTION
1556: WHEN okl_api.g_exception_error THEN
1557: x_return_status := g_ret_sts_error;
1558: WHEN okl_api.g_exception_unexpected_error THEN
1559: x_return_status := g_ret_sts_unexp_error;
1560: WHEN OTHERS THEN
1554: x_return_status := l_return_status;
1555: EXCEPTION
1556: WHEN okl_api.g_exception_error THEN
1557: x_return_status := g_ret_sts_error;
1558: WHEN okl_api.g_exception_unexpected_error THEN
1559: x_return_status := g_ret_sts_unexp_error;
1560: WHEN OTHERS THEN
1561: okl_api.set_message(p_app_name => g_app_name
1562: ,p_msg_name => g_db_error
1557: x_return_status := g_ret_sts_error;
1558: WHEN okl_api.g_exception_unexpected_error THEN
1559: x_return_status := g_ret_sts_unexp_error;
1560: WHEN OTHERS THEN
1561: okl_api.set_message(p_app_name => g_app_name
1562: ,p_msg_name => g_db_error
1563: ,p_token1 => g_prog_name_token
1564: ,p_token1_value => l_api_name
1565: ,p_token2 => g_sqlcode_token
1590: lock_row(x_return_status => l_return_status
1591: ,p_lrt_rec => l_lrt_rec);
1592:
1593: IF (l_return_status = g_ret_sts_unexp_error) THEN
1594: RAISE okl_api.g_exception_unexpected_error;
1595: ELSIF (l_return_status = g_ret_sts_error) THEN
1596: RAISE okl_api.g_exception_error;
1597: END IF;
1598: lock_row(x_return_status => l_return_status
1592:
1593: IF (l_return_status = g_ret_sts_unexp_error) THEN
1594: RAISE okl_api.g_exception_unexpected_error;
1595: ELSIF (l_return_status = g_ret_sts_error) THEN
1596: RAISE okl_api.g_exception_error;
1597: END IF;
1598: lock_row(x_return_status => l_return_status
1599: ,p_lrttl_rec => l_lrttl_rec);
1600:
1598: lock_row(x_return_status => l_return_status
1599: ,p_lrttl_rec => l_lrttl_rec);
1600:
1601: IF (l_return_status = g_ret_sts_unexp_error) THEN
1602: RAISE okl_api.g_exception_unexpected_error;
1603: ELSIF (l_return_status = g_ret_sts_error) THEN
1604: RAISE okl_api.g_exception_error;
1605: END IF;
1606: x_return_status := l_return_status;
1600:
1601: IF (l_return_status = g_ret_sts_unexp_error) THEN
1602: RAISE okl_api.g_exception_unexpected_error;
1603: ELSIF (l_return_status = g_ret_sts_error) THEN
1604: RAISE okl_api.g_exception_error;
1605: END IF;
1606: x_return_status := l_return_status;
1607: EXCEPTION
1608: WHEN okl_api.g_exception_error THEN
1604: RAISE okl_api.g_exception_error;
1605: END IF;
1606: x_return_status := l_return_status;
1607: EXCEPTION
1608: WHEN okl_api.g_exception_error THEN
1609: x_return_status := g_ret_sts_error;
1610: WHEN okl_api.g_exception_unexpected_error THEN
1611: x_return_status := g_ret_sts_unexp_error;
1612: WHEN OTHERS THEN
1606: x_return_status := l_return_status;
1607: EXCEPTION
1608: WHEN okl_api.g_exception_error THEN
1609: x_return_status := g_ret_sts_error;
1610: WHEN okl_api.g_exception_unexpected_error THEN
1611: x_return_status := g_ret_sts_unexp_error;
1612: WHEN OTHERS THEN
1613: okl_api.set_message(p_app_name => g_app_name
1614: ,p_msg_name => g_db_error
1609: x_return_status := g_ret_sts_error;
1610: WHEN okl_api.g_exception_unexpected_error THEN
1611: x_return_status := g_ret_sts_unexp_error;
1612: WHEN OTHERS THEN
1613: okl_api.set_message(p_app_name => g_app_name
1614: ,p_msg_name => g_db_error
1615: ,p_token1 => g_prog_name_token
1616: ,p_token1_value => l_api_name
1617: ,p_token2 => g_sqlcode_token
1648: ,x_msg_count => x_msg_count
1649: ,x_msg_data => x_msg_data
1650: ,p_lrtv_rec => p_lrtv_tbl(i));
1651: IF l_return_status = g_ret_sts_unexp_error THEN
1652: RAISE okl_api.g_exception_unexpected_error;
1653: ELSIF l_return_status = g_ret_sts_error THEN
1654: RAISE okl_api.g_exception_error;
1655: END IF;
1656: EXIT WHEN(i = p_lrtv_tbl.LAST);
1650: ,p_lrtv_rec => p_lrtv_tbl(i));
1651: IF l_return_status = g_ret_sts_unexp_error THEN
1652: RAISE okl_api.g_exception_unexpected_error;
1653: ELSIF l_return_status = g_ret_sts_error THEN
1654: RAISE okl_api.g_exception_error;
1655: END IF;
1656: EXIT WHEN(i = p_lrtv_tbl.LAST);
1657: i := p_lrtv_tbl.next(i);
1658: END IF;
1660:
1661: END IF;
1662: x_return_status := l_return_status;
1663: EXCEPTION
1664: WHEN okl_api.g_exception_error THEN
1665: x_return_status := g_ret_sts_error;
1666: WHEN okl_api.g_exception_unexpected_error THEN
1667: x_return_status := g_ret_sts_unexp_error;
1668: WHEN OTHERS THEN
1662: x_return_status := l_return_status;
1663: EXCEPTION
1664: WHEN okl_api.g_exception_error THEN
1665: x_return_status := g_ret_sts_error;
1666: WHEN okl_api.g_exception_unexpected_error THEN
1667: x_return_status := g_ret_sts_unexp_error;
1668: WHEN OTHERS THEN
1669: okl_api.set_message(p_app_name => g_app_name
1670: ,p_msg_name => g_db_error
1665: x_return_status := g_ret_sts_error;
1666: WHEN okl_api.g_exception_unexpected_error THEN
1667: x_return_status := g_ret_sts_unexp_error;
1668: WHEN OTHERS THEN
1669: okl_api.set_message(p_app_name => g_app_name
1670: ,p_msg_name => g_db_error
1671: ,p_token1 => g_prog_name_token
1672: ,p_token1_value => l_api_name
1673: ,p_token2 => g_sqlcode_token
1726: ,orig_rate_set_id = p_lrt_rec.orig_rate_set_id
1727: WHERE id = p_lrt_rec.id;
1728: x_return_status := g_ret_sts_success;
1729: EXCEPTION
1730: WHEN okl_api.g_exception_error THEN
1731: x_return_status := g_ret_sts_error;
1732: WHEN okl_api.g_exception_unexpected_error THEN
1733: x_return_status := g_ret_sts_unexp_error;
1734: WHEN OTHERS THEN
1728: x_return_status := g_ret_sts_success;
1729: EXCEPTION
1730: WHEN okl_api.g_exception_error THEN
1731: x_return_status := g_ret_sts_error;
1732: WHEN okl_api.g_exception_unexpected_error THEN
1733: x_return_status := g_ret_sts_unexp_error;
1734: WHEN OTHERS THEN
1735: okl_api.set_message(p_app_name => g_app_name
1736: ,p_msg_name => g_db_error
1731: x_return_status := g_ret_sts_error;
1732: WHEN okl_api.g_exception_unexpected_error THEN
1733: x_return_status := g_ret_sts_unexp_error;
1734: WHEN OTHERS THEN
1735: okl_api.set_message(p_app_name => g_app_name
1736: ,p_msg_name => g_db_error
1737: ,p_token1 => g_prog_name_token
1738: ,p_token1_value => l_api_name
1739: ,p_token2 => g_sqlcode_token
1768: FETCH c_lang_setup INTO l_lang_setup ;
1769: CLOSE c_lang_setup;
1770:
1771: IF l_lang_setup = 'N' THEN
1772: okl_api.set_message(p_app_name => g_app_name
1773: ,p_msg_name => 'OKL_LANG_NOT_INSTALLED'
1774: ,p_token1 => 'LANG_CODE'
1775: ,p_token1_value => userenv('LANG'));
1776: END IF;
1822: SET sfwt_flag = 'N'
1823: WHERE id = p_lrttl_rec.id AND source_lang = language;
1824: x_return_status := g_ret_sts_success;
1825: EXCEPTION
1826: WHEN okl_api.g_exception_error THEN
1827: x_return_status := g_ret_sts_error;
1828: WHEN okl_api.g_exception_unexpected_error THEN
1829: x_return_status := g_ret_sts_unexp_error;
1830: WHEN OTHERS THEN
1824: x_return_status := g_ret_sts_success;
1825: EXCEPTION
1826: WHEN okl_api.g_exception_error THEN
1827: x_return_status := g_ret_sts_error;
1828: WHEN okl_api.g_exception_unexpected_error THEN
1829: x_return_status := g_ret_sts_unexp_error;
1830: WHEN OTHERS THEN
1831: okl_api.set_message(p_app_name => g_app_name
1832: ,p_msg_name => g_db_error
1827: x_return_status := g_ret_sts_error;
1828: WHEN okl_api.g_exception_unexpected_error THEN
1829: x_return_status := g_ret_sts_unexp_error;
1830: WHEN OTHERS THEN
1831: okl_api.set_message(p_app_name => g_app_name
1832: ,p_msg_name => g_db_error
1833: ,p_token1 => g_prog_name_token
1834: ,p_token1_value => l_api_name
1835: ,p_token2 => g_sqlcode_token
1878: x_lrtv_rec := p_lrtv_rec;
1879: l_db_lrtv_rec := get_rec(p_lrtv_rec.id, l_return_status);
1880:
1881: IF l_return_status = g_ret_sts_unexp_error THEN
1882: RAISE okl_api.g_exception_unexpected_error;
1883: ELSIF l_return_status = g_ret_sts_error THEN
1884: RAISE okl_api.g_exception_error;
1885: END IF;
1886:
1880:
1881: IF l_return_status = g_ret_sts_unexp_error THEN
1882: RAISE okl_api.g_exception_unexpected_error;
1883: ELSIF l_return_status = g_ret_sts_error THEN
1884: RAISE okl_api.g_exception_error;
1885: END IF;
1886:
1887: -- Do NOT default the following 4 standard attributes from the DB
1888: -- object_version_number
2028:
2029:
2030: RETURN l_return_status;
2031: EXCEPTION
2032: WHEN okl_api.g_exception_error THEN
2033: x_return_status := g_ret_sts_error;
2034: WHEN okl_api.g_exception_unexpected_error THEN
2035: x_return_status := g_ret_sts_unexp_error;
2036: WHEN OTHERS THEN
2030: RETURN l_return_status;
2031: EXCEPTION
2032: WHEN okl_api.g_exception_error THEN
2033: x_return_status := g_ret_sts_error;
2034: WHEN okl_api.g_exception_unexpected_error THEN
2035: x_return_status := g_ret_sts_unexp_error;
2036: WHEN OTHERS THEN
2037: okl_api.set_message(p_app_name => g_app_name
2038: ,p_msg_name => g_db_error
2033: x_return_status := g_ret_sts_error;
2034: WHEN okl_api.g_exception_unexpected_error THEN
2035: x_return_status := g_ret_sts_unexp_error;
2036: WHEN OTHERS THEN
2037: okl_api.set_message(p_app_name => g_app_name
2038: ,p_msg_name => g_db_error
2039: ,p_token1 => g_prog_name_token
2040: ,p_token1_value => l_api_name
2041: ,p_token2 => g_sqlcode_token
2048: BEGIN
2049: l_return_status := populate_new_record(p_lrtv_rec, l_lrtv_rec);
2050:
2051: IF (l_return_status = g_ret_sts_unexp_error) THEN
2052: RAISE okl_api.g_exception_unexpected_error;
2053: ELSIF (l_return_status = g_ret_sts_error) THEN
2054: RAISE okl_api.g_exception_error;
2055: END IF;
2056:
2050:
2051: IF (l_return_status = g_ret_sts_unexp_error) THEN
2052: RAISE okl_api.g_exception_unexpected_error;
2053: ELSIF (l_return_status = g_ret_sts_error) THEN
2054: RAISE okl_api.g_exception_error;
2055: END IF;
2056:
2057: --null out g miss values
2058:
2064: l_lrtv_rec.last_update_login := fnd_global.login_id;
2065: l_return_status := validate_attributes(l_lrtv_rec);
2066:
2067: IF (l_return_status = g_ret_sts_unexp_error) THEN
2068: RAISE okl_api.g_exception_unexpected_error;
2069: ELSIF (l_return_status = g_ret_sts_error) THEN
2070: RAISE okl_api.g_exception_error;
2071: END IF;
2072: l_return_status := validate_record(l_lrtv_rec);
2066:
2067: IF (l_return_status = g_ret_sts_unexp_error) THEN
2068: RAISE okl_api.g_exception_unexpected_error;
2069: ELSIF (l_return_status = g_ret_sts_error) THEN
2070: RAISE okl_api.g_exception_error;
2071: END IF;
2072: l_return_status := validate_record(l_lrtv_rec);
2073:
2074: IF (l_return_status = g_ret_sts_unexp_error) THEN
2071: END IF;
2072: l_return_status := validate_record(l_lrtv_rec);
2073:
2074: IF (l_return_status = g_ret_sts_unexp_error) THEN
2075: RAISE okl_api.g_exception_unexpected_error;
2076: ELSIF (l_return_status = g_ret_sts_error) THEN
2077: RAISE okl_api.g_exception_error;
2078: END IF;
2079:
2073:
2074: IF (l_return_status = g_ret_sts_unexp_error) THEN
2075: RAISE okl_api.g_exception_unexpected_error;
2076: ELSIF (l_return_status = g_ret_sts_error) THEN
2077: RAISE okl_api.g_exception_error;
2078: END IF;
2079:
2080: lock_row(p_api_version => g_api_version
2081: ,p_init_msg_list => g_false
2084: ,x_msg_data => x_msg_data
2085: ,p_lrtv_rec => l_lrtv_rec);
2086:
2087: IF (l_return_status = g_ret_sts_unexp_error) THEN
2088: RAISE okl_api.g_exception_unexpected_error;
2089: ELSIF (l_return_status = g_ret_sts_error) THEN
2090: RAISE okl_api.g_exception_error;
2091: END IF;
2092: migrate(l_lrtv_rec, l_lrt_rec);
2086:
2087: IF (l_return_status = g_ret_sts_unexp_error) THEN
2088: RAISE okl_api.g_exception_unexpected_error;
2089: ELSIF (l_return_status = g_ret_sts_error) THEN
2090: RAISE okl_api.g_exception_error;
2091: END IF;
2092: migrate(l_lrtv_rec, l_lrt_rec);
2093: migrate(l_lrtv_rec, l_lrttl_rec);
2094: update_row(x_return_status => l_return_status
2094: update_row(x_return_status => l_return_status
2095: ,p_lrt_rec => l_lrt_rec);
2096:
2097: IF (l_return_status = g_ret_sts_unexp_error) THEN
2098: RAISE okl_api.g_exception_unexpected_error;
2099: ELSIF (l_return_status = g_ret_sts_error) THEN
2100: RAISE okl_api.g_exception_error;
2101: END IF;
2102:
2096:
2097: IF (l_return_status = g_ret_sts_unexp_error) THEN
2098: RAISE okl_api.g_exception_unexpected_error;
2099: ELSIF (l_return_status = g_ret_sts_error) THEN
2100: RAISE okl_api.g_exception_error;
2101: END IF;
2102:
2103: update_row(x_return_status => l_return_status
2104: ,p_lrttl_rec => l_lrttl_rec);
2103: update_row(x_return_status => l_return_status
2104: ,p_lrttl_rec => l_lrttl_rec);
2105:
2106: IF (l_return_status = g_ret_sts_unexp_error) THEN
2107: RAISE okl_api.g_exception_unexpected_error;
2108: ELSIF (l_return_status = g_ret_sts_error) THEN
2109: RAISE okl_api.g_exception_error;
2110: END IF;
2111: x_return_status := l_return_status;
2105:
2106: IF (l_return_status = g_ret_sts_unexp_error) THEN
2107: RAISE okl_api.g_exception_unexpected_error;
2108: ELSIF (l_return_status = g_ret_sts_error) THEN
2109: RAISE okl_api.g_exception_error;
2110: END IF;
2111: x_return_status := l_return_status;
2112: x_lrtv_rec := l_lrtv_rec;
2113: EXCEPTION
2110: END IF;
2111: x_return_status := l_return_status;
2112: x_lrtv_rec := l_lrtv_rec;
2113: EXCEPTION
2114: WHEN okl_api.g_exception_error THEN
2115: x_return_status := g_ret_sts_error;
2116: WHEN okl_api.g_exception_unexpected_error THEN
2117: x_return_status := g_ret_sts_unexp_error;
2118: WHEN OTHERS THEN
2112: x_lrtv_rec := l_lrtv_rec;
2113: EXCEPTION
2114: WHEN okl_api.g_exception_error THEN
2115: x_return_status := g_ret_sts_error;
2116: WHEN okl_api.g_exception_unexpected_error THEN
2117: x_return_status := g_ret_sts_unexp_error;
2118: WHEN OTHERS THEN
2119: okl_api.set_message(p_app_name => g_app_name
2120: ,p_msg_name => g_db_error
2115: x_return_status := g_ret_sts_error;
2116: WHEN okl_api.g_exception_unexpected_error THEN
2117: x_return_status := g_ret_sts_unexp_error;
2118: WHEN OTHERS THEN
2119: okl_api.set_message(p_app_name => g_app_name
2120: ,p_msg_name => g_db_error
2121: ,p_token1 => g_prog_name_token
2122: ,p_token1_value => l_api_name
2123: ,p_token2 => g_sqlcode_token
2156: ,x_msg_data => x_msg_data
2157: ,p_lrtv_rec => p_lrtv_tbl(i)
2158: ,x_lrtv_rec => x_lrtv_tbl(i));
2159: IF l_return_status = g_ret_sts_unexp_error THEN
2160: RAISE okl_api.g_exception_unexpected_error;
2161: ELSIF l_return_status = g_ret_sts_error THEN
2162: RAISE okl_api.g_exception_error;
2163: END IF;
2164: EXIT WHEN(i = p_lrtv_tbl.LAST);
2158: ,x_lrtv_rec => x_lrtv_tbl(i));
2159: IF l_return_status = g_ret_sts_unexp_error THEN
2160: RAISE okl_api.g_exception_unexpected_error;
2161: ELSIF l_return_status = g_ret_sts_error THEN
2162: RAISE okl_api.g_exception_error;
2163: END IF;
2164: EXIT WHEN(i = p_lrtv_tbl.LAST);
2165: i := p_lrtv_tbl.next(i);
2166: END IF;
2168:
2169: END IF;
2170: x_return_status := l_return_status;
2171: EXCEPTION
2172: WHEN okl_api.g_exception_error THEN
2173: x_return_status := g_ret_sts_error;
2174: WHEN okl_api.g_exception_unexpected_error THEN
2175: x_return_status := g_ret_sts_unexp_error;
2176: WHEN OTHERS THEN
2170: x_return_status := l_return_status;
2171: EXCEPTION
2172: WHEN okl_api.g_exception_error THEN
2173: x_return_status := g_ret_sts_error;
2174: WHEN okl_api.g_exception_unexpected_error THEN
2175: x_return_status := g_ret_sts_unexp_error;
2176: WHEN OTHERS THEN
2177: okl_api.set_message(p_app_name => g_app_name
2178: ,p_msg_name => g_db_error
2173: x_return_status := g_ret_sts_error;
2174: WHEN okl_api.g_exception_unexpected_error THEN
2175: x_return_status := g_ret_sts_unexp_error;
2176: WHEN OTHERS THEN
2177: okl_api.set_message(p_app_name => g_app_name
2178: ,p_msg_name => g_db_error
2179: ,p_token1 => g_prog_name_token
2180: ,p_token1_value => l_api_name
2181: ,p_token2 => g_sqlcode_token
2204: DELETE FROM okl_ls_rt_fctr_sets_b
2205: WHERE id = p_lrt_rec.id;
2206: x_return_status := g_ret_sts_success;
2207: EXCEPTION
2208: WHEN okl_api.g_exception_error THEN
2209: x_return_status := g_ret_sts_error;
2210: WHEN okl_api.g_exception_unexpected_error THEN
2211: x_return_status := g_ret_sts_unexp_error;
2212: WHEN OTHERS THEN
2206: x_return_status := g_ret_sts_success;
2207: EXCEPTION
2208: WHEN okl_api.g_exception_error THEN
2209: x_return_status := g_ret_sts_error;
2210: WHEN okl_api.g_exception_unexpected_error THEN
2211: x_return_status := g_ret_sts_unexp_error;
2212: WHEN OTHERS THEN
2213: okl_api.set_message(p_app_name => g_app_name
2214: ,p_msg_name => g_db_error
2209: x_return_status := g_ret_sts_error;
2210: WHEN okl_api.g_exception_unexpected_error THEN
2211: x_return_status := g_ret_sts_unexp_error;
2212: WHEN OTHERS THEN
2213: okl_api.set_message(p_app_name => g_app_name
2214: ,p_msg_name => g_db_error
2215: ,p_token1 => g_prog_name_token
2216: ,p_token1_value => l_api_name
2217: ,p_token2 => g_sqlcode_token
2237: DELETE FROM okl_ls_rt_fctr_sets_tl
2238: WHERE id = p_lrttl_rec.id;
2239: x_return_status := g_ret_sts_success;
2240: EXCEPTION
2241: WHEN okl_api.g_exception_error THEN
2242: x_return_status := g_ret_sts_error;
2243: WHEN okl_api.g_exception_unexpected_error THEN
2244: x_return_status := g_ret_sts_unexp_error;
2245: WHEN OTHERS THEN
2239: x_return_status := g_ret_sts_success;
2240: EXCEPTION
2241: WHEN okl_api.g_exception_error THEN
2242: x_return_status := g_ret_sts_error;
2243: WHEN okl_api.g_exception_unexpected_error THEN
2244: x_return_status := g_ret_sts_unexp_error;
2245: WHEN OTHERS THEN
2246: okl_api.set_message(p_app_name => g_app_name
2247: ,p_msg_name => g_db_error
2242: x_return_status := g_ret_sts_error;
2243: WHEN okl_api.g_exception_unexpected_error THEN
2244: x_return_status := g_ret_sts_unexp_error;
2245: WHEN OTHERS THEN
2246: okl_api.set_message(p_app_name => g_app_name
2247: ,p_msg_name => g_db_error
2248: ,p_token1 => g_prog_name_token
2249: ,p_token1_value => l_api_name
2250: ,p_token2 => g_sqlcode_token
2279: ,x_msg_data
2280: ,l_lrttl_rec);
2281:
2282: IF (l_return_status = g_ret_sts_unexp_error) THEN
2283: RAISE okl_api.g_exception_unexpected_error;
2284: ELSIF (l_return_status = g_ret_sts_error) THEN
2285: RAISE okl_api.g_exception_error;
2286: END IF;
2287: delete_row(p_init_msg_list
2281:
2282: IF (l_return_status = g_ret_sts_unexp_error) THEN
2283: RAISE okl_api.g_exception_unexpected_error;
2284: ELSIF (l_return_status = g_ret_sts_error) THEN
2285: RAISE okl_api.g_exception_error;
2286: END IF;
2287: delete_row(p_init_msg_list
2288: ,l_return_status
2289: ,x_msg_count
2290: ,x_msg_data
2291: ,l_lrt_rec);
2292:
2293: IF (l_return_status = g_ret_sts_unexp_error) THEN
2294: RAISE okl_api.g_exception_unexpected_error;
2295: ELSIF (l_return_status = g_ret_sts_error) THEN
2296: RAISE okl_api.g_exception_error;
2297: END IF;
2298: x_return_status := l_return_status;
2292:
2293: IF (l_return_status = g_ret_sts_unexp_error) THEN
2294: RAISE okl_api.g_exception_unexpected_error;
2295: ELSIF (l_return_status = g_ret_sts_error) THEN
2296: RAISE okl_api.g_exception_error;
2297: END IF;
2298: x_return_status := l_return_status;
2299: EXCEPTION
2300: WHEN okl_api.g_exception_error THEN
2296: RAISE okl_api.g_exception_error;
2297: END IF;
2298: x_return_status := l_return_status;
2299: EXCEPTION
2300: WHEN okl_api.g_exception_error THEN
2301: x_return_status := g_ret_sts_error;
2302: WHEN okl_api.g_exception_unexpected_error THEN
2303: x_return_status := g_ret_sts_unexp_error;
2304: WHEN OTHERS THEN
2298: x_return_status := l_return_status;
2299: EXCEPTION
2300: WHEN okl_api.g_exception_error THEN
2301: x_return_status := g_ret_sts_error;
2302: WHEN okl_api.g_exception_unexpected_error THEN
2303: x_return_status := g_ret_sts_unexp_error;
2304: WHEN OTHERS THEN
2305: okl_api.set_message(p_app_name => g_app_name
2306: ,p_msg_name => g_db_error
2301: x_return_status := g_ret_sts_error;
2302: WHEN okl_api.g_exception_unexpected_error THEN
2303: x_return_status := g_ret_sts_unexp_error;
2304: WHEN OTHERS THEN
2305: okl_api.set_message(p_app_name => g_app_name
2306: ,p_msg_name => g_db_error
2307: ,p_token1 => g_prog_name_token
2308: ,p_token1_value => l_api_name
2309: ,p_token2 => g_sqlcode_token
2340: ,x_msg_count => x_msg_count
2341: ,x_msg_data => x_msg_data
2342: ,p_lrtv_rec => p_lrtv_tbl(i));
2343: IF l_return_status = g_ret_sts_unexp_error THEN
2344: RAISE okl_api.g_exception_unexpected_error;
2345: ELSIF l_return_status = g_ret_sts_error THEN
2346: RAISE okl_api.g_exception_error;
2347: END IF;
2348: EXIT WHEN(i = p_lrtv_tbl.LAST);
2342: ,p_lrtv_rec => p_lrtv_tbl(i));
2343: IF l_return_status = g_ret_sts_unexp_error THEN
2344: RAISE okl_api.g_exception_unexpected_error;
2345: ELSIF l_return_status = g_ret_sts_error THEN
2346: RAISE okl_api.g_exception_error;
2347: END IF;
2348: EXIT WHEN(i = p_lrtv_tbl.LAST);
2349: i := p_lrtv_tbl.next(i);
2350: END IF;
2352:
2353: END IF;
2354: x_return_status := l_return_status;
2355: EXCEPTION
2356: WHEN okl_api.g_exception_error THEN
2357: x_return_status := g_ret_sts_error;
2358: WHEN okl_api.g_exception_unexpected_error THEN
2359: x_return_status := g_ret_sts_unexp_error;
2360: WHEN OTHERS THEN
2354: x_return_status := l_return_status;
2355: EXCEPTION
2356: WHEN okl_api.g_exception_error THEN
2357: x_return_status := g_ret_sts_error;
2358: WHEN okl_api.g_exception_unexpected_error THEN
2359: x_return_status := g_ret_sts_unexp_error;
2360: WHEN OTHERS THEN
2361: okl_api.set_message(p_app_name => g_app_name
2362: ,p_msg_name => g_db_error
2357: x_return_status := g_ret_sts_error;
2358: WHEN okl_api.g_exception_unexpected_error THEN
2359: x_return_status := g_ret_sts_unexp_error;
2360: WHEN OTHERS THEN
2361: okl_api.set_message(p_app_name => g_app_name
2362: ,p_msg_name => g_db_error
2363: ,p_token1 => g_prog_name_token
2364: ,p_token1_value => l_api_name
2365: ,p_token2 => g_sqlcode_token