eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.MSC_PURGE_LID dependencies on MSC_UTIL

Line 155: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

151: lv_task_start_time:= SYSDATE;
152:
153: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
154: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'DELETE_MSC_TABLE:'||p_table_name);
155: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
156:
157: IF p_sub_str IS NULL
158: AND is_msctbl_partitioned( p_table_name) THEN
159:

Line 176: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Partition Name : '||lv_partition_name);

172: lv_return_status,
173: lv_msg_data);
174:
175:
176: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Partition Name : '||lv_partition_name);
177:
178: v_sql_stmt := 01;
179:
180: lv_sql_stmt:= 'ALTER TABLE '||p_table_name

Line 184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

180: lv_sql_stmt:= 'ALTER TABLE '||p_table_name
181: ||' TRUNCATE PARTITION '||lv_partition_name;
182:
183:
184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
185:
186:
187: AD_DDL.DO_DDL( APPLSYS_SCHEMA => v_applsys_schema,
188: APPLICATION_SHORT_NAME => 'MSC',

Line 206: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

202: ||' FROM '|| p_table_name
203: ||' WHERE SR_INSTANCE_ID= :p_instance_id '
204: || p_sub_str;
205:
206: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
207: EXECUTE IMMEDIATE lv_sql_stmt
208: INTO lv_cnt
209: USING p_instance_id;
210:

Line 225: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

221: lv_sql_stmt:= 'DELETE '||p_table_name
222: ||' WHERE SR_INSTANCE_ID= :p_instance_id '
223: || p_sub_str;
224:
225: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
226: EXECUTE IMMEDIATE lv_sql_stmt
227: USING p_instance_id;
228:
229:

Line 241: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

237: lv_sql_stmt:= 'DELETE '||p_table_name
238: ||' WHERE SR_INSTANCE_ID= :p_instance_id '
239: || p_sub_str
240: ||' AND ROWNUM < :lv_pbs';
241: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
242:
243: LOOP
244:
245: EXECUTE IMMEDIATE lv_sql_stmt

Line 266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

262: ||' AND PLAN_ID= -1 '
263: || p_sub_str;
264:
265:
266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
267:
268:
269: EXECUTE IMMEDIATE lv_sql_stmt
270: INTO lv_cnt

Line 283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

279: ||' WHERE SR_INSTANCE_ID= :lv_instance_id'
280: ||' AND PLAN_ID= -1 '
281: || p_sub_str;
282:
283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
284:
285:
286: EXECUTE IMMEDIATE lv_sql_stmt
287: USING p_instance_id;

Line 299: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

295: ||' AND PLAN_ID= -1 '
296: || p_sub_str
297: ||' AND ROWNUM < :lv_pbs';
298:
299: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
300:
301:
302: LOOP
303:

Line 320: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

316:
317: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
318: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
319: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
320: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
321:
322: EXCEPTION
323: WHEN OTHERS THEN
324: lv_errtext := substr('DELETE_MSC_TABLE'||'('

Line 327: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);

323: WHEN OTHERS THEN
324: lv_errtext := substr('DELETE_MSC_TABLE'||'('
325: ||v_sql_stmt||')'|| SQLERRM, 1, 240);
326:
327: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);
328:
329: END DELETE_MSC_TABLE;
330:
331:

Line 361: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,' '||FND_MESSAGE.GET);

357: lv_task_start_time:= SYSDATE;
358:
359: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
360: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'DELETE_LID_TABLE:'||p_lid_table);
361: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,' '||FND_MESSAGE.GET);
362:
363: lv_where_str := p_where_str;
364: lv_pbs:= TO_NUMBER( FND_PROFILE.VALUE('MRP_PURGE_BATCH_SIZE'));
365:

Line 373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

369: ||' WHERE lid.instance_id = :p_instance_id'
370: ||' AND lid.entity_name = :p_entity_name'
371: || lv_where_str ;
372:
373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
374:
375:
376: EXECUTE IMMEDIATE lv_sql_stmt
377: INTO lv_cnt

Line 394: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

390:
391: EXECUTE IMMEDIATE lv_sql_stmt
392: USING p_instance_id,p_entity_name;
393:
394: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
395:
396:
397: lv_total := lv_total+SQL%ROWCOUNT ;
398:

Line 407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);

403: ||' AND lid.entity_name = :p_entity_name'
404: || lv_where_str
405: ||' AND ROWNUM < :lv_pbs';
406:
407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,lv_sql_stmt);
408:
409: lv_total := 0;
410:
411: LOOP

Line 425: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Table: '||p_lid_table||' Entity :'||p_entity_name);

421: END IF ; -- batch size
422:
423:
424:
425: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Table: '||p_lid_table||' Entity :'||p_entity_name);
426: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
427:
428:
429: COMMIT;

Line 426: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

422:
423:
424:
425: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Table: '||p_lid_table||' Entity :'||p_entity_name);
426: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
427:
428:
429: COMMIT;
430:

Line 435: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

431:
432: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
433: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
434: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
435: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
436:
437:
438: EXCEPTION
439:

Line 444: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);

440: WHEN OTHERS THEN
441: lv_errtext := substr('DELETE_LID_TABLE'||'('
442: ||v_sql_stmt||')'|| SQLERRM, 1, 240);
443:
444: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);
445:
446: END DELETE_LID_TABLE ;
447:
448:

Line 1043: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name DISPOSITION_ID_FCT' );

1039: lv_total := 0;
1040: v_sql_stmt := 01;
1041:
1042:
1043: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name DISPOSITION_ID_FCT' );
1044:
1045:
1046: OPEN C1(v_instance_id);
1047:

Line 1065: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1061: CLOSE C1;
1062:
1063: COMMIT;
1064:
1065: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1066:
1067:
1068: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1069: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1070: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1066:
1067:
1068: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1069: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1070: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1071:
1072: -- Delete from MSC_LOCAL_ID_DEMAND for entity_name DISPOSITION_ID_FCT ends here----
1073:
1074:

Line 1081: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name DISPOSITION_ID_MDS');

1077: lv_task_start_time:= SYSDATE;
1078: lv_total := 0;
1079: v_sql_stmt := 02;
1080:
1081: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name DISPOSITION_ID_MDS');
1082:
1083:
1084: OPEN C2(v_instance_id);
1085:

Line 1104: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1100:
1101: COMMIT;
1102:
1103:
1104: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1105:
1106:
1107: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1108: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1105:
1106:
1107: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1108: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1110:
1111: -- Delete from MSC_LOCAL_ID_DEMAND for entity_name DISPOSITION_ID_MDS ends here----
1112:
1113:

Line 1120: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name SALES_ORDER_ID');

1116: lv_task_start_time:= SYSDATE;
1117: lv_total := 0;
1118: v_sql_stmt := 03;
1119:
1120: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name SALES_ORDER_ID');
1121:
1122:
1123: OPEN C3(v_instance_id);
1124:

Line 1143: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1139:
1140: COMMIT;
1141:
1142:
1143: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1144:
1145: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1146: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

Line 1147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1143: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1144:
1145: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1146: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1147: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1148:
1149: -- Deletion from MSC_LOCAL_ID_DEMAND for entity_name SALES_ORDER_ID ends here----
1150:
1151:

Line 1158: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name DEMAND_ID');

1154: lv_task_start_time:= SYSDATE;
1155: lv_total := 0;
1156: v_sql_stmt := 04;
1157:
1158: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_DEMAND for entity_name DEMAND_ID');
1159:
1160:
1161: OPEN C4(v_instance_id);
1162:

Line 1180: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1176: CLOSE C4;
1177:
1178: COMMIT;
1179:
1180: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1181:
1182: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1183: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

Line 1184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1180: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1181:
1182: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1183: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1185:
1186: -- Deletion from MSC_LOCAL_ID_DEMAND for entity_name DEMAND_ID ends here ----
1187:
1188:

Line 1205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name WIP_ENTITY_ID');

1201: lv_task_start_time:= SYSDATE;
1202: lv_total := 0;
1203: v_sql_stmt := 05;
1204:
1205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name WIP_ENTITY_ID');
1206:
1207: OPEN C5(v_instance_id);
1208:
1209: FETCH C5 BULK COLLECT INTO lb_rowid ;

Line 1225: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1221: CLOSE C5;
1222:
1223: COMMIT;
1224:
1225: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1226:
1227:
1228: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1229: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1230: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,' '||FND_MESSAGE.GET);

1226:
1227:
1228: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1229: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1230: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,' '||FND_MESSAGE.GET);
1231:
1232: -- Deletion from MSC_LOCAL_ID_SUPPLY for entity_name WIP_ENTITY_ID ends here ----
1233:
1234:

Line 1241: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name SR_MTL_SUPPLY_ID');

1237: lv_task_start_time:= SYSDATE;
1238: lv_total := 0;
1239: v_sql_stmt := 06;
1240:
1241: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name SR_MTL_SUPPLY_ID');
1242:
1243:
1244: OPEN C6(v_instance_id);
1245:

Line 1263: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1259: CLOSE C6;
1260:
1261: COMMIT;
1262:
1263: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1264:
1265:
1266: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1267: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1268: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1264:
1265:
1266: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1267: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1268: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1269:
1270: -- Deletion from MSC_LOCAL_ID_SUPPLY for entity_name SR_MTL_SUPPLY_ID ends here ----
1271:
1272:

Line 1279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name PO_LINE_ID');

1275: lv_task_start_time:= SYSDATE;
1276: lv_total := 0;
1277: v_sql_stmt := 07;
1278:
1279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name PO_LINE_ID');
1280:
1281: OPEN C7(v_instance_id);
1282:
1283: FETCH C7 BULK COLLECT INTO lb_rowid ;

Line 1300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1296: CLOSE C7;
1297:
1298: COMMIT;
1299:
1300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1301:
1302:
1303: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1304: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1305: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1301:
1302:
1303: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1304: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1305: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1306:
1307: -- Deletion from MSC_LOCAL_ID_SUPPLY for entity_name PO_LINE_ID ends here ----
1308:
1309: -- Delete from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID starts here --

Line 1315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID');

1311: lv_task_start_time:= SYSDATE;
1312: lv_total := 0;
1313: v_sql_stmt := 08;
1314:
1315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID');
1316:
1317:
1318: OPEN C8(v_instance_id);
1319:

Line 1337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1333: CLOSE C8;
1334:
1335: COMMIT;
1336:
1337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1338:
1339:
1340: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1341: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1342: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1338:
1339:
1340: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1341: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1342: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1343:
1344: -- Deletion from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID ends here ----
1345:
1346:

Line 1353: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID_MPS');

1349: lv_task_start_time:= SYSDATE;
1350: lv_total := 0;
1351: v_sql_stmt := 09;
1352:
1353: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID_MPS');
1354:
1355:
1356: OPEN C9(v_instance_id);
1357:

Line 1375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);

1371: CLOSE C9;
1372:
1373: COMMIT;
1374:
1375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'No of Rows deleted : '||lv_total);
1376:
1377:
1378: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1379: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1380: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1376:
1377:
1378: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1379: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1380: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1381:
1382: -- Deletion from MSC_LOCAL_ID_SUPPLY for entity_name DISPOSITION_ID_MPS ends here ----
1383:
1384:

Line 1391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name SCHEDULE_GROUP_ID');

1387: lv_task_start_time:= SYSDATE;
1388: lv_total := 0;
1389: v_sql_stmt := 10;
1390:
1391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,'Delete from MSC_LOCAL_ID_SUPPLY for entity_name SCHEDULE_GROUP_ID');
1392:
1393:
1394: OPEN C10(v_instance_id);
1395:

Line 1413: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,' No of Rows deleted : '||lv_total);

1409: CLOSE C10;
1410:
1411: COMMIT;
1412:
1413: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_DEBUG_1,' No of Rows deleted : '||lv_total);
1414:
1415:
1416: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1417: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));

Line 1418: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);

1414:
1415:
1416: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
1417: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
1418: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' '||FND_MESSAGE.GET);
1419:
1420: -- Deletion from MSC_LOCAL_ID_SUPPLY for entity_name SCHEDULE_GROUP_ID ends here ----
1421: END IF ; -- p_suply_flag
1422: END IF ; -- Complete refresh

Line 1430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);

1426:
1427: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_PURGE_SUCCEED');
1428: ERRBUF:= FND_MESSAGE.GET;
1429: RETCODE := G_SUCCESS;
1430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
1431: RETCODE := G_SUCCESS;
1432:
1433:
1434: EXCEPTION

Line 1439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);

1435:
1436: WHEN ex_logging_err THEN
1437: ERRBUF := lv_errtext;
1438: RETCODE := G_ERROR;
1439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);
1440:
1441: WHEN OTHERS THEN
1442: ERRBUF := SQLERRM;
1443: RETCODE := SQLCODE;

Line 1445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);

1441: WHEN OTHERS THEN
1442: ERRBUF := SQLERRM;
1443: RETCODE := SQLCODE;
1444: lv_errtext := substr(v_sql_stmt||SQLERRM,1,240) ;
1445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_WARNING,lv_errtext);
1446: END PURGE_LID_TABLES ;
1447:
1448: PROCEDURE PURGE_ODS_TABLES_DEL( p_instance_id IN NUMBER) IS
1449:

Line 1502: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-02');

1498: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_SHIFT_TIMES', p_instance_id, NULL);
1499: COMMIT;
1500: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_SHIFT_EXCEPTIONS', p_instance_id, NULL);
1501: COMMIT;
1502: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'debug-02');
1503: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RESOURCE_AVAIL', p_instance_id, NULL);
1504: COMMIT;
1505: MSC_CL_COLLECTION.DELETE_MSC_TABLE( 'MSC_NET_RES_INST_AVAIL', p_instance_id, NULL);
1506: COMMIT;

Line 1733: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'* Prcocedure PURGE_INSTANCE_DATA *');

1729:
1730:
1731:
1732:
1733: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'******* Prcocedure PURGE_INSTANCE_DATA *******');
1734:
1735: -- Get row_limit and schema
1736:
1737: BEGIN

Line 1755: RETCODE := MSC_UTIL.G_ERROR;

1751: IF NOT FND_INSTALLATION.GET_APP_INFO ( lv_schema_short_nm, lv_dummy1, lv_dummy2, lv_schema) THEN
1752:
1753: ERRBUF := lv_schema_short_nm||'--Schema not found';
1754:
1755: RETCODE := MSC_UTIL.G_ERROR;
1756:
1757: RETURN;
1758:
1759: END IF;

Line 1767: RETCODE := MSC_UTIL.G_ERROR;

1763: WHEN NO_DATA_FOUND THEN
1764:
1765: ERRBUF := 'Schema Short name for application_id 724 Not found';
1766:
1767: RETCODE := MSC_UTIL.G_ERROR;
1768:
1769: RETURN;
1770:
1771: END;

Line 1827: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);

1823: ||' AND SUBSTR(b.partition_name,INSTR(partition_name,''__'')+2) IN '||lv_inst_str;
1824:
1825:
1826:
1827: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);
1828:
1829: --EXECUTE IMMEDIATE lv_qry_str1 INTO lv_tab_list,lv_Index_list ;
1830:
1831: BEGIN

Line 1843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ALTER TABLE '||lv_schema||'.'||lv_tab||' DROP PARTITION '||lv_tab_Part);

1839: EXIT WHEN v_index_cur%NOTFOUND;
1840:
1841: BEGIN
1842:
1843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ALTER TABLE '||lv_schema||'.'||lv_tab||' DROP PARTITION '||lv_tab_Part);
1844:
1845: EXECUTE IMMEDIATE 'ALTER TABLE '||lv_schema||'.'||lv_tab||' DROP PARTITION '||lv_tab_Part ;
1846:
1847: EXCEPTION

Line 1851: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ERROR IN DEL_INST --'||SQLERRM);

1847: EXCEPTION
1848:
1849: WHEN OTHERS THEN
1850:
1851: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ERROR IN DEL_INST --'||SQLERRM);
1852:
1853: RETCODE := MSC_UTIL.G_WARNING;
1854:
1855: END;

Line 1853: RETCODE := MSC_UTIL.G_WARNING;

1849: WHEN OTHERS THEN
1850:
1851: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ERROR IN DEL_INST --'||SQLERRM);
1852:
1853: RETCODE := MSC_UTIL.G_WARNING;
1854:
1855: END;
1856:
1857: END LOOP;

Line 1867: RETCODE := MSC_UTIL.G_ERROR;

1863: WHEN OTHERS THEN
1864:
1865: ERRBUF := SQLERRM;
1866:
1867: RETCODE := MSC_UTIL.G_ERROR;
1868:
1869: RETURN;
1870:
1871: END;

Line 1881: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'* Delete Rows for Instance *');

1877: SELECT REPLACE(lv_inst_str,'''','') INTO lv_inst_str FROM DUAL;
1878:
1879: --
1880:
1881: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'******* Delete Rows for Instance *******');
1882:
1883: FOR tab IN ( SELECT attribute2 tname,ATTRIBUTE12 Plan_Id
1884:
1885: FROM fnd_lookup_values a, dba_tables b

Line 1921: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);

1917: -- TRC('DELETE FROM '||tab.tname||' WHERE sr_instance_id IN '||lv_inst_str);
1918:
1919: END IF;
1920:
1921: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);
1922:
1923:
1924:
1925: -- Delete Using Rownum Limitation

Line 1939: RETCODE := MSC_UTIL.G_WARNING;

1935: EXCEPTION
1936:
1937: WHEN OTHERS THEN
1938:
1939: RETCODE := MSC_UTIL.G_WARNING;
1940:
1941: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from '||tab.tname|| '--'||SQLERRM);
1942:
1943: lv_err_flag := TRUE;

Line 1941: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from '||tab.tname|| '--'||SQLERRM);

1937: WHEN OTHERS THEN
1938:
1939: RETCODE := MSC_UTIL.G_WARNING;
1940:
1941: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from '||tab.tname|| '--'||SQLERRM);
1942:
1943: lv_err_flag := TRUE;
1944:
1945: END;

Line 1985: RETCODE := MSC_UTIL.G_WARNING;

1981: WHEN NO_DATA_FOUND THEN
1982:
1983: ERRBUF := 'Schema Short name for application_id 704 Not found';
1984:
1985: RETCODE := MSC_UTIL.G_WARNING;
1986:
1987: END;
1988:
1989:

Line 2009: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);

2005: lv_qry_str := 'DELETE FROM '||lv_source_schema ||'.MRP_AP_APPS_INSTANCES_ALL'||GET_M2A_DBLINK(pInstList(indx) )
2006:
2007: ||' WHERE instance_id IN '||lv_inst_str;
2008:
2009: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);
2010:
2011: EXECUTE IMMEDIATE lv_qry_str;
2012:
2013: EXCEPTION

Line 2017: RETCODE := MSC_UTIL.G_WARNING;

2013: EXCEPTION
2014:
2015: WHEN OTHERS THEN
2016:
2017: RETCODE := MSC_UTIL.G_WARNING;
2018:
2019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MRP_AP_APPS_INSTANCES_ALL --'||SQLERRM);
2020:
2021: END;

Line 2019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MRP_AP_APPS_INSTANCES_ALL --'||SQLERRM);

2015: WHEN OTHERS THEN
2016:
2017: RETCODE := MSC_UTIL.G_WARNING;
2018:
2019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MRP_AP_APPS_INSTANCES_ALL --'||SQLERRM);
2020:
2021: END;
2022:
2023: END LOOP;

Line 2029: RETCODE := MSC_UTIL.G_WARNING;

2025: ELSE
2026:
2027: ERRBUF := 'Source Schema not found';
2028:
2029: RETCODE := MSC_UTIL.G_WARNING;
2030:
2031: END IF;
2032:
2033: --

Line 2041: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);

2037: BEGIN -- delete from MSC_INST_PARTITIONS --
2038:
2039: lv_qry_str := 'DELETE FROM '||lv_schema||'.MSC_INST_PARTITIONS WHERE instance_id IN '||lv_inst_str;
2040:
2041: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);
2042:
2043: EXECUTE IMMEDIATE lv_qry_str;
2044:
2045: EXCEPTION

Line 2049: RETCODE := MSC_UTIL.G_WARNING;

2045: EXCEPTION
2046:
2047: WHEN OTHERS THEN
2048:
2049: RETCODE := MSC_UTIL.G_WARNING;
2050:
2051: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MSC_INST_PARTITIONS --'||SQLERRM);
2052:
2053: END;

Line 2051: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MSC_INST_PARTITIONS --'||SQLERRM);

2047: WHEN OTHERS THEN
2048:
2049: RETCODE := MSC_UTIL.G_WARNING;
2050:
2051: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MSC_INST_PARTITIONS --'||SQLERRM);
2052:
2053: END;
2054:
2055: --

Line 2061: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);

2057: BEGIN -- delete from MSC_APPS_INSTANCES --
2058:
2059: lv_qry_str := 'DELETE FROM '||lv_schema||'.MSC_APPS_INSTANCES WHERE instance_id IN '||lv_inst_str;
2060:
2061: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);
2062:
2063: EXECUTE IMMEDIATE lv_qry_str;
2064:
2065: EXCEPTION

Line 2069: RETCODE := MSC_UTIL.G_WARNING;

2065: EXCEPTION
2066:
2067: WHEN OTHERS THEN
2068:
2069: RETCODE := MSC_UTIL.G_WARNING;
2070:
2071: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MSC_APPS_INSTANCES --'||SQLERRM);
2072:
2073: END;

Line 2071: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MSC_APPS_INSTANCES --'||SQLERRM);

2067: WHEN OTHERS THEN
2068:
2069: RETCODE := MSC_UTIL.G_WARNING;
2070:
2071: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'Error while deleting from MSC_APPS_INSTANCES --'||SQLERRM);
2072:
2073: END;
2074:
2075: COMMIT;

Line 2079: IF NVL(RETCODE,-1) <> MSC_UTIL.G_WARNING THEN

2075: COMMIT;
2076:
2077: --
2078:
2079: IF NVL(RETCODE,-1) <> MSC_UTIL.G_WARNING THEN
2080:
2081: RETCODE := MSC_UTIL.G_SUCCESS;
2082:
2083: END IF;

Line 2081: RETCODE := MSC_UTIL.G_SUCCESS;

2077: --
2078:
2079: IF NVL(RETCODE,-1) <> MSC_UTIL.G_WARNING THEN
2080:
2081: RETCODE := MSC_UTIL.G_SUCCESS;
2082:
2083: END IF;
2084:
2085: EXCEPTION

Line 2091: RETCODE := MSC_UTIL.G_ERROR;

2087: WHEN OTHERS THEN
2088:
2089: ERRBUF := SQLERRM;
2090:
2091: RETCODE := MSC_UTIL.G_ERROR;
2092:
2093: END PURGE_INSTANCE_DATA;
2094:
2095: ---------------------------------PURGE_PLAN_DATA----------------------------------------

Line 2161: RETCODE := MSC_UTIL.G_ERROR;

2157: IF NOT FND_INSTALLATION.GET_APP_INFO ( lv_schema_short_nm, lv_dummy1, lv_dummy2, lv_schema) THEN
2158:
2159: ERRBUF := lv_schema_short_nm||'--Schema not found ';
2160:
2161: RETCODE := MSC_UTIL.G_ERROR;
2162:
2163: RETURN;
2164:
2165: END IF;

Line 2173: RETCODE := MSC_UTIL.G_ERROR;

2169: WHEN NO_DATA_FOUND THEN
2170:
2171: ERRBUF := 'Schema Short name for application_id 724 Not found';
2172:
2173: RETCODE := MSC_UTIL.G_ERROR;
2174:
2175: RETURN;
2176:
2177: END;

Line 2205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'* Drop Plan Partition *****');

2201: --End Generate List of Instances passed --
2202:
2203: --
2204:
2205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'******* Drop Plan Partition ***********');
2206:
2207: lv_qry_str := 'SELECT table_name,partition_name '
2208:
2209: ||' FROM fnd_lookup_values a,DBA_TAB_PARTITIONS b'

Line 2245: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ALTER TABLE '||lv_schema||'.'||lv_tab||' DROP PARTITION '||lv_tab_Part);

2241: EXIT WHEN v_plan_part_cur%NOTFOUND;
2242:
2243: BEGIN
2244:
2245: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ALTER TABLE '||lv_schema||'.'||lv_tab||' DROP PARTITION '||lv_tab_Part);
2246:
2247: EXECUTE IMMEDIATE 'ALTER TABLE '||lv_schema||'.'||lv_tab||' DROP PARTITION '||lv_tab_Part;
2248:
2249: EXCEPTION

Line 2253: RETCODE := MSC_UTIL.G_WARNING;

2249: EXCEPTION
2250:
2251: WHEN OTHERS THEN
2252:
2253: RETCODE := MSC_UTIL.G_WARNING;
2254:
2255: END;
2256:
2257: --TRC(lv_tab||'-----------'||lv_tab_Part);

Line 2269: RETCODE := MSC_UTIL.G_ERROR;

2265: WHEN OTHERS THEN
2266:
2267: ERRBUF := SQLERRM;
2268:
2269: RETCODE := MSC_UTIL.G_ERROR;
2270:
2271: RETURN;
2272:
2273: END;

Line 2281: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'* Delete Rows for plan*****');

2277: SELECT REPLACE(lv_plan_str,'''','') INTO lv_plan_str FROM DUAL;
2278:
2279: --
2280:
2281: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'******* Delete Rows for plan***********');
2282:
2283: -- delete rows for Plan
2284:
2285: FOR tab IN (SELECT a.attribute2 tname

Line 2311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);

2307: LOOP
2308:
2309: lv_qry_str := 'DELETE FROM '||lv_schema||'.'||tab.tname||' WHERE plan_id IN '||lv_plan_str||' AND ROWNUM <= '||row_limit;
2310:
2311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,lv_qry_str);
2312:
2313: LOOP
2314:
2315: lv_err_flag := FALSE;

Line 2325: RETCODE := MSC_UTIL.G_WARNING;

2321: EXCEPTION
2322:
2323: WHEN OTHERS THEN
2324:
2325: RETCODE := MSC_UTIL.G_WARNING;
2326:
2327: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ERROR IN DEL_INST --'||SQLERRM);
2328:
2329: lv_err_flag := TRUE;

Line 2327: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ERROR IN DEL_INST --'||SQLERRM);

2323: WHEN OTHERS THEN
2324:
2325: RETCODE := MSC_UTIL.G_WARNING;
2326:
2327: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'ERROR IN DEL_INST --'||SQLERRM);
2328:
2329: lv_err_flag := TRUE;
2330:
2331: END;

Line 2345: IF NVL(RETCODE,-1) <> MSC_UTIL.G_WARNING THEN

2341: COMMIT;
2342:
2343:
2344:
2345: IF NVL(RETCODE,-1) <> MSC_UTIL.G_WARNING THEN
2346:
2347: RETCODE := MSC_UTIL.G_SUCCESS;
2348:
2349: END IF;

Line 2347: RETCODE := MSC_UTIL.G_SUCCESS;

2343:
2344:
2345: IF NVL(RETCODE,-1) <> MSC_UTIL.G_WARNING THEN
2346:
2347: RETCODE := MSC_UTIL.G_SUCCESS;
2348:
2349: END IF;
2350:
2351: EXCEPTION

Line 2357: RETCODE := MSC_UTIL.G_ERROR;

2353: WHEN OTHERS THEN
2354:
2355: ERRBUF := SQLERRM;
2356:
2357: RETCODE := MSC_UTIL.G_ERROR;
2358:
2359: END PURGE_PLAN_DATA;
2360:
2361: --======================================================================

Line 2373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'START PURGE_INSTANCE_PLAN_DATA******');

2369: pPlanId NUMBER)
2370:
2371: IS
2372: BEGIN
2373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'****************START PURGE_INSTANCE_PLAN_DATA**********************');
2374:
2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'******---InstanceId = '||nvl(to_char(pInstanceId),'NULL')
2376:
2377: || ' AND PlanId = '||nvl(to_char(pPlanId),'NULL')

Line 2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'******---InstanceId = '||nvl(to_char(pInstanceId),'NULL')

2371: IS
2372: BEGIN
2373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'****************START PURGE_INSTANCE_PLAN_DATA**********************');
2374:
2375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_DEBUG_1,'******---InstanceId = '||nvl(to_char(pInstanceId),'NULL')
2376:
2377: || ' AND PlanId = '||nvl(to_char(pPlanId),'NULL')
2378:
2379: ||' -------***** ');

Line 2395: IF RETCODE = MSC_UTIL.G_ERROR THEN

2391: BEGIN
2392:
2393: PURGE_INSTANCE_DATA(ERRBUF,RETCODE,lv_Inst_List);
2394:
2395: IF RETCODE = MSC_UTIL.G_ERROR THEN
2396:
2397: RETURN;
2398:
2399: END IF;

Line 2429: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'END**************');

2425: END IF;
2426:
2427:
2428:
2429: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'****************************END******************************************');
2430:
2431:
2432:
2433: EXCEPTION

Line 2439: RETCODE := MSC_UTIL.G_ERROR;

2435: WHEN OTHERS THEN
2436:
2437: ERRBUF := SQLERRM;
2438:
2439: RETCODE := MSC_UTIL.G_ERROR;
2440:
2441: END PURGE_INSTANCE_PLAN_DATA;
2442:
2443: END MSC_PURGE_LID ;