DBA Data[Home] [Help]

APPS.OKL_AM_TERMINATE_INV_AGMT_PVT dependencies on FND_LOG

Line 475: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

471: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
472:
473: BEGIN
474:
475: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
477: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
478: 'Begin(+)');
479: END IF;

Line 476: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

472:
473: BEGIN
474:
475: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
477: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
478: 'Begin(+)');
479: END IF;
480:

Line 498: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

494:
495: x_return_status := l_return_status;
496: x_ia_k_tbl := l_ia_k_tbl;
497:
498: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
500: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
501: 'End(-)');
502: END IF;

Line 499: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

495: x_return_status := l_return_status;
496: x_ia_k_tbl := l_ia_k_tbl;
497:
498: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
499: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
500: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
501: 'End(-)');
502: END IF;
503:

Line 516: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

512: p_token1_value => SQLCODE,
513: p_token2 => G_SQLERRM_TOKEN,
514: p_token2_value => SQLERRM);
515:
516: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
518: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
519: 'EXP - OTHERS');
520: END IF;

Line 517: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

513: p_token2 => G_SQLERRM_TOKEN,
514: p_token2_value => SQLERRM);
515:
516: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
517: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
518: 'OKL_AM_TERMINATE_INV_AGMT_PVT.get_ia_leases.',
519: 'EXP - OTHERS');
520: END IF;
521:

Line 586: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

582: l_sel_id NUMBER := G_MISS_NUM;
583:
584: BEGIN
585:
586: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
587: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
588: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
589: 'Begin(+)');
590: END IF;

Line 587: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

583:
584: BEGIN
585:
586: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
587: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
588: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
589: 'Begin(+)');
590: END IF;
591:

Line 644: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

640:
641: -- Set return status
642: x_return_status := l_return_status;
643:
644: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
645: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
646: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
647: 'End(-)');
648: END IF;

Line 645: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

641: -- Set return status
642: x_return_status := l_return_status;
643:
644: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
645: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
646: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
647: 'End(-)');
648: END IF;
649:

Line 656: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

652: WHEN G_EXCEPTION_ERROR THEN
653: ROLLBACK TO validate_ia_pool_trx;
654: x_return_status := G_RET_STS_ERROR;
655:
656: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
658: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
659: 'EXP - G_EXCEPTION_ERROR');
660: END IF;

Line 657: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

653: ROLLBACK TO validate_ia_pool_trx;
654: x_return_status := G_RET_STS_ERROR;
655:
656: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
657: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
658: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
659: 'EXP - G_EXCEPTION_ERROR');
660: END IF;
661:

Line 666: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

662: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
663: ROLLBACK TO validate_ia_pool_trx;
664: x_return_status := G_RET_STS_UNEXP_ERROR;
665:
666: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
667: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
668: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
669: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
670: END IF;

Line 667: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

663: ROLLBACK TO validate_ia_pool_trx;
664: x_return_status := G_RET_STS_UNEXP_ERROR;
665:
666: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
667: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
668: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
669: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
670: END IF;
671:

Line 686: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

682: p_token2_value => SQLERRM);
683:
684: x_return_status := G_RET_STS_UNEXP_ERROR;
685:
686: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
688: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
689: 'EXP - OTHERS');
690: END IF;

Line 687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

683:
684: x_return_status := G_RET_STS_UNEXP_ERROR;
685:
686: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
687: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
688: 'OKL_AM_TERMINATE_INV_AGMT_PVT.validate_ia_pool.',
689: 'EXP - OTHERS');
690: END IF;
691:

Line 740: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

736: l_strm_id NUMBER;
737:
738: BEGIN
739:
740: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
741: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
742: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
743: 'Begin(+)');
744: END IF;

Line 741: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

737:
738: BEGIN
739:
740: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
741: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
742: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
743: 'Begin(+)');
744: END IF;
745:

Line 775: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

771:
772: -- Set return status
773: x_return_status := l_return_status;
774:
775: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
776: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
778: 'End(-)');
779: END IF;

Line 776: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

772: -- Set return status
773: x_return_status := l_return_status;
774:
775: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
776: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
778: 'End(-)');
779: END IF;
780:

Line 788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

784:
785: ROLLBACK TO check_unbilled_trx;
786: x_return_status := G_RET_STS_ERROR;
787:
788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
789: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
790: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
791: 'EXP - G_EXCEPTION_ERROR');
792: END IF;

Line 789: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

785: ROLLBACK TO check_unbilled_trx;
786: x_return_status := G_RET_STS_ERROR;
787:
788: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
789: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
790: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
791: 'EXP - G_EXCEPTION_ERROR');
792: END IF;
793:

Line 799: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

795:
796: ROLLBACK TO check_unbilled_trx;
797: x_return_status := G_RET_STS_UNEXP_ERROR;
798:
799: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
800: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
801: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
802: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
803: END IF;

Line 800: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

796: ROLLBACK TO check_unbilled_trx;
797: x_return_status := G_RET_STS_UNEXP_ERROR;
798:
799: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
800: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
801: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
802: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
803: END IF;
804:

Line 820: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

816: p_token2_value => SQLERRM);
817:
818: x_return_status := G_RET_STS_UNEXP_ERROR;
819:
820: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
821: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
822: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
823: 'EXP - OTHERS');
824: END IF;

Line 821: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

817:
818: x_return_status := G_RET_STS_UNEXP_ERROR;
819:
820: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
821: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
822: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_unbilled_streams_of_pool.',
823: 'EXP - OTHERS');
824: END IF;
825:

Line 938: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

934:
935:
936: BEGIN
937:
938: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
939: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
940: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
941: 'Begin(+)');
942: END IF;

Line 939: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

935:
936: BEGIN
937:
938: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
939: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
940: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
941: 'Begin(+)');
942: END IF;
943:

Line 1054: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1050:
1051: -- Set return status
1052: x_return_status := l_return_status;
1053:
1054: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1055: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1056: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1057: 'End(-)');
1058: END IF;

Line 1055: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1051: -- Set return status
1052: x_return_status := l_return_status;
1053:
1054: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1055: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1056: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1057: 'End(-)');
1058: END IF;
1059:

Line 1067: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1063:
1064: ROLLBACK TO check_pending_disb_trx;
1065: x_return_status := G_RET_STS_ERROR;
1066:
1067: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1068: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1069: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1070: 'EXP - G_EXCEPTION_ERROR');
1071: END IF;

Line 1068: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1064: ROLLBACK TO check_pending_disb_trx;
1065: x_return_status := G_RET_STS_ERROR;
1066:
1067: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1068: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1069: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1070: 'EXP - G_EXCEPTION_ERROR');
1071: END IF;
1072:

Line 1078: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1074:
1075: ROLLBACK TO check_pending_disb_trx;
1076: x_return_status := G_RET_STS_UNEXP_ERROR;
1077:
1078: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1079: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1080: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1081: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1082: END IF;

Line 1079: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1075: ROLLBACK TO check_pending_disb_trx;
1076: x_return_status := G_RET_STS_UNEXP_ERROR;
1077:
1078: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1079: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1080: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1081: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1082: END IF;
1083:

Line 1099: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1095: p_token2_value => SQLERRM);
1096:
1097: x_return_status := G_RET_STS_UNEXP_ERROR;
1098:
1099: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1100: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1101: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1102: 'EXP - OTHERS');
1103: END IF;

Line 1100: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1096:
1097: x_return_status := G_RET_STS_UNEXP_ERROR;
1098:
1099: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1100: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1101: 'OKL_AM_TERMINATE_INV_AGMT_PVT.check_pending_disb_for_ia.',
1102: 'EXP - OTHERS');
1103: END IF;
1104:

Line 1151: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1147: l_status VARCHAR2(300);
1148:
1149: BEGIN
1150:
1151: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1152: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1153: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1154: 'Begin(+)');
1155: END IF;

Line 1152: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1148:
1149: BEGIN
1150:
1151: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1152: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1153: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1154: 'Begin(+)');
1155: END IF;
1156:

Line 1177: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1173:
1174: -- Set return values
1175: x_return_status := l_return_status;
1176:
1177: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1178: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1179: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1180: 'End(-)');
1181: END IF;

Line 1178: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1174: -- Set return values
1175: x_return_status := l_return_status;
1176:
1177: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1178: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1179: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1180: 'End(-)');
1181: END IF;
1182:

