295:
296:
297:
298: /* removed LINK_SUPP_SO_DEMAND_EXT for bug5952569 and placed in
299: package MSC_CL_DEMAND_ODS_LOAD */
300: -- ******************************
301:
302: /* removed LINK_SUPP_SO_DEMAND_110 for bug5952569 and placed in
303: package MSC_CL_DEMAND_ODS_LOAD */
299: package MSC_CL_DEMAND_ODS_LOAD */
300: -- ******************************
301:
302: /* removed LINK_SUPP_SO_DEMAND_110 for bug5952569 and placed in
303: package MSC_CL_DEMAND_ODS_LOAD */
304:
305: /* removed LINK_SUPP_SO_DEMAND_11I2 for bug5952569 and placed in
306: package MSC_CL_DEMAND_ODS_LOAD */
307:
302: /* removed LINK_SUPP_SO_DEMAND_110 for bug5952569 and placed in
303: package MSC_CL_DEMAND_ODS_LOAD */
304:
305: /* removed LINK_SUPP_SO_DEMAND_11I2 for bug5952569 and placed in
306: package MSC_CL_DEMAND_ODS_LOAD */
307:
308:
309:
310: FUNCTION PURGE_STAGING (pINSTANCE_ID in number)
397: through bug5952569 */
398: /* procedure drop_supplies_tmp_ind has been moved to package MSC_CL_SUPPLY_ODS_LOAD
399: through bug5952569 */
400:
401: /* function drop_demands_tmp_ind has been moved to package MSC_CL_DEMAND_ODS_LOAD
402: (bug5952569) */
403:
404: /* function drop_sales_orders_tmp_ind has been moved to package MSC_CL_DEMAND_ODS_LOAD
405: (bug5952569) */
400:
401: /* function drop_demands_tmp_ind has been moved to package MSC_CL_DEMAND_ODS_LOAD
402: (bug5952569) */
403:
404: /* function drop_sales_orders_tmp_ind has been moved to package MSC_CL_DEMAND_ODS_LOAD
405: (bug5952569) */
406:
407: --****************************
408: PROCEDURE LOG_MESSAGE(pSOURCE IN NUMBER,
772: WHEN OTHERS THEN
773: RETURN FALSE;
774: END is_msctbl_partitioned;
775:
776: /* function LINK_PARENT_SALES_ORDERS has been moved to package MSC_CL_DEMAND_ODS_LOAD
777: through bug5952569 */
778:
779: /* function LINK_PARENT_SALES_ORDERS_MDS has been moved to package MSC_CL_DEMAND_ODS_LOAD
780: through bug5952569 */
775:
776: /* function LINK_PARENT_SALES_ORDERS has been moved to package MSC_CL_DEMAND_ODS_LOAD
777: through bug5952569 */
778:
779: /* function LINK_PARENT_SALES_ORDERS_MDS has been moved to package MSC_CL_DEMAND_ODS_LOAD
780: through bug5952569 */
781:
782:
783:
1461: ELSIF pTASKNUM= TASK_MDS_DEMAND THEN
1462:
1463: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
1464: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1465: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
1466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1467: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
1468: ELSE
1469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Loading of Supplies failed.TASK_MDS_DEMAND');
1463: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
1464: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1465: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
1466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1467: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
1468: ELSE
1469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Loading of Supplies failed.TASK_MDS_DEMAND');
1470: RAISE SUPPLIES_LOAD_FAIL;
1471: END IF;
1472:
1473: ELSIF pTASKNUM= TASK_ITEM_FORECASTS THEN
1474:
1475: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1476: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS');
1477: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1478: MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS;
1479:
1480: ELSIF pTASKNUM= TASK_WIP_COMP_DEMAND THEN
1474:
1475: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1476: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS');
1477: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1478: MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS;
1479:
1480: ELSIF pTASKNUM= TASK_WIP_COMP_DEMAND THEN
1481:
1482: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
1493:
1494: IF ((v_coll_prec.org_group_flag <> MSC_UTIL.G_ALL_ORGANIZATIONS ) AND (v_exchange_mode = MSC_UTIL.SYS_YES)) THEN
1495:
1496: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1497: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
1498: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1499: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
1500: ELSE
1501: NULL;
1495:
1496: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1497: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
1498: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1499: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
1500: ELSE
1501: NULL;
1502: END IF;
1503:
1568: ELSIF pTASKNUM= TASK_SALES_ORDER THEN
1569:
1570: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
1571: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1572: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
1573: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1574: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
1575:
1576: IF (v_is_complete_refresh = TRUE and v_is_so_complete_refresh = FALSE) THEN
1570: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
1571: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1572: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
1573: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1574: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
1575:
1576: IF (v_is_complete_refresh = TRUE and v_is_so_complete_refresh = FALSE) THEN
1577: IF (v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
1578: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
1576: IF (v_is_complete_refresh = TRUE and v_is_so_complete_refresh = FALSE) THEN
1577: IF (v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
1578: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
1579: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
1580: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
1581: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1582: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
1583: -- Calling the Linking of external Sales orders for the fix 2353397 --
1584: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
1578: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
1579: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
1580: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
1581: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1582: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
1583: -- Calling the Linking of external Sales orders for the fix 2353397 --
1584: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
1585: ELSIF (v_apps_ver = MSC_UTIL.G_APPS110) THEN
1586: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
1580: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
1581: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1582: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
1583: -- Calling the Linking of external Sales orders for the fix 2353397 --
1584: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
1585: ELSIF (v_apps_ver = MSC_UTIL.G_APPS110) THEN
1586: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
1587: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
1588: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110');
1584: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
1585: ELSIF (v_apps_ver = MSC_UTIL.G_APPS110) THEN
1586: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
1587: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
1588: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110');
1589: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1590: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110;
1591: END IF;
1592: END IF;
1586: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
1587: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
1588: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110');
1589: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1590: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110;
1591: END IF;
1592: END IF;
1593:
1594: ELSE
1605:
1606: ELSIF pTASKNUM= TASK_HARD_RESERVATION THEN
1607:
1608: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1609: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION');
1610: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1611: MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION;
1612:
1613: ELSIF pTASKNUM= TASK_SOURCING THEN
1607:
1608: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1609: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION');
1610: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
1611: MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION;
1612:
1613: ELSIF pTASKNUM= TASK_SOURCING THEN
1614:
1615: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1890: MSC_CL_OTHER_ODS_LOAD.LOAD_FISCAL_CALENDAR;
1891:
1892: ELSIF pTASKNUM= TASK_PAYBACK_DEMAND_SUPPLY THEN
1893: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1894: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS');
1895: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
1896: MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS;
1897:
1898: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1892: ELSIF pTASKNUM= TASK_PAYBACK_DEMAND_SUPPLY THEN
1893: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1894: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS');
1895: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
1896: MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS;
1897:
1898: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
1899: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_SUPPLY_ODS_LOAD.LOAD_PAYBACK_SUPPLIES');
1900: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
2195:
2196: ELSIF pTASKNUM= PTASK_HARD_RESERVATION THEN
2197:
2198: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2199: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION');
2200: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2201: MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION;
2202:
2203: ELSIF pTASKNUM= PTASK_SOURCING THEN
2197:
2198: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2199: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION');
2200: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2201: MSC_CL_DEMAND_ODS_LOAD.LOAD_HARD_RESERVATION;
2202:
2203: ELSIF pTASKNUM= PTASK_SOURCING THEN
2204:
2205: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2244: (v_coll_prec.user_supply_demand_flag = MSC_UTIL.SYS_YES) ) THEN
2245:
2246: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
2247: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2248: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_MDS_DEMAND -- Either MDS Is targetted');
2251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'or all the demands are incremental or None in this run. ');
2252: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2246: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
2247: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2248: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_MDS_DEMAND -- Either MDS Is targetted');
2251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'or all the demands are incremental or None in this run. ');
2252: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2253: ELSE
2254: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Loading of Supplies failed.mps etc');
2248: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_MDS_DEMAND -- Either MDS Is targetted');
2251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'or all the demands are incremental or None in this run. ');
2252: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2253: ELSE
2254: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Loading of Supplies failed.mps etc');
2255: RAISE SUPPLIES_LOAD_FAIL;
2256: END IF;
2256: END IF;
2257:
2258: ELSE
2259: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2260: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2261: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2262: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2263: END IF;
2264:
2258: ELSE
2259: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2260: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2261: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2262: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2263: END IF;
2264:
2265: END IF;
2266:
2320: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_FORECAST');
2321: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling LOAD_ITEM_FORECAST From PTASK_FORECAST_DEMAND-- Either forecast id Targetted ');
2323: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'or all the demands are incremental or None in this run. ');
2324: MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS;
2325:
2326: END IF;
2327:
2328:
2343: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_FORECAST');
2344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2345: v_is_incremental_refresh := TRUE;
2346: v_exchange_mode := MSC_UTIL.SYS_NO;
2347: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS From PTASK_ODS_DEMAND');
2348: MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS;
2349: END IF;
2350:
2351: IF (v_coll_prec.wip_flag = MSC_UTIL.SYS_YES and v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_INCR) THEN
2344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2345: v_is_incremental_refresh := TRUE;
2346: v_exchange_mode := MSC_UTIL.SYS_NO;
2347: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS From PTASK_ODS_DEMAND');
2348: MSC_CL_DEMAND_ODS_LOAD.LOAD_ITEM_FORECASTS;
2349: END IF;
2350:
2351: IF (v_coll_prec.wip_flag = MSC_UTIL.SYS_YES and v_coll_prec.wip_sn_flag = MSC_UTIL.SYS_INCR) THEN
2352: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
2373: (v_coll_prec.user_supply_demand_flag = MSC_UTIL.SYS_YES) ) THEN
2374:
2375: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
2376: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2377: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2379: v_is_incremental_refresh := TRUE;
2380: v_exchange_mode := MSC_UTIL.SYS_NO;
2381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND');
2377: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2379: v_is_incremental_refresh := TRUE;
2380: v_exchange_mode := MSC_UTIL.SYS_NO;
2381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND');
2382: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2383: ELSE
2384: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ' Loading of Supplies failed MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2385: RAISE SUPPLIES_LOAD_FAIL;
2378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2379: v_is_incremental_refresh := TRUE;
2380: v_exchange_mode := MSC_UTIL.SYS_NO;
2381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND');
2382: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2383: ELSE
2384: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ' Loading of Supplies failed MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2385: RAISE SUPPLIES_LOAD_FAIL;
2386: END IF;
2380: v_exchange_mode := MSC_UTIL.SYS_NO;
2381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND');
2382: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2383: ELSE
2384: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ' Loading of Supplies failed MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2385: RAISE SUPPLIES_LOAD_FAIL;
2386: END IF;
2387:
2388: ELSE --- all the supplies flag are no
2386: END IF;
2387:
2388: ELSE --- all the supplies flag are no
2389: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2390: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2392: v_is_incremental_refresh := TRUE;
2393: v_exchange_mode := MSC_UTIL.SYS_NO;
2394: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND -- No Supplies are Collected in this run');
2390: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND');
2391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2392: v_is_incremental_refresh := TRUE;
2393: v_exchange_mode := MSC_UTIL.SYS_NO;
2394: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND -- No Supplies are Collected in this run');
2395: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2396: END IF; ---any supply flag is yes
2397:
2398: END IF;
2391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2392: v_is_incremental_refresh := TRUE;
2393: v_exchange_mode := MSC_UTIL.SYS_NO;
2394: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling Incremental MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND From PTASK_ODS_DEMAND -- No Supplies are Collected in this run');
2395: MSC_CL_DEMAND_ODS_LOAD.LOAD_DEMAND;
2396: END IF; ---any supply flag is yes
2397:
2398: END IF;
2399:
2398: END IF;
2399:
2400:
2401:
2402: /* AFTER HANDLING OTHER DEMANDS INCREMENTAL PERFORM THE MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND */
2403: /* -------------------------------------------------------------------- */
2404:
2405: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2406: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
2402: /* AFTER HANDLING OTHER DEMANDS INCREMENTAL PERFORM THE MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND */
2403: /* -------------------------------------------------------------------- */
2404:
2405: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2406: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
2407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2408: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND From PTASK_ODS_DEMAND -- One of the Demands is Targetted in this run');
2409: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
2410:
2404:
2405: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2406: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
2407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2408: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND From PTASK_ODS_DEMAND -- One of the Demands is Targetted in this run');
2409: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
2410:
2411: END IF; -- Is any Demand Targetted in Continous
2412:
2405: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2406: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
2407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2408: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND From PTASK_ODS_DEMAND -- One of the Demands is Targetted in this run');
2409: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
2410:
2411: END IF; -- Is any Demand Targetted in Continous
2412:
2413: elsif (v_is_partial_refresh) THEN -- Targeted collections
2412:
2413: elsif (v_is_partial_refresh) THEN -- Targeted collections
2414:
2415: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2416: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
2417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2418: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
2419: -- Load Demand information from ODS table into
2420: -- the temp table.
2414:
2415: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2416: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND');
2417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2418: MSC_CL_DEMAND_ODS_LOAD.LOAD_ODS_DEMAND;
2419: -- Load Demand information from ODS table into
2420: -- the temp table.
2421: end if;
2422:
2587: (v_coll_prec.user_supply_demand_flag = MSC_UTIL.SYS_YES) ) THEN
2588:
2589: -- If any of the supply flags are enabled then wait for supplies to get finished
2590: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
2591: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER_2 ...');
2592: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2593: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2594: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2595: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2589: -- If any of the supply flags are enabled then wait for supplies to get finished
2590: IF MSC_CL_SUPPLY_ODS_LOAD.IS_SUPPLIES_LOAD_DONE THEN
2591: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER_2 ...');
2592: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2593: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2594: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2595: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2596: ELSE
2597: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Loading of Supplies failed.MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2591: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER_2 ...');
2592: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2593: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2594: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2595: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2596: ELSE
2597: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Loading of Supplies failed.MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2598: RAISE SUPPLIES_LOAD_FAIL;
2599: END IF;
2593: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2594: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2595: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2596: ELSE
2597: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Loading of Supplies failed.MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2598: RAISE SUPPLIES_LOAD_FAIL;
2599: END IF;
2600:
2601: ELSE -- no need to wait for supplies
2598: RAISE SUPPLIES_LOAD_FAIL;
2599: END IF;
2600:
2601: ELSE -- no need to wait for supplies
2602: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER_2 ...');
2603: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2604: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2606: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2600:
2601: ELSE -- no need to wait for supplies
2602: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER_2 ...');
2603: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2604: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2606: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2607: END IF;
2608:
2602: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER_2 ...');
2603: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2604: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER');
2605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2606: MSC_CL_DEMAND_ODS_LOAD.LOAD_SALES_ORDER;
2607: END IF;
2608:
2609: IF ( v_is_so_incremental_refresh ) THEN
2610: IF ( v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
2610: IF ( v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
2611:
2612: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
2613: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2614: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
2615: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2616: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
2617: -- Calling the Linking of external Sales orders for the fix 2353397 --
2618: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
2612: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
2613: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2614: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
2615: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2616: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
2617: -- Calling the Linking of external Sales orders for the fix 2353397 --
2618: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
2619:
2620: ELSIF ( v_apps_ver = MSC_UTIL.G_APPS110) THEN
2614: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
2615: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2616: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
2617: -- Calling the Linking of external Sales orders for the fix 2353397 --
2618: -- MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
2619:
2620: ELSIF ( v_apps_ver = MSC_UTIL.G_APPS110) THEN
2621:
2622: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
2620: ELSIF ( v_apps_ver = MSC_UTIL.G_APPS110) THEN
2621:
2622: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
2623: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2624: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110');
2625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2626: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110;
2627: END IF;
2628: END IF;
2622: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 110 source ...');
2623: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2624: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110');
2625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2626: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_110;
2627: END IF;
2628: END IF;
2629:
2630: ELSIF pTASKNUM= PTASK_NET_RESOURCE_AVAIL THEN
2671:
2672: ELSIF pTASKNUM= PTASK_DESIGNATOR THEN
2673:
2674: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2675: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
2676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2677: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
2678:
2679: ELSIF pTASKNUM= PTASK_BIS_PFMC_MEASURES THEN
2673:
2674: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2675: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
2676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
2677: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
2678:
2679: ELSIF pTASKNUM= PTASK_BIS_PFMC_MEASURES THEN
2680:
2681: IF v_apps_ver <> MSC_UTIL.G_APPS107 THEN
2859: END IF;
2860: ELSIF pTASKNUM= PTASK_PAYBACK_DEMAND_SUPPLY THEN --bug 5861050
2861:
2862: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2863: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS');
2864: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
2865: MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS;
2866:
2867: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2861:
2862: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2863: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS');
2864: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
2865: MSC_CL_DEMAND_ODS_LOAD.LOAD_PAYBACK_DEMANDS;
2866:
2867: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
2868: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_SUPPLY_ODS_LOAD.LOAD_PAYBACK_SUPPLIES');
2869: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
3840:
3841: /* load schedule to provide schedule designator information */
3842:
3843: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
3844: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
3845: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
3846: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
3847:
3848: COMMIT;
3842:
3843: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
3844: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
3845: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
3846: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
3847:
3848: COMMIT;
3849:
3850: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'after MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
3846: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
3847:
3848: COMMIT;
3849:
3850: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'after MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
3851: /* load forecast designators */
3852:
3853: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
3854: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS');
3850: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1, 'after MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
3851: /* load forecast designators */
3852:
3853: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
3854: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS');
3855: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
3856: MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS;
3857:
3858: COMMIT;
3852:
3853: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
3854: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS');
3855: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
3856: MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS;
3857:
3858: COMMIT;
3859:
3860: /* load unit of measure */
4255:
4256: IF v_apps_ver >= MSC_UTIL.G_APPS115 THEN --Version
4257: /* call the function to link the Demand_id and Parent_id in MSC_DEMANDS for 11i Source instance */
4258:
4259: IF MSC_CL_DEMAND_ODS_LOAD.LINK_PARENT_SALES_ORDERS_MDS THEN
4260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Linking of Sales Order line in MDS to its Parent Sales orders is successful.....');
4261: ELSE
4262: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Error in Linking Sales order line in MDS to its parent Sales order......');
4263: RETCODE := MSC_UTIL.G_WARNING;
4274: END IF;
4275: END IF;
4276: /* ds change end */
4277: IF (v_is_complete_refresh) THEN
4278: IF (MSC_CL_SUPPLY_ODS_LOAD.drop_supplies_tmp_ind and MSC_CL_DEMAND_ODS_LOAD.drop_demands_tmp_ind and MSC_CL_DEMAND_ODS_LOAD.drop_sales_orders_tmp_ind) THEN
4279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Index Dropping on Temp Tables successful.');
4280: ELSE
4281: ROLLBACK;
4282: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Failed in Dropping the Indexes on Temp Tables.' );
4309: IF ( v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
4310: BEGIN
4311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
4312: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
4313: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT');
4314: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
4315: -- Calling the Linking of external Sales orders for the fix 2353397 --
4316: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
4317: END;
4312: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
4313: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT');
4314: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
4315: -- Calling the Linking of external Sales orders for the fix 2353397 --
4316: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
4317: END;
4318:
4319: END IF;
4320: END IF;
5036:
5037: END Q_PARTIAL_TASK;
5038:
5039:
5040: /* procedure LOAD_ODS_DEMAND has been moved to package MSC_CL_DEMAND_ODS_LOAD
5041: through bug5952569 */
5042:
5043:
5044:
5473: v_is_partial_refresh := FALSE;
5474: end if;
5475:
5476: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
5477: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
5478: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
5479: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
5480:
5481: COMMIT;
5475:
5476: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
5477: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR');
5478: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
5479: MSC_CL_DEMAND_ODS_LOAD.LOAD_DESIGNATOR;
5480:
5481: COMMIT;
5482:
5483: END IF;
5491: v_is_partial_refresh := FALSE;
5492: end if;
5493:
5494: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
5495: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS');
5496: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
5497: MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS;
5498:
5499: END IF;
5493:
5494: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
5495: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS');
5496: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
5497: MSC_CL_DEMAND_ODS_LOAD.LOAD_FORECASTS;
5498:
5499: END IF;
5500:
5501:
5954: AND v_coll_prec.sales_order_flag =MSC_UTIL.SYS_NO) THEN
5955: IF ( v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
5956: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
5957: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
5958: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
5959: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
5960: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
5961: END IF;
5962: END IF;
5956: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
5957: FND_MESSAGE.SET_NAME('MSC', 'MSC_DL_TASK_START_PARTIAL');
5958: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2');
5959: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
5960: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_11I2;
5961: END IF;
5962: END IF;
5963:
5964: IF (v_is_cont_refresh) and (
6019: (v_is_cont_refresh AND v_coll_prec.mds_sn_flag = MSC_UTIL.SYS_TGT) THEN -- in auto collcns if mds is targeted
6020:
6021: v_exchange_mode := MSC_UTIL.SYS_YES;
6022:
6023: IF MSC_CL_DEMAND_ODS_LOAD.LINK_PARENT_SALES_ORDERS_MDS THEN
6024: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Linking of Sales Order line in MDS to its Parent Sales orders is successful.....');
6025: ELSE
6026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Error in Linking Sales order line in MDS to its parent Sales order......');
6027: RETCODE := MSC_UTIL.G_WARNING;
6026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, 'Error in Linking Sales order line in MDS to its parent Sales order......');
6027: RETCODE := MSC_UTIL.G_WARNING;
6028: END IF;
6029:
6030: IF MSC_CL_DEMAND_ODS_LOAD.drop_demands_tmp_ind THEN
6031: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Successfully Dropped the temp Index on Demands table.' );
6032: ELSE
6033: ROLLBACK;
6034: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Failed in Dropping the temp Index on Demands table.' );
6034: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Failed in Dropping the temp Index on Demands table.' );
6035: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6036:
6037: RETCODE := MSC_UTIL.G_ERROR;
6038: END IF; ---- call to MSC_CL_DEMAND_ODS_LOAD.drop_demands_tmp_ind
6039:
6040: END IF;
6041: END IF;
6042:
6041: END IF;
6042:
6043: IF (v_coll_prec.sales_order_flag = MSC_UTIL.SYS_YES) THEN
6044: IF (v_is_partial_refresh) OR (v_is_cont_refresh and v_coll_prec.so_sn_flag = MSC_UTIL.SYS_TGT) then
6045: IF MSC_CL_DEMAND_ODS_LOAD.drop_sales_orders_tmp_ind THEN
6046: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Successfully Dropped the temp Index on Sales Orders table.' );
6047: ELSE
6048: ROLLBACK;
6049: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'Failed in Dropping the temp Index on Sales Orders table.' );
6092: IF ( v_apps_ver >= MSC_UTIL.G_APPS115 ) THEN
6093: BEGIN
6094: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ' Calling Linking of Sales Order for 11i source ...');
6095: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
6096: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT');
6097: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
6098: -- Calling the Linking of external Sales orders for the fix 2353397 --
6099: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
6100: END;
6095: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
6096: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT');
6097: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
6098: -- Calling the Linking of external Sales orders for the fix 2353397 --
6099: MSC_CL_DEMAND_ODS_LOAD.LINK_SUPP_SO_DEMAND_EXT;
6100: END;
6101:
6102: END IF;
6103: END IF;