[Home] [Help]
1153:
1154: IF MSC_CL_COLLECTION.v_exchange_mode=MSC_UTIL.SYS_YES THEN
1155: lv_tbl:= 'OPERATION_RESOURCE_SEQS_'||MSC_CL_COLLECTION.v_instance_code;
1156: ELSE
1157: lv_tbl:= 'MSC_OPERATION_RESOURCE_SEQS';
1158: END IF;
1159:
1160: IF (MSC_CL_COLLECTION.v_is_complete_refresh OR MSC_CL_COLLECTION.v_is_partial_refresh) THEN
1161: -- We want to delete all BOM related data and get new stuff.
1158: END IF;
1159:
1160: IF (MSC_CL_COLLECTION.v_is_complete_refresh OR MSC_CL_COLLECTION.v_is_partial_refresh) THEN
1161: -- We want to delete all BOM related data and get new stuff.
1162: --MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1);
1163:
1164: IF MSC_CL_COLLECTION.v_exchange_mode=MSC_UTIL.SYS_NO THEN
1165: IF MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_UTIL.G_ALL_ORGANIZATIONS THEN
1166: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1);
1162: --MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1);
1163:
1164: IF MSC_CL_COLLECTION.v_exchange_mode=MSC_UTIL.SYS_NO THEN
1165: IF MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_UTIL.G_ALL_ORGANIZATIONS THEN
1166: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1);
1167: ELSE
1168: v_sub_str :=' AND ORGANIZATION_ID '||MSC_UTIL.v_in_org_str;
1169: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1,v_sub_str);
1170: END IF;
1165: IF MSC_CL_COLLECTION.v_coll_prec.org_group_flag = MSC_UTIL.G_ALL_ORGANIZATIONS THEN
1166: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1);
1167: ELSE
1168: v_sub_str :=' AND ORGANIZATION_ID '||MSC_UTIL.v_in_org_str;
1169: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_OPERATION_RESOURCE_SEQS', MSC_CL_COLLECTION.v_instance_id, -1,v_sub_str);
1170: END IF;
1171: END IF;
1172:
1173: BEGIN
1226:
1227: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
1228: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1229: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_OP_RESOURCE_SEQ');
1230: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_OPERATION_RESOURCE_SEQS');
1231: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1232:
1233: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1234: RAISE;
1236: ELSE
1237: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
1238: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1239: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_OP_RESOURCE_SEQ');
1240: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_OPERATION_RESOURCE_SEQS');
1241: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1242:
1243: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1244:
1292:
1293: FOR c_rec IN c7_d LOOP
1294:
1295: IF c_rec.OPERATION_SEQUENCE_ID IS NOT NULL THEN
1296: DELETE MSC_OPERATION_RESOURCE_SEQS
1297: WHERE PLAN_ID= -1
1298: AND ROUTING_SEQUENCE_ID= c_rec.ROUTING_SEQUENCE_ID
1299: AND OPERATION_SEQUENCE_ID= c_rec.OPERATION_SEQUENCE_ID
1300: AND RESOURCE_SEQ_NUM= c_rec.RESOURCE_SEQ_NUM
1299: AND OPERATION_SEQUENCE_ID= c_rec.OPERATION_SEQUENCE_ID
1300: AND RESOURCE_SEQ_NUM= c_rec.RESOURCE_SEQ_NUM
1301: AND SR_INSTANCE_ID= c_rec.SR_INSTANCE_ID;
1302: ELSE
1303: DELETE MSC_OPERATION_RESOURCE_SEQS
1304: WHERE PLAN_ID= -1
1305: AND ROUTING_SEQUENCE_ID= c_rec.ROUTING_SEQUENCE_ID
1306: AND SR_INSTANCE_ID= c_rec.SR_INSTANCE_ID;
1307: END IF;
1318: BEGIN
1319:
1320: IF MSC_CL_COLLECTION.v_is_incremental_refresh THEN
1321:
1322: UPDATE MSC_OPERATION_RESOURCE_SEQS
1323: SET
1324: SCHEDULE_FLAG= c_rec.SCHEDULE_FLAG,
1325: RESOURCE_OFFSET_PERCENT= c_rec.RESOURCE_OFFSET_PERCENT,
1326: DEPARTMENT_ID= c_rec.DEPARTMENT_ID,
1376:
1377: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
1378: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1379: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_OP_RESOURCE_SEQ');
1380: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_OPERATION_RESOURCE_SEQS');
1381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1382:
1383: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1384: RAISE;
1388:
1389: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
1390: FND_MESSAGE.SET_NAME('MSC', 'MSC_OL_DATA_ERR_HEADER');
1391: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_OP_RESOURCE_SEQ');
1392: FND_MESSAGE.SET_TOKEN('TABLE', 'MSC_OPERATION_RESOURCE_SEQS');
1393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, FND_MESSAGE.GET);
1394:
1395: FND_MESSAGE.SET_NAME('MSC','MSC_OL_DATA_ERR_DETAIL');
1396: FND_MESSAGE.SET_TOKEN('COLUMN', 'ROUTING_SEQUENCE_ID');
1424: lv_tbl:= 'OPERATION_RESOURCE_SEQS_'||MSC_CL_COLLECTION.v_instance_code;
1425:
1426: lv_sql_stmt:=
1427: 'INSERT INTO '||MSC_UTIL.G_MSC_SCHEMA||'.'||lv_tbl
1428: ||' SELECT * from '||MSC_UTIL.G_MSC_SCHEMA||'.MSC_OPERATION_RESOURCE_SEQS'
1429: ||' WHERE sr_instance_id = '||MSC_CL_COLLECTION.v_instance_id
1430: ||' AND plan_id = -1 '
1431: ||' AND organization_id not '||MSC_UTIL.v_in_org_str;
1432:
1439:
1440: IF MSC_CL_COLLECTION.v_exchange_mode=MSC_UTIL.SYS_YES THEN
1441: MSC_CL_COLLECTION.alter_temp_table (lv_errbuf,
1442: lv_retcode,
1443: 'MSC_OPERATION_RESOURCE_SEQS',
1444: MSC_CL_COLLECTION.v_instance_code,
1445: MSC_UTIL.G_WARNING
1446: );
1447: