[Home] [Help]
2171: IF MSC_CL_COLLECTION.v_exchange_mode=MSC_UTIL.SYS_YES THEN
2172: lv_tbl:= 'RESOURCE_INSTANCE_REQS_'||MSC_CL_COLLECTION.v_instance_code;
2173: lv_supplies_tbl:= 'SUPPLIES_'||MSC_CL_COLLECTION.v_instance_code;
2174: ELSE
2175: lv_tbl:= 'MSC_RESOURCE_INSTANCE_REQS';
2176: lv_supplies_tbl:= 'MSC_SUPPLIES';
2177: END IF;
2178:
2179: lv_cursor_stmt:=
2236: ||' CREATION_DATE,'
2237: ||' CREATED_BY)'
2238: ||'VALUES'
2239: ||'( -1,'
2240: ||' MSC_RESOURCE_INSTANCE_REQS_S.NEXTVAL,'
2241: ||' :SR_INSTANCE_ID,'
2242: ||' :ORGANIZATION_ID,'
2243: ||' :DEPARTMENT_ID,'
2244: ||' :SUPPLY_ID,'
2288: ||' CREATION_DATE,'
2289: ||' CREATED_BY)'
2290: ||' SELECT '
2291: ||' -1,'
2292: ||' MSC_RESOURCE_INSTANCE_REQS_S.NEXTVAL,'
2293: ||' msrir.SR_INSTANCE_ID,'
2294: ||' msrir.ORGANIZATION_ID,'
2295: ||' msrir.DEPARTMENT_ID,'
2296: ||' NVL(ms.TRANSACTION_ID,-1) SUPPLY_ID,'
2335:
2336: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2337: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2338: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RES_INST_REQ');
2339: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_RESOURCE_INSTANCE_REQS');
2340: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2341:
2342: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2343: RAISE;
2345: ELSE
2346: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2347: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2348: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RES_INST_REQ');
2349: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_RESOURCE_INSTANCE_REQS');
2350: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2351:
2352: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2353:
2365:
2366: IF MSC_CL_COLLECTION.v_is_incremental_refresh THEN
2367:
2368: FOR c_rec IN res_inst_req_d LOOP
2369: DELETE MSC_RESOURCE_INSTANCE_REQS
2370: WHERE PLAN_ID = -1
2371: AND SR_INSTANCE_ID = c_rec.SR_INSTANCE_ID
2372: AND WIP_ENTITY_ID = c_rec.WIP_ENTITY_ID
2373: AND OPERATION_SEQ_NUM = NVL( c_rec.OPERATION_SEQ_NUM, OPERATION_SEQ_NUM)
2412:
2413: IF MSC_CL_COLLECTION.v_is_incremental_refresh THEN
2414: /* we can get rid of thsi update and just insert as we are puting
2415: record in ad table when instance is updated */
2416: UPDATE MSC_RESOURCE_INSTANCE_REQS mrir
2417: SET
2418: START_DATE = lv_START_DATE,
2419: RESOURCE_INSTANCE_HOURS= lv_OPERATION_HOURS_REQUIRED ,
2420: END_DATE = lv_END_DATE,
2477:
2478: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2479: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2480: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RES_INST_REQ');
2481: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_RESOURCE_INSTANCE_REQS');
2482: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2483:
2484: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2485: RAISE;
2490:
2491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2492: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
2493: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RES_INST_REQ');
2494: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_RESOURCE_INSTANCE_REQS');
2495: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
2496:
2497: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
2498:
2536:
2537: lv_tbl:= 'RESOURCE_INSTANCE_REQS_'||MSC_CL_COLLECTION.v_instance_code;
2538: lv_sql_stmt:=
2539: 'INSERT INTO '||lv_tbl
2540: ||' SELECT * from MSC_RESOURCE_INSTANCE_REQS'
2541: ||' WHERE sr_instance_id = '||MSC_CL_COLLECTION.v_instance_id
2542: ||' AND plan_id = -1 '
2543: ||' AND organization_id not '||MSC_UTIL.v_in_org_str;
2544:
2558:
2559: IF MSC_CL_COLLECTION.v_exchange_mode=MSC_UTIL.SYS_YES THEN
2560: MSC_CL_COLLECTION.alter_temp_table (lv_errbuf,
2561: lv_retcode,
2562: 'MSC_RESOURCE_INSTANCE_REQS',
2563: MSC_CL_COLLECTION.v_instance_code,
2564: MSC_UTIL.G_WARNING
2565: );
2566: