[Home] [Help]
2702: lv_res_incr_refresh:= TRUE;
2703: lv_res_partial_refresh := FALSE;
2704: end if;
2705: end if;
2706: /* Bug 2878327 - We will always delete msc_department_resources and insert
2707: into it as it uses no snapshots
2708: */
2709:
2710: /* ds change change start */
2729:
2730: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_RESOURCE_GROUPS', MSC_CL_COLLECTION.v_instance_id, NULL); /*No Organization_id Column */
2731:
2732: IF MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_UTIL.G_ALL_ORGANIZATIONS THEN
2733: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_DEPARTMENT_RESOURCES', MSC_CL_COLLECTION.v_instance_id, -1);
2734: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_SIMULATION_SETS', MSC_CL_COLLECTION.v_instance_id,NULL);
2735: ELSE
2736: v_sub_str :=' AND ORGANIZATION_ID '||MSC_UTIL.v_in_org_str;
2737: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_DEPARTMENT_RESOURCES', MSC_CL_COLLECTION.v_instance_id, -1,v_sub_str);
2733: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_DEPARTMENT_RESOURCES', MSC_CL_COLLECTION.v_instance_id, -1);
2734: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_SIMULATION_SETS', MSC_CL_COLLECTION.v_instance_id,NULL);
2735: ELSE
2736: v_sub_str :=' AND ORGANIZATION_ID '||MSC_UTIL.v_in_org_str;
2737: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_DEPARTMENT_RESOURCES', MSC_CL_COLLECTION.v_instance_id, -1,v_sub_str);
2738: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_SIMULATION_SETS', MSC_CL_COLLECTION.v_instance_id,NULL,v_sub_str);
2739: END IF;
2740:
2741: ELSE
2744:
2745: /* Bug 3041176 - Delete Only Department resources in NetChange */
2746:
2747: p_instance_id := MSC_CL_COLLECTION.v_instance_id;
2748: p_table_name := 'MSC_DEPARTMENT_RESOURCES';
2749:
2750: lv_pbs:= TO_NUMBER( FND_PROFILE.VALUE('MRP_PURGE_BATCH_SIZE'));
2751:
2752: lv_sql_stmt:= 'SELECT COUNT(*)'
2842:
2843: IF (lv_res_incr_refresh) THEN
2844: IF c_rec.DELETED_FLAG= MSC_UTIL.SYS_YES THEN
2845:
2846: UPDATE MSC_DEPARTMENT_RESOURCES
2847: SET CAPACITY_UNITS= 0,
2848: MAX_RATE= 0,
2849: MIN_RATE= 0,
2850: REFRESH_NUMBER= MSC_CL_COLLECTION.v_last_collection_id,
2856: AND RESOURCE_ID= c_rec.RESOURCE_ID
2857: AND SR_INSTANCE_ID= c_rec.SR_INSTANCE_ID;
2858:
2859: ELSE
2860: UPDATE MSC_DEPARTMENT_RESOURCES
2861: SET
2862: RESOURCE_CODE= c_rec.RESOURCE_CODE,
2863: DEPARTMENT_CODE= c_rec.DEPARTMENT_CODE,
2864: DEPARTMENT_DESCRIPTION= c_rec.DEPARTMENT_DESCRIPTION,
2926: END IF; -- refresh mode
2927:
2928: IF ((MSC_CL_COLLECTION.v_is_complete_refresh) OR (lv_res_partial_refresh)) OR
2929: (SQL%NOTFOUND) THEN
2930: INSERT INTO MSC_DEPARTMENT_RESOURCES
2931: ( PLAN_ID,
2932: RESOURCE_CODE,
2933: DEPARTMENT_CODE,
2934: DEPARTMENT_DESCRIPTION,
3074:
3075: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
3076: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
3077: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE');
3078: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_DEPARTMENT_RESOURCES');
3079: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
3080:
3081: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3082: RAISE;
3086:
3087: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
3088: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
3089: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE');
3090: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_DEPARTMENT_RESOURCES');
3091: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
3092:
3093: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
3094: FND_MESSAGE.SET_TOKEN('COLUMN', 'ORGANIZATION_CODE');