DBA Data[Home] [Help]

APPS.MSC_RP_PUB dependencies on MSC_COPY_PLAN_OPTIONS

Line 538: msc_copy_plan_options.init_plan_id('N',NULL,NULL);

534: fetch plan_exists into rp_id,l_rp_plan_version,l_rp_type,rp_designator_id, l_rp_ascp_plan_id;
535: close plan_exists;
536: rp_debug('rp_id ='||rp_id);
537: --initialize copy plan package
538: msc_copy_plan_options.init_plan_id('N',NULL,NULL);
539: rp_debug('IS_NO_VERSION_CHANGE='||IS_NO_VERSION_CHANGE);
540: --check if we need to copy options/inputs again?
541: if rp_id<>RP_NULL_VALUE and (l_rp_ascp_plan_id is not null and l_rp_ascp_plan_id = ascp_id) --are we attempting to recopy from the same base plan?
542: and (l_rp_plan_version <> RP_NULL_VALUE and l_rp_plan_version = l_ascp_plan_version) then -- is the recopy for the same version?

Line 596: MSC_COPY_PLAN_OPTIONS.delete_plan_options

592:
593: rp_debug('bef delete plan options for target rp');
594:
595: -- delete the target plan options
596: MSC_COPY_PLAN_OPTIONS.delete_plan_options
597: (ERROR_DETAILS, l_retcode, rp_id);
598:
599: rp_debug('after delete retcode='||l_retcode);
600:

Line 606: msc_copy_plan_options.init_plan_id('Y',rp_id,rp_designator_id);

602: return UNABLE_TO_PURGE_RP;
603: end if;
604:
605: --initialize copy plan options API with RP target plan id.
606: msc_copy_plan_options.init_plan_id('Y',rp_id,rp_designator_id);
607: end if; --if target rp exists
608:
609: rp_debug('copy from parameters to l_variables');
610:

Line 637: msc_copy_plan_options.copy_plan_options

633: close Desig_Cur;
634:
635: rp_Debug('before Copying plan options... setting savepoint');
636: savepoint BF_CP_RP;
637: msc_copy_plan_options.copy_plan_options
638: (
639: ascp_id, -- > p_source_plan_id
640: RP_PLAN_NAME, -- > p_dest_plan_name
641: l_description, -- > p_dest_plan_desc

Line 657: msc_copy_plan_options.link_Plans

653: Copy ASCP plan's msc_plans.ascp_plan_version to rp plan's msc_plans.ascp_plan_version,
654: ascp msc_plans.plan_id to msc_plans.ascp_plan_id
655:
656: */
657: msc_copy_plan_options.link_Plans
658: (
659: ERROR_DETAILS, --> ERRBUF
660: l_retcode, --> RETCODE
661: ascp_id, --> P_Src_plan_id

Line 670: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

666: rp_debug('after link call l_rp_id='||l_rp_id);
667: rp_debug('l_rp_desig_id='||l_rp_designator_id);
668: if l_retcode > 0 then
669: rollback to BF_CP_RP;
670: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
671: return CODE_ERROR;
672: end if;
673: rp_debug('rp_id='||rp_id);
674: rp_debug('rp_desig_id='||rp_designator_id);

Line 687: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

683: if rp_designator_id <> l_rp_designator_id or rp_id<>l_rp_id then
684: -- something is not right
685: rp_debug('somehow the target ids are changed');
686: rollback to BF_CP_RP;
687: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
688: return CODE_ERROR;
689: end if;
690: rp_debug(' bef executing update: rp_id='||rp_id);
691:

Line 725: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

721: IF l_Counter > l_max_tries THEN
722: rp_Debug('Unable to lock rapid plan rows.');
723: --RAISE;
724: rollback to BF_CP_RP;
725: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
726: return CODE_ERROR;
727: END IF;
728: IF TRUNC(l_Counter/100)*100 = l_Counter THEN
729: rp_Debug('Unable to lock rapid plan row: ('||l_Counter||') Tries...');

Line 756: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

752: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
753: IF l_Counter > l_max_tries THEN
754: rp_Debug('Unable to lock designator row.');
755: rollback to BF_CP_RP;
756: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
757: return CODE_ERROR;
758: END IF;
759: IF TRUNC(l_Counter/100)*100 = l_Counter THEN
760: rp_Debug('Unable to lock organization row: ('||l_Counter||') Tries...');

Line 785: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

781: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
782: IF l_Counter > l_max_tries THEN
783: rp_Debug('Unable to lock plan schedules row.');
784: rollback to BF_CP_RP;
785: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
786: return CODE_ERROR;
787: END IF;
788: IF TRUNC(l_Counter/100)*100 = l_Counter THEN
789: rp_Debug('Unable to lock plan schedules row: ('||l_Counter||') Tries...');

Line 816: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

812: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
813: IF l_Counter > l_max_tries THEN
814: rp_Debug('Unable to lock designator row.');
815: rollback to BF_CP_RP;
816: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
817: return CODE_ERROR;
818: END IF;
819: IF TRUNC(l_Counter/100)*100 = l_Counter THEN
820: rp_Debug('Unable to lock designator row: ('||l_Counter||') Tries...');

Line 826: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

822: END;
823: END LOOP;
824:
825: rp_debug('done with update');
826: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
827: rp_debug('done.');
828:
829:
830: savepoint BF_CALL_CP;

Line 847: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

843: IF (request_id1 = 0) THEN
844: rp_debug(sqlerrm);
845: ERROR_DETAILS := 'Error while submitting concurrent request';
846: rollback to BF_CALL_CP;
847: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
848: return ERROR_CALLING_CP;
849: else
850: ERROR_DETAILS :=request_id1;
851: REQUEST_ID :=request_id1;

Line 943: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

939: IF (request_id2 = 0) THEN
940: rp_debug(sqlerrm);
941: ERROR_DETAILS := 'Error while submitting concurrent request - '|| l_executable2;
942: rollback to BF_CALL_CP2;
943: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
944: return ERROR_CALLING_CP;
945: else
946: ERROR_DETAILS :=request_id2;
947: REQUEST_ID :=request_id2;

Line 1028: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;

1024: when others then
1025: rp_debug(sqlerrm);
1026: ERROR_DETAILS := sqlerrm;
1027: rollback to START_POINT;
1028: msc_copy_plan_options.init_plan_id('N',NULL,NULL); --reset copy package variables before exit;
1029: return CODE_ERROR;
1030:
1031: end COPY_ASCP_RP_OPTIONS;
1032: