170: END IF;
171: CLOSE csr_template_dtls;
172:
173: -- Put the Template Name in Concurrent Request Log File
174: fnd_file.put_line(FND_FILE.LOG,' ');
175: fnd_file.put_line(FND_FILE.LOG,'Template Name : '||l_template_name);
176:
177: -- Update the xprt_request_id for the current template
178: UPDATE okc_terms_templates_all
171: CLOSE csr_template_dtls;
172:
173: -- Put the Template Name in Concurrent Request Log File
174: fnd_file.put_line(FND_FILE.LOG,' ');
175: fnd_file.put_line(FND_FILE.LOG,'Template Name : '||l_template_name);
176:
177: -- Update the xprt_request_id for the current template
178: UPDATE okc_terms_templates_all
179: SET xprt_request_id = FND_GLOBAL.CONC_REQUEST_ID,
337: OPEN csr_org_rule_exists;
338: FETCH csr_org_rule_exists INTO l_org_rules_yn;
339: CLOSE csr_org_rule_exists;
340:
341: fnd_file.put_line(FND_FILE.LOG,'Org wide rules exists ? '||l_org_rules_yn);
342: -- Get the Rule Org Id
343: OPEN csr_rule_org_id;
344: FETCH csr_rule_org_id INTO l_org_id;
345: CLOSE csr_rule_org_id;
534: BEGIN
535:
536: SELECT fnd_profile.Value('OKC_USE_CONTRACTS_RULES_ENGINE') INTO l_okc_rules_engine FROM dual;
537:
538: fnd_file.put_line(FND_FILE.LOG,'Using OKC Rules Engine'||l_okc_rules_engine);
539:
540: IF Nvl(l_okc_rules_engine,'N') = 'N' THEN
541:
542: -- Check if the concurrent program is being restarted due to completion of child request
553: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
554: END IF;
555:
556: -- log file
557: fnd_file.put_line(FND_FILE.LOG,' ');
558: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
559: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
560: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
561:
554: END IF;
555:
556: -- log file
557: fnd_file.put_line(FND_FILE.LOG,' ');
558: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
559: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
560: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
561:
562: /*
555:
556: -- log file
557: fnd_file.put_line(FND_FILE.LOG,' ');
558: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
559: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
560: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
561:
562: /*
563: Step 1: Update current request Id for all rules to be published
556: -- log file
557: fnd_file.put_line(FND_FILE.LOG,' ');
558: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
559: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
560: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
561:
562: /*
563: Step 1: Update current request Id for all rules to be published
564: */
562: /*
563: Step 1: Update current request Id for all rules to be published
564: */
565:
566: fnd_file.put_line(FND_FILE.LOG,' ');
567: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
568: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
569: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
570: fnd_file.put_line(FND_FILE.LOG,' ');
563: Step 1: Update current request Id for all rules to be published
564: */
565:
566: fnd_file.put_line(FND_FILE.LOG,' ');
567: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
568: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
569: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
570: fnd_file.put_line(FND_FILE.LOG,' ');
571:
564: */
565:
566: fnd_file.put_line(FND_FILE.LOG,' ');
567: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
568: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
569: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
570: fnd_file.put_line(FND_FILE.LOG,' ');
571:
572: -- Update request_id for all Rules in Pending Publication for current org id
565:
566: fnd_file.put_line(FND_FILE.LOG,' ');
567: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
568: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
569: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
570: fnd_file.put_line(FND_FILE.LOG,' ');
571:
572: -- Update request_id for all Rules in Pending Publication for current org id
573: UPDATE okc_xprt_rule_hdrs_all
566: fnd_file.put_line(FND_FILE.LOG,' ');
567: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
568: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
569: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
570: fnd_file.put_line(FND_FILE.LOG,' ');
571:
572: -- Update request_id for all Rules in Pending Publication for current org id
573: UPDATE okc_xprt_rule_hdrs_all
574: SET request_id = FND_GLOBAL.CONC_REQUEST_ID,
587:
588: -- Check If any rules are to be processed else exit
589: IF SQL%NOTFOUND THEN
590: -- exit as no rules to be processed
591: fnd_file.put_line(FND_FILE.LOG,' ');
592: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
593: fnd_file.put_line(FND_FILE.LOG,' ');
594:
595: retcode := 0;
588: -- Check If any rules are to be processed else exit
589: IF SQL%NOTFOUND THEN
590: -- exit as no rules to be processed
591: fnd_file.put_line(FND_FILE.LOG,' ');
592: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
593: fnd_file.put_line(FND_FILE.LOG,' ');
594:
595: retcode := 0;
596: errbuf := '';
589: IF SQL%NOTFOUND THEN
590: -- exit as no rules to be processed
591: fnd_file.put_line(FND_FILE.LOG,' ');
592: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
593: fnd_file.put_line(FND_FILE.LOG,' ');
594:
595: retcode := 0;
596: errbuf := '';
597: RETURN;
604: /*
605: Step 1.1: Rules QA checks
606: */
607:
608: fnd_file.put_line(FND_FILE.LOG,' ');
609: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
610: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks old ');
611: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
612: fnd_file.put_line(FND_FILE.LOG,' ');
605: Step 1.1: Rules QA checks
606: */
607:
608: fnd_file.put_line(FND_FILE.LOG,' ');
609: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
610: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks old ');
611: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
612: fnd_file.put_line(FND_FILE.LOG,' ');
613:
606: */
607:
608: fnd_file.put_line(FND_FILE.LOG,' ');
609: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
610: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks old ');
611: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
612: fnd_file.put_line(FND_FILE.LOG,' ');
613:
614: OKC_XPRT_UTIL_PVT.check_rules_validity
607:
608: fnd_file.put_line(FND_FILE.LOG,' ');
609: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
610: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks old ');
611: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
612: fnd_file.put_line(FND_FILE.LOG,' ');
613:
614: OKC_XPRT_UTIL_PVT.check_rules_validity
615: (
608: fnd_file.put_line(FND_FILE.LOG,' ');
609: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
610: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks old ');
611: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
612: fnd_file.put_line(FND_FILE.LOG,' ');
613:
614: OKC_XPRT_UTIL_PVT.check_rules_validity
615: (
616: p_qa_mode => 'PUBLISH',
621: x_msg_data => x_msg_data,
622: x_msg_count => x_msg_count
623: ) ;
624:
625: fnd_file.put_line(FND_FILE.LOG,' ');
626: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
627: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
628: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
629: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
622: x_msg_count => x_msg_count
623: ) ;
624:
625: fnd_file.put_line(FND_FILE.LOG,' ');
626: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
627: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
628: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
629: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
630: fnd_file.put_line(FND_FILE.LOG,' ');
623: ) ;
624:
625: fnd_file.put_line(FND_FILE.LOG,' ');
626: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
627: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
628: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
629: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
630: fnd_file.put_line(FND_FILE.LOG,' ');
631:
624:
625: fnd_file.put_line(FND_FILE.LOG,' ');
626: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
627: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
628: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
629: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
630: fnd_file.put_line(FND_FILE.LOG,' ');
631:
632: --- If any errors happen abort API
625: fnd_file.put_line(FND_FILE.LOG,' ');
626: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
627: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
628: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
629: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
630: fnd_file.put_line(FND_FILE.LOG,' ');
631:
632: --- If any errors happen abort API
633: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
626: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
627: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
628: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
629: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
630: fnd_file.put_line(FND_FILE.LOG,' ');
631:
632: --- If any errors happen abort API
633: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
634: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
638:
639: -- Check If any rules had QA errors and abort
640: IF l_qa_status <> 'S' THEN
641: -- exit as no rules had QA errors
642: fnd_file.put_line(FND_FILE.LOG,' ');
643: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
644: fnd_file.put_line(FND_FILE.LOG,' ');
645:
646:
639: -- Check If any rules had QA errors and abort
640: IF l_qa_status <> 'S' THEN
641: -- exit as no rules had QA errors
642: fnd_file.put_line(FND_FILE.LOG,' ');
643: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
644: fnd_file.put_line(FND_FILE.LOG,' ');
645:
646:
647: -- Added for Bug 4103931
640: IF l_qa_status <> 'S' THEN
641: -- exit as no rules had QA errors
642: fnd_file.put_line(FND_FILE.LOG,' ');
643: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
644: fnd_file.put_line(FND_FILE.LOG,' ');
645:
646:
647: -- Added for Bug 4103931
648: FOR csr_pub_rule_rec IN csr_pub_rule_list
670: /*
671: Step 2: Import Variable Model
672: */
673:
674: fnd_file.put_line(FND_FILE.LOG,' ');
675: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
676: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Variable Model');
677: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
678: fnd_file.put_line(FND_FILE.LOG,' ');
671: Step 2: Import Variable Model
672: */
673:
674: fnd_file.put_line(FND_FILE.LOG,' ');
675: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
676: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Variable Model');
677: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
678: fnd_file.put_line(FND_FILE.LOG,' ');
679:
672: */
673:
674: fnd_file.put_line(FND_FILE.LOG,' ');
675: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
676: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Variable Model');
677: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
678: fnd_file.put_line(FND_FILE.LOG,' ');
679:
680: OKC_XPRT_IMPORT_VARIABLES_PVT.import_variables
673:
674: fnd_file.put_line(FND_FILE.LOG,' ');
675: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
676: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Variable Model');
677: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
678: fnd_file.put_line(FND_FILE.LOG,' ');
679:
680: OKC_XPRT_IMPORT_VARIABLES_PVT.import_variables
681: (
674: fnd_file.put_line(FND_FILE.LOG,' ');
675: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
676: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Variable Model');
677: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
678: fnd_file.put_line(FND_FILE.LOG,' ');
679:
680: OKC_XPRT_IMPORT_VARIABLES_PVT.import_variables
681: (
682: p_api_version => 1,
687: x_msg_data => x_msg_data,
688: x_msg_count => x_msg_count
689: ) ;
690:
691: fnd_file.put_line(FND_FILE.LOG,' ');
692: fnd_file.put_line(FND_FILE.LOG,'After Importing Variable Model');
693: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
694: fnd_file.put_line(FND_FILE.LOG,' ');
695:
688: x_msg_count => x_msg_count
689: ) ;
690:
691: fnd_file.put_line(FND_FILE.LOG,' ');
692: fnd_file.put_line(FND_FILE.LOG,'After Importing Variable Model');
693: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
694: fnd_file.put_line(FND_FILE.LOG,' ');
695:
696: --- If any errors happen abort API
689: ) ;
690:
691: fnd_file.put_line(FND_FILE.LOG,' ');
692: fnd_file.put_line(FND_FILE.LOG,'After Importing Variable Model');
693: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
694: fnd_file.put_line(FND_FILE.LOG,' ');
695:
696: --- If any errors happen abort API
697: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
690:
691: fnd_file.put_line(FND_FILE.LOG,' ');
692: fnd_file.put_line(FND_FILE.LOG,'After Importing Variable Model');
693: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
694: fnd_file.put_line(FND_FILE.LOG,' ');
695:
696: --- If any errors happen abort API
697: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
698: -- Added for Bug 4757731
729: /*
730: Step 3: Import Clause Model
731: */
732:
733: fnd_file.put_line(FND_FILE.LOG,' ');
734: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
735: fnd_file.put_line(FND_FILE.LOG,'Step 3: Importing Clause Model');
736: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
737: fnd_file.put_line(FND_FILE.LOG,' ');
730: Step 3: Import Clause Model
731: */
732:
733: fnd_file.put_line(FND_FILE.LOG,' ');
734: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
735: fnd_file.put_line(FND_FILE.LOG,'Step 3: Importing Clause Model');
736: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
737: fnd_file.put_line(FND_FILE.LOG,' ');
738:
731: */
732:
733: fnd_file.put_line(FND_FILE.LOG,' ');
734: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
735: fnd_file.put_line(FND_FILE.LOG,'Step 3: Importing Clause Model');
736: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
737: fnd_file.put_line(FND_FILE.LOG,' ');
738:
739: OKC_XPRT_IMPORT_CLAUSES_PVT.import_clauses
732:
733: fnd_file.put_line(FND_FILE.LOG,' ');
734: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
735: fnd_file.put_line(FND_FILE.LOG,'Step 3: Importing Clause Model');
736: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
737: fnd_file.put_line(FND_FILE.LOG,' ');
738:
739: OKC_XPRT_IMPORT_CLAUSES_PVT.import_clauses
740: (
733: fnd_file.put_line(FND_FILE.LOG,' ');
734: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
735: fnd_file.put_line(FND_FILE.LOG,'Step 3: Importing Clause Model');
736: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
737: fnd_file.put_line(FND_FILE.LOG,' ');
738:
739: OKC_XPRT_IMPORT_CLAUSES_PVT.import_clauses
740: (
741: p_api_version => 1,
746: x_msg_data => x_msg_data,
747: x_msg_count => x_msg_count
748: ) ;
749:
750: fnd_file.put_line(FND_FILE.LOG,' ');
751: fnd_file.put_line(FND_FILE.LOG,'After Importing Clause Model');
752: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
753: fnd_file.put_line(FND_FILE.LOG,' ');
754:
747: x_msg_count => x_msg_count
748: ) ;
749:
750: fnd_file.put_line(FND_FILE.LOG,' ');
751: fnd_file.put_line(FND_FILE.LOG,'After Importing Clause Model');
752: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
753: fnd_file.put_line(FND_FILE.LOG,' ');
754:
755: --- If any errors happen abort API
748: ) ;
749:
750: fnd_file.put_line(FND_FILE.LOG,' ');
751: fnd_file.put_line(FND_FILE.LOG,'After Importing Clause Model');
752: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
753: fnd_file.put_line(FND_FILE.LOG,' ');
754:
755: --- If any errors happen abort API
756: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
749:
750: fnd_file.put_line(FND_FILE.LOG,' ');
751: fnd_file.put_line(FND_FILE.LOG,'After Importing Clause Model');
752: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
753: fnd_file.put_line(FND_FILE.LOG,' ');
754:
755: --- If any errors happen abort API
756: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
757: -- Added for Bug 4757731
787: /*
788: Step 4: Import Template Model(s)
789: */
790:
791: fnd_file.put_line(FND_FILE.LOG,' ');
792: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
793: fnd_file.put_line(FND_FILE.LOG,'Step 4: Importing Template Models');
794: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
795: fnd_file.put_line(FND_FILE.LOG,' ');
788: Step 4: Import Template Model(s)
789: */
790:
791: fnd_file.put_line(FND_FILE.LOG,' ');
792: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
793: fnd_file.put_line(FND_FILE.LOG,'Step 4: Importing Template Models');
794: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
795: fnd_file.put_line(FND_FILE.LOG,' ');
796:
789: */
790:
791: fnd_file.put_line(FND_FILE.LOG,' ');
792: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
793: fnd_file.put_line(FND_FILE.LOG,'Step 4: Importing Template Models');
794: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
795: fnd_file.put_line(FND_FILE.LOG,' ');
796:
797: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_pub_disable
790:
791: fnd_file.put_line(FND_FILE.LOG,' ');
792: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
793: fnd_file.put_line(FND_FILE.LOG,'Step 4: Importing Template Models');
794: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
795: fnd_file.put_line(FND_FILE.LOG,' ');
796:
797: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_pub_disable
798: (
791: fnd_file.put_line(FND_FILE.LOG,' ');
792: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
793: fnd_file.put_line(FND_FILE.LOG,'Step 4: Importing Template Models');
794: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
795: fnd_file.put_line(FND_FILE.LOG,' ');
796:
797: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_pub_disable
798: (
799: x_return_status => x_return_status,
800: x_msg_data => x_msg_data,
801: x_msg_count => x_msg_count
802: ) ;
803:
804: fnd_file.put_line(FND_FILE.LOG,' ');
805: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
806: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
807: fnd_file.put_line(FND_FILE.LOG,' ');
808:
801: x_msg_count => x_msg_count
802: ) ;
803:
804: fnd_file.put_line(FND_FILE.LOG,' ');
805: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
806: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
807: fnd_file.put_line(FND_FILE.LOG,' ');
808:
809: --- If any errors happen abort API
802: ) ;
803:
804: fnd_file.put_line(FND_FILE.LOG,' ');
805: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
806: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
807: fnd_file.put_line(FND_FILE.LOG,' ');
808:
809: --- If any errors happen abort API
810: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
803:
804: fnd_file.put_line(FND_FILE.LOG,' ');
805: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
806: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
807: fnd_file.put_line(FND_FILE.LOG,' ');
808:
809: --- If any errors happen abort API
810: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
811: -- Added for Bug 4757731
842: /*
843: Step 5: Populate cz_imp_rules
844: */
845:
846: fnd_file.put_line(FND_FILE.LOG,' ');
847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
848: fnd_file.put_line(FND_FILE.LOG,'Step 5: Populating cz_imp_rules ');
849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
850: fnd_file.put_line(FND_FILE.LOG,' ');
843: Step 5: Populate cz_imp_rules
844: */
845:
846: fnd_file.put_line(FND_FILE.LOG,' ');
847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
848: fnd_file.put_line(FND_FILE.LOG,'Step 5: Populating cz_imp_rules ');
849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
850: fnd_file.put_line(FND_FILE.LOG,' ');
851:
844: */
845:
846: fnd_file.put_line(FND_FILE.LOG,' ');
847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
848: fnd_file.put_line(FND_FILE.LOG,'Step 5: Populating cz_imp_rules ');
849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
850: fnd_file.put_line(FND_FILE.LOG,' ');
851:
852: OKC_XPRT_IMPORT_RULES_PVT.import_rules_publish
845:
846: fnd_file.put_line(FND_FILE.LOG,' ');
847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
848: fnd_file.put_line(FND_FILE.LOG,'Step 5: Populating cz_imp_rules ');
849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
850: fnd_file.put_line(FND_FILE.LOG,' ');
851:
852: OKC_XPRT_IMPORT_RULES_PVT.import_rules_publish
853: (
846: fnd_file.put_line(FND_FILE.LOG,' ');
847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
848: fnd_file.put_line(FND_FILE.LOG,'Step 5: Populating cz_imp_rules ');
849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
850: fnd_file.put_line(FND_FILE.LOG,' ');
851:
852: OKC_XPRT_IMPORT_RULES_PVT.import_rules_publish
853: (
854: x_run_id => G_RUN_ID,
856: x_msg_data => x_msg_data,
857: x_msg_count => x_msg_count
858: );
859:
860: fnd_file.put_line(FND_FILE.LOG,' ');
861: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
862: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
863: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
864: fnd_file.put_line(FND_FILE.LOG,' ');
857: x_msg_count => x_msg_count
858: );
859:
860: fnd_file.put_line(FND_FILE.LOG,' ');
861: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
862: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
863: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
864: fnd_file.put_line(FND_FILE.LOG,' ');
865:
858: );
859:
860: fnd_file.put_line(FND_FILE.LOG,' ');
861: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
862: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
863: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
864: fnd_file.put_line(FND_FILE.LOG,' ');
865:
866: --- If any errors happen abort API
859:
860: fnd_file.put_line(FND_FILE.LOG,' ');
861: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
862: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
863: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
864: fnd_file.put_line(FND_FILE.LOG,' ');
865:
866: --- If any errors happen abort API
867: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
860: fnd_file.put_line(FND_FILE.LOG,' ');
861: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
862: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
863: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
864: fnd_file.put_line(FND_FILE.LOG,' ');
865:
866: --- If any errors happen abort API
867: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
868: -- Added for Bug 4757731
901: If there are no records in cz_imp_rules then there were no expert enabled templates
902: attached to the rule. Just change the status of the rule to ACTIVE
903: */
904:
905: fnd_file.put_line(FND_FILE.LOG,' ');
906: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
907: fnd_file.put_line(FND_FILE.LOG,'Step 5.1:Count Rules to be imported');
908: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
909: fnd_file.put_line(FND_FILE.LOG,' ');
902: attached to the rule. Just change the status of the rule to ACTIVE
903: */
904:
905: fnd_file.put_line(FND_FILE.LOG,' ');
906: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
907: fnd_file.put_line(FND_FILE.LOG,'Step 5.1:Count Rules to be imported');
908: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
909: fnd_file.put_line(FND_FILE.LOG,' ');
910:
903: */
904:
905: fnd_file.put_line(FND_FILE.LOG,' ');
906: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
907: fnd_file.put_line(FND_FILE.LOG,'Step 5.1:Count Rules to be imported');
908: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
909: fnd_file.put_line(FND_FILE.LOG,' ');
910:
911: OPEN csr_cz_imp_rules_cnt;
904:
905: fnd_file.put_line(FND_FILE.LOG,' ');
906: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
907: fnd_file.put_line(FND_FILE.LOG,'Step 5.1:Count Rules to be imported');
908: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
909: fnd_file.put_line(FND_FILE.LOG,' ');
910:
911: OPEN csr_cz_imp_rules_cnt;
912: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
905: fnd_file.put_line(FND_FILE.LOG,' ');
906: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
907: fnd_file.put_line(FND_FILE.LOG,'Step 5.1:Count Rules to be imported');
908: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
909: fnd_file.put_line(FND_FILE.LOG,' ');
910:
911: OPEN csr_cz_imp_rules_cnt;
912: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
913: CLOSE csr_cz_imp_rules_cnt;
911: OPEN csr_cz_imp_rules_cnt;
912: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
913: CLOSE csr_cz_imp_rules_cnt;
914:
915: fnd_file.put_line(FND_FILE.LOG,' ');
916: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
917: fnd_file.put_line(FND_FILE.LOG,' ');
918:
919:
912: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
913: CLOSE csr_cz_imp_rules_cnt;
914:
915: fnd_file.put_line(FND_FILE.LOG,' ');
916: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
917: fnd_file.put_line(FND_FILE.LOG,' ');
918:
919:
920: IF l_rules_cnt = 0 THEN
913: CLOSE csr_cz_imp_rules_cnt;
914:
915: fnd_file.put_line(FND_FILE.LOG,' ');
916: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
917: fnd_file.put_line(FND_FILE.LOG,' ');
918:
919:
920: IF l_rules_cnt = 0 THEN
921:
926: x_msg_data => x_msg_data,
927: x_msg_count => x_msg_count
928: );
929:
930: fnd_file.put_line(FND_FILE.LOG,' ');
931: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
932: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
933: fnd_file.put_line(FND_FILE.LOG,' ');
934:
927: x_msg_count => x_msg_count
928: );
929:
930: fnd_file.put_line(FND_FILE.LOG,' ');
931: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
932: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
933: fnd_file.put_line(FND_FILE.LOG,' ');
934:
935: --- If any errors happen abort API
928: );
929:
930: fnd_file.put_line(FND_FILE.LOG,' ');
931: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
932: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
933: fnd_file.put_line(FND_FILE.LOG,' ');
934:
935: --- If any errors happen abort API
936: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
929:
930: fnd_file.put_line(FND_FILE.LOG,' ');
931: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
932: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
933: fnd_file.put_line(FND_FILE.LOG,' ');
934:
935: --- If any errors happen abort API
936: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
937: -- Added for Bug 4757731
963: -- Added for Bug 4757731
964: RAISE FND_API.G_EXC_ERROR;
965: END IF;
966:
967: fnd_file.put_line(FND_FILE.LOG,' ');
968: fnd_file.put_line(FND_FILE.LOG,'Rules has No expert template attached');
969: fnd_file.put_line(FND_FILE.LOG,' ');
970:
971: retcode := 0;
964: RAISE FND_API.G_EXC_ERROR;
965: END IF;
966:
967: fnd_file.put_line(FND_FILE.LOG,' ');
968: fnd_file.put_line(FND_FILE.LOG,'Rules has No expert template attached');
969: fnd_file.put_line(FND_FILE.LOG,' ');
970:
971: retcode := 0;
972: errbuf := '';
965: END IF;
966:
967: fnd_file.put_line(FND_FILE.LOG,' ');
968: fnd_file.put_line(FND_FILE.LOG,'Rules has No expert template attached');
969: fnd_file.put_line(FND_FILE.LOG,' ');
970:
971: retcode := 0;
972: errbuf := '';
973: RETURN;
978: /*
979: Step 6: Insert Extension Rules
980: */
981:
982: fnd_file.put_line(FND_FILE.LOG,' ');
983: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
984: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling API to insert extension rule records');
985: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
986: fnd_file.put_line(FND_FILE.LOG,' ');
979: Step 6: Insert Extension Rules
980: */
981:
982: fnd_file.put_line(FND_FILE.LOG,' ');
983: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
984: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling API to insert extension rule records');
985: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
986: fnd_file.put_line(FND_FILE.LOG,' ');
987:
980: */
981:
982: fnd_file.put_line(FND_FILE.LOG,' ');
983: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
984: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling API to insert extension rule records');
985: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
986: fnd_file.put_line(FND_FILE.LOG,' ');
987:
988: OKC_XPRT_IMPORT_RULES_PVT.attach_extension_rule
981:
982: fnd_file.put_line(FND_FILE.LOG,' ');
983: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
984: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling API to insert extension rule records');
985: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
986: fnd_file.put_line(FND_FILE.LOG,' ');
987:
988: OKC_XPRT_IMPORT_RULES_PVT.attach_extension_rule
989: (
982: fnd_file.put_line(FND_FILE.LOG,' ');
983: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
984: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling API to insert extension rule records');
985: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
986: fnd_file.put_line(FND_FILE.LOG,' ');
987:
988: OKC_XPRT_IMPORT_RULES_PVT.attach_extension_rule
989: (
990: p_api_version => 1,
994: x_msg_data => x_msg_data,
995: x_msg_count => x_msg_count
996: );
997:
998: fnd_file.put_line(FND_FILE.LOG,' ');
999: fnd_file.put_line(FND_FILE.LOG,'Step 6: After Calling API to insert extension rule records');
1000: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1001: fnd_file.put_line(FND_FILE.LOG,' ');
1002:
995: x_msg_count => x_msg_count
996: );
997:
998: fnd_file.put_line(FND_FILE.LOG,' ');
999: fnd_file.put_line(FND_FILE.LOG,'Step 6: After Calling API to insert extension rule records');
1000: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1001: fnd_file.put_line(FND_FILE.LOG,' ');
1002:
1003: /*
996: );
997:
998: fnd_file.put_line(FND_FILE.LOG,' ');
999: fnd_file.put_line(FND_FILE.LOG,'Step 6: After Calling API to insert extension rule records');
1000: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1001: fnd_file.put_line(FND_FILE.LOG,' ');
1002:
1003: /*
1004: Step 7: Call the CZ Rule Import Concurrent Program
997:
998: fnd_file.put_line(FND_FILE.LOG,' ');
999: fnd_file.put_line(FND_FILE.LOG,'Step 6: After Calling API to insert extension rule records');
1000: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1001: fnd_file.put_line(FND_FILE.LOG,' ');
1002:
1003: /*
1004: Step 7: Call the CZ Rule Import Concurrent Program
1005: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
1004: Step 7: Call the CZ Rule Import Concurrent Program
1005: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
1006: */
1007:
1008: fnd_file.put_line(FND_FILE.LOG,' ');
1009: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1010: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the CZ Rule Import Concurrent Program');
1011: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1012: fnd_file.put_line(FND_FILE.LOG,' ');
1005: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
1006: */
1007:
1008: fnd_file.put_line(FND_FILE.LOG,' ');
1009: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1010: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the CZ Rule Import Concurrent Program');
1011: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1012: fnd_file.put_line(FND_FILE.LOG,' ');
1013: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1006: */
1007:
1008: fnd_file.put_line(FND_FILE.LOG,' ');
1009: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1010: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the CZ Rule Import Concurrent Program');
1011: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1012: fnd_file.put_line(FND_FILE.LOG,' ');
1013: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1014:
1007:
1008: fnd_file.put_line(FND_FILE.LOG,' ');
1009: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1010: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the CZ Rule Import Concurrent Program');
1011: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1012: fnd_file.put_line(FND_FILE.LOG,' ');
1013: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1014:
1015:
1008: fnd_file.put_line(FND_FILE.LOG,' ');
1009: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1010: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the CZ Rule Import Concurrent Program');
1011: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1012: fnd_file.put_line(FND_FILE.LOG,' ');
1013: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1014:
1015:
1016: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_ACT_MSG');
1009: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1010: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the CZ Rule Import Concurrent Program');
1011: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1012: fnd_file.put_line(FND_FILE.LOG,' ');
1013: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1014:
1015:
1016: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_ACT_MSG');
1017: l_conc_pgm_desc := FND_MESSAGE.get;
1024: sub_request => TRUE,
1025: argument1 => G_RUN_ID
1026: );
1027:
1028: fnd_file.put_line(FND_FILE.LOG,'Request Id of CZ Rule Concurrent Pgm : '||G_REQUEST_ID);
1029:
1030: -- commit the data
1031: COMMIT WORK;
1032:
1032:
1033: IF NVL(G_REQUEST_ID,0) = 0 THEN
1034: -- Could Not submit Conc Pgm
1035: fnd_message.set_name('OKC','OKC_XPRT_SUB_CZ_RUL_PGM');
1036: fnd_file.put_line(FND_FILE.LOG,'Could NOT submit CZ Concurrent Program');
1037:
1038: -- Added for Bug 4757731
1039: FOR csr_pub_rule_rec IN csr_pub_rule_list
1040: LOOP
1082: x_dev_status,
1083: x_message
1084: );
1085:
1086: fnd_file.put_line(FND_FILE.LOG,' ');
1087: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1083: x_message
1084: );
1085:
1086: fnd_file.put_line(FND_FILE.LOG,' ');
1087: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1084: );
1085:
1086: fnd_file.put_line(FND_FILE.LOG,' ');
1087: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1085:
1086: fnd_file.put_line(FND_FILE.LOG,' ');
1087: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1086: fnd_file.put_line(FND_FILE.LOG,' ');
1087: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1087: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1088: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1089: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1097: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1090: fnd_file.put_line(FND_FILE.LOG,'Results ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1097: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1098: fnd_file.put_line(FND_FILE.LOG,' ');
1091: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1097: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1098: fnd_file.put_line(FND_FILE.LOG,' ');
1099:
1092: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1097: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1098: fnd_file.put_line(FND_FILE.LOG,' ');
1099:
1100: IF x_dev_phase <> 'COMPLETED' AND
1093: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1097: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1098: fnd_file.put_line(FND_FILE.LOG,' ');
1099:
1100: IF x_dev_phase <> 'COMPLETED' AND
1101: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1094: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1095: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1096: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1097: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1098: fnd_file.put_line(FND_FILE.LOG,' ');
1099:
1100: IF x_dev_phase <> 'COMPLETED' AND
1101: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1102: -- error in CZ Concurrent Program
1099:
1100: IF x_dev_phase <> 'COMPLETED' AND
1101: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1102: -- error in CZ Concurrent Program
1103: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
1104: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
1105: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
1106:
1107: -- Added for Bug 4757731
1100: IF x_dev_phase <> 'COMPLETED' AND
1101: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1102: -- error in CZ Concurrent Program
1103: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
1104: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
1105: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
1106:
1107: -- Added for Bug 4757731
1108: FOR csr_pub_rule_rec IN csr_pub_rule_list
1101: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1102: -- error in CZ Concurrent Program
1103: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
1104: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
1105: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
1106:
1107: -- Added for Bug 4757731
1108: FOR csr_pub_rule_rec IN csr_pub_rule_list
1109: LOOP
1123: /*
1124: Step 8: Check status of Rules Imported
1125: */
1126:
1127: fnd_file.put_line(FND_FILE.LOG,' ');
1128: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1129: fnd_file.put_line(FND_FILE.LOG,'Step 8: Checking Status of Rules imported');
1130: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1131: fnd_file.put_line(FND_FILE.LOG,' ');
1124: Step 8: Check status of Rules Imported
1125: */
1126:
1127: fnd_file.put_line(FND_FILE.LOG,' ');
1128: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1129: fnd_file.put_line(FND_FILE.LOG,'Step 8: Checking Status of Rules imported');
1130: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1131: fnd_file.put_line(FND_FILE.LOG,' ');
1132:
1125: */
1126:
1127: fnd_file.put_line(FND_FILE.LOG,' ');
1128: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1129: fnd_file.put_line(FND_FILE.LOG,'Step 8: Checking Status of Rules imported');
1130: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1131: fnd_file.put_line(FND_FILE.LOG,' ');
1132:
1133: OKC_XPRT_UTIL_PVT.check_import_status
1126:
1127: fnd_file.put_line(FND_FILE.LOG,' ');
1128: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1129: fnd_file.put_line(FND_FILE.LOG,'Step 8: Checking Status of Rules imported');
1130: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1131: fnd_file.put_line(FND_FILE.LOG,' ');
1132:
1133: OKC_XPRT_UTIL_PVT.check_import_status
1134: (
1127: fnd_file.put_line(FND_FILE.LOG,' ');
1128: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1129: fnd_file.put_line(FND_FILE.LOG,'Step 8: Checking Status of Rules imported');
1130: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1131: fnd_file.put_line(FND_FILE.LOG,' ');
1132:
1133: OKC_XPRT_UTIL_PVT.check_import_status
1134: (
1135: p_run_id => G_RUN_ID,
1139: x_msg_data => x_msg_data,
1140: x_msg_count => x_msg_count
1141: );
1142:
1143: fnd_file.put_line(FND_FILE.LOG,' ');
1144: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
1145: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1146: fnd_file.put_line(FND_FILE.LOG,' ');
1147:
1140: x_msg_count => x_msg_count
1141: );
1142:
1143: fnd_file.put_line(FND_FILE.LOG,' ');
1144: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
1145: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1146: fnd_file.put_line(FND_FILE.LOG,' ');
1147:
1148: --- If any errors happen abort API
1141: );
1142:
1143: fnd_file.put_line(FND_FILE.LOG,' ');
1144: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
1145: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1146: fnd_file.put_line(FND_FILE.LOG,' ');
1147:
1148: --- If any errors happen abort API
1149: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1142:
1143: fnd_file.put_line(FND_FILE.LOG,' ');
1144: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
1145: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1146: fnd_file.put_line(FND_FILE.LOG,' ');
1147:
1148: --- If any errors happen abort API
1149: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1150: -- Added for Bug 4757731
1181: /*
1182: Step 9: Call the Test Publication API
1183: */
1184:
1185: fnd_file.put_line(FND_FILE.LOG,' ');
1186: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1187: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Test Publication API');
1188: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1189: fnd_file.put_line(FND_FILE.LOG,' ');
1182: Step 9: Call the Test Publication API
1183: */
1184:
1185: fnd_file.put_line(FND_FILE.LOG,' ');
1186: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1187: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Test Publication API');
1188: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1189: fnd_file.put_line(FND_FILE.LOG,' ');
1190:
1183: */
1184:
1185: fnd_file.put_line(FND_FILE.LOG,' ');
1186: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1187: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Test Publication API');
1188: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1189: fnd_file.put_line(FND_FILE.LOG,' ');
1190:
1191: OKC_XPRT_UTIL_PVT.create_test_publication
1184:
1185: fnd_file.put_line(FND_FILE.LOG,' ');
1186: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1187: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Test Publication API');
1188: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1189: fnd_file.put_line(FND_FILE.LOG,' ');
1190:
1191: OKC_XPRT_UTIL_PVT.create_test_publication
1192: (
1185: fnd_file.put_line(FND_FILE.LOG,' ');
1186: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1187: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Test Publication API');
1188: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1189: fnd_file.put_line(FND_FILE.LOG,' ');
1190:
1191: OKC_XPRT_UTIL_PVT.create_test_publication
1192: (
1193: x_return_status => x_return_status,
1194: x_msg_data => x_msg_data,
1195: x_msg_count => x_msg_count
1196: );
1197:
1198: fnd_file.put_line(FND_FILE.LOG,' ');
1199: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
1200: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1201: fnd_file.put_line(FND_FILE.LOG,' ');
1202:
1195: x_msg_count => x_msg_count
1196: );
1197:
1198: fnd_file.put_line(FND_FILE.LOG,' ');
1199: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
1200: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1201: fnd_file.put_line(FND_FILE.LOG,' ');
1202:
1203: --- If any errors happen abort API
1196: );
1197:
1198: fnd_file.put_line(FND_FILE.LOG,' ');
1199: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
1200: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1201: fnd_file.put_line(FND_FILE.LOG,' ');
1202:
1203: --- If any errors happen abort API
1204: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1197:
1198: fnd_file.put_line(FND_FILE.LOG,' ');
1199: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
1200: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1201: fnd_file.put_line(FND_FILE.LOG,' ');
1202:
1203: --- If any errors happen abort API
1204: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1205: -- Added for Bug 4757731
1234: /*
1235: Step 10: Call the Production Publication API
1236: */
1237:
1238: fnd_file.put_line(FND_FILE.LOG,' ');
1239: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1240: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Production Publication API');
1241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1242: fnd_file.put_line(FND_FILE.LOG,' ');
1235: Step 10: Call the Production Publication API
1236: */
1237:
1238: fnd_file.put_line(FND_FILE.LOG,' ');
1239: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1240: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Production Publication API');
1241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1242: fnd_file.put_line(FND_FILE.LOG,' ');
1243:
1236: */
1237:
1238: fnd_file.put_line(FND_FILE.LOG,' ');
1239: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1240: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Production Publication API');
1241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1242: fnd_file.put_line(FND_FILE.LOG,' ');
1243:
1244: OKC_XPRT_UTIL_PVT.create_production_publication
1237:
1238: fnd_file.put_line(FND_FILE.LOG,' ');
1239: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1240: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Production Publication API');
1241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1242: fnd_file.put_line(FND_FILE.LOG,' ');
1243:
1244: OKC_XPRT_UTIL_PVT.create_production_publication
1245: (
1238: fnd_file.put_line(FND_FILE.LOG,' ');
1239: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1240: fnd_file.put_line(FND_FILE.LOG,'Step 9: Calling the Production Publication API');
1241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1242: fnd_file.put_line(FND_FILE.LOG,' ');
1243:
1244: OKC_XPRT_UTIL_PVT.create_production_publication
1245: (
1246: p_calling_mode => 'PUBLISH',
1249: x_msg_data => x_msg_data,
1250: x_msg_count => x_msg_count
1251: );
1252:
1253: fnd_file.put_line(FND_FILE.LOG,' ');
1254: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
1255: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1256: fnd_file.put_line(FND_FILE.LOG,' ');
1257:
1250: x_msg_count => x_msg_count
1251: );
1252:
1253: fnd_file.put_line(FND_FILE.LOG,' ');
1254: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
1255: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1256: fnd_file.put_line(FND_FILE.LOG,' ');
1257:
1258: --- If any errors happen abort API
1251: );
1252:
1253: fnd_file.put_line(FND_FILE.LOG,' ');
1254: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
1255: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1256: fnd_file.put_line(FND_FILE.LOG,' ');
1257:
1258: --- If any errors happen abort API
1259: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1252:
1253: fnd_file.put_line(FND_FILE.LOG,' ');
1254: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
1255: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1256: fnd_file.put_line(FND_FILE.LOG,' ');
1257:
1258: --- If any errors happen abort API
1259: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1260: -- Added for Bug 4757731
1309: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1310: END IF;
1311:
1312: -- log file
1313: fnd_file.put_line(FND_FILE.LOG,' ');
1314: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1315: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1316: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1317:
1310: END IF;
1311:
1312: -- log file
1313: fnd_file.put_line(FND_FILE.LOG,' ');
1314: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1315: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1316: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1317:
1318: /*
1311:
1312: -- log file
1313: fnd_file.put_line(FND_FILE.LOG,' ');
1314: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1315: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1316: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1317:
1318: /*
1319: Step 1: Update current request Id for all rules to be published
1312: -- log file
1313: fnd_file.put_line(FND_FILE.LOG,' ');
1314: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1315: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1316: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1317:
1318: /*
1319: Step 1: Update current request Id for all rules to be published
1320: */
1318: /*
1319: Step 1: Update current request Id for all rules to be published
1320: */
1321:
1322: fnd_file.put_line(FND_FILE.LOG,' ');
1323: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1324: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1325: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1326: fnd_file.put_line(FND_FILE.LOG,' ');
1319: Step 1: Update current request Id for all rules to be published
1320: */
1321:
1322: fnd_file.put_line(FND_FILE.LOG,' ');
1323: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1324: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1325: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1326: fnd_file.put_line(FND_FILE.LOG,' ');
1327:
1320: */
1321:
1322: fnd_file.put_line(FND_FILE.LOG,' ');
1323: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1324: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1325: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1326: fnd_file.put_line(FND_FILE.LOG,' ');
1327:
1328: -- Update request_id for all Rules in Pending Publication for current org id
1321:
1322: fnd_file.put_line(FND_FILE.LOG,' ');
1323: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1324: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1325: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1326: fnd_file.put_line(FND_FILE.LOG,' ');
1327:
1328: -- Update request_id for all Rules in Pending Publication for current org id
1329: UPDATE okc_xprt_rule_hdrs_all
1322: fnd_file.put_line(FND_FILE.LOG,' ');
1323: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1324: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1325: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1326: fnd_file.put_line(FND_FILE.LOG,' ');
1327:
1328: -- Update request_id for all Rules in Pending Publication for current org id
1329: UPDATE okc_xprt_rule_hdrs_all
1330: SET request_id = FND_GLOBAL.CONC_REQUEST_ID,
1343:
1344: -- Check If any rules are to be processed else exit
1345: IF SQL%NOTFOUND THEN
1346: -- exit as no rules to be processed
1347: fnd_file.put_line(FND_FILE.LOG,' ');
1348: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
1349: fnd_file.put_line(FND_FILE.LOG,' ');
1350:
1351: retcode := 0;
1344: -- Check If any rules are to be processed else exit
1345: IF SQL%NOTFOUND THEN
1346: -- exit as no rules to be processed
1347: fnd_file.put_line(FND_FILE.LOG,' ');
1348: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
1349: fnd_file.put_line(FND_FILE.LOG,' ');
1350:
1351: retcode := 0;
1352: errbuf := '';
1345: IF SQL%NOTFOUND THEN
1346: -- exit as no rules to be processed
1347: fnd_file.put_line(FND_FILE.LOG,' ');
1348: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
1349: fnd_file.put_line(FND_FILE.LOG,' ');
1350:
1351: retcode := 0;
1352: errbuf := '';
1353: RETURN;
1360: /*
1361: Step 1.1: Rules QA checks
1362: */
1363:
1364: fnd_file.put_line(FND_FILE.LOG,' ');
1365: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1366: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks new ');
1367: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1368: fnd_file.put_line(FND_FILE.LOG,' ');
1361: Step 1.1: Rules QA checks
1362: */
1363:
1364: fnd_file.put_line(FND_FILE.LOG,' ');
1365: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1366: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks new ');
1367: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1368: fnd_file.put_line(FND_FILE.LOG,' ');
1369:
1362: */
1363:
1364: fnd_file.put_line(FND_FILE.LOG,' ');
1365: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1366: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks new ');
1367: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1368: fnd_file.put_line(FND_FILE.LOG,' ');
1369:
1370: OKC_XPRT_UTIL_PVT.check_rules_validity
1363:
1364: fnd_file.put_line(FND_FILE.LOG,' ');
1365: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1366: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks new ');
1367: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1368: fnd_file.put_line(FND_FILE.LOG,' ');
1369:
1370: OKC_XPRT_UTIL_PVT.check_rules_validity
1371: (
1364: fnd_file.put_line(FND_FILE.LOG,' ');
1365: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1366: fnd_file.put_line(FND_FILE.LOG,'Step 1.1: Rules QA Checks new ');
1367: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1368: fnd_file.put_line(FND_FILE.LOG,' ');
1369:
1370: OKC_XPRT_UTIL_PVT.check_rules_validity
1371: (
1372: p_qa_mode => 'PUBLISH',
1377: x_msg_data => x_msg_data,
1378: x_msg_count => x_msg_count
1379: ) ;
1380:
1381: fnd_file.put_line(FND_FILE.LOG,' ');
1382: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
1383: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1384: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
1385: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
1378: x_msg_count => x_msg_count
1379: ) ;
1380:
1381: fnd_file.put_line(FND_FILE.LOG,' ');
1382: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
1383: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1384: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
1385: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
1386: fnd_file.put_line(FND_FILE.LOG,' ');
1379: ) ;
1380:
1381: fnd_file.put_line(FND_FILE.LOG,' ');
1382: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
1383: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1384: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
1385: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
1386: fnd_file.put_line(FND_FILE.LOG,' ');
1387:
1380:
1381: fnd_file.put_line(FND_FILE.LOG,' ');
1382: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
1383: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1384: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
1385: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
1386: fnd_file.put_line(FND_FILE.LOG,' ');
1387:
1388: --- If any errors happen abort API
1381: fnd_file.put_line(FND_FILE.LOG,' ');
1382: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
1383: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1384: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
1385: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
1386: fnd_file.put_line(FND_FILE.LOG,' ');
1387:
1388: --- If any errors happen abort API
1389: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1382: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
1383: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1384: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
1385: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
1386: fnd_file.put_line(FND_FILE.LOG,' ');
1387:
1388: --- If any errors happen abort API
1389: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1390: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1391: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1392: RAISE FND_API.G_EXC_ERROR;
1393: END IF;
1394:
1395: fnd_file.put_line(FND_FILE.LOG,'after');
1396:
1397: -- Check If any rules had QA errors and abort
1398: IF l_qa_status <> 'S' THEN
1399: fnd_file.put_line(FND_FILE.LOG,'in');
1395: fnd_file.put_line(FND_FILE.LOG,'after');
1396:
1397: -- Check If any rules had QA errors and abort
1398: IF l_qa_status <> 'S' THEN
1399: fnd_file.put_line(FND_FILE.LOG,'in');
1400: -- exit as no rules had QA errors
1401: fnd_file.put_line(FND_FILE.LOG,' ');
1402: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
1403: fnd_file.put_line(FND_FILE.LOG,' ');
1397: -- Check If any rules had QA errors and abort
1398: IF l_qa_status <> 'S' THEN
1399: fnd_file.put_line(FND_FILE.LOG,'in');
1400: -- exit as no rules had QA errors
1401: fnd_file.put_line(FND_FILE.LOG,' ');
1402: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
1403: fnd_file.put_line(FND_FILE.LOG,' ');
1404:
1405:
1398: IF l_qa_status <> 'S' THEN
1399: fnd_file.put_line(FND_FILE.LOG,'in');
1400: -- exit as no rules had QA errors
1401: fnd_file.put_line(FND_FILE.LOG,' ');
1402: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
1403: fnd_file.put_line(FND_FILE.LOG,' ');
1404:
1405:
1406: -- Added for Bug 4103931
1399: fnd_file.put_line(FND_FILE.LOG,'in');
1400: -- exit as no rules had QA errors
1401: fnd_file.put_line(FND_FILE.LOG,' ');
1402: fnd_file.put_line(FND_FILE.LOG,'Rules QA Check failed');
1403: fnd_file.put_line(FND_FILE.LOG,' ');
1404:
1405:
1406: -- Added for Bug 4103931
1407: FOR csr_pub_rule_rec IN csr_pub_rule_list
1419: COMMIT;
1420:
1421: retcode := 2;
1422: errbuf := '';
1423: fnd_file.put_line(FND_FILE.LOG,'Return');
1424: RETURN;
1425:
1426: END IF; -- QA Errors
1427:
1425:
1426: END IF; -- QA Errors
1427:
1428:
1429: fnd_file.put_line(FND_FILE.LOG,' ');
1430: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1431: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
1432: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1433: fnd_file.put_line(FND_FILE.LOG,' ');
1426: END IF; -- QA Errors
1427:
1428:
1429: fnd_file.put_line(FND_FILE.LOG,' ');
1430: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1431: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
1432: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1433: fnd_file.put_line(FND_FILE.LOG,' ');
1434:
1427:
1428:
1429: fnd_file.put_line(FND_FILE.LOG,' ');
1430: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1431: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
1432: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1433: fnd_file.put_line(FND_FILE.LOG,' ');
1434:
1435:
1428:
1429: fnd_file.put_line(FND_FILE.LOG,' ');
1430: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1431: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
1432: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1433: fnd_file.put_line(FND_FILE.LOG,' ');
1434:
1435:
1436: sync_templates
1429: fnd_file.put_line(FND_FILE.LOG,' ');
1430: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1431: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
1432: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1433: fnd_file.put_line(FND_FILE.LOG,' ');
1434:
1435:
1436: sync_templates
1437: (
1514:
1515: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1516: retcode := 2;
1517: errbuf := x_msg_data;
1518: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
1519: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1520: fnd_file.put_line(FND_FILE.LOG,' ');
1521:
1522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1515: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1516: retcode := 2;
1517: errbuf := x_msg_data;
1518: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
1519: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1520: fnd_file.put_line(FND_FILE.LOG,' ');
1521:
1522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1516: retcode := 2;
1517: errbuf := x_msg_data;
1518: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
1519: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1520: fnd_file.put_line(FND_FILE.LOG,' ');
1521:
1522: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1523: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1528:
1529: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1530: retcode := 2;
1531: errbuf := x_msg_data;
1532: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
1533: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1534: fnd_file.put_line(FND_FILE.LOG,' ');
1535:
1536: WHEN OTHERS THEN
1529: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1530: retcode := 2;
1531: errbuf := x_msg_data;
1532: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
1533: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1534: fnd_file.put_line(FND_FILE.LOG,' ');
1535:
1536: WHEN OTHERS THEN
1537: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1530: retcode := 2;
1531: errbuf := x_msg_data;
1532: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
1533: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1534: fnd_file.put_line(FND_FILE.LOG,' ');
1535:
1536: WHEN OTHERS THEN
1537: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1538: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1542:
1543: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1544: retcode := 2;
1545: errbuf := SQLERRM;
1546: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
1547: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1548: fnd_file.put_line(FND_FILE.LOG,' ');
1549:
1550: END publish_rules;
1543: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1544: retcode := 2;
1545: errbuf := SQLERRM;
1546: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
1547: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1548: fnd_file.put_line(FND_FILE.LOG,' ');
1549:
1550: END publish_rules;
1551:
1544: retcode := 2;
1545: errbuf := SQLERRM;
1546: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
1547: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
1548: fnd_file.put_line(FND_FILE.LOG,' ');
1549:
1550: END publish_rules;
1551:
1552: ---------------------------------------------------
1613: BEGIN
1614:
1615: SELECT fnd_profile.Value('OKC_USE_CONTRACTS_RULES_ENGINE') INTO l_okc_rules_engine FROM dual;
1616:
1617: fnd_file.put_line(FND_FILE.LOG,'Using OKC Rules Engine'||l_okc_rules_engine);
1618:
1619: IF Nvl(l_okc_rules_engine,'N') = 'N' THEN
1620:
1621: -- Check if the concurrent program is being restarted due to completion of child request
1632: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
1633: END IF;
1634:
1635: -- log file
1636: fnd_file.put_line(FND_FILE.LOG,' ');
1637: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1638: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1639: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1640:
1633: END IF;
1634:
1635: -- log file
1636: fnd_file.put_line(FND_FILE.LOG,' ');
1637: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1638: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1639: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1640:
1641: /*
1634:
1635: -- log file
1636: fnd_file.put_line(FND_FILE.LOG,' ');
1637: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1638: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1639: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1640:
1641: /*
1642: Step 1: Update current request Id for all rules to be published
1635: -- log file
1636: fnd_file.put_line(FND_FILE.LOG,' ');
1637: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
1638: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
1639: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
1640:
1641: /*
1642: Step 1: Update current request Id for all rules to be published
1643: */
1641: /*
1642: Step 1: Update current request Id for all rules to be published
1643: */
1644:
1645: fnd_file.put_line(FND_FILE.LOG,' ');
1646: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1647: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1648: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1649: fnd_file.put_line(FND_FILE.LOG,' ');
1642: Step 1: Update current request Id for all rules to be published
1643: */
1644:
1645: fnd_file.put_line(FND_FILE.LOG,' ');
1646: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1647: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1648: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1649: fnd_file.put_line(FND_FILE.LOG,' ');
1650:
1643: */
1644:
1645: fnd_file.put_line(FND_FILE.LOG,' ');
1646: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1647: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1648: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1649: fnd_file.put_line(FND_FILE.LOG,' ');
1650:
1651: -- Update request_id for all Rules in Pending Publication for current org id
1644:
1645: fnd_file.put_line(FND_FILE.LOG,' ');
1646: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1647: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1648: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1649: fnd_file.put_line(FND_FILE.LOG,' ');
1650:
1651: -- Update request_id for all Rules in Pending Publication for current org id
1652: UPDATE okc_xprt_rule_hdrs_all
1645: fnd_file.put_line(FND_FILE.LOG,' ');
1646: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1647: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
1648: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1649: fnd_file.put_line(FND_FILE.LOG,' ');
1650:
1651: -- Update request_id for all Rules in Pending Publication for current org id
1652: UPDATE okc_xprt_rule_hdrs_all
1653: SET request_id = FND_GLOBAL.CONC_REQUEST_ID,
1666:
1667: -- Check If any rules are to be processed else exit
1668: IF SQL%NOTFOUND THEN
1669: -- exit as no rules to be processed
1670: fnd_file.put_line(FND_FILE.LOG,' ');
1671: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
1672: fnd_file.put_line(FND_FILE.LOG,' ');
1673:
1674: retcode := 0;
1667: -- Check If any rules are to be processed else exit
1668: IF SQL%NOTFOUND THEN
1669: -- exit as no rules to be processed
1670: fnd_file.put_line(FND_FILE.LOG,' ');
1671: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
1672: fnd_file.put_line(FND_FILE.LOG,' ');
1673:
1674: retcode := 0;
1675: errbuf := '';
1668: IF SQL%NOTFOUND THEN
1669: -- exit as no rules to be processed
1670: fnd_file.put_line(FND_FILE.LOG,' ');
1671: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
1672: fnd_file.put_line(FND_FILE.LOG,' ');
1673:
1674: retcode := 0;
1675: errbuf := '';
1676: RETURN;
1683: /*
1684: Step 2: Import Template Model(s)
1685: */
1686:
1687: fnd_file.put_line(FND_FILE.LOG,' ');
1688: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1689: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Template Models');
1690: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1691: fnd_file.put_line(FND_FILE.LOG,' ');
1684: Step 2: Import Template Model(s)
1685: */
1686:
1687: fnd_file.put_line(FND_FILE.LOG,' ');
1688: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1689: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Template Models');
1690: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1691: fnd_file.put_line(FND_FILE.LOG,' ');
1692:
1685: */
1686:
1687: fnd_file.put_line(FND_FILE.LOG,' ');
1688: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1689: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Template Models');
1690: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1691: fnd_file.put_line(FND_FILE.LOG,' ');
1692:
1693: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_pub_disable
1686:
1687: fnd_file.put_line(FND_FILE.LOG,' ');
1688: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1689: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Template Models');
1690: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1691: fnd_file.put_line(FND_FILE.LOG,' ');
1692:
1693: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_pub_disable
1694: (
1687: fnd_file.put_line(FND_FILE.LOG,' ');
1688: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1689: fnd_file.put_line(FND_FILE.LOG,'Step 2: Importing Template Models');
1690: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1691: fnd_file.put_line(FND_FILE.LOG,' ');
1692:
1693: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_pub_disable
1694: (
1695: x_return_status => x_return_status,
1696: x_msg_data => x_msg_data,
1697: x_msg_count => x_msg_count
1698: ) ;
1699:
1700: fnd_file.put_line(FND_FILE.LOG,' ');
1701: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
1702: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1703: fnd_file.put_line(FND_FILE.LOG,' ');
1704:
1697: x_msg_count => x_msg_count
1698: ) ;
1699:
1700: fnd_file.put_line(FND_FILE.LOG,' ');
1701: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
1702: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1703: fnd_file.put_line(FND_FILE.LOG,' ');
1704:
1705: --- If any errors happen abort API
1698: ) ;
1699:
1700: fnd_file.put_line(FND_FILE.LOG,' ');
1701: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
1702: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1703: fnd_file.put_line(FND_FILE.LOG,' ');
1704:
1705: --- If any errors happen abort API
1706: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1699:
1700: fnd_file.put_line(FND_FILE.LOG,' ');
1701: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
1702: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1703: fnd_file.put_line(FND_FILE.LOG,' ');
1704:
1705: --- If any errors happen abort API
1706: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1707: -- Added for Bug 4757731
1738: /*
1739: Step 3: Populate cz_imp_rules
1740: */
1741:
1742: fnd_file.put_line(FND_FILE.LOG,' ');
1743: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1744: fnd_file.put_line(FND_FILE.LOG,'Step 3: Populating cz_imp_rules ');
1745: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1746: fnd_file.put_line(FND_FILE.LOG,' ');
1739: Step 3: Populate cz_imp_rules
1740: */
1741:
1742: fnd_file.put_line(FND_FILE.LOG,' ');
1743: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1744: fnd_file.put_line(FND_FILE.LOG,'Step 3: Populating cz_imp_rules ');
1745: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1746: fnd_file.put_line(FND_FILE.LOG,' ');
1747:
1740: */
1741:
1742: fnd_file.put_line(FND_FILE.LOG,' ');
1743: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1744: fnd_file.put_line(FND_FILE.LOG,'Step 3: Populating cz_imp_rules ');
1745: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1746: fnd_file.put_line(FND_FILE.LOG,' ');
1747:
1748: OKC_XPRT_IMPORT_RULES_PVT.import_rules_disable
1741:
1742: fnd_file.put_line(FND_FILE.LOG,' ');
1743: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1744: fnd_file.put_line(FND_FILE.LOG,'Step 3: Populating cz_imp_rules ');
1745: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1746: fnd_file.put_line(FND_FILE.LOG,' ');
1747:
1748: OKC_XPRT_IMPORT_RULES_PVT.import_rules_disable
1749: (
1742: fnd_file.put_line(FND_FILE.LOG,' ');
1743: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1744: fnd_file.put_line(FND_FILE.LOG,'Step 3: Populating cz_imp_rules ');
1745: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1746: fnd_file.put_line(FND_FILE.LOG,' ');
1747:
1748: OKC_XPRT_IMPORT_RULES_PVT.import_rules_disable
1749: (
1750: x_run_id => G_RUN_ID,
1752: x_msg_data => x_msg_data,
1753: x_msg_count => x_msg_count
1754: );
1755:
1756: fnd_file.put_line(FND_FILE.LOG,' ');
1757: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
1758: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1759: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
1760: fnd_file.put_line(FND_FILE.LOG,' ');
1753: x_msg_count => x_msg_count
1754: );
1755:
1756: fnd_file.put_line(FND_FILE.LOG,' ');
1757: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
1758: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1759: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
1760: fnd_file.put_line(FND_FILE.LOG,' ');
1761:
1754: );
1755:
1756: fnd_file.put_line(FND_FILE.LOG,' ');
1757: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
1758: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1759: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
1760: fnd_file.put_line(FND_FILE.LOG,' ');
1761:
1762: --- If any errors happen abort API
1755:
1756: fnd_file.put_line(FND_FILE.LOG,' ');
1757: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
1758: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1759: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
1760: fnd_file.put_line(FND_FILE.LOG,' ');
1761:
1762: --- If any errors happen abort API
1763: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1756: fnd_file.put_line(FND_FILE.LOG,' ');
1757: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
1758: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1759: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
1760: fnd_file.put_line(FND_FILE.LOG,' ');
1761:
1762: --- If any errors happen abort API
1763: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1764: -- Added for Bug 4757731
1796: If there are no records in cz_imp_rules then there were no expert enabled templates
1797: attached to the rule. Just change the status of the rule to INACTIVE
1798: */
1799:
1800: fnd_file.put_line(FND_FILE.LOG,' ');
1801: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1802: fnd_file.put_line(FND_FILE.LOG,'Step 3.1:Count Rules to be imported');
1803: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1804: fnd_file.put_line(FND_FILE.LOG,' ');
1797: attached to the rule. Just change the status of the rule to INACTIVE
1798: */
1799:
1800: fnd_file.put_line(FND_FILE.LOG,' ');
1801: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1802: fnd_file.put_line(FND_FILE.LOG,'Step 3.1:Count Rules to be imported');
1803: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1804: fnd_file.put_line(FND_FILE.LOG,' ');
1805:
1798: */
1799:
1800: fnd_file.put_line(FND_FILE.LOG,' ');
1801: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1802: fnd_file.put_line(FND_FILE.LOG,'Step 3.1:Count Rules to be imported');
1803: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1804: fnd_file.put_line(FND_FILE.LOG,' ');
1805:
1806: OPEN csr_cz_imp_rules_cnt;
1799:
1800: fnd_file.put_line(FND_FILE.LOG,' ');
1801: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1802: fnd_file.put_line(FND_FILE.LOG,'Step 3.1:Count Rules to be imported');
1803: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1804: fnd_file.put_line(FND_FILE.LOG,' ');
1805:
1806: OPEN csr_cz_imp_rules_cnt;
1807: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
1800: fnd_file.put_line(FND_FILE.LOG,' ');
1801: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1802: fnd_file.put_line(FND_FILE.LOG,'Step 3.1:Count Rules to be imported');
1803: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1804: fnd_file.put_line(FND_FILE.LOG,' ');
1805:
1806: OPEN csr_cz_imp_rules_cnt;
1807: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
1808: CLOSE csr_cz_imp_rules_cnt;
1806: OPEN csr_cz_imp_rules_cnt;
1807: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
1808: CLOSE csr_cz_imp_rules_cnt;
1809:
1810: fnd_file.put_line(FND_FILE.LOG,' ');
1811: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
1812: fnd_file.put_line(FND_FILE.LOG,' ');
1813:
1814:
1807: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
1808: CLOSE csr_cz_imp_rules_cnt;
1809:
1810: fnd_file.put_line(FND_FILE.LOG,' ');
1811: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
1812: fnd_file.put_line(FND_FILE.LOG,' ');
1813:
1814:
1815: IF l_rules_cnt = 0 THEN
1808: CLOSE csr_cz_imp_rules_cnt;
1809:
1810: fnd_file.put_line(FND_FILE.LOG,' ');
1811: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
1812: fnd_file.put_line(FND_FILE.LOG,' ');
1813:
1814:
1815: IF l_rules_cnt = 0 THEN
1816:
1821: x_msg_data => x_msg_data,
1822: x_msg_count => x_msg_count
1823: );
1824:
1825: fnd_file.put_line(FND_FILE.LOG,' ');
1826: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
1827: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1828: fnd_file.put_line(FND_FILE.LOG,' ');
1829:
1822: x_msg_count => x_msg_count
1823: );
1824:
1825: fnd_file.put_line(FND_FILE.LOG,' ');
1826: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
1827: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1828: fnd_file.put_line(FND_FILE.LOG,' ');
1829:
1830: --- If any errors happen abort API
1823: );
1824:
1825: fnd_file.put_line(FND_FILE.LOG,' ');
1826: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
1827: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1828: fnd_file.put_line(FND_FILE.LOG,' ');
1829:
1830: --- If any errors happen abort API
1831: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1824:
1825: fnd_file.put_line(FND_FILE.LOG,' ');
1826: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.publish_rule_with_no_tmpl');
1827: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
1828: fnd_file.put_line(FND_FILE.LOG,' ');
1829:
1830: --- If any errors happen abort API
1831: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1832: -- Added for Bug 4757731
1858: -- Added for Bug 4757731
1859: RAISE FND_API.G_EXC_ERROR;
1860: END IF;
1861:
1862: fnd_file.put_line(FND_FILE.LOG,' ');
1863: fnd_file.put_line(FND_FILE.LOG,'Rules has No expert template attached');
1864: fnd_file.put_line(FND_FILE.LOG,' ');
1865:
1866: retcode := 0;
1859: RAISE FND_API.G_EXC_ERROR;
1860: END IF;
1861:
1862: fnd_file.put_line(FND_FILE.LOG,' ');
1863: fnd_file.put_line(FND_FILE.LOG,'Rules has No expert template attached');
1864: fnd_file.put_line(FND_FILE.LOG,' ');
1865:
1866: retcode := 0;
1867: errbuf := '';
1860: END IF;
1861:
1862: fnd_file.put_line(FND_FILE.LOG,' ');
1863: fnd_file.put_line(FND_FILE.LOG,'Rules has No expert template attached');
1864: fnd_file.put_line(FND_FILE.LOG,' ');
1865:
1866: retcode := 0;
1867: errbuf := '';
1868: RETURN;
1873: Step 4: Call the CZ Rule Import Concurrent Program
1874: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
1875: */
1876:
1877: fnd_file.put_line(FND_FILE.LOG,' ');
1878: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1879: fnd_file.put_line(FND_FILE.LOG,'Step 4: Calling the CZ Rule Import Concurrent Program');
1880: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1881: fnd_file.put_line(FND_FILE.LOG,' ');
1874: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
1875: */
1876:
1877: fnd_file.put_line(FND_FILE.LOG,' ');
1878: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1879: fnd_file.put_line(FND_FILE.LOG,'Step 4: Calling the CZ Rule Import Concurrent Program');
1880: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1881: fnd_file.put_line(FND_FILE.LOG,' ');
1882: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1875: */
1876:
1877: fnd_file.put_line(FND_FILE.LOG,' ');
1878: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1879: fnd_file.put_line(FND_FILE.LOG,'Step 4: Calling the CZ Rule Import Concurrent Program');
1880: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1881: fnd_file.put_line(FND_FILE.LOG,' ');
1882: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1883:
1876:
1877: fnd_file.put_line(FND_FILE.LOG,' ');
1878: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1879: fnd_file.put_line(FND_FILE.LOG,'Step 4: Calling the CZ Rule Import Concurrent Program');
1880: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1881: fnd_file.put_line(FND_FILE.LOG,' ');
1882: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1883:
1884: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_DIS_MSG');
1877: fnd_file.put_line(FND_FILE.LOG,' ');
1878: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1879: fnd_file.put_line(FND_FILE.LOG,'Step 4: Calling the CZ Rule Import Concurrent Program');
1880: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1881: fnd_file.put_line(FND_FILE.LOG,' ');
1882: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1883:
1884: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_DIS_MSG');
1885: l_conc_pgm_desc := FND_MESSAGE.get;
1878: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1879: fnd_file.put_line(FND_FILE.LOG,'Step 4: Calling the CZ Rule Import Concurrent Program');
1880: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1881: fnd_file.put_line(FND_FILE.LOG,' ');
1882: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
1883:
1884: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_DIS_MSG');
1885: l_conc_pgm_desc := FND_MESSAGE.get;
1886:
1892: sub_request => TRUE,
1893: argument1 => G_RUN_ID
1894: );
1895:
1896: fnd_file.put_line(FND_FILE.LOG,'Request Id of CZ Rule Concurrent Pgm : '||G_REQUEST_ID);
1897:
1898: -- commit the data
1899: COMMIT WORK;
1900:
1900:
1901: IF NVL(G_REQUEST_ID,0) = 0 THEN
1902: -- Could Not submit Conc Pgm
1903: fnd_message.set_name('OKC','OKC_XPRT_SUB_CZ_RUL_PGM');
1904: fnd_file.put_line(FND_FILE.LOG,'Could NOT submit CZ Concurrent Program');
1905: FOR csr_dis_rule_rec IN csr_dis_rule_list
1906: LOOP
1907: l_rule_exists_flag := check_rule_active(csr_dis_rule_rec.rule_id);
1908: UPDATE okc_xprt_rule_hdrs_all
1948: x_dev_status,
1949: x_message
1950: );
1951:
1952: fnd_file.put_line(FND_FILE.LOG,' ');
1953: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1949: x_message
1950: );
1951:
1952: fnd_file.put_line(FND_FILE.LOG,' ');
1953: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1950: );
1951:
1952: fnd_file.put_line(FND_FILE.LOG,' ');
1953: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1951:
1952: fnd_file.put_line(FND_FILE.LOG,' ');
1953: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1952: fnd_file.put_line(FND_FILE.LOG,' ');
1953: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1953: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1954: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1955: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1963: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1956: fnd_file.put_line(FND_FILE.LOG,'Results ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1963: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1964: fnd_file.put_line(FND_FILE.LOG,' ');
1957: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1963: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1964: fnd_file.put_line(FND_FILE.LOG,' ');
1965:
1958: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1963: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1964: fnd_file.put_line(FND_FILE.LOG,' ');
1965:
1966: IF x_dev_phase <> 'COMPLETED' AND
1959: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1963: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1964: fnd_file.put_line(FND_FILE.LOG,' ');
1965:
1966: IF x_dev_phase <> 'COMPLETED' AND
1967: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1960: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
1961: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
1962: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
1963: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1964: fnd_file.put_line(FND_FILE.LOG,' ');
1965:
1966: IF x_dev_phase <> 'COMPLETED' AND
1967: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1968: -- error in CZ Concurrent Program
1965:
1966: IF x_dev_phase <> 'COMPLETED' AND
1967: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1968: -- error in CZ Concurrent Program
1969: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
1970: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
1971: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
1972: FOR csr_dis_rule_rec IN csr_dis_rule_list
1973: LOOP
1966: IF x_dev_phase <> 'COMPLETED' AND
1967: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1968: -- error in CZ Concurrent Program
1969: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
1970: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
1971: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
1972: FOR csr_dis_rule_rec IN csr_dis_rule_list
1973: LOOP
1974: l_rule_exists_flag := check_rule_active(csr_dis_rule_rec.rule_id);
1967: x_dev_status NOT IN ('NORMAL','WARNING') THEN
1968: -- error in CZ Concurrent Program
1969: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
1970: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
1971: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
1972: FOR csr_dis_rule_rec IN csr_dis_rule_list
1973: LOOP
1974: l_rule_exists_flag := check_rule_active(csr_dis_rule_rec.rule_id);
1975: UPDATE okc_xprt_rule_hdrs_all
1986: /*
1987: Step 5: Check status of Rules Imported
1988: */
1989:
1990: fnd_file.put_line(FND_FILE.LOG,' ');
1991: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1992: fnd_file.put_line(FND_FILE.LOG,'Step 5: Checking Status of Rules imported');
1993: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1994: fnd_file.put_line(FND_FILE.LOG,' ');
1987: Step 5: Check status of Rules Imported
1988: */
1989:
1990: fnd_file.put_line(FND_FILE.LOG,' ');
1991: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1992: fnd_file.put_line(FND_FILE.LOG,'Step 5: Checking Status of Rules imported');
1993: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1994: fnd_file.put_line(FND_FILE.LOG,' ');
1995:
1988: */
1989:
1990: fnd_file.put_line(FND_FILE.LOG,' ');
1991: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1992: fnd_file.put_line(FND_FILE.LOG,'Step 5: Checking Status of Rules imported');
1993: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1994: fnd_file.put_line(FND_FILE.LOG,' ');
1995:
1996: OKC_XPRT_UTIL_PVT.check_import_status
1989:
1990: fnd_file.put_line(FND_FILE.LOG,' ');
1991: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1992: fnd_file.put_line(FND_FILE.LOG,'Step 5: Checking Status of Rules imported');
1993: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1994: fnd_file.put_line(FND_FILE.LOG,' ');
1995:
1996: OKC_XPRT_UTIL_PVT.check_import_status
1997: (
1990: fnd_file.put_line(FND_FILE.LOG,' ');
1991: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1992: fnd_file.put_line(FND_FILE.LOG,'Step 5: Checking Status of Rules imported');
1993: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
1994: fnd_file.put_line(FND_FILE.LOG,' ');
1995:
1996: OKC_XPRT_UTIL_PVT.check_import_status
1997: (
1998: p_run_id => G_RUN_ID,
2002: x_msg_data => x_msg_data,
2003: x_msg_count => x_msg_count
2004: );
2005:
2006: fnd_file.put_line(FND_FILE.LOG,' ');
2007: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2008: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2009: fnd_file.put_line(FND_FILE.LOG,' ');
2010:
2003: x_msg_count => x_msg_count
2004: );
2005:
2006: fnd_file.put_line(FND_FILE.LOG,' ');
2007: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2008: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2009: fnd_file.put_line(FND_FILE.LOG,' ');
2010:
2011: --- If any errors happen abort API
2004: );
2005:
2006: fnd_file.put_line(FND_FILE.LOG,' ');
2007: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2008: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2009: fnd_file.put_line(FND_FILE.LOG,' ');
2010:
2011: --- If any errors happen abort API
2012: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2005:
2006: fnd_file.put_line(FND_FILE.LOG,' ');
2007: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2008: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2009: fnd_file.put_line(FND_FILE.LOG,' ');
2010:
2011: --- If any errors happen abort API
2012: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2013: -- Added for Bug 4757731
2043: /*
2044: Step 6: Call the Test Publication API
2045: */
2046:
2047: fnd_file.put_line(FND_FILE.LOG,' ');
2048: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2049: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling the Test Publication API');
2050: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2051: fnd_file.put_line(FND_FILE.LOG,' ');
2044: Step 6: Call the Test Publication API
2045: */
2046:
2047: fnd_file.put_line(FND_FILE.LOG,' ');
2048: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2049: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling the Test Publication API');
2050: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2051: fnd_file.put_line(FND_FILE.LOG,' ');
2052:
2045: */
2046:
2047: fnd_file.put_line(FND_FILE.LOG,' ');
2048: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2049: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling the Test Publication API');
2050: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2051: fnd_file.put_line(FND_FILE.LOG,' ');
2052:
2053:
2046:
2047: fnd_file.put_line(FND_FILE.LOG,' ');
2048: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2049: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling the Test Publication API');
2050: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2051: fnd_file.put_line(FND_FILE.LOG,' ');
2052:
2053:
2054: OKC_XPRT_UTIL_PVT.create_test_publication
2047: fnd_file.put_line(FND_FILE.LOG,' ');
2048: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2049: fnd_file.put_line(FND_FILE.LOG,'Step 6: Calling the Test Publication API');
2050: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2051: fnd_file.put_line(FND_FILE.LOG,' ');
2052:
2053:
2054: OKC_XPRT_UTIL_PVT.create_test_publication
2055: (
2057: x_msg_data => x_msg_data,
2058: x_msg_count => x_msg_count
2059: );
2060:
2061: fnd_file.put_line(FND_FILE.LOG,' ');
2062: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2063: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2064: fnd_file.put_line(FND_FILE.LOG,' ');
2065:
2058: x_msg_count => x_msg_count
2059: );
2060:
2061: fnd_file.put_line(FND_FILE.LOG,' ');
2062: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2063: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2064: fnd_file.put_line(FND_FILE.LOG,' ');
2065:
2066: --- If any errors happen abort API
2059: );
2060:
2061: fnd_file.put_line(FND_FILE.LOG,' ');
2062: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2063: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2064: fnd_file.put_line(FND_FILE.LOG,' ');
2065:
2066: --- If any errors happen abort API
2067: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2060:
2061: fnd_file.put_line(FND_FILE.LOG,' ');
2062: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2063: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2064: fnd_file.put_line(FND_FILE.LOG,' ');
2065:
2066: --- If any errors happen abort API
2067: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2068: -- Added for Bug 4757731
2098: /*
2099: Step 7: Call the Production Publication API
2100: */
2101:
2102: fnd_file.put_line(FND_FILE.LOG,' ');
2103: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2104: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the Production Publication API');
2105: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2106: fnd_file.put_line(FND_FILE.LOG,' ');
2099: Step 7: Call the Production Publication API
2100: */
2101:
2102: fnd_file.put_line(FND_FILE.LOG,' ');
2103: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2104: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the Production Publication API');
2105: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2106: fnd_file.put_line(FND_FILE.LOG,' ');
2107:
2100: */
2101:
2102: fnd_file.put_line(FND_FILE.LOG,' ');
2103: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2104: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the Production Publication API');
2105: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2106: fnd_file.put_line(FND_FILE.LOG,' ');
2107:
2108: OKC_XPRT_UTIL_PVT.create_production_publication
2101:
2102: fnd_file.put_line(FND_FILE.LOG,' ');
2103: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2104: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the Production Publication API');
2105: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2106: fnd_file.put_line(FND_FILE.LOG,' ');
2107:
2108: OKC_XPRT_UTIL_PVT.create_production_publication
2109: (
2102: fnd_file.put_line(FND_FILE.LOG,' ');
2103: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2104: fnd_file.put_line(FND_FILE.LOG,'Step 7: Calling the Production Publication API');
2105: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2106: fnd_file.put_line(FND_FILE.LOG,' ');
2107:
2108: OKC_XPRT_UTIL_PVT.create_production_publication
2109: (
2110: p_calling_mode => 'DISABLE',
2113: x_msg_data => x_msg_data,
2114: x_msg_count => x_msg_count
2115: );
2116:
2117: fnd_file.put_line(FND_FILE.LOG,' ');
2118: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2119: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2120: fnd_file.put_line(FND_FILE.LOG,' ');
2121:
2114: x_msg_count => x_msg_count
2115: );
2116:
2117: fnd_file.put_line(FND_FILE.LOG,' ');
2118: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2119: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2120: fnd_file.put_line(FND_FILE.LOG,' ');
2121:
2122: --- If any errors happen abort API
2115: );
2116:
2117: fnd_file.put_line(FND_FILE.LOG,' ');
2118: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2119: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2120: fnd_file.put_line(FND_FILE.LOG,' ');
2121:
2122: --- If any errors happen abort API
2123: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2116:
2117: fnd_file.put_line(FND_FILE.LOG,' ');
2118: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2119: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2120: fnd_file.put_line(FND_FILE.LOG,' ');
2121:
2122: --- If any errors happen abort API
2123: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2124: -- Added for Bug 4757731
2189: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2190: END IF;
2191:
2192: -- log file
2193: fnd_file.put_line(FND_FILE.LOG,' ');
2194: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2195: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2196: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2197:
2190: END IF;
2191:
2192: -- log file
2193: fnd_file.put_line(FND_FILE.LOG,' ');
2194: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2195: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2196: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2197:
2198: /*
2191:
2192: -- log file
2193: fnd_file.put_line(FND_FILE.LOG,' ');
2194: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2195: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2196: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2197:
2198: /*
2199: Step 1: Update current request Id for all rules to be published
2192: -- log file
2193: fnd_file.put_line(FND_FILE.LOG,' ');
2194: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2195: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2196: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2197:
2198: /*
2199: Step 1: Update current request Id for all rules to be published
2200: */
2198: /*
2199: Step 1: Update current request Id for all rules to be published
2200: */
2201:
2202: fnd_file.put_line(FND_FILE.LOG,' ');
2203: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2204: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
2205: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2206: fnd_file.put_line(FND_FILE.LOG,' ');
2199: Step 1: Update current request Id for all rules to be published
2200: */
2201:
2202: fnd_file.put_line(FND_FILE.LOG,' ');
2203: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2204: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
2205: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2206: fnd_file.put_line(FND_FILE.LOG,' ');
2207:
2200: */
2201:
2202: fnd_file.put_line(FND_FILE.LOG,' ');
2203: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2204: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
2205: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2206: fnd_file.put_line(FND_FILE.LOG,' ');
2207:
2208: -- Update request_id for all Rules in Pending Publication for current org id
2201:
2202: fnd_file.put_line(FND_FILE.LOG,' ');
2203: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2204: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
2205: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2206: fnd_file.put_line(FND_FILE.LOG,' ');
2207:
2208: -- Update request_id for all Rules in Pending Publication for current org id
2209: UPDATE okc_xprt_rule_hdrs_all
2202: fnd_file.put_line(FND_FILE.LOG,' ');
2203: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2204: fnd_file.put_line(FND_FILE.LOG,'Step 1: Updating request_id for rules to be published ');
2205: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2206: fnd_file.put_line(FND_FILE.LOG,' ');
2207:
2208: -- Update request_id for all Rules in Pending Publication for current org id
2209: UPDATE okc_xprt_rule_hdrs_all
2210: SET request_id = FND_GLOBAL.CONC_REQUEST_ID,
2223:
2224: -- Check If any rules are to be processed else exit
2225: IF SQL%NOTFOUND THEN
2226: -- exit as no rules to be processed
2227: fnd_file.put_line(FND_FILE.LOG,' ');
2228: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
2229: fnd_file.put_line(FND_FILE.LOG,' ');
2230:
2231: retcode := 0;
2224: -- Check If any rules are to be processed else exit
2225: IF SQL%NOTFOUND THEN
2226: -- exit as no rules to be processed
2227: fnd_file.put_line(FND_FILE.LOG,' ');
2228: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
2229: fnd_file.put_line(FND_FILE.LOG,' ');
2230:
2231: retcode := 0;
2232: errbuf := '';
2225: IF SQL%NOTFOUND THEN
2226: -- exit as no rules to be processed
2227: fnd_file.put_line(FND_FILE.LOG,' ');
2228: fnd_file.put_line(FND_FILE.LOG,'No Rules to be processed ');
2229: fnd_file.put_line(FND_FILE.LOG,' ');
2230:
2231: retcode := 0;
2232: errbuf := '';
2233: RETURN;
2236:
2237: -- commit the data
2238: COMMIT WORK;
2239:
2240: fnd_file.put_line(FND_FILE.LOG,' ');
2241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2242: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
2243: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2244: fnd_file.put_line(FND_FILE.LOG,' ');
2237: -- commit the data
2238: COMMIT WORK;
2239:
2240: fnd_file.put_line(FND_FILE.LOG,' ');
2241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2242: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
2243: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2244: fnd_file.put_line(FND_FILE.LOG,' ');
2245:
2238: COMMIT WORK;
2239:
2240: fnd_file.put_line(FND_FILE.LOG,' ');
2241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2242: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
2243: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2244: fnd_file.put_line(FND_FILE.LOG,' ');
2245:
2246:
2239:
2240: fnd_file.put_line(FND_FILE.LOG,' ');
2241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2242: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
2243: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2244: fnd_file.put_line(FND_FILE.LOG,' ');
2245:
2246:
2247: sync_templates
2240: fnd_file.put_line(FND_FILE.LOG,' ');
2241: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2242: fnd_file.put_line(FND_FILE.LOG,'Synchronize templates with rules ');
2243: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2244: fnd_file.put_line(FND_FILE.LOG,' ');
2245:
2246:
2247: sync_templates
2248: (
2298:
2299: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2300: retcode := 2;
2301: errbuf := x_msg_data;
2302: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
2303: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2304: fnd_file.put_line(FND_FILE.LOG,' ');
2305:
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2299: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2300: retcode := 2;
2301: errbuf := x_msg_data;
2302: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
2303: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2304: fnd_file.put_line(FND_FILE.LOG,' ');
2305:
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2307: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2300: retcode := 2;
2301: errbuf := x_msg_data;
2302: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
2303: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2304: fnd_file.put_line(FND_FILE.LOG,' ');
2305:
2306: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2307: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2308: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2312:
2313: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2314: retcode := 2;
2315: errbuf := x_msg_data;
2316: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2317: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2318: fnd_file.put_line(FND_FILE.LOG,' ');
2319:
2320: WHEN OTHERS THEN
2313: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2314: retcode := 2;
2315: errbuf := x_msg_data;
2316: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2317: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2318: fnd_file.put_line(FND_FILE.LOG,' ');
2319:
2320: WHEN OTHERS THEN
2321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2314: retcode := 2;
2315: errbuf := x_msg_data;
2316: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2317: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2318: fnd_file.put_line(FND_FILE.LOG,' ');
2319:
2320: WHEN OTHERS THEN
2321: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2322: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2326:
2327: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2328: retcode := 2;
2329: errbuf := SQLERRM;
2330: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2331: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2332: fnd_file.put_line(FND_FILE.LOG,' ');
2333:
2334: END disable_rules;
2327: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2328: retcode := 2;
2329: errbuf := SQLERRM;
2330: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2331: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2332: fnd_file.put_line(FND_FILE.LOG,' ');
2333:
2334: END disable_rules;
2335:
2328: retcode := 2;
2329: errbuf := SQLERRM;
2330: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2331: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2332: fnd_file.put_line(FND_FILE.LOG,' ');
2333:
2334: END disable_rules;
2335:
2336: ---------------------------------------------------
2376: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2377: END IF;
2378:
2379: -- log file
2380: fnd_file.put_line(FND_FILE.LOG,' ');
2381: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2382: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2383: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2384: fnd_file.put_line(FND_FILE.LOG,'Intent : '||p_intent);
2377: END IF;
2378:
2379: -- log file
2380: fnd_file.put_line(FND_FILE.LOG,' ');
2381: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2382: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2383: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2384: fnd_file.put_line(FND_FILE.LOG,'Intent : '||p_intent);
2385: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2378:
2379: -- log file
2380: fnd_file.put_line(FND_FILE.LOG,' ');
2381: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2382: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2383: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2384: fnd_file.put_line(FND_FILE.LOG,'Intent : '||p_intent);
2385: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2386:
2379: -- log file
2380: fnd_file.put_line(FND_FILE.LOG,' ');
2381: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2382: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2383: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2384: fnd_file.put_line(FND_FILE.LOG,'Intent : '||p_intent);
2385: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2386:
2387: -- Validate Parameters if p_template_id IS NOT NULL
2380: fnd_file.put_line(FND_FILE.LOG,' ');
2381: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2382: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2383: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2384: fnd_file.put_line(FND_FILE.LOG,'Intent : '||p_intent);
2385: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2386:
2387: -- Validate Parameters if p_template_id IS NOT NULL
2388: OPEN csr_tmpl_dtls;
2381: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2382: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2383: fnd_file.put_line(FND_FILE.LOG,'Org Id : '||p_org_id);
2384: fnd_file.put_line(FND_FILE.LOG,'Intent : '||p_intent);
2385: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2386:
2387: -- Validate Parameters if p_template_id IS NOT NULL
2388: OPEN csr_tmpl_dtls;
2389: FETCH csr_tmpl_dtls INTO l_dummy;
2389: FETCH csr_tmpl_dtls INTO l_dummy;
2390: IF csr_tmpl_dtls%NOTFOUND THEN
2391: -- exit as no templates to be processed
2392: CLOSE csr_tmpl_dtls;
2393: fnd_file.put_line(FND_FILE.LOG,' ');
2394: fnd_file.put_line(FND_FILE.LOG,'No Templates to be synchronized ');
2395: fnd_file.put_line(FND_FILE.LOG,' ');
2396: retcode := 0;
2397: errbuf := '';
2390: IF csr_tmpl_dtls%NOTFOUND THEN
2391: -- exit as no templates to be processed
2392: CLOSE csr_tmpl_dtls;
2393: fnd_file.put_line(FND_FILE.LOG,' ');
2394: fnd_file.put_line(FND_FILE.LOG,'No Templates to be synchronized ');
2395: fnd_file.put_line(FND_FILE.LOG,' ');
2396: retcode := 0;
2397: errbuf := '';
2398: RETURN;
2391: -- exit as no templates to be processed
2392: CLOSE csr_tmpl_dtls;
2393: fnd_file.put_line(FND_FILE.LOG,' ');
2394: fnd_file.put_line(FND_FILE.LOG,'No Templates to be synchronized ');
2395: fnd_file.put_line(FND_FILE.LOG,' ');
2396: retcode := 0;
2397: errbuf := '';
2398: RETURN;
2399: END IF; -- no rows to be processed
2405: CLOSE csr_active_rules_cnt;
2406:
2407: IF l_rule_count = 0 THEN
2408: -- no active rules
2409: fnd_file.put_line(FND_FILE.LOG,' ');
2410: fnd_file.put_line(FND_FILE.LOG,'No Active Rules for the Org and Intent');
2411: fnd_file.put_line(FND_FILE.LOG,' ');
2412: retcode := 0;
2413: errbuf := '';
2406:
2407: IF l_rule_count = 0 THEN
2408: -- no active rules
2409: fnd_file.put_line(FND_FILE.LOG,' ');
2410: fnd_file.put_line(FND_FILE.LOG,'No Active Rules for the Org and Intent');
2411: fnd_file.put_line(FND_FILE.LOG,' ');
2412: retcode := 0;
2413: errbuf := '';
2414: RETURN;
2407: IF l_rule_count = 0 THEN
2408: -- no active rules
2409: fnd_file.put_line(FND_FILE.LOG,' ');
2410: fnd_file.put_line(FND_FILE.LOG,'No Active Rules for the Org and Intent');
2411: fnd_file.put_line(FND_FILE.LOG,' ');
2412: retcode := 0;
2413: errbuf := '';
2414: RETURN;
2415: END IF; -- no active rules
2417: /*
2418: Step 1: Import Template Model(s)
2419: */
2420:
2421: fnd_file.put_line(FND_FILE.LOG,' ');
2422: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2423: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Models');
2424: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2425: fnd_file.put_line(FND_FILE.LOG,' ');
2418: Step 1: Import Template Model(s)
2419: */
2420:
2421: fnd_file.put_line(FND_FILE.LOG,' ');
2422: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2423: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Models');
2424: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2425: fnd_file.put_line(FND_FILE.LOG,' ');
2426:
2419: */
2420:
2421: fnd_file.put_line(FND_FILE.LOG,' ');
2422: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2423: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Models');
2424: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2425: fnd_file.put_line(FND_FILE.LOG,' ');
2426:
2427: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_sync
2420:
2421: fnd_file.put_line(FND_FILE.LOG,' ');
2422: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2423: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Models');
2424: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2425: fnd_file.put_line(FND_FILE.LOG,' ');
2426:
2427: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_sync
2428: (
2421: fnd_file.put_line(FND_FILE.LOG,' ');
2422: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2423: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Models');
2424: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2425: fnd_file.put_line(FND_FILE.LOG,' ');
2426:
2427: OKC_XPRT_IMPORT_TEMPLATE_PVT.rebuild_tmpl_sync
2428: (
2429: p_org_id => p_org_id,
2433: x_msg_data => x_msg_data,
2434: x_msg_count => x_msg_count
2435: ) ;
2436:
2437: fnd_file.put_line(FND_FILE.LOG,' ');
2438: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
2439: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2440: fnd_file.put_line(FND_FILE.LOG,' ');
2441:
2434: x_msg_count => x_msg_count
2435: ) ;
2436:
2437: fnd_file.put_line(FND_FILE.LOG,' ');
2438: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
2439: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2440: fnd_file.put_line(FND_FILE.LOG,' ');
2441:
2442: --- If any errors happen abort API
2435: ) ;
2436:
2437: fnd_file.put_line(FND_FILE.LOG,' ');
2438: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
2439: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2440: fnd_file.put_line(FND_FILE.LOG,' ');
2441:
2442: --- If any errors happen abort API
2443: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2436:
2437: fnd_file.put_line(FND_FILE.LOG,' ');
2438: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Models');
2439: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2440: fnd_file.put_line(FND_FILE.LOG,' ');
2441:
2442: --- If any errors happen abort API
2443: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2444: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2451: /*
2452: Step 2: Call the Test Publication API
2453: */
2454:
2455: fnd_file.put_line(FND_FILE.LOG,' ');
2456: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2457: fnd_file.put_line(FND_FILE.LOG,'Step 2: Calling the Test Publication API');
2458: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2459: fnd_file.put_line(FND_FILE.LOG,' ');
2452: Step 2: Call the Test Publication API
2453: */
2454:
2455: fnd_file.put_line(FND_FILE.LOG,' ');
2456: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2457: fnd_file.put_line(FND_FILE.LOG,'Step 2: Calling the Test Publication API');
2458: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2459: fnd_file.put_line(FND_FILE.LOG,' ');
2460:
2453: */
2454:
2455: fnd_file.put_line(FND_FILE.LOG,' ');
2456: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2457: fnd_file.put_line(FND_FILE.LOG,'Step 2: Calling the Test Publication API');
2458: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2459: fnd_file.put_line(FND_FILE.LOG,' ');
2460:
2461: OKC_XPRT_UTIL_PVT.create_test_publication
2454:
2455: fnd_file.put_line(FND_FILE.LOG,' ');
2456: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2457: fnd_file.put_line(FND_FILE.LOG,'Step 2: Calling the Test Publication API');
2458: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2459: fnd_file.put_line(FND_FILE.LOG,' ');
2460:
2461: OKC_XPRT_UTIL_PVT.create_test_publication
2462: (
2455: fnd_file.put_line(FND_FILE.LOG,' ');
2456: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2457: fnd_file.put_line(FND_FILE.LOG,'Step 2: Calling the Test Publication API');
2458: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2459: fnd_file.put_line(FND_FILE.LOG,' ');
2460:
2461: OKC_XPRT_UTIL_PVT.create_test_publication
2462: (
2463: x_return_status => x_return_status,
2464: x_msg_data => x_msg_data,
2465: x_msg_count => x_msg_count
2466: );
2467:
2468: fnd_file.put_line(FND_FILE.LOG,' ');
2469: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2470: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2471: fnd_file.put_line(FND_FILE.LOG,' ');
2472:
2465: x_msg_count => x_msg_count
2466: );
2467:
2468: fnd_file.put_line(FND_FILE.LOG,' ');
2469: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2470: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2471: fnd_file.put_line(FND_FILE.LOG,' ');
2472:
2473: --- If any errors happen abort API
2466: );
2467:
2468: fnd_file.put_line(FND_FILE.LOG,' ');
2469: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2470: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2471: fnd_file.put_line(FND_FILE.LOG,' ');
2472:
2473: --- If any errors happen abort API
2474: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2467:
2468: fnd_file.put_line(FND_FILE.LOG,' ');
2469: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2470: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2471: fnd_file.put_line(FND_FILE.LOG,' ');
2472:
2473: --- If any errors happen abort API
2474: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2475: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2481: /*
2482: Step 3: Call the Production Publication API
2483: */
2484:
2485: fnd_file.put_line(FND_FILE.LOG,' ');
2486: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2487: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the Production Publication API');
2488: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2489: fnd_file.put_line(FND_FILE.LOG,' ');
2482: Step 3: Call the Production Publication API
2483: */
2484:
2485: fnd_file.put_line(FND_FILE.LOG,' ');
2486: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2487: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the Production Publication API');
2488: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2489: fnd_file.put_line(FND_FILE.LOG,' ');
2490:
2483: */
2484:
2485: fnd_file.put_line(FND_FILE.LOG,' ');
2486: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2487: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the Production Publication API');
2488: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2489: fnd_file.put_line(FND_FILE.LOG,' ');
2490:
2491: OKC_XPRT_UTIL_PVT.create_production_publication
2484:
2485: fnd_file.put_line(FND_FILE.LOG,' ');
2486: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2487: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the Production Publication API');
2488: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2489: fnd_file.put_line(FND_FILE.LOG,' ');
2490:
2491: OKC_XPRT_UTIL_PVT.create_production_publication
2492: (
2485: fnd_file.put_line(FND_FILE.LOG,' ');
2486: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2487: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the Production Publication API');
2488: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2489: fnd_file.put_line(FND_FILE.LOG,' ');
2490:
2491: OKC_XPRT_UTIL_PVT.create_production_publication
2492: (
2493: p_calling_mode => 'SYNC',
2496: x_msg_data => x_msg_data,
2497: x_msg_count => x_msg_count
2498: );
2499:
2500: fnd_file.put_line(FND_FILE.LOG,' ');
2501: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2502: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2503: fnd_file.put_line(FND_FILE.LOG,' ');
2504:
2497: x_msg_count => x_msg_count
2498: );
2499:
2500: fnd_file.put_line(FND_FILE.LOG,' ');
2501: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2502: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2503: fnd_file.put_line(FND_FILE.LOG,' ');
2504:
2505: --- If any errors happen abort API
2498: );
2499:
2500: fnd_file.put_line(FND_FILE.LOG,' ');
2501: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2502: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2503: fnd_file.put_line(FND_FILE.LOG,' ');
2504:
2505: --- If any errors happen abort API
2506: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2499:
2500: fnd_file.put_line(FND_FILE.LOG,' ');
2501: fnd_file.put_line(FND_FILE.LOG,'After Calling the Production Publication API ');
2502: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2503: fnd_file.put_line(FND_FILE.LOG,' ');
2504:
2505: --- If any errors happen abort API
2506: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2507: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2546:
2547: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2548: retcode := 2;
2549: errbuf := x_msg_data;
2550: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
2551: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2552: fnd_file.put_line(FND_FILE.LOG,' ');
2553:
2554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2547: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2548: retcode := 2;
2549: errbuf := x_msg_data;
2550: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
2551: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2552: fnd_file.put_line(FND_FILE.LOG,' ');
2553:
2554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2555: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2548: retcode := 2;
2549: errbuf := x_msg_data;
2550: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
2551: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2552: fnd_file.put_line(FND_FILE.LOG,' ');
2553:
2554: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2555: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2556: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2560:
2561: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2562: retcode := 2;
2563: errbuf := x_msg_data;
2564: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2565: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567:
2568: WHEN OTHERS THEN
2561: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2562: retcode := 2;
2563: errbuf := x_msg_data;
2564: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2565: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567:
2568: WHEN OTHERS THEN
2569: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2562: retcode := 2;
2563: errbuf := x_msg_data;
2564: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2565: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2566: fnd_file.put_line(FND_FILE.LOG,' ');
2567:
2568: WHEN OTHERS THEN
2569: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2570: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2574:
2575: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2576: retcode := 2;
2577: errbuf := SQLERRM;
2578: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2579: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2580: fnd_file.put_line(FND_FILE.LOG,' ');
2581:
2582: END rebuild_templates;
2575: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2576: retcode := 2;
2577: errbuf := SQLERRM;
2578: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2579: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2580: fnd_file.put_line(FND_FILE.LOG,' ');
2581:
2582: END rebuild_templates;
2583:
2576: retcode := 2;
2577: errbuf := SQLERRM;
2578: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
2579: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
2580: fnd_file.put_line(FND_FILE.LOG,' ');
2581:
2582: END rebuild_templates;
2583:
2584: ---------------------------------------------------
2633:
2634:
2635: SELECT fnd_profile.Value('OKC_USE_CONTRACTS_RULES_ENGINE') INTO l_okc_rules_engine FROM dual;
2636:
2637: fnd_file.put_line(FND_FILE.LOG,'Using OKC Rules Engine'||l_okc_rules_engine);
2638:
2639: IF Nvl(l_okc_rules_engine,'N') = 'N' THEN
2640:
2641: -- Check if the concurrent program is being restarted due to completion of child request
2652: '100: Entered '||G_PKG_NAME ||'.'||l_api_name);
2653: END IF;
2654:
2655: -- log file
2656: fnd_file.put_line(FND_FILE.LOG,' ');
2657: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2658: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2659: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2660:
2653: END IF;
2654:
2655: -- log file
2656: fnd_file.put_line(FND_FILE.LOG,' ');
2657: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2658: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2659: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2660:
2661: /*
2654:
2655: -- log file
2656: fnd_file.put_line(FND_FILE.LOG,' ');
2657: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2658: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2659: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2660:
2661: /*
2662: Step 0: Template Rules QA checks
2655: -- log file
2656: fnd_file.put_line(FND_FILE.LOG,' ');
2657: fnd_file.put_line(FND_FILE.LOG,'Current Concurrent Request Id : '||FND_GLOBAL.CONC_REQUEST_ID);
2658: fnd_file.put_line(FND_FILE.LOG,'Parameters ');
2659: fnd_file.put_line(FND_FILE.LOG,'Template Id : '||p_template_id);
2660:
2661: /*
2662: Step 0: Template Rules QA checks
2663: */
2661: /*
2662: Step 0: Template Rules QA checks
2663: */
2664:
2665: fnd_file.put_line(FND_FILE.LOG,' ');
2666: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2667: fnd_file.put_line(FND_FILE.LOG,'Step 0: Template Rules QA Checks ');
2668: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2669: fnd_file.put_line(FND_FILE.LOG,' ');
2662: Step 0: Template Rules QA checks
2663: */
2664:
2665: fnd_file.put_line(FND_FILE.LOG,' ');
2666: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2667: fnd_file.put_line(FND_FILE.LOG,'Step 0: Template Rules QA Checks ');
2668: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2669: fnd_file.put_line(FND_FILE.LOG,' ');
2670:
2663: */
2664:
2665: fnd_file.put_line(FND_FILE.LOG,' ');
2666: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2667: fnd_file.put_line(FND_FILE.LOG,'Step 0: Template Rules QA Checks ');
2668: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2669: fnd_file.put_line(FND_FILE.LOG,' ');
2670:
2671: OKC_XPRT_UTIL_PVT.check_rules_validity
2664:
2665: fnd_file.put_line(FND_FILE.LOG,' ');
2666: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2667: fnd_file.put_line(FND_FILE.LOG,'Step 0: Template Rules QA Checks ');
2668: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2669: fnd_file.put_line(FND_FILE.LOG,' ');
2670:
2671: OKC_XPRT_UTIL_PVT.check_rules_validity
2672: (
2665: fnd_file.put_line(FND_FILE.LOG,' ');
2666: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2667: fnd_file.put_line(FND_FILE.LOG,'Step 0: Template Rules QA Checks ');
2668: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2669: fnd_file.put_line(FND_FILE.LOG,' ');
2670:
2671: OKC_XPRT_UTIL_PVT.check_rules_validity
2672: (
2673: p_qa_mode => 'APPROVAL',
2678: x_msg_data => x_msg_data,
2679: x_msg_count => x_msg_count
2680: ) ;
2681:
2682: fnd_file.put_line(FND_FILE.LOG,' ');
2683: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
2684: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2685: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
2686: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
2679: x_msg_count => x_msg_count
2680: ) ;
2681:
2682: fnd_file.put_line(FND_FILE.LOG,' ');
2683: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
2684: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2685: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
2686: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
2687: fnd_file.put_line(FND_FILE.LOG,' ');
2680: ) ;
2681:
2682: fnd_file.put_line(FND_FILE.LOG,' ');
2683: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
2684: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2685: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
2686: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
2687: fnd_file.put_line(FND_FILE.LOG,' ');
2688:
2681:
2682: fnd_file.put_line(FND_FILE.LOG,' ');
2683: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
2684: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2685: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
2686: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
2687: fnd_file.put_line(FND_FILE.LOG,' ');
2688:
2689: --- If any errors happen abort API
2682: fnd_file.put_line(FND_FILE.LOG,' ');
2683: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
2684: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2685: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
2686: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
2687: fnd_file.put_line(FND_FILE.LOG,' ');
2688:
2689: --- If any errors happen abort API
2690: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2683: fnd_file.put_line(FND_FILE.LOG,'After OKC_XPRT_UTIL_PVT.check_rules_validity');
2684: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2685: fnd_file.put_line(FND_FILE.LOG,'x_qa_status: '||l_qa_status);
2686: fnd_file.put_line(FND_FILE.LOG,'x_sequence_id: '||l_sequence_id);
2687: fnd_file.put_line(FND_FILE.LOG,' ');
2688:
2689: --- If any errors happen abort API
2690: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2695:
2696: -- Check If any rules had QA errors and abort
2697: IF l_qa_status <> 'S' THEN
2698: -- exit as no rules had QA errors
2699: fnd_file.put_line(FND_FILE.LOG,' ');
2700: fnd_file.put_line(FND_FILE.LOG,'Template Rules QA Check failed');
2701: fnd_file.put_line(FND_FILE.LOG,' ');
2702:
2703: retcode := 2;
2696: -- Check If any rules had QA errors and abort
2697: IF l_qa_status <> 'S' THEN
2698: -- exit as no rules had QA errors
2699: fnd_file.put_line(FND_FILE.LOG,' ');
2700: fnd_file.put_line(FND_FILE.LOG,'Template Rules QA Check failed');
2701: fnd_file.put_line(FND_FILE.LOG,' ');
2702:
2703: retcode := 2;
2704: errbuf := '';
2697: IF l_qa_status <> 'S' THEN
2698: -- exit as no rules had QA errors
2699: fnd_file.put_line(FND_FILE.LOG,' ');
2700: fnd_file.put_line(FND_FILE.LOG,'Template Rules QA Check failed');
2701: fnd_file.put_line(FND_FILE.LOG,' ');
2702:
2703: retcode := 2;
2704: errbuf := '';
2705: RETURN;
2711: /*
2712: Step 1: Import Template Model
2713: */
2714:
2715: fnd_file.put_line(FND_FILE.LOG,' ');
2716: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2717: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Model');
2718: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2719: fnd_file.put_line(FND_FILE.LOG,' ');
2712: Step 1: Import Template Model
2713: */
2714:
2715: fnd_file.put_line(FND_FILE.LOG,' ');
2716: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2717: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Model');
2718: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2719: fnd_file.put_line(FND_FILE.LOG,' ');
2720:
2713: */
2714:
2715: fnd_file.put_line(FND_FILE.LOG,' ');
2716: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2717: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Model');
2718: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2719: fnd_file.put_line(FND_FILE.LOG,' ');
2720:
2721: OKC_XPRT_IMPORT_TEMPLATE_PVT.import_template
2714:
2715: fnd_file.put_line(FND_FILE.LOG,' ');
2716: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2717: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Model');
2718: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2719: fnd_file.put_line(FND_FILE.LOG,' ');
2720:
2721: OKC_XPRT_IMPORT_TEMPLATE_PVT.import_template
2722: (
2715: fnd_file.put_line(FND_FILE.LOG,' ');
2716: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2717: fnd_file.put_line(FND_FILE.LOG,'Step 1: Importing Template Model');
2718: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2719: fnd_file.put_line(FND_FILE.LOG,' ');
2720:
2721: OKC_XPRT_IMPORT_TEMPLATE_PVT.import_template
2722: (
2723: p_api_version => 1,
2728: x_msg_data => x_msg_data,
2729: x_msg_count => x_msg_count
2730: ) ;
2731:
2732: fnd_file.put_line(FND_FILE.LOG,' ');
2733: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Model');
2734: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2735: fnd_file.put_line(FND_FILE.LOG,' ');
2736:
2729: x_msg_count => x_msg_count
2730: ) ;
2731:
2732: fnd_file.put_line(FND_FILE.LOG,' ');
2733: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Model');
2734: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2735: fnd_file.put_line(FND_FILE.LOG,' ');
2736:
2737: --- If any errors happen abort API
2730: ) ;
2731:
2732: fnd_file.put_line(FND_FILE.LOG,' ');
2733: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Model');
2734: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2735: fnd_file.put_line(FND_FILE.LOG,' ');
2736:
2737: --- If any errors happen abort API
2738: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2731:
2732: fnd_file.put_line(FND_FILE.LOG,' ');
2733: fnd_file.put_line(FND_FILE.LOG,'After Importing Template Model');
2734: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2735: fnd_file.put_line(FND_FILE.LOG,' ');
2736:
2737: --- If any errors happen abort API
2738: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2739: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2745: /*
2746: Step 2: Populate cz_imp_rules
2747: */
2748:
2749: fnd_file.put_line(FND_FILE.LOG,' ');
2750: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2751: fnd_file.put_line(FND_FILE.LOG,'Step 2: Populating cz_imp_rules ');
2752: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2753: fnd_file.put_line(FND_FILE.LOG,' ');
2746: Step 2: Populate cz_imp_rules
2747: */
2748:
2749: fnd_file.put_line(FND_FILE.LOG,' ');
2750: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2751: fnd_file.put_line(FND_FILE.LOG,'Step 2: Populating cz_imp_rules ');
2752: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2753: fnd_file.put_line(FND_FILE.LOG,' ');
2754:
2747: */
2748:
2749: fnd_file.put_line(FND_FILE.LOG,' ');
2750: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2751: fnd_file.put_line(FND_FILE.LOG,'Step 2: Populating cz_imp_rules ');
2752: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2753: fnd_file.put_line(FND_FILE.LOG,' ');
2754:
2755: OKC_XPRT_IMPORT_RULES_PVT.import_rule_temp_approval
2748:
2749: fnd_file.put_line(FND_FILE.LOG,' ');
2750: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2751: fnd_file.put_line(FND_FILE.LOG,'Step 2: Populating cz_imp_rules ');
2752: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2753: fnd_file.put_line(FND_FILE.LOG,' ');
2754:
2755: OKC_XPRT_IMPORT_RULES_PVT.import_rule_temp_approval
2756: (
2749: fnd_file.put_line(FND_FILE.LOG,' ');
2750: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2751: fnd_file.put_line(FND_FILE.LOG,'Step 2: Populating cz_imp_rules ');
2752: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2753: fnd_file.put_line(FND_FILE.LOG,' ');
2754:
2755: OKC_XPRT_IMPORT_RULES_PVT.import_rule_temp_approval
2756: (
2757: p_template_id => p_template_id,
2760: x_msg_data => x_msg_data,
2761: x_msg_count => x_msg_count
2762: );
2763:
2764: fnd_file.put_line(FND_FILE.LOG,' ');
2765: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
2766: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2767: fnd_file.put_line(FND_FILE.LOG,'x_msg_data: '||x_msg_data);
2768: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
2761: x_msg_count => x_msg_count
2762: );
2763:
2764: fnd_file.put_line(FND_FILE.LOG,' ');
2765: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
2766: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2767: fnd_file.put_line(FND_FILE.LOG,'x_msg_data: '||x_msg_data);
2768: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
2769: fnd_file.put_line(FND_FILE.LOG,' ');
2762: );
2763:
2764: fnd_file.put_line(FND_FILE.LOG,' ');
2765: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
2766: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2767: fnd_file.put_line(FND_FILE.LOG,'x_msg_data: '||x_msg_data);
2768: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
2769: fnd_file.put_line(FND_FILE.LOG,' ');
2770:
2763:
2764: fnd_file.put_line(FND_FILE.LOG,' ');
2765: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
2766: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2767: fnd_file.put_line(FND_FILE.LOG,'x_msg_data: '||x_msg_data);
2768: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
2769: fnd_file.put_line(FND_FILE.LOG,' ');
2770:
2771: --- If any errors happen abort API
2764: fnd_file.put_line(FND_FILE.LOG,' ');
2765: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
2766: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2767: fnd_file.put_line(FND_FILE.LOG,'x_msg_data: '||x_msg_data);
2768: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
2769: fnd_file.put_line(FND_FILE.LOG,' ');
2770:
2771: --- If any errors happen abort API
2772: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2765: fnd_file.put_line(FND_FILE.LOG,'After Populating cz_imp_rules');
2766: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2767: fnd_file.put_line(FND_FILE.LOG,'x_msg_data: '||x_msg_data);
2768: fnd_file.put_line(FND_FILE.LOG,'Rule Import Run Id : '||G_RUN_ID);
2769: fnd_file.put_line(FND_FILE.LOG,' ');
2770:
2771: --- If any errors happen abort API
2772: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2773: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2782: If there are no records in cz_imp_rules then Template has no rules attached
2783: Skip the rule import process
2784: */
2785:
2786: fnd_file.put_line(FND_FILE.LOG,' ');
2787: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2788: fnd_file.put_line(FND_FILE.LOG,'Step 2.1:Count Rules to be imported');
2789: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2790: fnd_file.put_line(FND_FILE.LOG,' ');
2783: Skip the rule import process
2784: */
2785:
2786: fnd_file.put_line(FND_FILE.LOG,' ');
2787: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2788: fnd_file.put_line(FND_FILE.LOG,'Step 2.1:Count Rules to be imported');
2789: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2790: fnd_file.put_line(FND_FILE.LOG,' ');
2791:
2784: */
2785:
2786: fnd_file.put_line(FND_FILE.LOG,' ');
2787: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2788: fnd_file.put_line(FND_FILE.LOG,'Step 2.1:Count Rules to be imported');
2789: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2790: fnd_file.put_line(FND_FILE.LOG,' ');
2791:
2792: OPEN csr_cz_imp_rules_cnt;
2785:
2786: fnd_file.put_line(FND_FILE.LOG,' ');
2787: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2788: fnd_file.put_line(FND_FILE.LOG,'Step 2.1:Count Rules to be imported');
2789: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2790: fnd_file.put_line(FND_FILE.LOG,' ');
2791:
2792: OPEN csr_cz_imp_rules_cnt;
2793: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
2786: fnd_file.put_line(FND_FILE.LOG,' ');
2787: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2788: fnd_file.put_line(FND_FILE.LOG,'Step 2.1:Count Rules to be imported');
2789: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2790: fnd_file.put_line(FND_FILE.LOG,' ');
2791:
2792: OPEN csr_cz_imp_rules_cnt;
2793: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
2794: CLOSE csr_cz_imp_rules_cnt;
2792: OPEN csr_cz_imp_rules_cnt;
2793: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
2794: CLOSE csr_cz_imp_rules_cnt;
2795:
2796: fnd_file.put_line(FND_FILE.LOG,' ');
2797: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
2798: fnd_file.put_line(FND_FILE.LOG,' ');
2799:
2800:
2793: FETCH csr_cz_imp_rules_cnt INTO l_rules_cnt;
2794: CLOSE csr_cz_imp_rules_cnt;
2795:
2796: fnd_file.put_line(FND_FILE.LOG,' ');
2797: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
2798: fnd_file.put_line(FND_FILE.LOG,' ');
2799:
2800:
2801: IF l_rules_cnt = 0 THEN
2794: CLOSE csr_cz_imp_rules_cnt;
2795:
2796: fnd_file.put_line(FND_FILE.LOG,' ');
2797: fnd_file.put_line(FND_FILE.LOG,'Total Rules to be Imported to CZ: '||l_rules_cnt);
2798: fnd_file.put_line(FND_FILE.LOG,' ');
2799:
2800:
2801: IF l_rules_cnt = 0 THEN
2802:
2799:
2800:
2801: IF l_rules_cnt = 0 THEN
2802:
2803: fnd_file.put_line(FND_FILE.LOG,' ');
2804: fnd_file.put_line(FND_FILE.LOG,'Template has no Rules attached');
2805: fnd_file.put_line(FND_FILE.LOG,' ');
2806:
2807: retcode := 0;
2800:
2801: IF l_rules_cnt = 0 THEN
2802:
2803: fnd_file.put_line(FND_FILE.LOG,' ');
2804: fnd_file.put_line(FND_FILE.LOG,'Template has no Rules attached');
2805: fnd_file.put_line(FND_FILE.LOG,' ');
2806:
2807: retcode := 0;
2808: errbuf := '';
2801: IF l_rules_cnt = 0 THEN
2802:
2803: fnd_file.put_line(FND_FILE.LOG,' ');
2804: fnd_file.put_line(FND_FILE.LOG,'Template has no Rules attached');
2805: fnd_file.put_line(FND_FILE.LOG,' ');
2806:
2807: retcode := 0;
2808: errbuf := '';
2809: RETURN;
2813: /*
2814: Step 2.2: Insert Extension Rules in Template Approval Flow
2815: */
2816:
2817: fnd_file.put_line(FND_FILE.LOG,' ');
2818: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2819: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: Calling API to insert extension rule records');
2820: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2821: fnd_file.put_line(FND_FILE.LOG,' ');
2814: Step 2.2: Insert Extension Rules in Template Approval Flow
2815: */
2816:
2817: fnd_file.put_line(FND_FILE.LOG,' ');
2818: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2819: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: Calling API to insert extension rule records');
2820: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2821: fnd_file.put_line(FND_FILE.LOG,' ');
2822:
2815: */
2816:
2817: fnd_file.put_line(FND_FILE.LOG,' ');
2818: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2819: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: Calling API to insert extension rule records');
2820: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2821: fnd_file.put_line(FND_FILE.LOG,' ');
2822:
2823: OKC_XPRT_IMPORT_RULES_PVT.attach_extension_rule_tmpl
2816:
2817: fnd_file.put_line(FND_FILE.LOG,' ');
2818: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2819: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: Calling API to insert extension rule records');
2820: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2821: fnd_file.put_line(FND_FILE.LOG,' ');
2822:
2823: OKC_XPRT_IMPORT_RULES_PVT.attach_extension_rule_tmpl
2824: (
2817: fnd_file.put_line(FND_FILE.LOG,' ');
2818: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2819: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: Calling API to insert extension rule records');
2820: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2821: fnd_file.put_line(FND_FILE.LOG,' ');
2822:
2823: OKC_XPRT_IMPORT_RULES_PVT.attach_extension_rule_tmpl
2824: (
2825: p_api_version => 1,
2830: x_msg_data => x_msg_data,
2831: x_msg_count => x_msg_count
2832: );
2833:
2834: fnd_file.put_line(FND_FILE.LOG,' ');
2835: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: After Calling API to insert extension rule records');
2836: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2837: fnd_file.put_line(FND_FILE.LOG,' ');
2838:
2831: x_msg_count => x_msg_count
2832: );
2833:
2834: fnd_file.put_line(FND_FILE.LOG,' ');
2835: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: After Calling API to insert extension rule records');
2836: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2837: fnd_file.put_line(FND_FILE.LOG,' ');
2838:
2839:
2832: );
2833:
2834: fnd_file.put_line(FND_FILE.LOG,' ');
2835: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: After Calling API to insert extension rule records');
2836: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2837: fnd_file.put_line(FND_FILE.LOG,' ');
2838:
2839:
2840:
2833:
2834: fnd_file.put_line(FND_FILE.LOG,' ');
2835: fnd_file.put_line(FND_FILE.LOG,'Step 2.2: After Calling API to insert extension rule records');
2836: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2837: fnd_file.put_line(FND_FILE.LOG,' ');
2838:
2839:
2840:
2841: /*
2842: Step 3: Call the CZ Rule Import Concurrent Program
2843: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
2844: */
2845:
2846: fnd_file.put_line(FND_FILE.LOG,' ');
2847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2848: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the CZ Rule Import Concurrent Program');
2849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2850: fnd_file.put_line(FND_FILE.LOG,' ');
2843: CZ Pgm: Import Configuration Rules (CZRULEIMPORTCP)
2844: */
2845:
2846: fnd_file.put_line(FND_FILE.LOG,' ');
2847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2848: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the CZ Rule Import Concurrent Program');
2849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2850: fnd_file.put_line(FND_FILE.LOG,' ');
2851: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
2844: */
2845:
2846: fnd_file.put_line(FND_FILE.LOG,' ');
2847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2848: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the CZ Rule Import Concurrent Program');
2849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2850: fnd_file.put_line(FND_FILE.LOG,' ');
2851: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
2852:
2845:
2846: fnd_file.put_line(FND_FILE.LOG,' ');
2847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2848: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the CZ Rule Import Concurrent Program');
2849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2850: fnd_file.put_line(FND_FILE.LOG,' ');
2851: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
2852:
2853: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_TMPL_MSG');
2846: fnd_file.put_line(FND_FILE.LOG,' ');
2847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2848: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the CZ Rule Import Concurrent Program');
2849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2850: fnd_file.put_line(FND_FILE.LOG,' ');
2851: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
2852:
2853: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_TMPL_MSG');
2854: l_conc_pgm_desc := FND_MESSAGE.get;
2847: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2848: fnd_file.put_line(FND_FILE.LOG,'Step 3: Calling the CZ Rule Import Concurrent Program');
2849: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2850: fnd_file.put_line(FND_FILE.LOG,' ');
2851: fnd_file.put_line(FND_FILE.LOG,'Parameter Run Id : '||G_RUN_ID);
2852:
2853: FND_MESSAGE.set_name('OKC','OKC_XPRT_RULE_CCPRG_TMPL_MSG');
2854: l_conc_pgm_desc := FND_MESSAGE.get;
2855:
2861: sub_request => TRUE,
2862: argument1 => G_RUN_ID
2863: );
2864:
2865: fnd_file.put_line(FND_FILE.LOG,'Request Id of CZ Rule Concurrent Pgm : '||G_REQUEST_ID);
2866:
2867: -- commit the data
2868: COMMIT WORK;
2869:
2870:
2871: IF NVL(G_REQUEST_ID,0) = 0 THEN
2872: -- Could Not submit Conc Pgm
2873: fnd_message.set_name('OKC','OKC_XPRT_SUB_CZ_RUL_PGM');
2874: fnd_file.put_line(FND_FILE.LOG,'Could NOT submit CZ Concurrent Program');
2875: RAISE FND_API.G_EXC_ERROR;
2876: ELSE
2877: -- child submission successful, pause the parent program
2878: fnd_conc_global.set_req_globals
2907: x_dev_status,
2908: x_message
2909: );
2910:
2911: fnd_file.put_line(FND_FILE.LOG,' ');
2912: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2908: x_message
2909: );
2910:
2911: fnd_file.put_line(FND_FILE.LOG,' ');
2912: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2909: );
2910:
2911: fnd_file.put_line(FND_FILE.LOG,' ');
2912: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2910:
2911: fnd_file.put_line(FND_FILE.LOG,' ');
2912: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2911: fnd_file.put_line(FND_FILE.LOG,' ');
2912: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2912: fnd_file.put_line(FND_FILE.LOG,'After Completing CZ Rule Conc Pgm with request id :'||G_REQUEST_ID);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2913: fnd_file.put_line(FND_FILE.LOG,'Run Id : '||G_RUN_ID);
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2914: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2922: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2915: fnd_file.put_line(FND_FILE.LOG,'Results ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2922: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2923: fnd_file.put_line(FND_FILE.LOG,' ');
2916: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2922: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2923: fnd_file.put_line(FND_FILE.LOG,' ');
2924:
2917: fnd_file.put_line(FND_FILE.LOG,'Phase : '||x_phase);
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2922: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2923: fnd_file.put_line(FND_FILE.LOG,' ');
2924:
2925: IF x_dev_phase <> 'COMPLETED' AND
2918: fnd_file.put_line(FND_FILE.LOG,'Status : '||x_status);
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2922: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2923: fnd_file.put_line(FND_FILE.LOG,' ');
2924:
2925: IF x_dev_phase <> 'COMPLETED' AND
2926: x_dev_status NOT IN ('NORMAL','WARNING') THEN
2919: fnd_file.put_line(FND_FILE.LOG,'dev_phase : '||x_dev_phase);
2920: fnd_file.put_line(FND_FILE.LOG,'dev_status : '||x_dev_status);
2921: fnd_file.put_line(FND_FILE.LOG,'Message : '||substr(x_message,1,100));
2922: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2923: fnd_file.put_line(FND_FILE.LOG,' ');
2924:
2925: IF x_dev_phase <> 'COMPLETED' AND
2926: x_dev_status NOT IN ('NORMAL','WARNING') THEN
2927: -- error in CZ Concurrent Program
2924:
2925: IF x_dev_phase <> 'COMPLETED' AND
2926: x_dev_status NOT IN ('NORMAL','WARNING') THEN
2927: -- error in CZ Concurrent Program
2928: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
2929: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
2930: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
2931: RAISE FND_API.G_EXC_ERROR;
2932: END IF;
2925: IF x_dev_phase <> 'COMPLETED' AND
2926: x_dev_status NOT IN ('NORMAL','WARNING') THEN
2927: -- error in CZ Concurrent Program
2928: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
2929: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
2930: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
2931: RAISE FND_API.G_EXC_ERROR;
2932: END IF;
2933:
2926: x_dev_status NOT IN ('NORMAL','WARNING') THEN
2927: -- error in CZ Concurrent Program
2928: fnd_file.put_line(FND_FILE.LOG, 'Error in CZ Rule Import Concurrent Program ');
2929: fnd_file.put_line(FND_FILE.LOG, 'Request Id :'||G_REQUEST_ID);
2930: fnd_file.put_line(FND_FILE.LOG, 'Run Id :'||G_RUN_ID);
2931: RAISE FND_API.G_EXC_ERROR;
2932: END IF;
2933:
2934:
2935: /*
2936: Step 4: Check status of Rules Imported
2937: */
2938:
2939: fnd_file.put_line(FND_FILE.LOG,' ');
2940: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2941: fnd_file.put_line(FND_FILE.LOG,'Step 4: Checking Status of Rules imported');
2942: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2943: fnd_file.put_line(FND_FILE.LOG,' ');
2936: Step 4: Check status of Rules Imported
2937: */
2938:
2939: fnd_file.put_line(FND_FILE.LOG,' ');
2940: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2941: fnd_file.put_line(FND_FILE.LOG,'Step 4: Checking Status of Rules imported');
2942: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2943: fnd_file.put_line(FND_FILE.LOG,' ');
2944:
2937: */
2938:
2939: fnd_file.put_line(FND_FILE.LOG,' ');
2940: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2941: fnd_file.put_line(FND_FILE.LOG,'Step 4: Checking Status of Rules imported');
2942: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2943: fnd_file.put_line(FND_FILE.LOG,' ');
2944:
2945: OKC_XPRT_UTIL_PVT.check_import_status
2938:
2939: fnd_file.put_line(FND_FILE.LOG,' ');
2940: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2941: fnd_file.put_line(FND_FILE.LOG,'Step 4: Checking Status of Rules imported');
2942: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2943: fnd_file.put_line(FND_FILE.LOG,' ');
2944:
2945: OKC_XPRT_UTIL_PVT.check_import_status
2946: (
2939: fnd_file.put_line(FND_FILE.LOG,' ');
2940: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2941: fnd_file.put_line(FND_FILE.LOG,'Step 4: Checking Status of Rules imported');
2942: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2943: fnd_file.put_line(FND_FILE.LOG,' ');
2944:
2945: OKC_XPRT_UTIL_PVT.check_import_status
2946: (
2947: p_run_id => G_RUN_ID,
2951: x_msg_data => x_msg_data,
2952: x_msg_count => x_msg_count
2953: );
2954:
2955: fnd_file.put_line(FND_FILE.LOG,' ');
2956: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2957: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2958: fnd_file.put_line(FND_FILE.LOG,' ');
2959:
2952: x_msg_count => x_msg_count
2953: );
2954:
2955: fnd_file.put_line(FND_FILE.LOG,' ');
2956: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2957: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2958: fnd_file.put_line(FND_FILE.LOG,' ');
2959:
2960: --- If any errors happen abort API
2953: );
2954:
2955: fnd_file.put_line(FND_FILE.LOG,' ');
2956: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2957: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2958: fnd_file.put_line(FND_FILE.LOG,' ');
2959:
2960: --- If any errors happen abort API
2961: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2954:
2955: fnd_file.put_line(FND_FILE.LOG,' ');
2956: fnd_file.put_line(FND_FILE.LOG,'After checking import status');
2957: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2958: fnd_file.put_line(FND_FILE.LOG,' ');
2959:
2960: --- If any errors happen abort API
2961: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2962: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2968: /*
2969: Step 5: Call the Test Publication API
2970: */
2971:
2972: fnd_file.put_line(FND_FILE.LOG,' ');
2973: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2974: fnd_file.put_line(FND_FILE.LOG,'Step 5: Calling the Test Publication API');
2975: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2976: fnd_file.put_line(FND_FILE.LOG,' ');
2969: Step 5: Call the Test Publication API
2970: */
2971:
2972: fnd_file.put_line(FND_FILE.LOG,' ');
2973: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2974: fnd_file.put_line(FND_FILE.LOG,'Step 5: Calling the Test Publication API');
2975: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2976: fnd_file.put_line(FND_FILE.LOG,' ');
2977:
2970: */
2971:
2972: fnd_file.put_line(FND_FILE.LOG,' ');
2973: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2974: fnd_file.put_line(FND_FILE.LOG,'Step 5: Calling the Test Publication API');
2975: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2976: fnd_file.put_line(FND_FILE.LOG,' ');
2977:
2978: OKC_XPRT_UTIL_PVT.create_test_publication
2971:
2972: fnd_file.put_line(FND_FILE.LOG,' ');
2973: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2974: fnd_file.put_line(FND_FILE.LOG,'Step 5: Calling the Test Publication API');
2975: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2976: fnd_file.put_line(FND_FILE.LOG,' ');
2977:
2978: OKC_XPRT_UTIL_PVT.create_test_publication
2979: (
2972: fnd_file.put_line(FND_FILE.LOG,' ');
2973: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2974: fnd_file.put_line(FND_FILE.LOG,'Step 5: Calling the Test Publication API');
2975: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
2976: fnd_file.put_line(FND_FILE.LOG,' ');
2977:
2978: OKC_XPRT_UTIL_PVT.create_test_publication
2979: (
2980: x_return_status => x_return_status,
2981: x_msg_data => x_msg_data,
2982: x_msg_count => x_msg_count
2983: );
2984:
2985: fnd_file.put_line(FND_FILE.LOG,' ');
2986: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2987: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2988: fnd_file.put_line(FND_FILE.LOG,' ');
2989:
2982: x_msg_count => x_msg_count
2983: );
2984:
2985: fnd_file.put_line(FND_FILE.LOG,' ');
2986: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2987: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2988: fnd_file.put_line(FND_FILE.LOG,' ');
2989:
2990: --- If any errors happen abort API
2983: );
2984:
2985: fnd_file.put_line(FND_FILE.LOG,' ');
2986: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2987: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2988: fnd_file.put_line(FND_FILE.LOG,' ');
2989:
2990: --- If any errors happen abort API
2991: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2984:
2985: fnd_file.put_line(FND_FILE.LOG,' ');
2986: fnd_file.put_line(FND_FILE.LOG,'After Calling the Test Publication API ');
2987: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||x_return_status);
2988: fnd_file.put_line(FND_FILE.LOG,' ');
2989:
2990: --- If any errors happen abort API
2991: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3043:
3044: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3045: retcode := 2;
3046: errbuf := x_msg_data;
3047: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
3048: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3049: fnd_file.put_line(FND_FILE.LOG,' ');
3050:
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3044: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3045: retcode := 2;
3046: errbuf := x_msg_data;
3047: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
3048: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3049: fnd_file.put_line(FND_FILE.LOG,' ');
3050:
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3045: retcode := 2;
3046: errbuf := x_msg_data;
3047: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_ERROR);
3048: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3049: fnd_file.put_line(FND_FILE.LOG,' ');
3050:
3051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3052: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3053: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3057:
3058: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3059: retcode := 2;
3060: errbuf := x_msg_data;
3061: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
3062: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3063: fnd_file.put_line(FND_FILE.LOG,' ');
3064:
3065: WHEN OTHERS THEN
3058: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3059: retcode := 2;
3060: errbuf := x_msg_data;
3061: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
3062: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3063: fnd_file.put_line(FND_FILE.LOG,' ');
3064:
3065: WHEN OTHERS THEN
3066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3059: retcode := 2;
3060: errbuf := x_msg_data;
3061: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
3062: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3063: fnd_file.put_line(FND_FILE.LOG,' ');
3064:
3065: WHEN OTHERS THEN
3066: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3067: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
3071:
3072: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3073: retcode := 2;
3074: errbuf := SQLERRM;
3075: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
3076: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3077: fnd_file.put_line(FND_FILE.LOG,' ');
3078:
3079: END tmpl_approval_publish_rules;
3072: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
3073: retcode := 2;
3074: errbuf := SQLERRM;
3075: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
3076: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3077: fnd_file.put_line(FND_FILE.LOG,' ');
3078:
3079: END tmpl_approval_publish_rules;
3080:
3073: retcode := 2;
3074: errbuf := SQLERRM;
3075: fnd_file.put_line(FND_FILE.LOG,'x_return_status: '||G_RET_STS_UNEXP_ERROR);
3076: fnd_file.put_line(FND_FILE.LOG,'errbuf : '||errbuf);
3077: fnd_file.put_line(FND_FILE.LOG,' ');
3078:
3079: END tmpl_approval_publish_rules;
3080:
3081: END OKC_XPRT_IMPORT_PVT ;