Line 1198: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1194: p_token2_value => SQLERRM);
1195:
1196: x_return_status := G_RET_STS_UNEXP_ERROR;
1197:
1198: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1200: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1201: 'EXP - OTHERS');
1202: END IF;

Line 1199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1195:
1196: x_return_status := G_RET_STS_UNEXP_ERROR;
1197:
1198: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1200: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_investor_agreement.',
1201: 'EXP - OTHERS');
1202: END IF;
1203:

Line 1296: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1292: --
1293: -- End Logic
1294: -- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1295:
1296: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1298: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1299: 'Begin(+)');
1300: END IF;

Line 1297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1293: -- End Logic
1294: -- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1295:
1296: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1297: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1298: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1299: 'Begin(+)');
1300: END IF;
1301:

Line 1493: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1489: x_return_status := l_return_status;
1490: x_ialn_tbl := l_ialn_tbl;
1491: x_ia_rec := l_ia_rec;
1492:
1493: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1494: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1495: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1496: 'End(-)');
1497: END IF;

Line 1494: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1490: x_ialn_tbl := l_ialn_tbl;
1491: x_ia_rec := l_ia_rec;
1492:
1493: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1494: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1495: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1496: 'End(-)');
1497: END IF;
1498:

Line 1508: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1504:
1505: x_ialn_tbl := l_ialn_tbl;
1506: x_ia_rec := l_ia_rec;
1507:
1508: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1509: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1510: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1511: 'EXP - G_EXCEPTION_ERROR');
1512: END IF;

Line 1509: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1505: x_ialn_tbl := l_ialn_tbl;
1506: x_ia_rec := l_ia_rec;
1507:
1508: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1509: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1510: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1511: 'EXP - G_EXCEPTION_ERROR');
1512: END IF;
1513:

Line 1521: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1517:
1518: x_ialn_tbl := l_ialn_tbl;
1519: x_ia_rec := l_ia_rec;
1520:
1521: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1522: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1523: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1524: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1525: END IF;

Line 1522: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1518: x_ialn_tbl := l_ialn_tbl;
1519: x_ia_rec := l_ia_rec;
1520:
1521: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1522: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1523: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1524: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1525: END IF;
1526:

Line 1543: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1539:
1540: x_ialn_tbl := l_ialn_tbl;
1541: x_ia_rec := l_ia_rec;
1542:
1543: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1544: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1545: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1546: 'EXP - OTHERS');
1547: END IF;

Line 1544: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1540: x_ialn_tbl := l_ialn_tbl;
1541: x_ia_rec := l_ia_rec;
1542:
1543: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1544: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1545: 'OKL_AM_TERMINATE_INV_AGMT_PVT.val_pop_investor_agreement.',
1546: 'EXP - OTHERS');
1547: END IF;
1548:

Line 1613: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1609: l_msg_data VARCHAR2(2000);
1610:
1611: BEGIN
1612:
1613: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1615: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1616: 'Begin(+)');
1617: END IF;

Line 1614: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1610:
1611: BEGIN
1612:
1613: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1614: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1615: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1616: 'Begin(+)');
1617: END IF;
1618:

Line 1742: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1738: x_return_status := l_return_status;
1739: px_tcnv_rec := lx_tcnv_rec;
1740: x_trn_already_yn := l_trn_already_yn;
1741:
1742: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1744: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1745: 'End(-)');
1746: END IF;

Line 1743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1739: px_tcnv_rec := lx_tcnv_rec;
1740: x_trn_already_yn := l_trn_already_yn;
1741:
1742: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1743: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1744: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1745: 'End(-)');
1746: END IF;
1747:

Line 1754: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1750: WHEN G_EXCEPTION_ERROR THEN
1751: ROLLBACK TO pop_insert_trn_trx;
1752: x_return_status := G_RET_STS_ERROR;
1753:
1754: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1755: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1756: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1757: 'EXP - G_EXCEPTION_ERROR');
1758: END IF;

Line 1755: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1751: ROLLBACK TO pop_insert_trn_trx;
1752: x_return_status := G_RET_STS_ERROR;
1753:
1754: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1755: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1756: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1757: 'EXP - G_EXCEPTION_ERROR');
1758: END IF;
1759:

Line 1764: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1760: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
1761: ROLLBACK TO pop_insert_trn_trx;
1762: x_return_status := G_RET_STS_UNEXP_ERROR;
1763:
1764: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1766: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1767: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1768: END IF;

Line 1765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1761: ROLLBACK TO pop_insert_trn_trx;
1762: x_return_status := G_RET_STS_UNEXP_ERROR;
1763:
1764: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1765: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1766: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1767: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1768: END IF;
1769:

Line 1784: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1780: p_token2_value => SQLERRM);
1781:
1782: x_return_status := G_RET_STS_UNEXP_ERROR;
1783:
1784: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1785: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1786: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1787: 'EXP - OTHERS');
1788: END IF;

Line 1785: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1781:
1782: x_return_status := G_RET_STS_UNEXP_ERROR;
1783:
1784: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1785: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1786: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
1787: 'EXP - OTHERS');
1788: END IF;
1789:

Line 1817: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1813: l_msg_data VARCHAR2(2000);
1814:
1815: BEGIN
1816:
1817: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1818: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1819: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1820: 'Begin(+)');
1821: END IF;

Line 1818: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1814:
1815: BEGIN
1816:
1817: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1818: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1819: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1820: 'Begin(+)');
1821: END IF;
1822:

Line 1869: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1865:
1866: -- Set return status
1867: x_return_status := l_return_status;
1868:
1869: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1870: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1871: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1872: 'End(-)');
1873: END IF;

Line 1870: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1866: -- Set return status
1867: x_return_status := l_return_status;
1868:
1869: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1870: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1871: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1872: 'End(-)');
1873: END IF;
1874:

Line 1881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1877: WHEN G_EXCEPTION_ERROR THEN
1878: ROLLBACK TO reverse_loss_trx;
1879: x_return_status := G_RET_STS_ERROR;
1880:
1881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1884: 'EXP - G_EXCEPTION_ERROR');
1885: END IF;

Line 1882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1878: ROLLBACK TO reverse_loss_trx;
1879: x_return_status := G_RET_STS_ERROR;
1880:
1881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1884: 'EXP - G_EXCEPTION_ERROR');
1885: END IF;
1886:

Line 1891: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1887: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
1888: ROLLBACK TO reverse_loss_trx;
1889: x_return_status := G_RET_STS_UNEXP_ERROR;
1890:
1891: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1892: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1893: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1894: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1895: END IF;

Line 1892: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1888: ROLLBACK TO reverse_loss_trx;
1889: x_return_status := G_RET_STS_UNEXP_ERROR;
1890:
1891: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1892: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1893: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1894: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1895: END IF;
1896:

Line 1911: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1907: p_token2_value => SQLERRM);
1908:
1909: x_return_status := G_RET_STS_UNEXP_ERROR;
1910:
1911: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1912: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1913: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1914: 'EXP - OTHERS');
1915: END IF;

Line 1912: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1908:
1909: x_return_status := G_RET_STS_UNEXP_ERROR;
1910:
1911: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1912: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1913: 'OKL_AM_TERMINATE_INV_AGMT_PVT.reverse_loss_provisions.',
1914: 'EXP - OTHERS');
1915: END IF;
1916:

Line 1940: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1936: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
1937:
1938: BEGIN
1939:
1940: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1942: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1943: 'Begin(+)');
1944: END IF;

Line 1941: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1937:
1938: BEGIN
1939:
1940: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1941: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1942: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1943: 'Begin(+)');
1944: END IF;
1945:

Line 1974: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1970: px_tcnv_rec.tmt_accounting_entries_yn := G_YES;
1971:
1972: END IF;
1973:
1974: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1975: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1976: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1977: 'End(-)');
1978: END IF;

Line 1975: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1971:
1972: END IF;
1973:
1974: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1975: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1976: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1977: 'End(-)');
1978: END IF;
1979:

Line 1988: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1984: x_return_status := G_RET_STS_ERROR;
1985: px_tcnv_rec.tmt_accounting_entries_yn := G_NO;
1986: px_tcnv_rec.tsu_code := 'ERROR';
1987:
1988: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1989: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1990: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1991: 'EXP - G_EXCEPTION_ERROR');
1992: END IF;

Line 1989: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1985: px_tcnv_rec.tmt_accounting_entries_yn := G_NO;
1986: px_tcnv_rec.tsu_code := 'ERROR';
1987:
1988: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1989: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1990: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
1991: 'EXP - G_EXCEPTION_ERROR');
1992: END IF;
1993:

Line 2000: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

1996: x_return_status := G_RET_STS_UNEXP_ERROR;
1997: px_tcnv_rec.tmt_accounting_entries_yn := G_NO;
1998: px_tcnv_rec.tsu_code := 'ERROR';
1999:
2000: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2001: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2002: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2003: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2004: END IF;

Line 2001: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1997: px_tcnv_rec.tmt_accounting_entries_yn := G_NO;
1998: px_tcnv_rec.tsu_code := 'ERROR';
1999:
2000: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2001: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2002: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2003: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2004: END IF;
2005:

Line 2022: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2018: x_return_status := G_RET_STS_UNEXP_ERROR;
2019: px_tcnv_rec.tmt_accounting_entries_yn := G_NO;
2020: px_tcnv_rec.tsu_code := 'ERROR';
2021:
2022: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2024: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2025: 'EXP - OTHERS');
2026: END IF;

Line 2023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2019: px_tcnv_rec.tmt_accounting_entries_yn := G_NO;
2020: px_tcnv_rec.tsu_code := 'ERROR';
2021:
2022: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2023: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2024: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2025: 'EXP - OTHERS');
2026: END IF;
2027:

Line 2066: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2062: i NUMBER;
2063:
2064: BEGIN
2065:
2066: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2068: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2069: 'Begin(+)');
2070: END IF;

Line 2067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2063:
2064: BEGIN
2065:
2066: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2068: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2069: 'Begin(+)');
2070: END IF;
2071:

Line 2166: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2162:
2163: -- Set return status
2164: x_return_status := l_return_status;
2165:
2166: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2167: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2168: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2169: 'End(-)');
2170: END IF;

Line 2167: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2163: -- Set return status
2164: x_return_status := l_return_status;
2165:
2166: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2167: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2168: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2169: 'End(-)');
2170: END IF;
2171:

Line 2178: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2174: WHEN G_EXCEPTION_ERROR THEN
2175: ROLLBACK TO update_ia_and_lines_trx;
2176: x_return_status := G_RET_STS_ERROR;
2177:
2178: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2180: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2181: 'EXP - G_EXCEPTION_ERROR');
2182: END IF;

Line 2179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2175: ROLLBACK TO update_ia_and_lines_trx;
2176: x_return_status := G_RET_STS_ERROR;
2177:
2178: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2179: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2180: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2181: 'EXP - G_EXCEPTION_ERROR');
2182: END IF;
2183:

Line 2188: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2184: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
2185: ROLLBACK TO update_ia_and_lines_trx;
2186: x_return_status := G_RET_STS_UNEXP_ERROR;
2187:
2188: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2190: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2191: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2192: END IF;

Line 2189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2185: ROLLBACK TO update_ia_and_lines_trx;
2186: x_return_status := G_RET_STS_UNEXP_ERROR;
2187:
2188: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2189: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2190: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2191: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2192: END IF;
2193:

Line 2208: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2204: p_token2_value => SQLERRM);
2205:
2206: x_return_status := G_RET_STS_UNEXP_ERROR;
2207:
2208: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2209: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2210: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2211: 'EXP - OTHERS');
2212: END IF;

Line 2209: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2205:
2206: x_return_status := G_RET_STS_UNEXP_ERROR;
2207:
2208: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2209: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2210: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_ia_and_lines.',
2211: 'EXP - OTHERS');
2212: END IF;
2213:

Line 2302: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2298:
2299:
2300: BEGIN
2301:
2302: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2304: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2305: 'Begin(+)');
2306: END IF;

Line 2303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2299:
2300: BEGIN
2301:
2302: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2303: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2304: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2305: 'Begin(+)');
2306: END IF;
2307:

Line 2480: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2476:
2477: -- Set return status
2478: x_return_status := l_return_status;
2479:
2480: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2482: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2483: 'End(-)');
2484: END IF;

Line 2481: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2477: -- Set return status
2478: x_return_status := l_return_status;
2479:
2480: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2481: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2482: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2483: 'End(-)');
2484: END IF;
2485:

Line 2492: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2488: WHEN G_EXCEPTION_ERROR THEN
2489: ROLLBACK TO update_pools_trx;
2490: x_return_status := G_RET_STS_ERROR;
2491:
2492: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2493: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2494: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2495: 'EXP - G_EXCEPTION_ERROR');
2496: END IF;

Line 2493: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2489: ROLLBACK TO update_pools_trx;
2490: x_return_status := G_RET_STS_ERROR;
2491:
2492: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2493: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2494: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2495: 'EXP - G_EXCEPTION_ERROR');
2496: END IF;
2497:

Line 2502: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2498: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
2499: ROLLBACK TO update_pools_trx;
2500: x_return_status := G_RET_STS_UNEXP_ERROR;
2501:
2502: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2503: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2504: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2505: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2506: END IF;

Line 2503: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2499: ROLLBACK TO update_pools_trx;
2500: x_return_status := G_RET_STS_UNEXP_ERROR;
2501:
2502: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2503: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2504: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2505: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2506: END IF;
2507:

Line 2522: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2518: p_token2_value => SQLERRM);
2519:
2520: x_return_status := G_RET_STS_UNEXP_ERROR;
2521:
2522: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2523: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2524: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2525: 'EXP - OTHERS');
2526: END IF;

Line 2523: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2519:
2520: x_return_status := G_RET_STS_UNEXP_ERROR;
2521:
2522: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2523: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2524: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_pools.',
2525: 'EXP - OTHERS');
2526: END IF;
2527:

Line 2552: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2548: l_return_status VARCHAR2(1) := G_RET_STS_SUCCESS;
2549:
2550: BEGIN
2551:
2552: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2553: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2554: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2555: 'Begin(+)');
2556: END IF;

Line 2553: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2549:
2550: BEGIN
2551:
2552: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2553: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2554: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2555: 'Begin(+)');
2556: END IF;
2557:

Line 2612: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2608: px_tcnv_rec.tsu_code := 'PROCESSED';
2609:
2610: END IF;
2611:
2612: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2614: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2615: 'End(-)');
2616: END IF;

Line 2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2609:
2610: END IF;
2611:
2612: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2613: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2614: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2615: 'End(-)');
2616: END IF;
2617:

Line 2626: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2622: x_return_status := G_RET_STS_ERROR;
2623: px_tcnv_rec.tmt_contract_updated_yn := G_NO;
2624: px_tcnv_rec.tsu_code := 'ERROR';
2625:
2626: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2627: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2628: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2629: 'EXP - G_EXCEPTION_ERROR');
2630: END IF;

Line 2627: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2623: px_tcnv_rec.tmt_contract_updated_yn := G_NO;
2624: px_tcnv_rec.tsu_code := 'ERROR';
2625:
2626: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2627: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2628: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2629: 'EXP - G_EXCEPTION_ERROR');
2630: END IF;
2631:

Line 2638: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2634: x_return_status := G_RET_STS_UNEXP_ERROR;
2635: px_tcnv_rec.tmt_contract_updated_yn := G_NO;
2636: px_tcnv_rec.tsu_code := 'ERROR';
2637:
2638: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2639: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2640: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2641: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2642: END IF;

Line 2639: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2635: px_tcnv_rec.tmt_contract_updated_yn := G_NO;
2636: px_tcnv_rec.tsu_code := 'ERROR';
2637:
2638: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2639: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2640: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2641: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2642: END IF;
2643:

Line 2660: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2656: x_return_status := G_RET_STS_UNEXP_ERROR;
2657: px_tcnv_rec.tmt_contract_updated_yn := G_NO;
2658: px_tcnv_rec.tsu_code := 'ERROR';
2659:
2660: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2662: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2663: 'EXP - OTHERS');
2664: END IF;

Line 2661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2657: px_tcnv_rec.tmt_contract_updated_yn := G_NO;
2658: px_tcnv_rec.tsu_code := 'ERROR';
2659:
2660: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2661: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2662: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2663: 'EXP - OTHERS');
2664: END IF;
2665:

Line 2694: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2690: l_msg_data VARCHAR2(2000);
2691:
2692: BEGIN
2693:
2694: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2695: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2696: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2697: 'Begin(+)');
2698: END IF;

Line 2695: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2691:
2692: BEGIN
2693:
2694: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2695: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2696: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2697: 'Begin(+)');
2698: END IF;
2699:

Line 2733: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2729:
2730: -- Set return status
2731: x_return_status := l_return_status;
2732:
2733: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2734: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2735: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2736: 'End(-)');
2737: END IF;

Line 2734: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2730: -- Set return status
2731: x_return_status := l_return_status;
2732:
2733: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2734: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2735: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2736: 'End(-)');
2737: END IF;
2738:

Line 2745: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2741: WHEN G_EXCEPTION_ERROR THEN
2742: ROLLBACK TO update_transaction_trx;
2743: x_return_status := G_RET_STS_ERROR;
2744:
2745: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2746: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2747: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2748: 'EXP - G_EXCEPTION_ERROR');
2749: END IF;

Line 2746: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2742: ROLLBACK TO update_transaction_trx;
2743: x_return_status := G_RET_STS_ERROR;
2744:
2745: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2746: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2747: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2748: 'EXP - G_EXCEPTION_ERROR');
2749: END IF;
2750:

Line 2755: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2751: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
2752: ROLLBACK TO update_transaction_trx;
2753: x_return_status := G_RET_STS_UNEXP_ERROR;
2754:
2755: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2756: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2757: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2758: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2759: END IF;

Line 2756: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2752: ROLLBACK TO update_transaction_trx;
2753: x_return_status := G_RET_STS_UNEXP_ERROR;
2754:
2755: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2756: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2757: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2758: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
2759: END IF;
2760:

Line 2775: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2771: p_token2_value => SQLERRM);
2772:
2773: x_return_status := G_RET_STS_UNEXP_ERROR;
2774:
2775: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2776: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2778: 'EXP - OTHERS');
2779: END IF;

Line 2776: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2772:
2773: x_return_status := G_RET_STS_UNEXP_ERROR;
2774:
2775: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2776: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2777: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_transaction.',
2778: 'EXP - OTHERS');
2779: END IF;
2780:

Line 2839: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2835: -- Create a Termination Transaction -- tcn_type = 'IAT' first time --
2836: -- Uses the created termination transaction later on, but does validate every time
2837: -- will not do Accounting Entries if already done
2838:
2839: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2840: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2841: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2842: 'Begin(+)');
2843: END IF;

Line 2840: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

2836: -- Uses the created termination transaction later on, but does validate every time
2837: -- will not do Accounting Entries if already done
2838:
2839: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2840: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
2841: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2842: 'Begin(+)');
2843: END IF;
2844:

Line 2881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2877: x_ia_rec => l_ia_rec,
2878: x_ialn_tbl => l_ialn_tbl,
2879: x_return_status => l_return_status);
2880:
2881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2884: 'val_pop_investor_agreement = '||l_return_status );
2885: END IF;

Line 2882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2878: x_ialn_tbl => l_ialn_tbl,
2879: x_return_status => l_return_status);
2880:
2881: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2882: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2883: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2884: 'val_pop_investor_agreement = '||l_return_status );
2885: END IF;
2886:

Line 2904: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2900: px_tcnv_rec => l_tcnv_rec,
2901: p_validate_success => l_overall_status,
2902: x_return_status => l_return_status);
2903:
2904: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2905: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2906: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
2907: 'pop_or_insert_transaction = '||l_return_status );
2908: END IF;

Line 2905: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2901: p_validate_success => l_overall_status,
2902: x_return_status => l_return_status);
2903:
2904: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2905: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2906: 'OKL_AM_TERMINATE_INV_AGMT_PVT.pop_or_insert_transaction.',
2907: 'pop_or_insert_transaction = '||l_return_status );
2908: END IF;
2909:

Line 2930: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2926: p_termination_date => l_sys_date,
2927: p_tcnv_rec => l_tcnv_rec,
2928: x_return_status => l_return_status);
2929:
2930: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2931: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2932: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2933: 'update_transaction = '||l_return_status );
2934: END IF;

Line 2931: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2927: p_tcnv_rec => l_tcnv_rec,
2928: x_return_status => l_return_status);
2929:
2930: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2931: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2932: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
2933: 'update_transaction = '||l_return_status );
2934: END IF;
2935:

Line 2958: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2954: p_gl_date => l_valid_gl_date,
2955: px_tcnv_rec => l_tcnv_rec,
2956: x_return_status => l_return_status);
2957:
2958: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2959: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2960: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2961: 'accounting_entries = '||l_return_status );
2962: END IF;

Line 2959: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2955: px_tcnv_rec => l_tcnv_rec,
2956: x_return_status => l_return_status);
2957:
2958: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2959: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2960: 'OKL_AM_TERMINATE_INV_AGMT_PVT.accounting_entries.',
2961: 'accounting_entries = '||l_return_status );
2962: END IF;
2963:

Line 2982: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2978: px_tcnv_rec => l_tcnv_rec,
2979: p_overall_status => l_overall_status,
2980: x_return_status => l_return_status);
2981:
2982: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2983: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2984: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2985: 'update_investor_agreement = '||l_return_status );
2986: END IF;

Line 2983: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2979: p_overall_status => l_overall_status,
2980: x_return_status => l_return_status);
2981:
2982: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2983: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
2984: 'OKL_AM_TERMINATE_INV_AGMT_PVT.update_investor_agreement.',
2985: 'update_investor_agreement = '||l_return_status );
2986: END IF;
2987:

Line 2998: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

2994: p_termination_date => l_sys_date,
2995: p_tcnv_rec => l_tcnv_rec,
2996: x_return_status => l_return_status);
2997:
2998: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2999: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3000: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3001: 'update_transaction = '||l_return_status );
3002: END IF;

Line 2999: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

2995: p_tcnv_rec => l_tcnv_rec,
2996: x_return_status => l_return_status);
2997:
2998: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2999: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3000: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3001: 'update_transaction = '||l_return_status );
3002: END IF;
3003:

Line 3037: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3033:
3034: -- End Activity
3035: OKL_API.end_activity (x_msg_count, x_msg_data);
3036:
3037: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3038: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3039: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3040: 'End(-)');
3041: END IF;

Line 3038: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

3034: -- End Activity
3035: OKL_API.end_activity (x_msg_count, x_msg_data);
3036:
3037: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3038: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
3039: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3040: 'End(-)');
3041: END IF;
3042:

Line 3062: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3058: p_ia_rec => l_ia_rec,
3059: p_control_flag => 'ERROR');
3060: END IF;
3061:
3062: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3063: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3064: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3065: 'EXP - G_EXCEPTION');
3066: END IF;

Line 3063: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

3059: p_control_flag => 'ERROR');
3060: END IF;
3061:
3062: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3063: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3064: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3065: 'EXP - G_EXCEPTION');
3066: END IF;
3067:

Line 3085: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3081: x_msg_count => x_msg_count,
3082: x_msg_data => x_msg_data,
3083: p_api_type => '_PVT');
3084:
3085: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3086: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3087: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3088: 'EXP - G_EXCEPTION_ERROR');
3089: END IF;

Line 3086: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

3082: x_msg_data => x_msg_data,
3083: p_api_type => '_PVT');
3084:
3085: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3086: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3087: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3088: 'EXP - G_EXCEPTION_ERROR');
3089: END IF;
3090:

Line 3108: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3104: x_msg_count => x_msg_count,
3105: x_msg_data => x_msg_data,
3106: p_api_type => '_PVT');
3107:
3108: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3109: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3110: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3111: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
3112: END IF;

Line 3109: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

3105: x_msg_data => x_msg_data,
3106: p_api_type => '_PVT');
3107:
3108: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3109: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3110: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3111: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
3112: END IF;
3113:

Line 3131: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

3127: x_msg_count => x_msg_count,
3128: x_msg_data => x_msg_data,
3129: p_api_type => '_PVT');
3130:
3131: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3132: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3133: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3134: 'EXP - OTHERS');
3135: END IF;

Line 3132: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

3128: x_msg_data => x_msg_data,
3129: p_api_type => '_PVT');
3130:
3131: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3132: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
3133: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_investor_agreement.',
3134: 'EXP - OTHERS');
3135: END IF;
3136: