DBA Data[Home] [Help]

APPS.OKL_AM_TERMNT_VENDOR_PRG_PVT dependencies on FND_LOG

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

497: -- 1.3 Throw error if VPA End Date not valid
498: -- End Logic
499: -- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
500:
501: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
502: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
503: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
504: 'Begin(+)');
505: END IF;

Line 502: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

498: -- End Logic
499: -- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
500:
501: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
502: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
503: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
504: 'Begin(+)');
505: END IF;
506:

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

579: -- Set return values
580: x_return_status := l_return_status;
581: x_va_rec := l_va_rec;
582:
583: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
584: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
585: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
586: 'End(-)');
587: END IF;

Line 584: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

580: x_return_status := l_return_status;
581: x_va_rec := l_va_rec;
582:
583: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
584: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
585: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
586: 'End(-)');
587: END IF;
588:

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

592: ROLLBACK TO validate_va_trx;
593: x_return_status := G_RET_STS_ERROR;
594: x_va_rec := l_va_rec;
595:
596: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
597: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
598: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
599: 'EXP - G_EXCEPTION_ERROR');
600: END IF;

Line 597: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

593: x_return_status := G_RET_STS_ERROR;
594: x_va_rec := l_va_rec;
595:
596: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
597: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
598: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
599: 'EXP - G_EXCEPTION_ERROR');
600: END IF;
601:

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

603: ROLLBACK TO validate_va_trx;
604: x_return_status := G_RET_STS_UNEXP_ERROR;
605: x_va_rec := l_va_rec;
606:
607: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
608: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
609: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
610: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
611: END IF;

Line 608: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

604: x_return_status := G_RET_STS_UNEXP_ERROR;
605: x_va_rec := l_va_rec;
606:
607: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
608: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
609: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
610: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
611: END IF;
612:

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

623:
624: x_return_status := G_RET_STS_UNEXP_ERROR;
625: x_va_rec := l_va_rec;
626:
627: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
628: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
629: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
630: 'EXP - OTHERS');
631: END IF;

Line 628: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

624: x_return_status := G_RET_STS_UNEXP_ERROR;
625: x_va_rec := l_va_rec;
626:
627: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
628: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
629: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.val_pop_vendor_prg.',
630: 'EXP - OTHERS');
631: END IF;
632:

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

686: l_msg_data VARCHAR2(2000);
687:
688: BEGIN
689:
690: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
691: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
692: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
693: 'Begin(+)');
694: END IF;

Line 691: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

687:
688: BEGIN
689:
690: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
691: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
692: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
693: 'Begin(+)');
694: END IF;
695:

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

794: x_return_status := l_return_status;
795: px_tcnv_rec := lx_tcnv_rec;
796: x_trn_already_yn := l_trn_already_yn;
797:
798: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
799: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
800: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
801: 'End(-)');
802: END IF;

Line 799: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

795: px_tcnv_rec := lx_tcnv_rec;
796: x_trn_already_yn := l_trn_already_yn;
797:
798: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
799: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
800: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
801: 'End(-)');
802: END IF;
803:

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

806: WHEN G_EXCEPTION_ERROR THEN
807: ROLLBACK TO pop_insert_trn_trx;
808: x_return_status := G_RET_STS_ERROR;
809:
810: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
811: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
812: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
813: 'EXP - G_EXCEPTION_ERROR');
814: END IF;

Line 811: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

807: ROLLBACK TO pop_insert_trn_trx;
808: x_return_status := G_RET_STS_ERROR;
809:
810: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
811: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
812: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
813: 'EXP - G_EXCEPTION_ERROR');
814: END IF;
815:

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

816: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
817: ROLLBACK TO pop_insert_trn_trx;
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_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
823: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
824: END IF;

Line 821: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

817: ROLLBACK TO pop_insert_trn_trx;
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_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
823: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
824: END IF;
825:

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

836: p_token2_value => SQLERRM);
837:
838: x_return_status := G_RET_STS_UNEXP_ERROR;
839:
840: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
841: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
842: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
843: 'EXP - OTHERS');
844: END IF;

Line 841: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

837:
838: x_return_status := G_RET_STS_UNEXP_ERROR;
839:
840: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
841: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
842: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.pop_or_insert_transaction.',
843: 'EXP - OTHERS');
844: END IF;
845:

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

871: l_status VARCHAR2(3);
872:
873: BEGIN
874:
875: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
876: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
877: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
878: 'Begin(+)');
879: END IF;

Line 876: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

872:
873: BEGIN
874:
875: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
876: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
877: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
878: 'Begin(+)');
879: END IF;
880:

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

917: x_msg_data => l_msg_data,
918: p_tcnv_rec => lp_tcnv_rec,
919: x_tcnv_rec => lx_tcnv_rec);
920:
921: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
922: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
923: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
924: 'l_return_status '||l_return_status);
925: END IF;

Line 922: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

918: p_tcnv_rec => lp_tcnv_rec,
919: x_tcnv_rec => lx_tcnv_rec);
920:
921: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
922: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
923: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
924: 'l_return_status '||l_return_status);
925: END IF;
926:

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

944: -- Set return status
945: x_return_status := l_return_status;
946: px_tcnv_rec := lx_tcnv_rec;
947:
948: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
949: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
950: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
951: 'End(-)');
952: END IF;

Line 949: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

945: x_return_status := l_return_status;
946: px_tcnv_rec := lx_tcnv_rec;
947:
948: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
949: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
950: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
951: 'End(-)');
952: END IF;
953:

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

956: WHEN G_EXCEPTION_ERROR THEN
957: ROLLBACK TO update_transaction_trx;
958: x_return_status := G_RET_STS_ERROR;
959:
960: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
961: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
962: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
963: 'EXP - G_EXCEPTION_ERROR');
964: END IF;

Line 961: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

957: ROLLBACK TO update_transaction_trx;
958: x_return_status := G_RET_STS_ERROR;
959:
960: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
961: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
962: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
963: 'EXP - G_EXCEPTION_ERROR');
964: END IF;
965:

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

966: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
967: ROLLBACK TO update_transaction_trx;
968: x_return_status := G_RET_STS_UNEXP_ERROR;
969:
970: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
971: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
972: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
973: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
974: END IF;

Line 971: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

967: ROLLBACK TO update_transaction_trx;
968: x_return_status := G_RET_STS_UNEXP_ERROR;
969:
970: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
971: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
972: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
973: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
974: END IF;
975:

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

986: p_token2_value => SQLERRM);
987:
988: x_return_status := G_RET_STS_UNEXP_ERROR;
989:
990: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
992: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
993: 'EXP - OTHERS');
994: END IF;

Line 991: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

987:
988: x_return_status := G_RET_STS_UNEXP_ERROR;
989:
990: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
991: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
992: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_transaction.',
993: 'EXP - OTHERS');
994: END IF;
995:

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

1022: l_msg_data VARCHAR2(2000);
1023:
1024: BEGIN
1025:
1026: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1027: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1028: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1029: 'Begin(+)');
1030: END IF;

Line 1027: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1023:
1024: BEGIN
1025:
1026: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1027: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1028: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1029: 'Begin(+)');
1030: END IF;
1031:

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

1049: p_khrv_rec => lp_khrv_rec,
1050: x_chrv_rec => lx_chrv_rec,
1051: x_khrv_rec => lx_khrv_rec);
1052:
1053: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1055: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1056: 'l_return_status '||l_return_status);
1057: END IF;

Line 1054: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1050: x_chrv_rec => lx_chrv_rec,
1051: x_khrv_rec => lx_khrv_rec);
1052:
1053: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1054: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1055: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1056: 'l_return_status '||l_return_status);
1057: END IF;
1058:

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

1077:
1078: -- Set return values
1079: x_return_status := l_return_status;
1080:
1081: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1083: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1084: 'End(-)');
1085: END IF;

Line 1082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1078: -- Set return values
1079: x_return_status := l_return_status;
1080:
1081: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1082: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1083: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1084: 'End(-)');
1085: END IF;
1086:

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

1089: WHEN G_EXCEPTION_ERROR THEN
1090: ROLLBACK TO update_vpa_trx;
1091: x_return_status := G_RET_STS_ERROR;
1092:
1093: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1094: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1095: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1096: 'EXP - G_EXCEPTION_ERROR');
1097: END IF;

Line 1094: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1090: ROLLBACK TO update_vpa_trx;
1091: x_return_status := G_RET_STS_ERROR;
1092:
1093: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1094: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1095: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1096: 'EXP - G_EXCEPTION_ERROR');
1097: END IF;
1098:

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

1099: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
1100: ROLLBACK TO update_vpa_trx;
1101: x_return_status := G_RET_STS_UNEXP_ERROR;
1102:
1103: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1104: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1105: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1106: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1107: END IF;

Line 1104: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1100: ROLLBACK TO update_vpa_trx;
1101: x_return_status := G_RET_STS_UNEXP_ERROR;
1102:
1103: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1104: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1105: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1106: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1107: END IF;
1108:

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

1118: p_token2_value => SQLERRM);
1119:
1120: x_return_status := G_RET_STS_UNEXP_ERROR;
1121:
1122: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1124: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1125: 'EXP - OTHERS');
1126: END IF;

Line 1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1119:
1120: x_return_status := G_RET_STS_UNEXP_ERROR;
1121:
1122: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1124: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.update_vendor_prg.',
1125: 'EXP - OTHERS');
1126: END IF;
1127:

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

1174: G_EXCEPTION EXCEPTION;
1175:
1176: BEGIN
1177:
1178: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1179: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1180: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1181: 'Begin(+)');
1182: END IF;

Line 1179: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1175:
1176: BEGIN
1177:
1178: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1179: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1180: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1181: 'Begin(+)');
1182: END IF;
1183:

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

1210: p_control_flag => p_control_flag,
1211: x_va_rec => l_va_rec,
1212: x_return_status => l_return_status);
1213:
1214: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1215: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1216: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1217: 'val_pop_vendor_prg = '||l_return_status );
1218: END IF;

Line 1215: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1211: x_va_rec => l_va_rec,
1212: x_return_status => l_return_status);
1213:
1214: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1215: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1216: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1217: 'val_pop_vendor_prg = '||l_return_status );
1218: END IF;
1219:

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

1243: x_trn_already_yn => l_trn_already_yn,
1244: px_tcnv_rec => l_tcnv_rec,
1245: x_return_status => l_return_status);
1246:
1247: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1248: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1249: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1250: 'pop_or_insert_transaction = '||l_return_status );
1251: END IF;

Line 1248: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1244: px_tcnv_rec => l_tcnv_rec,
1245: x_return_status => l_return_status);
1246:
1247: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1248: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1249: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1250: 'pop_or_insert_transaction = '||l_return_status );
1251: END IF;
1252:

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

1268: p_step => l_step,
1269: px_tcnv_rec => l_tcnv_rec,
1270: x_return_status => l_return_status);
1271:
1272: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1273: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1274: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_vendor_prog.',
1275: 'update_transaction = '||l_return_status ||
1276: 'l_step = '||l_step );

Line 1273: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1269: px_tcnv_rec => l_tcnv_rec,
1270: x_return_status => l_return_status);
1271:
1272: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1273: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1274: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_vendor_prog.',
1275: 'update_transaction = '||l_return_status ||
1276: 'l_step = '||l_step );
1277: END IF;

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

1294: p_control_flag => p_control_flag,
1295: px_va_rec => l_va_rec,
1296: x_return_status => l_return_status);
1297:
1298: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1299: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1300: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1301: 'update_vendor_prg = '||l_return_status );
1302: END IF;

Line 1299: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1295: px_va_rec => l_va_rec,
1296: x_return_status => l_return_status);
1297:
1298: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1299: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1300: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1301: 'update_vendor_prg = '||l_return_status );
1302: END IF;
1303:

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

1321: p_step => l_step,
1322: px_tcnv_rec => l_tcnv_rec,
1323: x_return_status => l_return_status);
1324:
1325: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1326: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1327: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_vendor_prog.',
1328: 'update_transaction = '||l_return_status ||
1329: 'l_step = '||l_step );

Line 1326: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1322: px_tcnv_rec => l_tcnv_rec,
1323: x_return_status => l_return_status);
1324:
1325: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1326: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1327: 'OKL_AM_TERMINATE_INV_AGMT_PVT.terminate_vendor_prog.',
1328: 'update_transaction = '||l_return_status ||
1329: 'l_step = '||l_step );
1330: END IF;

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

1367:
1368: -- End Activity
1369: OKL_API.end_activity (x_msg_count, x_msg_data);
1370:
1371: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1372: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1373: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1374: 'End(-)');
1375: END IF;

Line 1372: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,

1368: -- End Activity
1369: OKL_API.end_activity (x_msg_count, x_msg_data);
1370:
1371: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1372: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
1373: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1374: 'End(-)');
1375: END IF;
1376:

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

1392: x_msg_count => x_msg_count,
1393: x_msg_data => x_msg_data,
1394: p_api_type => '_PVT');
1395:
1396: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1397: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1398: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1399: 'EXP - G_EXCEPTION_ERROR');
1400: END IF;

Line 1397: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1393: x_msg_data => x_msg_data,
1394: p_api_type => '_PVT');
1395:
1396: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1397: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1398: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1399: 'EXP - G_EXCEPTION_ERROR');
1400: END IF;
1401:

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

1415: x_msg_count => x_msg_count,
1416: x_msg_data => x_msg_data,
1417: p_api_type => '_PVT');
1418:
1419: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1420: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1421: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1422: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1423: END IF;

Line 1420: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1416: x_msg_data => x_msg_data,
1417: p_api_type => '_PVT');
1418:
1419: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1420: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1421: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1422: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
1423: END IF;
1424:

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

1438: x_msg_count => x_msg_count,
1439: x_msg_data => x_msg_data,
1440: p_api_type => '_PVT');
1441:
1442: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1444: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1445: 'EXP - OTHERS');
1446: END IF;

Line 1443: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,

1439: x_msg_data => x_msg_data,
1440: p_api_type => '_PVT');
1441:
1442: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
1444: 'OKL_AM_TERMNT_VENDOR_PRG_PVT.terminate_vendor_prog.',
1445: 'EXP - OTHERS');
1446: END IF;
1447: