519: --even if party level grace duration is null
520: PROCEDURE set_attributes
521: IS
522: BEGIN
523: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
524: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
525: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.set_attributes.begin', 'begin');
526: END IF;
527: END IF;
520: PROCEDURE set_attributes
521: IS
522: BEGIN
523: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
524: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
525: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.set_attributes.begin', 'begin');
526: END IF;
527: END IF;
528:
521: IS
522: BEGIN
523: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
524: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
525: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.set_attributes.begin', 'begin');
526: END IF;
527: END IF;
528:
529: -- assume that l_rules_tbl(0) has input rules, l_rules_tbl(1) has contract rules, l_rules_tbl(2) has party rules etc
528:
529: -- assume that l_rules_tbl(0) has input rules, l_rules_tbl(1) has contract rules, l_rules_tbl(2) has party rules etc
530: FOR i IN l_rules_tbl.first..l_rules_tbl.last LOOP
531:
532: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
533: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
534: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.set_attributes.for_loop', 'i=' || i);
535: END IF;
536: END IF;
529: -- assume that l_rules_tbl(0) has input rules, l_rules_tbl(1) has contract rules, l_rules_tbl(2) has party rules etc
530: FOR i IN l_rules_tbl.first..l_rules_tbl.last LOOP
531:
532: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
533: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
534: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.set_attributes.for_loop', 'i=' || i);
535: END IF;
536: END IF;
537:
530: FOR i IN l_rules_tbl.first..l_rules_tbl.last LOOP
531:
532: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
533: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
534: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.set_attributes.for_loop', 'i=' || i);
535: END IF;
536: END IF;
537:
538: --first set the interdependent attributes
739: END IF;
740:
741: END LOOP;
742:
743: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
744: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
745: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.set_attributes.end', 'end');
746: END IF;
747: END IF;
740:
741: END LOOP;
742:
743: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
744: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
745: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.set_attributes.end', 'end');
746: END IF;
747: END IF;
748:
741: END LOOP;
742:
743: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
744: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
745: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.set_attributes.end', 'end');
746: END IF;
747: END IF;
748:
749: END set_attributes;
751: BEGIN
752: --main procedure begins here
753:
754: --log key input parameters
755: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
756: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
757: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id ||' ,p_party_id='|| p_party_id ||' ,p_org_id='|| p_org_id || ',p_date=' || p_date);
758: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.input_rules', 'see following log');
759: log_rules(l_mod_name || '.input_rules', p_rnrl_rec);
752: --main procedure begins here
753:
754: --log key input parameters
755: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
756: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
757: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id ||' ,p_party_id='|| p_party_id ||' ,p_org_id='|| p_org_id || ',p_date=' || p_date);
758: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.input_rules', 'see following log');
759: log_rules(l_mod_name || '.input_rules', p_rnrl_rec);
760: END IF;
753:
754: --log key input parameters
755: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
756: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
757: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id ||' ,p_party_id='|| p_party_id ||' ,p_org_id='|| p_org_id || ',p_date=' || p_date);
758: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.input_rules', 'see following log');
759: log_rules(l_mod_name || '.input_rules', p_rnrl_rec);
760: END IF;
761: END IF;
754: --log key input parameters
755: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
756: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
757: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id ||' ,p_party_id='|| p_party_id ||' ,p_org_id='|| p_org_id || ',p_date=' || p_date);
758: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.input_rules', 'see following log');
759: log_rules(l_mod_name || '.input_rules', p_rnrl_rec);
760: END IF;
761: END IF;
762:
774: (p_party_id IS NULL OR p_party_id = FND_API.G_MISS_NUM) AND
775: (p_org_id IS NULL OR p_org_id = FND_API.G_MISS_NUM)) THEN
776:
777: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_REN_RUL_INV_ARG');
778: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
779: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.basic_validation', FALSE);
780: END IF;
781: FND_MSG_PUB.ADD;
782:
775: (p_org_id IS NULL OR p_org_id = FND_API.G_MISS_NUM)) THEN
776:
777: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_REN_RUL_INV_ARG');
778: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
779: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.basic_validation', FALSE);
780: END IF;
781: FND_MSG_PUB.ADD;
782:
783: RAISE FND_API.g_exc_error;
803: OPEN c_k_party(p_chr_id);
804: FETCH c_k_party INTO l_party_id;
805: CLOSE c_k_party;
806:
807: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
808: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
809: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_party', 'l_party_id=' || l_party_id);
810: END IF;
811: END IF;
804: FETCH c_k_party INTO l_party_id;
805: CLOSE c_k_party;
806:
807: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
808: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
809: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_party', 'l_party_id=' || l_party_id);
810: END IF;
811: END IF;
812:
805: CLOSE c_k_party;
806:
807: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
808: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
809: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_party', 'l_party_id=' || l_party_id);
810: END IF;
811: END IF;
812:
813: END IF;
824:
825: IF (c_k_rules%notfound) THEN
826: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_INV_CONTRACT');
827: FND_MESSAGE.set_token('CONTRACT_ID', p_chr_id);
828: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
829: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.get_k_rules', FALSE);
830: END IF;
831: FND_MSG_PUB.ADD;
832: CLOSE c_k_rules;
825: IF (c_k_rules%notfound) THEN
826: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_INV_CONTRACT');
827: FND_MESSAGE.set_token('CONTRACT_ID', p_chr_id);
828: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
829: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.get_k_rules', FALSE);
830: END IF;
831: FND_MSG_PUB.ADD;
832: CLOSE c_k_rules;
833: RAISE FND_API.g_exc_error;
843: lk_rnrl_rec.price_list_id2 := '#';
844: END IF;
845: l_rules_tbl(G_CONTRACT_LEVEL) := lk_rnrl_rec;
846:
847: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
848: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
849: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_org', 'l_org_id=' || l_org_id);
850: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.contract_level_rules', 'see following log');
851: log_rules(l_mod_name || '.contract_level_rules', l_rules_tbl(G_CONTRACT_LEVEL));
844: END IF;
845: l_rules_tbl(G_CONTRACT_LEVEL) := lk_rnrl_rec;
846:
847: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
848: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
849: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_org', 'l_org_id=' || l_org_id);
850: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.contract_level_rules', 'see following log');
851: log_rules(l_mod_name || '.contract_level_rules', l_rules_tbl(G_CONTRACT_LEVEL));
852: END IF;
845: l_rules_tbl(G_CONTRACT_LEVEL) := lk_rnrl_rec;
846:
847: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
848: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
849: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_org', 'l_org_id=' || l_org_id);
850: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.contract_level_rules', 'see following log');
851: log_rules(l_mod_name || '.contract_level_rules', l_rules_tbl(G_CONTRACT_LEVEL));
852: END IF;
853: END IF;
846:
847: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
848: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
849: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_org', 'l_org_id=' || l_org_id);
850: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.contract_level_rules', 'see following log');
851: log_rules(l_mod_name || '.contract_level_rules', l_rules_tbl(G_CONTRACT_LEVEL));
852: END IF;
853: END IF;
854:
859: OPEN c_cgd_rules(l_org_id, l_party_id, nvl(p_date, SYSDATE));
860: FETCH c_cgd_rules BULK COLLECT INTO l_rules_tbl_tmp;
861: CLOSE c_cgd_rules;
862:
863: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
864: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
865: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_gcd_rules', 'gcd_record_count=' || l_rules_tbl_tmp.COUNT);
866: END IF;
867: END IF;
860: FETCH c_cgd_rules BULK COLLECT INTO l_rules_tbl_tmp;
861: CLOSE c_cgd_rules;
862:
863: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
864: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
865: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_gcd_rules', 'gcd_record_count=' || l_rules_tbl_tmp.COUNT);
866: END IF;
867: END IF;
868:
861: CLOSE c_cgd_rules;
862:
863: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
864: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
865: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.get_gcd_rules', 'gcd_record_count=' || l_rules_tbl_tmp.COUNT);
866: END IF;
867: END IF;
868:
869: --assign the rules table
874: l_rules_tbl(G_ORG_LEVEL) := l_rules_tbl_tmp(i);
875: ELSIF (l_rules_tbl_tmp(i).cdt_type = 'SDT' AND l_rules_tbl_tmp(i).jtot_object_code = 'OKX_PARTY') THEN
876: l_rules_tbl(G_PARTY_LEVEL) := l_rules_tbl_tmp(i);
877: END IF;
878: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
879: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
880: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_rules_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_rules_tbl_tmp(i).jtot_object_code);
881: END IF;
882: END IF;
875: ELSIF (l_rules_tbl_tmp(i).cdt_type = 'SDT' AND l_rules_tbl_tmp(i).jtot_object_code = 'OKX_PARTY') THEN
876: l_rules_tbl(G_PARTY_LEVEL) := l_rules_tbl_tmp(i);
877: END IF;
878: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
879: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
880: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_rules_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_rules_tbl_tmp(i).jtot_object_code);
881: END IF;
882: END IF;
883: END LOOP;
876: l_rules_tbl(G_PARTY_LEVEL) := l_rules_tbl_tmp(i);
877: END IF;
878: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
879: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
880: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_rules_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_rules_tbl_tmp(i).jtot_object_code);
881: END IF;
882: END IF;
883: END LOOP;
884: l_rules_tbl_tmp.DELETE;
883: END LOOP;
884: l_rules_tbl_tmp.DELETE;
885:
886: --log all the rules fetched if debug logging enabled
887: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
888: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
889: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_level_rules', 'see following log');
890: log_rules(l_mod_name || '.party_level_rules', l_rules_tbl(G_PARTY_LEVEL));
891: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.org_level_rules', 'see following log');
884: l_rules_tbl_tmp.DELETE;
885:
886: --log all the rules fetched if debug logging enabled
887: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
888: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
889: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_level_rules', 'see following log');
890: log_rules(l_mod_name || '.party_level_rules', l_rules_tbl(G_PARTY_LEVEL));
891: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.org_level_rules', 'see following log');
892: log_rules(l_mod_name || '.org_level_rules', l_rules_tbl(G_ORG_LEVEL));
885:
886: --log all the rules fetched if debug logging enabled
887: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
888: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
889: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_level_rules', 'see following log');
890: log_rules(l_mod_name || '.party_level_rules', l_rules_tbl(G_PARTY_LEVEL));
891: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.org_level_rules', 'see following log');
892: log_rules(l_mod_name || '.org_level_rules', l_rules_tbl(G_ORG_LEVEL));
893: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.global_level_rules', 'see following log');
887: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
888: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
889: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_level_rules', 'see following log');
890: log_rules(l_mod_name || '.party_level_rules', l_rules_tbl(G_PARTY_LEVEL));
891: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.org_level_rules', 'see following log');
892: log_rules(l_mod_name || '.org_level_rules', l_rules_tbl(G_ORG_LEVEL));
893: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.global_level_rules', 'see following log');
894: log_rules(l_mod_name || '.global_level_rules', l_rules_tbl(G_GLOBAL_LEVEL));
895: END IF;
889: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_level_rules', 'see following log');
890: log_rules(l_mod_name || '.party_level_rules', l_rules_tbl(G_PARTY_LEVEL));
891: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.org_level_rules', 'see following log');
892: log_rules(l_mod_name || '.org_level_rules', l_rules_tbl(G_ORG_LEVEL));
893: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.global_level_rules', 'see following log');
894: log_rules(l_mod_name || '.global_level_rules', l_rules_tbl(G_GLOBAL_LEVEL));
895: END IF;
896: END IF;
897:
900:
901: l_rules_tbl.DELETE;
902:
903:
904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
905: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
906: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.effective_rules', 'see following log');
907: log_rules(l_mod_name || '.effective_rules', x_rnrl_rec);
908: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.end', 'x_return_status=' || x_return_status);
901: l_rules_tbl.DELETE;
902:
903:
904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
905: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
906: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.effective_rules', 'see following log');
907: log_rules(l_mod_name || '.effective_rules', x_rnrl_rec);
908: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.end', 'x_return_status=' || x_return_status);
909: END IF;
902:
903:
904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
905: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
906: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.effective_rules', 'see following log');
907: log_rules(l_mod_name || '.effective_rules', x_rnrl_rec);
908: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.end', 'x_return_status=' || x_return_status);
909: END IF;
910: END IF;
904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
905: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
906: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.effective_rules', 'see following log');
907: log_rules(l_mod_name || '.effective_rules', x_rnrl_rec);
908: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.end', 'x_return_status=' || x_return_status);
909: END IF;
910: END IF;
911: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
912:
913: EXCEPTION
914: WHEN FND_API.g_exc_error THEN
915: x_return_status := FND_API.g_ret_sts_error ;
916:
917: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
918: FND_LOG.string(FND_LOG.level_error, l_mod_name || '.end_error', 'x_return_status=' || x_return_status);
919: END IF;
920: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
921:
914: WHEN FND_API.g_exc_error THEN
915: x_return_status := FND_API.g_ret_sts_error ;
916:
917: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
918: FND_LOG.string(FND_LOG.level_error, l_mod_name || '.end_error', 'x_return_status=' || x_return_status);
919: END IF;
920: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
921:
922: IF (c_k_party%isopen) THEN
931:
932: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
934:
935: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
936: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_unexpected_error', 'x_return_status=' || x_return_status);
937: END IF;
938: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
939:
932: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
934:
935: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
936: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_unexpected_error', 'x_return_status=' || x_return_status);
937: END IF;
938: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
939:
940: IF (c_k_party%isopen) THEN
949:
950: WHEN OTHERS THEN
951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
952:
953: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
954: --first log the sqlerrm
955: l_error_text := substr (SQLERRM, 1, 240);
956: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_other_error', l_error_text );
957: --then add it to the message api list
952:
953: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
954: --first log the sqlerrm
955: l_error_text := substr (SQLERRM, 1, 240);
956: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_other_error', l_error_text );
957: --then add it to the message api list
958: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name, l_error_text);
959: END IF;
960: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
970: END IF;
971:
972: END get_renew_rules;
973:
974: -- this procedures logs all the rule attributes in the FND_LOG_messages table
975: -- use only after checking the log level
976: PROCEDURE log_rules(p_module IN VARCHAR2,
977: p_rnrl_rec IN rnrl_rec_type)
978: IS
978: IS
979: l_api_name VARCHAR2(30) := 'LOG_RULES';
980: l_mod_name VARCHAR2(256) := nvl(p_module, lower(G_OKS_APP_NAME) || '.plsql.' || g_pkg_name || '.' || l_api_name);
981: BEGIN
982: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
983: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'renewal_type=' || p_rnrl_rec.renewal_type ||' ,approval_type='|| p_rnrl_rec.approval_type);
984: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'period_type='|| p_rnrl_rec.period_type ||' ,period_start='|| p_rnrl_rec.period_start ||' ,price_uom='|| p_rnrl_rec.price_uom);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
979: l_api_name VARCHAR2(30) := 'LOG_RULES';
980: l_mod_name VARCHAR2(256) := nvl(p_module, lower(G_OKS_APP_NAME) || '.plsql.' || g_pkg_name || '.' || l_api_name);
981: BEGIN
982: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
983: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'renewal_type=' || p_rnrl_rec.renewal_type ||' ,approval_type='|| p_rnrl_rec.approval_type);
984: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'period_type='|| p_rnrl_rec.period_type ||' ,period_start='|| p_rnrl_rec.period_start ||' ,price_uom='|| p_rnrl_rec.price_uom);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
980: l_mod_name VARCHAR2(256) := nvl(p_module, lower(G_OKS_APP_NAME) || '.plsql.' || g_pkg_name || '.' || l_api_name);
981: BEGIN
982: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
983: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'renewal_type=' || p_rnrl_rec.renewal_type ||' ,approval_type='|| p_rnrl_rec.approval_type);
984: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'period_type='|| p_rnrl_rec.period_type ||' ,period_start='|| p_rnrl_rec.period_start ||' ,price_uom='|| p_rnrl_rec.price_uom);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
981: BEGIN
982: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
983: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'renewal_type=' || p_rnrl_rec.renewal_type ||' ,approval_type='|| p_rnrl_rec.approval_type);
984: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'period_type='|| p_rnrl_rec.period_type ||' ,period_start='|| p_rnrl_rec.period_start ||' ,price_uom='|| p_rnrl_rec.price_uom);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
982: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
983: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'renewal_type=' || p_rnrl_rec.renewal_type ||' ,approval_type='|| p_rnrl_rec.approval_type);
984: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'period_type='|| p_rnrl_rec.period_type ||' ,period_start='|| p_rnrl_rec.period_start ||' ,price_uom='|| p_rnrl_rec.price_uom);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
983: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'renewal_type=' || p_rnrl_rec.renewal_type ||' ,approval_type='|| p_rnrl_rec.approval_type);
984: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'period_type='|| p_rnrl_rec.period_type ||' ,period_start='|| p_rnrl_rec.period_start ||' ,price_uom='|| p_rnrl_rec.price_uom);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
985: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'base_currency=' || p_rnrl_rec.base_currency ||' ,evergreen_threshold_amt='|| p_rnrl_rec.evergreen_threshold_amt ||' ,evergreen_approval_type='|| p_rnrl_rec.evergreen_approval_type);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
986: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'threshold(online)_amount='|| p_rnrl_rec.threshold_amount ||' ,online_approval_type='|| p_rnrl_rec.online_approval_type ||' ,payment_threshold_amt='|| p_rnrl_rec.payment_threshold_amt);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
987: FND_LOG.string(FND_LOG.level_statement,l_mod_name,'evn_threshold_curr='|| p_rnrl_rec.evergreen_threshold_curr||' ,online_curr='|| p_rnrl_rec.threshold_currency ||' ,payment_threshold_curr='|| p_rnrl_rec.payment_threshold_curr||
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
988: ' ,threshold(online)_enabled_yn='||p_rnrl_rec.threshold_enabled_yn);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
989: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'ren_pricing_type=' || p_rnrl_rec.renewal_pricing_type ||' , markup_pct='|| p_rnrl_rec.markup_percent ||' ,pl_id1='|| p_rnrl_rec.price_list_id1 ||' ,pl_id2='|| p_rnrl_rec.price_list_id2);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
997: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'po_flag='|| p_rnrl_rec.purchase_order_flag ||' ,cc_flag='|| p_rnrl_rec.credit_card_flag);
990: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'rev_est_pct=' || p_rnrl_rec.revenue_estimated_percent ||' ,rev_est_duration='|| p_rnrl_rec.revenue_estimated_duration ||' ,rev_est_period='|| p_rnrl_rec.revenue_estimated_period);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
997: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'po_flag='|| p_rnrl_rec.purchase_order_flag ||' ,cc_flag='|| p_rnrl_rec.credit_card_flag);
998: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'wire_flag='|| p_rnrl_rec.wire_flag ||' ,com_flag='|| p_rnrl_rec.commitment_number_flag ||' ,check_flag='|| p_rnrl_rec.check_flag);
991: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'grace_period='|| p_rnrl_rec.grace_period ||' ,grace_duration='|| p_rnrl_rec.grace_duration);
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
997: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'po_flag='|| p_rnrl_rec.purchase_order_flag ||' ,cc_flag='|| p_rnrl_rec.credit_card_flag);
998: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'wire_flag='|| p_rnrl_rec.wire_flag ||' ,com_flag='|| p_rnrl_rec.commitment_number_flag ||' ,check_flag='|| p_rnrl_rec.check_flag);
999: END IF;
992: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'pdf_id=' || p_rnrl_rec.pdf_id ||' ,qcl_id='|| p_rnrl_rec.qcl_id ||' ,cgp_new_id='|| p_rnrl_rec.cgp_new_id ||' ,cgp_renew_id='|| p_rnrl_rec.cgp_renew_id);
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
997: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'po_flag='|| p_rnrl_rec.purchase_order_flag ||' ,cc_flag='|| p_rnrl_rec.credit_card_flag);
998: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'wire_flag='|| p_rnrl_rec.wire_flag ||' ,com_flag='|| p_rnrl_rec.commitment_number_flag ||' ,check_flag='|| p_rnrl_rec.check_flag);
999: END IF;
1000: END log_rules;
993: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'credit_amt='|| p_rnrl_rec.credit_amount ||' ,rle_code='|| p_rnrl_rec.rle_code ||' template_set_id='|| p_rnrl_rec.template_set_id ||' ,template_language='|| p_rnrl_rec.template_language);
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
997: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'po_flag='|| p_rnrl_rec.purchase_order_flag ||' ,cc_flag='|| p_rnrl_rec.credit_card_flag);
998: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'wire_flag='|| p_rnrl_rec.wire_flag ||' ,com_flag='|| p_rnrl_rec.commitment_number_flag ||' ,check_flag='|| p_rnrl_rec.check_flag);
999: END IF;
1000: END log_rules;
1001:
994: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'user_id=' || p_rnrl_rec.user_id ||' ,email_address='|| p_rnrl_rec.email_address);
995: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'billing_profile_id='|| p_rnrl_rec.billing_profile_id ||' ,interface_price_break='|| p_rnrl_rec.interface_price_break);
996: FND_LOG.string(FND_LOG.level_statement, l_mod_name, 'po_required_yn=' || p_rnrl_rec.po_required_yn||' ,payment_terms_id1='|| p_rnrl_rec.payment_terms_id1 ||' ,payment_terms_id2='|| p_rnrl_rec.payment_terms_id2);
997: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'po_flag='|| p_rnrl_rec.purchase_order_flag ||' ,cc_flag='|| p_rnrl_rec.credit_card_flag);
998: FND_LOG.string(FND_LOG.level_statement, l_mod_name,'wire_flag='|| p_rnrl_rec.wire_flag ||' ,com_flag='|| p_rnrl_rec.commitment_number_flag ||' ,check_flag='|| p_rnrl_rec.check_flag);
999: END IF;
1000: END log_rules;
1001:
1002:
1059:
1060:
1061: BEGIN
1062: --log key input parameters
1063: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1064: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1065: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id);
1066: END IF;
1067: END IF;
1060:
1061: BEGIN
1062: --log key input parameters
1063: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1064: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1065: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id);
1066: END IF;
1067: END IF;
1068:
1061: BEGIN
1062: --log key input parameters
1063: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1064: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1065: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_chr_id=' || p_chr_id);
1066: END IF;
1067: END IF;
1068:
1069: --standard api initilization and checks
1081: FETCH c_k_party_org INTO l_party_id, l_org_id;
1082: IF (c_k_party_org%notfound) THEN
1083: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_INV_CONTRACT');
1084: FND_MESSAGE.set_token('CONTRACT_ID', p_chr_id);
1085: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1086: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.get_k_org', FALSE);
1087: END IF;
1088: FND_MSG_PUB.ADD;
1089: CLOSE c_k_party_org;
1082: IF (c_k_party_org%notfound) THEN
1083: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_INV_CONTRACT');
1084: FND_MESSAGE.set_token('CONTRACT_ID', p_chr_id);
1085: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1086: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.get_k_org', FALSE);
1087: END IF;
1088: FND_MSG_PUB.ADD;
1089: CLOSE c_k_party_org;
1090: RAISE FND_API.g_exc_error;
1090: RAISE FND_API.g_exc_error;
1091: END IF;
1092: CLOSE c_k_party_org;
1093:
1094: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1095: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1096: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_org', 'l_party_id=' || l_party_id ||' , l_org_id'|| l_org_id);
1097: END IF;
1098: END IF;
1091: END IF;
1092: CLOSE c_k_party_org;
1093:
1094: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1095: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1096: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_org', 'l_party_id=' || l_party_id ||' , l_org_id'|| l_org_id);
1097: END IF;
1098: END IF;
1099:
1092: CLOSE c_k_party_org;
1093:
1094: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1095: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1096: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.party_org', 'l_party_id=' || l_party_id ||' , l_org_id'|| l_org_id);
1097: END IF;
1098: END IF;
1099:
1100: --get the party, org and global level rules
1112: ELSIF (l_tset_tbl_tmp(i).cdt_type = 'SDT' AND l_tset_tbl_tmp(i).jtot_object_code = 'OKX_PARTY') THEN
1113: l_tset_tbl(G_PARTY_LEVEL) := l_tset_tbl_tmp(i);
1114: END IF;
1115:
1116: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1117: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1118: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_tset_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_tset_tbl_tmp(i).jtot_object_code);
1119: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop','template_set_id='|| l_tset_tbl_tmp(i).template_set_id ||' ,template_language='|| l_tset_tbl_tmp(i).template_language);
1120: END IF;
1113: l_tset_tbl(G_PARTY_LEVEL) := l_tset_tbl_tmp(i);
1114: END IF;
1115:
1116: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1117: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1118: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_tset_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_tset_tbl_tmp(i).jtot_object_code);
1119: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop','template_set_id='|| l_tset_tbl_tmp(i).template_set_id ||' ,template_language='|| l_tset_tbl_tmp(i).template_language);
1120: END IF;
1121: END IF;
1114: END IF;
1115:
1116: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1117: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1118: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_tset_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_tset_tbl_tmp(i).jtot_object_code);
1119: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop','template_set_id='|| l_tset_tbl_tmp(i).template_set_id ||' ,template_language='|| l_tset_tbl_tmp(i).template_language);
1120: END IF;
1121: END IF;
1122: END LOOP;
1115:
1116: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1117: IF (FND_LOG.test(FND_LOG.level_statement, l_mod_name)) THEN
1118: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop', 'cdt_type=' || l_tset_tbl_tmp(i).cdt_type ||' , jtot_object_code'|| l_tset_tbl_tmp(i).jtot_object_code);
1119: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.gcd_loop','template_set_id='|| l_tset_tbl_tmp(i).template_set_id ||' ,template_language='|| l_tset_tbl_tmp(i).template_language);
1120: END IF;
1121: END IF;
1122: END LOOP;
1123: l_tset_tbl_tmp.DELETE;
1134:
1135: END LOOP;
1136: l_tset_tbl.DELETE;
1137:
1138: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1139: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1140: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.end','x_template_set_id ='|| x_template_set_id ||', x_return_status='|| x_return_status);
1141: END IF;
1142: END IF;
1135: END LOOP;
1136: l_tset_tbl.DELETE;
1137:
1138: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1139: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1140: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.end','x_template_set_id ='|| x_template_set_id ||', x_return_status='|| x_return_status);
1141: END IF;
1142: END IF;
1143: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1136: l_tset_tbl.DELETE;
1137:
1138: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1139: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1140: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.end','x_template_set_id ='|| x_template_set_id ||', x_return_status='|| x_return_status);
1141: END IF;
1142: END IF;
1143: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1144:
1146:
1147: WHEN FND_API.g_exc_error THEN
1148: x_return_status := FND_API.g_ret_sts_error ;
1149:
1150: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1151: FND_LOG.string(FND_LOG.level_error, l_mod_name || '.end_error', 'x_return_status=' || x_return_status);
1152: END IF;
1153: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1154:
1147: WHEN FND_API.g_exc_error THEN
1148: x_return_status := FND_API.g_ret_sts_error ;
1149:
1150: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1151: FND_LOG.string(FND_LOG.level_error, l_mod_name || '.end_error', 'x_return_status=' || x_return_status);
1152: END IF;
1153: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1154:
1155: IF (c_k_party_org%isopen) THEN
1161:
1162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1164:
1165: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1166: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_unexpected_error', 'x_return_status=' || x_return_status);
1167: END IF;
1168: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1169:
1162: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1164:
1165: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1166: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_unexpected_error', 'x_return_status=' || x_return_status);
1167: END IF;
1168: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1169:
1170: IF (c_k_party_org%isopen) THEN
1176:
1177: WHEN OTHERS THEN
1178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1179:
1180: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1181: --first log the sqlerrm
1182: l_error_text := substr (SQLERRM, 1, 240);
1183: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_other_error', l_error_text);
1184: --then add it to the message api list
1179:
1180: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1181: --first log the sqlerrm
1182: l_error_text := substr (SQLERRM, 1, 240);
1183: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_other_error', l_error_text);
1184: --then add it to the message api list
1185: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name, l_error_text);
1186: END IF;
1187: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1304: l_rnrl_rec OKS_RENEW_UTIL_PVT.rnrl_rec_type;
1305:
1306: BEGIN
1307: --log key input parameters
1308: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1309: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1310: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_api_version=' || p_api_version ||' ,p_chr_id='|| p_chr_id||' ,p_amount='||p_amount||
1311: ' ,p_currency_code='||p_currency_code||' ,p_rnrl_rec.base_currency='||p_rnrl_rec.base_currency);
1312: END IF;
1305:
1306: BEGIN
1307: --log key input parameters
1308: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1309: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1310: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_api_version=' || p_api_version ||' ,p_chr_id='|| p_chr_id||' ,p_amount='||p_amount||
1311: ' ,p_currency_code='||p_currency_code||' ,p_rnrl_rec.base_currency='||p_rnrl_rec.base_currency);
1312: END IF;
1313: END IF;
1306: BEGIN
1307: --log key input parameters
1308: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1309: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1310: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.begin', 'p_api_version=' || p_api_version ||' ,p_chr_id='|| p_chr_id||' ,p_amount='||p_amount||
1311: ' ,p_currency_code='||p_currency_code||' ,p_rnrl_rec.base_currency='||p_rnrl_rec.base_currency);
1312: END IF;
1313: END IF;
1314:
1325: IF(p_chr_id IS NULL) THEN
1326: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_MANDATORY_ARG');
1327: FND_MESSAGE.set_token('ARG_NAME', 'p_chr_id');
1328: FND_MESSAGE.set_token('PROG_NAME', G_PKG_NAME || '.' || l_api_name);
1329: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1330: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.input_validation', FALSE);
1331: END IF;
1332: FND_MSG_PUB.ADD;
1333: RAISE FND_API.g_exc_error;
1326: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_MANDATORY_ARG');
1327: FND_MESSAGE.set_token('ARG_NAME', 'p_chr_id');
1328: FND_MESSAGE.set_token('PROG_NAME', G_PKG_NAME || '.' || l_api_name);
1329: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1330: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.input_validation', FALSE);
1331: END IF;
1332: FND_MSG_PUB.ADD;
1333: RAISE FND_API.g_exc_error;
1334: END IF;
1343: --if invalid contract
1344: IF (l_start_date IS NULL) THEN
1345: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_INV_CONTRACT');
1346: FND_MESSAGE.set_token('CONTRACT_ID', p_chr_id);
1347: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1348: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.get_k_details', FALSE);
1349: END IF;
1350: FND_MSG_PUB.ADD;
1351: RAISE FND_API.g_exc_error;
1344: IF (l_start_date IS NULL) THEN
1345: FND_MESSAGE.set_name(G_OKS_APP_NAME, 'OKS_INV_CONTRACT');
1346: FND_MESSAGE.set_token('CONTRACT_ID', p_chr_id);
1347: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1348: FND_LOG.message(FND_LOG.level_error, l_mod_name || '.get_k_details', FALSE);
1349: END IF;
1350: FND_MSG_PUB.ADD;
1351: RAISE FND_API.g_exc_error;
1352: END IF;
1353:
1354: --means the renewal rules are not passed, get them
1355: IF (p_rnrl_rec.base_currency IS NULL) THEN
1356:
1357: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1358: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.calling_get_renew_rules', 'p_chr_id=' || p_chr_id ||', p_date='|| l_start_date);
1359: END IF;
1360:
1361: OKS_RENEW_UTIL_PVT.get_renew_rules(
1354: --means the renewal rules are not passed, get them
1355: IF (p_rnrl_rec.base_currency IS NULL) THEN
1356:
1357: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1358: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.calling_get_renew_rules', 'p_chr_id=' || p_chr_id ||', p_date='|| l_start_date);
1359: END IF;
1360:
1361: OKS_RENEW_UTIL_PVT.get_renew_rules(
1362: x_return_status => x_return_status,
1370: x_rnrl_rec => l_rnrl_rec,
1371: x_msg_count => x_msg_count,
1372: x_msg_data => x_msg_data);
1373:
1374: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1375: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.after_get_renew_rules', 'x_return_status=' || x_return_status);
1376: END IF;
1377: IF x_return_status = FND_API.g_ret_sts_unexp_error THEN
1378: RAISE FND_API.g_exc_unexpected_error;
1371: x_msg_count => x_msg_count,
1372: x_msg_data => x_msg_data);
1373:
1374: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1375: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.after_get_renew_rules', 'x_return_status=' || x_return_status);
1376: END IF;
1377: IF x_return_status = FND_API.g_ret_sts_unexp_error THEN
1378: RAISE FND_API.g_exc_unexpected_error;
1379: ELSIF x_return_status = FND_API.g_ret_sts_error THEN
1392: l_rnrl_rec := p_rnrl_rec;
1393: END IF;
1394:
1395: --now determine the effective renewal type
1396: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1397: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.renewal_rules', 'l_rnrl_rec.renewal_type='||l_rnrl_rec.renewal_type||' ,l_rnrl_rec.approval_type='||l_rnrl_rec.approval_type||
1398: ' ,l_rnrl_rec.base_currency='||l_rnrl_rec.base_currency||' ,l_rnrl_rec.evergreen_threshold_amt='||l_rnrl_rec.evergreen_threshold_amt||' ,l_rnrl_rec.evergreen_approval_type='||l_rnrl_rec.evergreen_approval_type||
1399: ' ,l_rnrl_rec.threshold_amount='||l_rnrl_rec.threshold_amount||' ,l_rnrl_rec.online_approval_type='||l_rnrl_rec.online_approval_type||' ,l_amount='||l_amount||' ,l_currency_code='||l_currency_code);
1400: END IF;
1393: END IF;
1394:
1395: --now determine the effective renewal type
1396: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1397: FND_LOG.string(FND_LOG.level_statement, l_mod_name || '.renewal_rules', 'l_rnrl_rec.renewal_type='||l_rnrl_rec.renewal_type||' ,l_rnrl_rec.approval_type='||l_rnrl_rec.approval_type||
1398: ' ,l_rnrl_rec.base_currency='||l_rnrl_rec.base_currency||' ,l_rnrl_rec.evergreen_threshold_amt='||l_rnrl_rec.evergreen_threshold_amt||' ,l_rnrl_rec.evergreen_approval_type='||l_rnrl_rec.evergreen_approval_type||
1399: ' ,l_rnrl_rec.threshold_amount='||l_rnrl_rec.threshold_amount||' ,l_rnrl_rec.online_approval_type='||l_rnrl_rec.online_approval_type||' ,l_amount='||l_amount||' ,l_currency_code='||l_currency_code);
1400: END IF;
1401:
1450: END IF;
1451: END IF; --IF(l_rnrl_rec.renewal_type = 'EVN') THEN
1452: END IF; --of IF(l_rnrl_rec.renewal_type = 'DNR') THEN
1453:
1454: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1455: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1456: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.end', ' x_return_status='|| x_return_status||', x_renewal_type='||x_renewal_type||' ,x_approval_type='||x_approval_type||' ,x_threshold_used='||x_threshold_used);
1457: END IF;
1458: END IF;
1451: END IF; --IF(l_rnrl_rec.renewal_type = 'EVN') THEN
1452: END IF; --of IF(l_rnrl_rec.renewal_type = 'DNR') THEN
1453:
1454: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1455: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1456: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.end', ' x_return_status='|| x_return_status||', x_renewal_type='||x_renewal_type||' ,x_approval_type='||x_approval_type||' ,x_threshold_used='||x_threshold_used);
1457: END IF;
1458: END IF;
1459: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1452: END IF; --of IF(l_rnrl_rec.renewal_type = 'DNR') THEN
1453:
1454: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1455: IF (FND_LOG.test(FND_LOG.level_procedure, l_mod_name)) THEN
1456: FND_LOG.string(FND_LOG.level_procedure, l_mod_name || '.end', ' x_return_status='|| x_return_status||', x_renewal_type='||x_renewal_type||' ,x_approval_type='||x_approval_type||' ,x_threshold_used='||x_threshold_used);
1457: END IF;
1458: END IF;
1459: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1460:
1461: EXCEPTION
1462: WHEN FND_API.g_exc_error THEN
1463: x_return_status := FND_API.g_ret_sts_error ;
1464:
1465: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1466: FND_LOG.string(FND_LOG.level_error, l_mod_name || '.end_error', 'x_return_status=' || x_return_status);
1467: END IF;
1468: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1469:
1462: WHEN FND_API.g_exc_error THEN
1463: x_return_status := FND_API.g_ret_sts_error ;
1464:
1465: IF (FND_LOG.level_error >= FND_LOG.g_current_runtime_level) THEN
1466: FND_LOG.string(FND_LOG.level_error, l_mod_name || '.end_error', 'x_return_status=' || x_return_status);
1467: END IF;
1468: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1469:
1470: IF (c_k_hdr%isopen) THEN
1473:
1474: WHEN FND_API.g_exc_unexpected_error THEN
1475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1476:
1477: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1478: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_unexpected_error', 'x_return_status=' || x_return_status);
1479: END IF;
1480: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1481:
1474: WHEN FND_API.g_exc_unexpected_error THEN
1475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1476:
1477: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1478: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_unexpected_error', 'x_return_status=' || x_return_status);
1479: END IF;
1480: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1481:
1482: IF (c_k_hdr%isopen) THEN
1485:
1486: WHEN OTHERS THEN
1487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1488:
1489: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1490: --first log the sqlerrm
1491: l_error_text := substr (SQLERRM, 1, 240);
1492: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_other_error', l_error_text);
1493: --then add it to the message api list
1488:
1489: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
1490: --first log the sqlerrm
1491: l_error_text := substr (SQLERRM, 1, 240);
1492: FND_LOG.string(FND_LOG.level_unexpected, l_mod_name || '.end_other_error', l_error_text);
1493: --then add it to the message api list
1494: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name, l_error_text);
1495: END IF;
1496: FND_MSG_PUB.count_and_get(p_count => x_msg_count, p_data => x_msg_data );
1606: l_k_status VARCHAR2(30);
1607:
1608: BEGIN
1609:
1610: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1611: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1612: 'Entered '||G_PKG_NAME ||'.'||l_api_name||
1613: '(p_contract_id=>'||p_contract_id||
1614: ',p_document_type=>'||p_document_type||
1607:
1608: BEGIN
1609:
1610: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1611: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1612: 'Entered '||G_PKG_NAME ||'.'||l_api_name||
1613: '(p_contract_id=>'||p_contract_id||
1614: ',p_document_type=>'||p_document_type||
1615: ',p_template_id=>'||p_template_id||
1656: ELSE
1657: IF p_template_id IS NOT NULL THEN
1658: l_message_template_id := p_template_id;
1659: ELSE
1660: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1661: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.before',
1662: 'OKS_TEMPLATE_SET_PUB.get_template_set_dtls(p_contract_id= '
1663: ||p_contract_id||' p_document_type ='||p_document_type||')');
1664: END IF;
1657: IF p_template_id IS NOT NULL THEN
1658: l_message_template_id := p_template_id;
1659: ELSE
1660: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1661: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.before',
1662: 'OKS_TEMPLATE_SET_PUB.get_template_set_dtls(p_contract_id= '
1663: ||p_contract_id||' p_document_type ='||p_document_type||')');
1664: END IF;
1665: OKS_TEMPLATE_SET_PUB.get_template_set_dtls
1676: x_return_status => x_return_status,
1677: x_msg_data => x_msg_data,
1678: x_msg_count => x_msg_count
1679: );
1680: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1681: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.after',
1682: 'OKS_TEMPLATE_SET_PUB.get_template_set_dtls(x_return_status= '||x_return_status||
1683: ' x_msg_count ='||x_msg_count||')');
1684: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.after',
1677: x_msg_data => x_msg_data,
1678: x_msg_count => x_msg_count
1679: );
1680: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1681: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.after',
1682: 'OKS_TEMPLATE_SET_PUB.get_template_set_dtls(x_return_status= '||x_return_status||
1683: ' x_msg_count ='||x_msg_count||')');
1684: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.after',
1685: ' x_template_language ='||x_fnd_language||
1680: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1681: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.after',
1682: 'OKS_TEMPLATE_SET_PUB.get_template_set_dtls(x_return_status= '||x_return_status||
1683: ' x_msg_count ='||x_msg_count||')');
1684: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE||l_api_name||'.external_call.after',
1685: ' x_template_language ='||x_fnd_language||
1686: ' x_message_template_id ='||l_message_template_id||
1687: ' x_attachment_template_id ='||l_attachment_template_id||
1688: ' x_attachment_name ='||l_attachment_name||
1708: -- RAISE FND_API.G_EXC_ERROR;
1709: END IF;
1710: END IF;
1711:
1712: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1713: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1714: 'x_fnd_language '||x_fnd_language||
1715: ' x_fnd_iso_language '||x_fnd_iso_language||
1716: ' x_fnd_iso_territory ' ||x_fnd_iso_territory);
1709: END IF;
1710: END IF;
1711:
1712: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1713: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE , G_MODULE||l_api_name,
1714: 'x_fnd_language '||x_fnd_language||
1715: ' x_fnd_iso_language '||x_fnd_iso_language||
1716: ' x_fnd_iso_territory ' ||x_fnd_iso_territory);
1717: END IF;
1717: END IF;
1718: -- Standard call to get message count and if count is 1, get message info.
1719: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count=>x_msg_count, p_data=>x_msg_data);
1720:
1721: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1722: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,G_MODULE||l_api_name,
1723: 'Leaving '||G_PKG_NAME ||'.'||l_api_name);
1724: END IF;
1725:
1718: -- Standard call to get message count and if count is 1, get message info.
1719: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count=>x_msg_count, p_data=>x_msg_data);
1720:
1721: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1722: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,G_MODULE||l_api_name,
1723: 'Leaving '||G_PKG_NAME ||'.'||l_api_name);
1724: END IF;
1725:
1726: EXCEPTION
1726: EXCEPTION
1727: WHEN FND_API.G_EXC_ERROR THEN
1728: x_return_status := FND_API.G_RET_STS_ERROR;
1729: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1730: IF FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1731: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,G_MODULE||l_api_name,
1732: 'Leaving '||G_PKG_NAME ||'.'||l_api_name||'.ERROR');
1733: END IF;
1734: WHEN OTHERS THEN
1727: WHEN FND_API.G_EXC_ERROR THEN
1728: x_return_status := FND_API.G_RET_STS_ERROR;
1729: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1730: IF FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1731: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,G_MODULE||l_api_name,
1732: 'Leaving '||G_PKG_NAME ||'.'||l_api_name||'.ERROR');
1733: END IF;
1734: WHEN OTHERS THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732: 'Leaving '||G_PKG_NAME ||'.'||l_api_name||'.ERROR');
1733: END IF;
1734: WHEN OTHERS THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: IF FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,G_MODULE||l_api_name,
1738: 'Leaving '||G_PKG_NAME ||'.'||l_api_name||'.Others sqlcode = '
1739: ||SQLCODE||', sqlerrm = '||SQLERRM);
1740: END IF;
1733: END IF;
1734: WHEN OTHERS THEN
1735: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1736: IF FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1737: fnd_log.string(FND_LOG.LEVEL_EXCEPTION,G_MODULE||l_api_name,
1738: 'Leaving '||G_PKG_NAME ||'.'||l_api_name||'.Others sqlcode = '
1739: ||SQLCODE||', sqlerrm = '||SQLERRM);
1740: END IF;
1741: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );