831: lv_dummy1 varchar2(32);
832: lv_dummy2 varchar2(32);
833: lv_msc_schema varchar2(32);
834: BEGIN
835: /* DBMS_MVIEW.REFRESH ('MSC_ITEM_SO_SR_LEVELS_MV','c');
836: DBMS_MVIEW.REFRESH ('MSC_ITEM_FCST_SR_LEVELS_MV','c');*/
837:
838: IF p_plan_id is NULL THEN
839: lv_retval := FND_INSTALLATION.GET_APP_INFO ( 'MSC', lv_dummy1, lv_dummy2, lv_msc_schema);
837:
838: IF p_plan_id is NULL THEN
839: lv_retval := FND_INSTALLATION.GET_APP_INFO ( 'MSC', lv_dummy1, lv_dummy2, lv_msc_schema);
840:
841: lv_sql_stmt:= 'TRUNCATE TABLE '||lv_msc_schema||'.MSC_ITEM_SO_SR_LEVELS';
842: EXECUTE IMMEDIATE lv_sql_stmt;
843:
844: lv_sql_stmt:= 'TRUNCATE TABLE '||lv_msc_schema||'.MSC_ITEM_FCST_SR_LEVELS';
845: EXECUTE IMMEDIATE lv_sql_stmt;
846:
847: lv_plan_id := ' ';
848:
849: ELSE
850: DELETE MSC_ITEM_SO_SR_LEVELS where plan_id = p_plan_id;
851: DELETE MSC_ITEM_FCST_SR_LEVELS where plan_id = p_plan_id;
852: lv_plan_id := ' WHERE plan_id = '||p_plan_id||' ';
853: END IF;
854:
856:
857: IF (p_plan_so > 0 OR p_plan_id IS NULL) THEN
858:
859: lv_sql_stmt :=
860: ' INSERT /*+ APPEND */ INTO MSC_ITEM_SO_SR_LEVELS'
861: ||' (INVENTORY_ITEM_ID ,'
862: ||' ORGANIZATION_ID ,'
863: ||' SR_INSTANCE_ID ,'
864: ||' PLAN_ID ,'
916: ||' CUSTOMER_ID ,'
917: ||' CUSTOMER_SITE_ID ,'
918: ||' REGION_ID ,'
919: ||' COMP_DRP_PLANNED '
920: ||' FROM MSC_ITEM_SO_SR_LEVELS_V '
921: ||lv_plan_id;
922: EXECUTE IMMEDIATE lv_sql_stmt ;
923: COMMIT;
924:
921: ||lv_plan_id;
922: EXECUTE IMMEDIATE lv_sql_stmt ;
923: COMMIT;
924:
925: LOG_MESSAGE('Inserted records into MSC_ITEM_SO_SR_LEVELS');
926: END IF;
927:
928:
929: IF (p_global_forecast > 0 OR p_plan_id is NULL) THEN