DBA Data[Home] [Help]

APPS.MSC_WS_IO dependencies on MSC_UTIL

Line 665: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAll) = MSC_UTIL.SYS_NO THEN

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);
668: LOOP
669: FETCH schedule_c into l_InsId, l_SchedId, l_VarType, l_Probability;

Line 864: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAll) = MSC_UTIL.SYS_NO THEN

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);
867: LOOP
868: FETCH schedule_c into l_InsId, l_OrgId, l_SchedId, l_VarType, l_Probability;

Line 915: l_Insert := MSC_UTIL.SYS_YES;

911:
912: -- insert all scenario set from parameter into l_ScenarioTbl
913: FOR I IN g_ILocDmdSchTbl.first..g_ILocDmdSchTbl.last
914: LOOP
915: l_Insert := MSC_UTIL.SYS_YES;
916: IF l_ScenarioTbl.COUNT > 0 THEN
917: FOR J IN l_ScenarioTbl.first..l_ScenarioTbl.last
918: LOOP
919: IF l_ScenarioTbl(J) = g_ILocDmdSchTbl(I).ScenarioSet THEN

Line 920: l_Insert := MSC_UTIL.SYS_NO;

916: IF l_ScenarioTbl.COUNT > 0 THEN
917: FOR J IN l_ScenarioTbl.first..l_ScenarioTbl.last
918: LOOP
919: IF l_ScenarioTbl(J) = g_ILocDmdSchTbl(I).ScenarioSet THEN
920: l_Insert := MSC_UTIL.SYS_NO;
921: EXIT;
922: END IF;
923: END LOOP;
924: END IF;

Line 925: IF l_Insert = MSC_UTIL.SYS_YES THEN

921: EXIT;
922: END IF;
923: END LOOP;
924: END IF;
925: IF l_Insert = MSC_UTIL.SYS_YES THEN
926: l_ScenarioTbl.extend;
927: l_ScenarioTbl(l_ScenarioTbl.COUNT) := g_ILocDmdSchTbl(I).ScenarioSet;
928: END IF;
929: END LOOP;

Line 1697: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAllSchsFlag) = MSC_UTIL.SYS_YES THEN

1693: END IF;
1694:
1695: -- if PurgeAllSchsFlag is set, purge all global demand schedules,
1696: -- local demand schedule and local supply schedules
1697: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAllSchsFlag) = MSC_UTIL.SYS_YES THEN
1698: BEGIN
1699: MSC_WS_COMMON.PURGE_ALL_SCHEDULES(PlanId);
1700: EXCEPTION WHEN others THEN
1701: g_ErrorCode := 'ERROR_UNEXPECTED_00011';

Line 1710: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAllSchsFlag) = MSC_UTIL.SYS_YES THEN

1706: -- update item simulation set and overwrite
1707: UPDATE_PLAN_OPTIONS(PlanId, ItemSimulationSetId, ServiceLvlSetId);
1708:
1709: -- set all global/local demand/supply schedules
1710: IF MSC_WS_COMMON.BOOL_TO_NUMBER(PurgeAllSchsFlag) = MSC_UTIL.SYS_YES THEN
1711: l_String := INSERT_ALL_SCHEDULES(PlanId, l_InsId, UserId);
1712: ELSE
1713: l_String := INSERT_OR_UPDATE_ALL_SCHS(PlanId, l_InsId, UserId);
1714: END IF;