[Home] [Help]
638: --
639: -- Output: No output.
640: -- =============================================================
641: PROCEDURE LOAD_GLB_DMD_SCH_TBL(
642: SchTbl OUT NOCOPY MscIDmdSchVarTbl,
643: PurgeAll IN VARCHAR2,
644: PlanId IN NUMBER
645: ) AS
646: cursor schedule_c(idPlan number) is
659: l_SchedId NUMBER;
660: l_VarType NUMBER;
661: l_Probability NUMBER;
662: BEGIN
663: SchTbl := MscIDmdSchVarTbl();
664: SchTbl.DELETE;
665: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAll) = MSC_UTIL.SYS_NO THEN
666: BEGIN
667: OPEN schedule_c(PlanId);
700: InsId IN NUMBER,
701: PlanId IN NUMBER
702: ) RETURN VARCHAR2 AS
703: l_String VARCHAR2(100);
704: l_SchTbl MscIDmdSchVarTbl; -- global shedules in database
705: l_VarType NUMBER;
706: l_Sum NUMBER;
707: BEGIN
708: IF g_IGlbDmdSchTbl.COUNT > 0 THEN
833: --
834: -- Output: No output.
835: -- =============================================================
836: PROCEDURE LOAD_LOC_DMD_SCH_TBL(
837: SchTbl OUT NOCOPY MscIDmdSchVarTbl,
838: PurgeAll IN VARCHAR2,
839: ScenarioSetId IN NUMBER,
840: PlanId IN NUMBER
841: ) AS
858: l_SchedId NUMBER;
859: l_VarType NUMBER;
860: l_Probability NUMBER;
861: BEGIN
862: SchTbl := MscIDmdSchVarTbl();
863: SchTbl.DELETE;
864: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAll) = MSC_UTIL.SYS_NO THEN
865: BEGIN
866: OPEN schedule_c(PlanId, ScenarioSetId);
900: PlanId IN NUMBER
901: ) RETURN VARCHAR2 AS
902: l_String VARCHAR2(100);
903: l_ScenarioTbl MscNumberArr; -- scenario sets in local demand schedules parameter
904: l_SchTbl MscIDmdSchVarTbl; -- local shedules for a single scenario set
905: l_Insert NUMBER;
906: l_VarType NUMBER;
907: l_Sum NUMBER;
908: BEGIN