[Home] [Help]
289: FALSE); -- sub request
290: commit;
291: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Request : '||lv_request_id_wsh||' :Creates WSH Snapshot Logs and Snapshots');
292:
293: IF MRP_CL_FUNCTION.CHECK_AHL_VER = 1 THEN
294:
295: lv_request_id_ahl := FND_REQUEST.SUBMIT_REQUEST(
296: 'MSC',
297: 'MSCAHLSN',
370: wait_for_request(lv_request_id_wsh, 10, lv_out);
371: if lv_success THEN
372: if lv_out = 2 THEN lv_success := FALSE ; end if;
373: end if;
374: if MRP_CL_FUNCTION.CHECK_AHL_VER = 1 THEN
375: wait_for_request(lv_request_id_ahl, 10, lv_out);
376: if lv_success THEN
377: if lv_out = 2 THEN lv_success := FALSE ; end if;
378: end if;
438:
439: /* UPDATE THE PROFILE OPTION MSC_SOURCE_SETUP TO NO */
440:
441: IF lv_success THEN
442: -- AND ( MRP_CL_FUNCTION.MAP_REGION_TO_SITE(null) = 1) THEN --9396359
443:
444: begin
445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Updating Profile Option MSC_SOURCE_SETUP to No ');
446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Region Site Mapping not being called here ');
631: ERRBUF := 'NO_USER_DEFINED';
632: RETURN;
633: END;
634:
635: IF MRP_CL_FUNCTION.validateUser(l_user_id,MSC_UTIL.TASK_COLL,lv_log_msg) THEN
636: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_COLL,
637: l_user_id,
638: -1, --l_resp_id,
639: -1 --l_application_id
632: RETURN;
633: END;
634:
635: IF MRP_CL_FUNCTION.validateUser(l_user_id,MSC_UTIL.TASK_COLL,lv_log_msg) THEN
636: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_COLL,
637: l_user_id,
638: -1, --l_resp_id,
639: -1 --l_application_id
640: );
2095: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'IBUC HISTORY flag'||lv_ibuc_history_flag );
2096: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'REFRESH TYPE '||v_refresh_type );
2097: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'LAST IBUC COLL DATE'||v_last_IBUC_coll_date );
2098:
2099: v_ibuc_request_id := MRP_CL_FUNCTION.IB_CONTRACTS( v_refresh_type , v_last_IBUC_coll_date ,v_window );
2100:
2101: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Submitted Request '||v_ibuc_request_id ||
2102: 'For calculating the IBUC history');
2103: COMMIT ;
2543: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,
2544: 'Calling function MAP_REGION_TO_SITE with max_lrd:'
2545: ||max_lrd);
2546:
2547: IF MRP_CL_FUNCTION.MAP_REGION_TO_SITE(max_lrd)=1 THEN NULL; END IF;
2548:
2549: lv_elapsed_mins := CEIL((SYSDATE- lv_task_start_time)*14400.0)/10;
2550: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,
2551: 'Time consumed for calling map_region_to_site:'
2555: 'after calling MRP_MAP_REG_SITE.MAP_REGION_TO_SITE');
2556:
2557: END IF;
2558:
2559: /*Commented the call to MRP_CL_FUNCTION.LONG_TEXT w.r.t bug 13628509
2560: /*****Adddition of code for bug 12359111 by ngaddamp starts here
2561: =====If collections is run distributed mode, data is inserted in to the destination staging table MSC_ST_LONG_TEXT,
2562: from the table MSC_ST_LONG_TEXT on the source=====
2563: IF ( pCALLING_MODULE = G_COLLECTIONS
2566: AND CHECK_DB_LINK =1 ) THEN
2567:
2568: lv_temp_stmt:=
2569: 'BEGIN'
2570: ||' :lv_out := MRP_CL_FUNCTION.LONG_TEXT '||';'
2571: ||'END;';
2572:
2573: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Before calling mrpclhab' ||lv_temp_stmt);
2574: EXECUTE IMMEDIATE lv_temp_stmt
2601: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,
2602: 'Calling function POPULATE_WO_SUB_COMP');
2603:
2604:
2605: IF MRP_CL_FUNCTION.POPULATE_WO_SUB_COMP = 1 THEN NULL; END IF;
2606:
2607: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,
2608: 'after calling POPULATE_WO_SUB_COMP');
2609: END IF;