APPS.MSC_CL_COPY_STG_TBL dependencies on MSC_UTIL

Line 51: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'The formed SQL to get the source instance: ' ||

47: 'SELECT 1 FROM MRP_AP_APPS_INSTANCES_ALL@' || c_rec.m2a_dblink ||
48: ' WHERE ' ||
49: ' RP_SOURCE_IND = '|| to_char(SOURCE_ID_INDICATOR);
50:
51: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'The formed SQL to get the source instance: ' ||
52: lv_sql_stmt);
53: EXECUTE IMMEDIATE lv_sql_stmt INTO lv_found_source;
54:
55: IF (lv_found_source = 1) THEN

Line 65: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Skipping Source: ' ||

61: END IF;
62:
63: EXCEPTION
64: WHEN OTHERS THEN
65: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Skipping Source: ' ||
66: c_rec.instance_code);
67: END;
68: END LOOP;
69:

Line 71: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,

67: END;
68: END LOOP;
69:
70: IF (lv_found_source = 0) THEN
71: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,
72: 'No Common Source found for APS and RP servers');
73: SOURCE_INSTANCE_ID := -23453;
74: ELSE
75: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance ID : ' ||

Line 75: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance ID : ' ||

71: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,
72: 'No Common Source found for APS and RP servers');
73: SOURCE_INSTANCE_ID := -23453;
74: ELSE
75: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance ID : ' ||
76: to_char (SOURCE_INSTANCE_ID));
77: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance Code : ' ||
78: SOURCE_INSTANCE_CODE);
79:

Line 77: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance Code : ' ||

73: SOURCE_INSTANCE_ID := -23453;
74: ELSE
75: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance ID : ' ||
76: to_char (SOURCE_INSTANCE_ID));
77: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Instance Code : ' ||
78: SOURCE_INSTANCE_CODE);
79:
80: END IF;
81:

Line 192: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);

188: lv_retcode NUMBER;
189:
190: BEGIN
191:
192: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pSRC_Instance Id: '|| pSRC_INSTANCE_ID);
194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTimeout : '|| pTIMEOUT);
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTotalWorkerNum Id: '|| pTotalWorkerNum);
196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'RP_Source_Indicator : '|| RP_Source_Indicator);

Line 193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pSRC_Instance Id: '|| pSRC_INSTANCE_ID);

189:
190: BEGIN
191:
192: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pSRC_Instance Id: '|| pSRC_INSTANCE_ID);
194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTimeout : '|| pTIMEOUT);
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTotalWorkerNum Id: '|| pTotalWorkerNum);
196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'RP_Source_Indicator : '|| RP_Source_Indicator);
197: -- Initialize Global Variables

Line 194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTimeout : '|| pTIMEOUT);

190: BEGIN
191:
192: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pSRC_Instance Id: '|| pSRC_INSTANCE_ID);
194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTimeout : '|| pTIMEOUT);
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTotalWorkerNum Id: '|| pTotalWorkerNum);
196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'RP_Source_Indicator : '|| RP_Source_Indicator);
197: -- Initialize Global Variables
198: v_instance_id := pSRC_INSTANCE_ID;

Line 195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTotalWorkerNum Id: '|| pTotalWorkerNum);

191:
192: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pSRC_Instance Id: '|| pSRC_INSTANCE_ID);
194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTimeout : '|| pTIMEOUT);
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTotalWorkerNum Id: '|| pTotalWorkerNum);
196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'RP_Source_Indicator : '|| RP_Source_Indicator);
197: -- Initialize Global Variables
198: v_instance_id := pSRC_INSTANCE_ID;
199: -- v_dblink := '@ma0yd101';

Line 196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'RP_Source_Indicator : '|| RP_Source_Indicator);

192: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pSRC_Instance Id: '|| pSRC_INSTANCE_ID);
194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTimeout : '|| pTIMEOUT);
195: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pTotalWorkerNum Id: '|| pTotalWorkerNum);
196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'RP_Source_Indicator : '|| RP_Source_Indicator);
197: -- Initialize Global Variables
198: v_instance_id := pSRC_INSTANCE_ID;
199: -- v_dblink := '@ma0yd101';
200: BEGIN

Line 210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 1 : '|| v_dblink ||':'|| v_icode);

206: FROM MSC_APPS_INSTANCES
207: WHERE
208: INSTANCE_ID=v_instance_id;
209:
210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 1 : '|| v_dblink ||':'|| v_icode);
211: EXCEPTION
212: WHEN NO_DATA_FOUND THEN
213: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
214: 'Source Instance Not defined for instance_id:' ||

Line 213: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,

209:
210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 1 : '|| v_dblink ||':'|| v_icode);
211: EXCEPTION
212: WHEN NO_DATA_FOUND THEN
213: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
214: 'Source Instance Not defined for instance_id:' ||
215: to_char(v_instance_id));
216: RETCODE := MSC_UTIL.G_ERROR;
217: ERRBUF := 'Source Instance Not defined for instance_id';

Line 216: RETCODE := MSC_UTIL.G_ERROR;

212: WHEN NO_DATA_FOUND THEN
213: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
214: 'Source Instance Not defined for instance_id:' ||
215: to_char(v_instance_id));
216: RETCODE := MSC_UTIL.G_ERROR;
217: ERRBUF := 'Source Instance Not defined for instance_id';
218: RETURN;
219: WHEN OTHERS THEN
220: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

Line 220: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

216: RETCODE := MSC_UTIL.G_ERROR;
217: ERRBUF := 'Source Instance Not defined for instance_id';
218: RETURN;
219: WHEN OTHERS THEN
220: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
221: RETCODE := MSC_UTIL.G_ERROR;
222: ERRBUF := SQLERRM;
223: RETURN;
224: END;

Line 221: RETCODE := MSC_UTIL.G_ERROR;

217: ERRBUF := 'Source Instance Not defined for instance_id';
218: RETURN;
219: WHEN OTHERS THEN
220: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
221: RETCODE := MSC_UTIL.G_ERROR;
222: ERRBUF := SQLERRM;
223: RETURN;
224: END;
225:

Line 239: ' ST_STATUS IN (' || to_char(MSC_UTIL.G_ST_READY)||','||to_char(MSC_UTIL.G_ST_COLLECTING)||')'||

235: 'SO_LRTYPE,'||
236: 'LRTYPE '||
237: 'FROM MSC_APPS_INSTANCES'||v_dblink ||
238: ' WHERE ' ||
239: ' ST_STATUS IN (' || to_char(MSC_UTIL.G_ST_READY)||','||to_char(MSC_UTIL.G_ST_COLLECTING)||')'||
240: ' AND instance_id = ' || to_char(pINSTANCE_ID);
241:
242: EXECUTE IMMEDIATE v_sql_stmt INTO v_ascp_inst,
243: lv_coll_start_time,

Line 250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 2 : '|| v_dblink);

246: lv_lrtype;
247:
248: EXCEPTION
249: WHEN NO_DATA_FOUND THEN
250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 2 : '|| v_dblink);
251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Formed SQL : '|| v_sql_stmt);
252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
253: 'Data Not Collected Into Staging table on APS server Select stmt:' ||
254: to_char(v_instance_id));

Line 251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Formed SQL : '|| v_sql_stmt);

247:
248: EXCEPTION
249: WHEN NO_DATA_FOUND THEN
250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 2 : '|| v_dblink);
251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Formed SQL : '|| v_sql_stmt);
252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
253: 'Data Not Collected Into Staging table on APS server Select stmt:' ||
254: to_char(v_instance_id));
255: RETCODE := MSC_UTIL.G_ERROR;

Line 252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,

248: EXCEPTION
249: WHEN NO_DATA_FOUND THEN
250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'DB Link 2 : '|| v_dblink);
251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Formed SQL : '|| v_sql_stmt);
252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
253: 'Data Not Collected Into Staging table on APS server Select stmt:' ||
254: to_char(v_instance_id));
255: RETCODE := MSC_UTIL.G_ERROR;
256: ERRBUF := 'Data Not Collected Into Staging table on APS server';

Line 255: RETCODE := MSC_UTIL.G_ERROR;

251: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Formed SQL : '|| v_sql_stmt);
252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
253: 'Data Not Collected Into Staging table on APS server Select stmt:' ||
254: to_char(v_instance_id));
255: RETCODE := MSC_UTIL.G_ERROR;
256: ERRBUF := 'Data Not Collected Into Staging table on APS server';
257: RETURN;
258: END;
259: -- Append a ':' to the instance code.

Line 267: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'In Launch Monitor 121' );

263: RP_Source_Indicator,
264: v_icode,
265: v_inst_rp_src_id) ;
266: IF (v_inst_rp_src_id = -23453) THEN
267: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'In Launch Monitor 121' );
268: RETCODE := MSC_UTIL.G_ERROR;
269: ERRBUF := 'No Common Source found for APS and RP servers';
270: RETURN;
271:

Line 268: RETCODE := MSC_UTIL.G_ERROR;

264: v_icode,
265: v_inst_rp_src_id) ;
266: IF (v_inst_rp_src_id = -23453) THEN
267: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, 'In Launch Monitor 121' );
268: RETCODE := MSC_UTIL.G_ERROR;
269: ERRBUF := 'No Common Source found for APS and RP servers';
270: RETURN;
271:
272: END IF;

Line 281: ST_STATUS = MSC_UTIL.G_ST_READY

277: COLLECTIONS_START_TIME = lv_coll_start_time,
278: SO_TBL_STATUS = lv_so_tbl_status,
279: LRTYPE =lv_lrtype,
280: SO_LRTYPE = lv_so_lrtype,
281: ST_STATUS = MSC_UTIL.G_ST_READY
282: WHERE
283: INSTANCE_ID=v_inst_rp_src_id;
284:
285: EXCEPTION

Line 287: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,

283: INSTANCE_ID=v_inst_rp_src_id;
284:
285: EXCEPTION
286: WHEN NO_DATA_FOUND THEN
287: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
288: 'Data Not Collected Into Staging table on APS server:' ||
289: to_char(v_instance_id));
290: RETCODE := MSC_UTIL.G_ERROR;
291: ERRBUF := 'Data Not Collected Into Staging table on APS server';

Line 290: RETCODE := MSC_UTIL.G_ERROR;

286: WHEN NO_DATA_FOUND THEN
287: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,
288: 'Data Not Collected Into Staging table on APS server:' ||
289: to_char(v_instance_id));
290: RETCODE := MSC_UTIL.G_ERROR;
291: ERRBUF := 'Data Not Collected Into Staging table on APS server';
292: RETURN;
293:
294: WHEN OTHERS THEN

Line 295: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

291: ERRBUF := 'Data Not Collected Into Staging table on APS server';
292: RETURN;
293:
294: WHEN OTHERS THEN
295: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
296: RETCODE := MSC_UTIL.G_ERROR;
297: ERRBUF := SQLERRM;
298: RETURN;
299:

Line 296: RETCODE := MSC_UTIL.G_ERROR;

292: RETURN;
293:
294: WHEN OTHERS THEN
295: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
296: RETCODE := MSC_UTIL.G_ERROR;
297: ERRBUF := SQLERRM;
298: RETURN;
299:
300: END;

Line 304: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_lrtype);

300: END;
301: v_src_instance_id := pINSTANCE_ID;
302: -- Now call the procedures to copy the staging table data.
303: v_retcode := 0;
304: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_lrtype);
305: /*
306: --harshit - This code has been commented out since we achieve the same in the previous update of msc_apps_instances
307: lv_sql_stmt := 'update msc_apps_instances set lrtype = (select lrtype from msc_apps_instances'||
308: v_dblink||'where instance_id = '||v_src_instance_id||') where instance_id = '||v_inst_rp_src_id;

Line 311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_sql_stmt);*/

307: lv_sql_stmt := 'update msc_apps_instances set lrtype = (select lrtype from msc_apps_instances'||
308: v_dblink||'where instance_id = '||v_src_instance_id||') where instance_id = '||v_inst_rp_src_id;
309:
310: EXECUTE IMMEDIATE lv_sql_stmt;
311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_sql_stmt);*/
312:
313: COPY_CALENDAR_ASSIGNMENTS;
314: COPY_JOB_OPERATION_NETWORKS;
315: COPY_JOB_OPERATIONS;

Line 430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'The instance_id passed to planning ODS load is '|| v_inst_rp_src_id);

426: ELSE
427: RETCODE := 0;
428: END IF;
429:
430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'The instance_id passed to planning ODS load is '|| v_inst_rp_src_id);
431: lv_request_id := FND_REQUEST.SUBMIT_REQUEST(
432: 'MSC',
433: 'MSCPDC',
434: NULL, -- description

Line 441: MSC_UTIL.SYS_NO, --- Recalc NRA

437: -- pINSTANCE_ID,
438: v_inst_rp_src_id,
439: pTIMEOUT,
440: 4,
441: MSC_UTIL.SYS_NO, --- Recalc NRA
442: MSC_UTIL.SYS_NO, -- Recalc sourcing history
443: MSC_UTIL.SYS_NO,
444: MSC_UTIL.SYS_NO -- APCC Repository
445: );

Line 442: MSC_UTIL.SYS_NO, -- Recalc sourcing history

438: v_inst_rp_src_id,
439: pTIMEOUT,
440: 4,
441: MSC_UTIL.SYS_NO, --- Recalc NRA
442: MSC_UTIL.SYS_NO, -- Recalc sourcing history
443: MSC_UTIL.SYS_NO,
444: MSC_UTIL.SYS_NO -- APCC Repository
445: );
446:

Line 443: MSC_UTIL.SYS_NO,

439: pTIMEOUT,
440: 4,
441: MSC_UTIL.SYS_NO, --- Recalc NRA
442: MSC_UTIL.SYS_NO, -- Recalc sourcing history
443: MSC_UTIL.SYS_NO,
444: MSC_UTIL.SYS_NO -- APCC Repository
445: );
446:
447:

Line 444: MSC_UTIL.SYS_NO -- APCC Repository

440: 4,
441: MSC_UTIL.SYS_NO, --- Recalc NRA
442: MSC_UTIL.SYS_NO, -- Recalc sourcing history
443: MSC_UTIL.SYS_NO,
444: MSC_UTIL.SYS_NO -- APCC Repository
445: );
446:
447:
448: --Do an fnd_request (submit_request) to launch ods load instead of this

Line 454: MSC_UTIL.SYS_NO, --- Recalc NRA

450: ERRBUF,
451: RETCODE,
452: pINSTANCE_ID,
453: pTIMEOUT,
454: MSC_UTIL.SYS_NO, --- Recalc NRA
455: MSC_UTIL.SYS_NO, -- Recalc sourcing history
456: MSC_UTIL.SYS_YES, --exchange_mode
457: MSC_UTIL.SYS_YES);
458: RETCODE := MSC_UTIL.G_SUCCESS;

Line 455: MSC_UTIL.SYS_NO, -- Recalc sourcing history

451: RETCODE,
452: pINSTANCE_ID,
453: pTIMEOUT,
454: MSC_UTIL.SYS_NO, --- Recalc NRA
455: MSC_UTIL.SYS_NO, -- Recalc sourcing history
456: MSC_UTIL.SYS_YES, --exchange_mode
457: MSC_UTIL.SYS_YES);
458: RETCODE := MSC_UTIL.G_SUCCESS;
459: */

Line 456: MSC_UTIL.SYS_YES, --exchange_mode

452: pINSTANCE_ID,
453: pTIMEOUT,
454: MSC_UTIL.SYS_NO, --- Recalc NRA
455: MSC_UTIL.SYS_NO, -- Recalc sourcing history
456: MSC_UTIL.SYS_YES, --exchange_mode
457: MSC_UTIL.SYS_YES);
458: RETCODE := MSC_UTIL.G_SUCCESS;
459: */
460:

Line 457: MSC_UTIL.SYS_YES);

453: pTIMEOUT,
454: MSC_UTIL.SYS_NO, --- Recalc NRA
455: MSC_UTIL.SYS_NO, -- Recalc sourcing history
456: MSC_UTIL.SYS_YES, --exchange_mode
457: MSC_UTIL.SYS_YES);
458: RETCODE := MSC_UTIL.G_SUCCESS;
459: */
460:
461: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of v_retcode = '|| v_retcode);

Line 458: RETCODE := MSC_UTIL.G_SUCCESS;

454: MSC_UTIL.SYS_NO, --- Recalc NRA
455: MSC_UTIL.SYS_NO, -- Recalc sourcing history
456: MSC_UTIL.SYS_YES, --exchange_mode
457: MSC_UTIL.SYS_YES);
458: RETCODE := MSC_UTIL.G_SUCCESS;
459: */
460:
461: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of v_retcode = '|| v_retcode);
462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of RETCODE = '|| RETCODE);

Line 461: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of v_retcode = '|| v_retcode);

457: MSC_UTIL.SYS_YES);
458: RETCODE := MSC_UTIL.G_SUCCESS;
459: */
460:
461: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of v_retcode = '|| v_retcode);
462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of RETCODE = '|| RETCODE);
463: lv_sql_stmt := 'update msc_apps_instances'||v_dblink||
464: ' set staging_copy_complete = 1 '||
465: ' where instance_id = '||pINSTANCE_ID;

Line 462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of RETCODE = '|| RETCODE);

458: RETCODE := MSC_UTIL.G_SUCCESS;
459: */
460:
461: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of v_retcode = '|| v_retcode);
462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of RETCODE = '|| RETCODE);
463: lv_sql_stmt := 'update msc_apps_instances'||v_dblink||
464: ' set staging_copy_complete = 1 '||
465: ' where instance_id = '||pINSTANCE_ID;
466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_sql_stmt);

Line 466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_sql_stmt);

462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after Copy,Value of RETCODE = '|| RETCODE);
463: lv_sql_stmt := 'update msc_apps_instances'||v_dblink||
464: ' set staging_copy_complete = 1 '||
465: ' where instance_id = '||pINSTANCE_ID;
466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Update statement is '||lv_sql_stmt);
467:
468: EXECUTE IMMEDIATE lv_sql_stmt;
469: --USING v_instance_id;
470:

Line 471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update,Value of v_dblink = '|| v_dblink);

467:
468: EXECUTE IMMEDIATE lv_sql_stmt;
469: --USING v_instance_id;
470:
471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update,Value of v_dblink = '|| v_dblink);
472: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update of msc_apps_instances');
473: EXCEPTION
474: WHEN OTHERS THEN
475: ROLLBACK;

Line 472: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update of msc_apps_instances');

468: EXECUTE IMMEDIATE lv_sql_stmt;
469: --USING v_instance_id;
470:
471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update,Value of v_dblink = '|| v_dblink);
472: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update of msc_apps_instances');
473: EXCEPTION
474: WHEN OTHERS THEN
475: ROLLBACK;
476: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'An Error was encountered during the copy');

Line 476: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'An Error was encountered during the copy');

472: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'Reaches after update of msc_apps_instances');
473: EXCEPTION
474: WHEN OTHERS THEN
475: ROLLBACK;
476: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'An Error was encountered during the copy');
477: retcode := MSC_UTIL.G_ERROR;
478: END LAUNCH_MONITOR;
479:
480:

Line 477: retcode := MSC_UTIL.G_ERROR;

473: EXCEPTION
474: WHEN OTHERS THEN
475: ROLLBACK;
476: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'An Error was encountered during the copy');
477: retcode := MSC_UTIL.G_ERROR;
478: END LAUNCH_MONITOR;
479:
480:
481: PROCEDURE COPY_COLL_PARAMETERS (

Line 491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COLL_PARAMETERS');

487:
488: DELETE FROM MSC_COLL_PARAMETERS
489: WHERE
490: INSTANCE_ID = v_inst_rp_src_id;
491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COLL_PARAMETERS');
492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'db link: '|| v_dblink);
494: v_sql_stmt:=
495: 'INSERT INTO MSC_COLL_PARAMETERS ('

Line 492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);

488: DELETE FROM MSC_COLL_PARAMETERS
489: WHERE
490: INSTANCE_ID = v_inst_rp_src_id;
491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COLL_PARAMETERS');
492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'db link: '|| v_dblink);
494: v_sql_stmt:=
495: 'INSERT INTO MSC_COLL_PARAMETERS ('
496: || 'INSTANCE_ID,'

Line 493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'db link: '|| v_dblink);

489: WHERE
490: INSTANCE_ID = v_inst_rp_src_id;
491: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COLL_PARAMETERS');
492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'pInstance Id: '|| pINSTANCE_ID);
493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'db link: '|| v_dblink);
494: v_sql_stmt:=
495: 'INSERT INTO MSC_COLL_PARAMETERS ('
496: || 'INSTANCE_ID,'
497: || 'DELETE_ODS_DATA,'

Line 624: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

620: ||' WHERE '
621: ||' instance_id = ' || to_char(pINSTANCE_ID);
622:
623: EXECUTE IMMEDIATE v_sql_stmt USING v_inst_rp_src_id;
624: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
625: --EXECUTE IMMEDIATE v_sql_stmt;
626: COMMIT;
627:
628: EXCEPTION

Line 631: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

627:
628: EXCEPTION
629: WHEN OTHERS THEN
630: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
631: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying msc_coll_parameters');
633: v_retcode := 2;
634: RAISE;
635: ELSE

Line 632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying msc_coll_parameters');

628: EXCEPTION
629: WHEN OTHERS THEN
630: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
631: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying msc_coll_parameters');
633: v_retcode := 2;
634: RAISE;
635: ELSE
636: IF v_retcode < 2 THEN

Line 637: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

633: v_retcode := 2;
634: RAISE;
635: ELSE
636: IF v_retcode < 2 THEN
637: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
638: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying msc_coll_parameters');
639: v_retcode := 1;
640: END IF;
641: RETURN;

Line 638: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying msc_coll_parameters');

634: RAISE;
635: ELSE
636: IF v_retcode < 2 THEN
637: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
638: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying msc_coll_parameters');
639: v_retcode := 1;
640: END IF;
641: RETURN;
642: END IF;

Line 649: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'MSC_ST_CALENDAR_ASSIGNMENTS');

645: PROCEDURE COPY_CALENDAR_ASSIGNMENTS IS
646:
647: BEGIN
648:
649: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'MSC_ST_CALENDAR_ASSIGNMENTS');
650: v_sql_stmt:=
651: 'INSERT INTO MSC_ST_CALENDAR_ASSIGNMENTS ('
652: || 'ASSOCIATION_TYPE,'
653: || 'CALENDAR_CODE,'

Line 734: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

730: ,v_ascp_inst,v_icode
731: ,v_ascp_inst,v_icode
732: ;
733:
734: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
735: COMMIT;
736: EXCEPTION
737: WHEN OTHERS THEN
738: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN

Line 739: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

735: COMMIT;
736: EXCEPTION
737: WHEN OTHERS THEN
738: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
739: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
740: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_ASSIGNMENTS');
741: v_retcode := 2;
742: RAISE;
743: ELSE

Line 740: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_ASSIGNMENTS');

736: EXCEPTION
737: WHEN OTHERS THEN
738: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
739: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
740: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_ASSIGNMENTS');
741: v_retcode := 2;
742: RAISE;
743: ELSE
744: IF v_retcode < 2 THEN

Line 745: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

741: v_retcode := 2;
742: RAISE;
743: ELSE
744: IF v_retcode < 2 THEN
745: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
746: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_ASSIGNMENTS');
747: v_retcode := 1;
748: END IF;
749: RETURN;

Line 746: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_ASSIGNMENTS');

742: RAISE;
743: ELSE
744: IF v_retcode < 2 THEN
745: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
746: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_ASSIGNMENTS');
747: v_retcode := 1;
748: END IF;
749: RETURN;
750: END IF;

Line 756: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OPERATION_NETWORKS');

752: END COPY_CALENDAR_ASSIGNMENTS;
753: PROCEDURE COPY_JOB_OPERATION_NETWORKS IS
754:
755: BEGIN
756: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OPERATION_NETWORKS');
757: v_sql_stmt:=
758: 'INSERT INTO MSC_ST_JOB_OPERATION_NETWORKS ('
759: || 'WIP_ENTITY_ID,'
760: || 'SR_INSTANCE_ID,'

Line 869: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

865: ,v_ascp_inst,v_icode
866: ,v_ascp_inst,v_icode
867: ;
868:
869: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
870:
871: COMMIT;
872: EXCEPTION
873: WHEN OTHERS THEN

Line 875: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

871: COMMIT;
872: EXCEPTION
873: WHEN OTHERS THEN
874: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
875: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
876: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OPERATION_NETWORKS');
877: v_retcode := 2;
878: RAISE;
879: ELSE

Line 876: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OPERATION_NETWORKS');

872: EXCEPTION
873: WHEN OTHERS THEN
874: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
875: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
876: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OPERATION_NETWORKS');
877: v_retcode := 2;
878: RAISE;
879: ELSE
880: IF v_retcode < 2 THEN

Line 881: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

877: v_retcode := 2;
878: RAISE;
879: ELSE
880: IF v_retcode < 2 THEN
881: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
882: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OPERATION_NETWORKS');
883: v_retcode := 1;
884: END IF;
885: RETURN;

Line 882: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OPERATION_NETWORKS');

878: RAISE;
879: ELSE
880: IF v_retcode < 2 THEN
881: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
882: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OPERATION_NETWORKS');
883: v_retcode := 1;
884: END IF;
885: RETURN;
886: END IF;

Line 893: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OPERATIONS');

889: PROCEDURE COPY_JOB_OPERATIONS IS
890:
891: BEGIN
892:
893: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OPERATIONS');
894: v_sql_stmt:=
895: 'INSERT INTO MSC_ST_JOB_OPERATIONS ('
896: || 'WIP_ENTITY_ID,'
897: || 'SR_INSTANCE_ID,'

Line 1003: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

999: ,v_ascp_inst,v_icode
1000: ,v_ascp_inst,v_icode
1001: ;
1002:
1003: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1004: COMMIT;
1005:
1006: EXCEPTION
1007: WHEN OTHERS THEN

Line 1009: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1005:
1006: EXCEPTION
1007: WHEN OTHERS THEN
1008: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1009: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OPERATIONS');
1011: v_retcode := 2;
1012: RAISE;
1013: ELSE

Line 1010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OPERATIONS');

1006: EXCEPTION
1007: WHEN OTHERS THEN
1008: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1009: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OPERATIONS');
1011: v_retcode := 2;
1012: RAISE;
1013: ELSE
1014: IF v_retcode < 2 THEN

Line 1015: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1011: v_retcode := 2;
1012: RAISE;
1013: ELSE
1014: IF v_retcode < 2 THEN
1015: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1016: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OPERATIONS');
1017: v_retcode := 1;
1018: END IF;
1019: RETURN;

Line 1016: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OPERATIONS');

1012: RAISE;
1013: ELSE
1014: IF v_retcode < 2 THEN
1015: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1016: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OPERATIONS');
1017: v_retcode := 1;
1018: END IF;
1019: RETURN;
1020: END IF;

Line 1028: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_REQUIREMENT_OPS');

1024: PROCEDURE COPY_JOB_REQUIREMENT_OPS IS
1025:
1026: BEGIN
1027:
1028: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_REQUIREMENT_OPS');
1029: v_sql_stmt:=
1030: 'INSERT INTO MSC_ST_JOB_REQUIREMENT_OPS ('
1031: || 'WIP_ENTITY_ID,'
1032: || 'SR_INSTANCE_ID,'

Line 1154: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1150: ,v_ascp_inst,v_icode
1151: ,v_ascp_inst,v_icode
1152: ;
1153:
1154: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1155: COMMIT;
1156: EXCEPTION
1157: WHEN OTHERS THEN
1158: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN

Line 1159: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1155: COMMIT;
1156: EXCEPTION
1157: WHEN OTHERS THEN
1158: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1159: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_REQUIREMENT_OPS');
1161: v_retcode := 2;
1162: RAISE;
1163: ELSE

Line 1160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_REQUIREMENT_OPS');

1156: EXCEPTION
1157: WHEN OTHERS THEN
1158: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1159: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_REQUIREMENT_OPS');
1161: v_retcode := 2;
1162: RAISE;
1163: ELSE
1164: IF v_retcode < 2 THEN

Line 1165: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1161: v_retcode := 2;
1162: RAISE;
1163: ELSE
1164: IF v_retcode < 2 THEN
1165: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_REQUIREMENT_OPS');
1167: v_retcode := 1;
1168: END IF;
1169: RETURN;

Line 1166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_REQUIREMENT_OPS');

1162: RAISE;
1163: ELSE
1164: IF v_retcode < 2 THEN
1165: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_REQUIREMENT_OPS');
1167: v_retcode := 1;
1168: END IF;
1169: RETURN;
1170: END IF;

Line 1177: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OP_RESOURCES');

1173: PROCEDURE COPY_JOB_OP_RESOURCES IS
1174:
1175: BEGIN
1176:
1177: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OP_RESOURCES');
1178: v_sql_stmt:=
1179: 'INSERT INTO MSC_ST_JOB_OP_RESOURCES ('
1180: || 'WIP_ENTITY_ID,'
1181: || 'SR_INSTANCE_ID,'

Line 1306: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1302: ,v_ascp_inst,v_icode
1303: ,v_ascp_inst,v_icode
1304: ;
1305:
1306: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1307: COMMIT;
1308: EXCEPTION
1309: WHEN OTHERS THEN
1310: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN

Line 1311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1307: COMMIT;
1308: EXCEPTION
1309: WHEN OTHERS THEN
1310: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1312: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OP_RESOURCES');
1313: v_retcode := 2;
1314: RAISE;
1315: ELSE

Line 1312: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OP_RESOURCES');

1308: EXCEPTION
1309: WHEN OTHERS THEN
1310: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1312: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OP_RESOURCES');
1313: v_retcode := 2;
1314: RAISE;
1315: ELSE
1316: IF v_retcode < 2 THEN

Line 1317: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1313: v_retcode := 2;
1314: RAISE;
1315: ELSE
1316: IF v_retcode < 2 THEN
1317: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1318: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OP_RESOURCES');
1319: v_retcode := 1;
1320: END IF;
1321: RETURN;

Line 1318: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OP_RESOURCES');

1314: RAISE;
1315: ELSE
1316: IF v_retcode < 2 THEN
1317: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1318: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OP_RESOURCES');
1319: v_retcode := 1;
1320: END IF;
1321: RETURN;
1322: END IF;

Line 1330: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_APPS_INSTANCES');

1326: PROCEDURE COPY_APPS_INSTANCES IS
1327:
1328: BEGIN
1329:
1330: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_APPS_INSTANCES');
1331: v_sql_stmt:=
1332: 'INSERT INTO MSC_ST_APPS_INSTANCES ('
1333: || 'MSC_ORG_FOR_BOM_EXPLOSION,'
1334: || 'WSM_CREATE_LBJ_COPY_ROUTING,'

Line 1386: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1382: v_ascp_inst,v_icode
1383: ,v_inst_rp_src_id
1384: ;
1385:
1386: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1387: COMMIT;
1388:
1389: EXCEPTION
1390: WHEN OTHERS THEN

Line 1392: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1388:
1389: EXCEPTION
1390: WHEN OTHERS THEN
1391: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1392: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_APPS_INSTANCES');
1394: v_retcode := 2;
1395: RAISE;
1396: ELSE

Line 1393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_APPS_INSTANCES');

1389: EXCEPTION
1390: WHEN OTHERS THEN
1391: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1392: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_APPS_INSTANCES');
1394: v_retcode := 2;
1395: RAISE;
1396: ELSE
1397: IF v_retcode < 2 THEN

Line 1398: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1394: v_retcode := 2;
1395: RAISE;
1396: ELSE
1397: IF v_retcode < 2 THEN
1398: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_APPS_INSTANCES');
1400: v_retcode := 1;
1401: END IF;
1402: RETURN;

Line 1399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_APPS_INSTANCES');

1395: RAISE;
1396: ELSE
1397: IF v_retcode < 2 THEN
1398: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_APPS_INSTANCES');
1400: v_retcode := 1;
1401: END IF;
1402: RETURN;
1403: END IF;

Line 1410: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_REGION_SITES');

1406: PROCEDURE COPY_REGION_SITES IS
1407:
1408: BEGIN
1409:
1410: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_REGION_SITES');
1411: v_sql_stmt:=
1412: 'INSERT INTO MSC_ST_REGION_SITES ('
1413: || 'REGION_ID,'
1414: || 'VENDOR_SITE_ID,'

Line 1494: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1490: v_inst_rp_src_id
1491: ,v_ascp_inst,v_icode
1492: ;
1493:
1494: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1495:
1496: COMMIT;
1497: EXCEPTION
1498: WHEN OTHERS THEN

Line 1500: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1496: COMMIT;
1497: EXCEPTION
1498: WHEN OTHERS THEN
1499: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1500: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1501: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGION_SITES');
1502: v_retcode := 2;
1503: RAISE;
1504: ELSE

Line 1501: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGION_SITES');

1497: EXCEPTION
1498: WHEN OTHERS THEN
1499: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1500: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1501: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGION_SITES');
1502: v_retcode := 2;
1503: RAISE;
1504: ELSE
1505: IF v_retcode < 2 THEN

Line 1506: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1502: v_retcode := 2;
1503: RAISE;
1504: ELSE
1505: IF v_retcode < 2 THEN
1506: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1507: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGION_SITES');
1508: v_retcode := 1;
1509: END IF;
1510: RETURN;

Line 1507: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGION_SITES');

1503: RAISE;
1504: ELSE
1505: IF v_retcode < 2 THEN
1506: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1507: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGION_SITES');
1508: v_retcode := 1;
1509: END IF;
1510: RETURN;
1511: END IF;

Line 1519: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRIPS');

1515: PROCEDURE COPY_TRIPS IS
1516:
1517: BEGIN
1518:
1519: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRIPS');
1520: v_sql_stmt:=
1521: 'INSERT INTO MSC_ST_TRIPS ('
1522: || 'TRIP_ID,'
1523: || 'NAME,'

Line 1557: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1553: v_inst_rp_src_id
1554: ;
1555:
1556:
1557: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1558: COMMIT;
1559:
1560: EXCEPTION
1561: WHEN OTHERS THEN

Line 1563: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1559:
1560: EXCEPTION
1561: WHEN OTHERS THEN
1562: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1563: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1564: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRIPS');
1565: v_retcode := 2;
1566: RAISE;
1567: ELSE

Line 1564: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRIPS');

1560: EXCEPTION
1561: WHEN OTHERS THEN
1562: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1563: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1564: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRIPS');
1565: v_retcode := 2;
1566: RAISE;
1567: ELSE
1568: IF v_retcode < 2 THEN

Line 1569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1565: v_retcode := 2;
1566: RAISE;
1567: ELSE
1568: IF v_retcode < 2 THEN
1569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1570: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRIPS');
1571: v_retcode := 1;
1572: END IF;
1573: RETURN;

Line 1570: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRIPS');

1566: RAISE;
1567: ELSE
1568: IF v_retcode < 2 THEN
1569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1570: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRIPS');
1571: v_retcode := 1;
1572: END IF;
1573: RETURN;
1574: END IF;

Line 1580: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRIP_STOPS');

1576: PROCEDURE COPY_TRIP_STOPS IS
1577:
1578: BEGIN
1579:
1580: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRIP_STOPS');
1581: v_sql_stmt:=
1582: 'INSERT INTO MSC_ST_TRIP_STOPS ('
1583: || 'STOP_ID,'
1584: || 'STOP_LOCATION_ID,'

Line 1613: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1609: EXECUTE IMMEDIATE v_sql_stmt USING
1610: v_inst_rp_src_id
1611: ;
1612:
1613: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1614: COMMIT;
1615:
1616: EXCEPTION
1617: WHEN OTHERS THEN

Line 1619: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1615:
1616: EXCEPTION
1617: WHEN OTHERS THEN
1618: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1619: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1620: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRIP_STOPS');
1621: v_retcode := 2;
1622: RAISE;
1623: ELSE

Line 1620: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRIP_STOPS');

1616: EXCEPTION
1617: WHEN OTHERS THEN
1618: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1619: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1620: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRIP_STOPS');
1621: v_retcode := 2;
1622: RAISE;
1623: ELSE
1624: IF v_retcode < 2 THEN

Line 1625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1621: v_retcode := 2;
1622: RAISE;
1623: ELSE
1624: IF v_retcode < 2 THEN
1625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1626: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRIPS_STOPS');
1627: v_retcode := 1;
1628: END IF;
1629: RETURN;

Line 1626: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRIPS_STOPS');

1622: RAISE;
1623: ELSE
1624: IF v_retcode < 2 THEN
1625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1626: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRIPS_STOPS');
1627: v_retcode := 1;
1628: END IF;
1629: RETURN;
1630: END IF;

Line 1636: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CARRIER_SERVICES');

1632: PROCEDURE COPY_CARRIER_SERVICES IS
1633:
1634: BEGIN
1635:
1636: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CARRIER_SERVICES');
1637: v_sql_stmt:=
1638: 'INSERT INTO MSC_ST_CARRIER_SERVICES ('
1639: || 'SHIP_METHOD_CODE,'
1640: || 'CARRIER_ID,'

Line 1663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1659: EXECUTE IMMEDIATE v_sql_stmt USING
1660: v_inst_rp_src_id
1661: ;
1662:
1663: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1664: COMMIT;
1665:
1666: EXCEPTION
1667: WHEN OTHERS THEN

Line 1669: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1665:
1666: EXCEPTION
1667: WHEN OTHERS THEN
1668: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1669: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CARRIER_SERVICES');
1671: v_retcode := 2;
1672: RAISE;
1673: ELSE

Line 1670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CARRIER_SERVICES');

1666: EXCEPTION
1667: WHEN OTHERS THEN
1668: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1669: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CARRIER_SERVICES');
1671: v_retcode := 2;
1672: RAISE;
1673: ELSE
1674: IF v_retcode < 2 THEN

Line 1675: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1671: v_retcode := 2;
1672: RAISE;
1673: ELSE
1674: IF v_retcode < 2 THEN
1675: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CARRIER_SERVICES');
1677: v_retcode := 1;
1678: END IF;
1679: RETURN;

Line 1676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CARRIER_SERVICES');

1672: RAISE;
1673: ELSE
1674: IF v_retcode < 2 THEN
1675: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CARRIER_SERVICES');
1677: v_retcode := 1;
1678: END IF;
1679: RETURN;
1680: END IF;

Line 1686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ASSIGNMENT_SETS');

1682: PROCEDURE COPY_ASSIGNMENT_SETS IS
1683:
1684: BEGIN
1685:
1686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ASSIGNMENT_SETS');
1687: v_sql_stmt:=
1688: 'INSERT INTO MSC_ST_ASSIGNMENT_SETS ('
1689: || 'SR_ASSIGNMENT_SET_ID,'
1690: || 'ASSIGNMENT_SET_NAME,'

Line 1729: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1725: EXECUTE IMMEDIATE v_sql_stmt USING
1726: v_ascp_inst,v_icode
1727: ,v_inst_rp_src_id;
1728:
1729: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1730: COMMIT;
1731:
1732: EXCEPTION
1733: WHEN OTHERS THEN

Line 1735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1731:
1732: EXCEPTION
1733: WHEN OTHERS THEN
1734: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1736: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ASSIGNMENT_SETS');
1737: v_retcode := 2;
1738: RAISE;
1739: ELSE

Line 1736: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ASSIGNMENT_SETS');

1732: EXCEPTION
1733: WHEN OTHERS THEN
1734: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1736: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ASSIGNMENT_SETS');
1737: v_retcode := 2;
1738: RAISE;
1739: ELSE
1740: IF v_retcode < 2 THEN

Line 1741: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1737: v_retcode := 2;
1738: RAISE;
1739: ELSE
1740: IF v_retcode < 2 THEN
1741: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1742: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ASSIGNMENT_SETS');
1743: v_retcode := 1;
1744: END IF;
1745: RETURN;

Line 1742: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ASSIGNMENT_SETS');

1738: RAISE;
1739: ELSE
1740: IF v_retcode < 2 THEN
1741: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1742: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ASSIGNMENT_SETS');
1743: v_retcode := 1;
1744: END IF;
1745: RETURN;
1746: END IF;

Line 1752: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ATP_RULES');

1748: PROCEDURE COPY_ATP_RULES IS
1749:
1750: BEGIN
1751:
1752: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ATP_RULES');
1753: v_sql_stmt:=
1754: 'INSERT INTO MSC_ST_ATP_RULES ('
1755: || 'RULE_ID,'
1756: || 'SR_INSTANCE_ID,'

Line 1865: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1861: EXECUTE IMMEDIATE v_sql_stmt USING
1862: v_inst_rp_src_id
1863: ;
1864:
1865: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1866: COMMIT;
1867:
1868: EXCEPTION
1869: WHEN OTHERS THEN

Line 1871: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1867:
1868: EXCEPTION
1869: WHEN OTHERS THEN
1870: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1871: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1872: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ATP_RULES');
1873: v_retcode := 2;
1874: RAISE;
1875: ELSE

Line 1872: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ATP_RULES');

1868: EXCEPTION
1869: WHEN OTHERS THEN
1870: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1871: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1872: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ATP_RULES');
1873: v_retcode := 2;
1874: RAISE;
1875: ELSE
1876: IF v_retcode < 2 THEN

Line 1877: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1873: v_retcode := 2;
1874: RAISE;
1875: ELSE
1876: IF v_retcode < 2 THEN
1877: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ATP_RULES');
1879: v_retcode := 1;
1880: END IF;
1881: RETURN;

Line 1878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ATP_RULES');

1874: RAISE;
1875: ELSE
1876: IF v_retcode < 2 THEN
1877: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ATP_RULES');
1879: v_retcode := 1;
1880: END IF;
1881: RETURN;
1882: END IF;

Line 1889: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BILL_OF_RESOURCES');

1885: PROCEDURE COPY_BILL_OF_RESOURCES IS
1886:
1887: BEGIN
1888:
1889: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BILL_OF_RESOURCES');
1890: v_sql_stmt:=
1891: 'INSERT INTO MSC_ST_BILL_OF_RESOURCES ('
1892: || 'ORGANIZATION_ID,'
1893: || 'BILL_OF_RESOURCES,'

Line 1939: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

1935: v_inst_rp_src_id
1936:
1937: ;
1938:
1939: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
1940: COMMIT;
1941:
1942: EXCEPTION
1943: WHEN OTHERS THEN

Line 1945: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

1941:
1942: EXCEPTION
1943: WHEN OTHERS THEN
1944: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1945: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BILL_OF_RESOURCES');
1947: v_retcode := 2;
1948: RAISE;
1949: ELSE

Line 1946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BILL_OF_RESOURCES');

1942: EXCEPTION
1943: WHEN OTHERS THEN
1944: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
1945: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
1946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BILL_OF_RESOURCES');
1947: v_retcode := 2;
1948: RAISE;
1949: ELSE
1950: IF v_retcode < 2 THEN

Line 1951: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

1947: v_retcode := 2;
1948: RAISE;
1949: ELSE
1950: IF v_retcode < 2 THEN
1951: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1952: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BILL_OF_RESOURCES');
1953: v_retcode := 1;
1954: END IF;
1955: RETURN;

Line 1952: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BILL_OF_RESOURCES');

1948: RAISE;
1949: ELSE
1950: IF v_retcode < 2 THEN
1951: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
1952: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BILL_OF_RESOURCES');
1953: v_retcode := 1;
1954: END IF;
1955: RETURN;
1956: END IF;

Line 1963: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_BUSINESS_PLANS');

1959: PROCEDURE COPY_BIS_BUSINESS_PLANS IS
1960:
1961: BEGIN
1962:
1963: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_BUSINESS_PLANS');
1964: v_sql_stmt:=
1965: 'INSERT INTO MSC_ST_BIS_BUSINESS_PLANS ('
1966: || 'BUSINESS_PLAN_ID,'
1967: || 'SHORT_NAME,'

Line 2012: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2008: EXECUTE IMMEDIATE v_sql_stmt USING
2009: v_inst_rp_src_id
2010: ;
2011:
2012: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2013: COMMIT;
2014:
2015:
2016: EXCEPTION

Line 2019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2015:
2016: EXCEPTION
2017: WHEN OTHERS THEN
2018: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2020: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_BUSINESS_PLANS');
2021: v_retcode := 2;
2022: RAISE;
2023: ELSE

Line 2020: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_BUSINESS_PLANS');

2016: EXCEPTION
2017: WHEN OTHERS THEN
2018: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2020: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_BUSINESS_PLANS');
2021: v_retcode := 2;
2022: RAISE;
2023: ELSE
2024: IF v_retcode < 2 THEN

Line 2025: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2021: v_retcode := 2;
2022: RAISE;
2023: ELSE
2024: IF v_retcode < 2 THEN
2025: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_BUSINESS_PLANS');
2027: v_retcode := 1;
2028: END IF;
2029: RETURN;

Line 2026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_BUSINESS_PLANS');

2022: RAISE;
2023: ELSE
2024: IF v_retcode < 2 THEN
2025: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_BUSINESS_PLANS');
2027: v_retcode := 1;
2028: END IF;
2029: RETURN;
2030: END IF;

Line 2037: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_PERIODS');

2033: PROCEDURE COPY_BIS_PERIODS IS
2034:
2035: BEGIN
2036:
2037: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_PERIODS');
2038: v_sql_stmt:=
2039: 'INSERT INTO MSC_ST_BIS_PERIODS ('
2040: || 'ORGANIZATION_ID,'
2041: || 'PERIOD_SET_NAME,'

Line 2102: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2098: EXECUTE IMMEDIATE v_sql_stmt USING
2099: v_inst_rp_src_id
2100: ;
2101:
2102: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2103: COMMIT;
2104:
2105: EXCEPTION
2106: WHEN OTHERS THEN

Line 2108: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2104:
2105: EXCEPTION
2106: WHEN OTHERS THEN
2107: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2108: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_PERIODS');
2110: v_retcode := 2;
2111: RAISE;
2112: ELSE

Line 2109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_PERIODS');

2105: EXCEPTION
2106: WHEN OTHERS THEN
2107: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2108: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_PERIODS');
2110: v_retcode := 2;
2111: RAISE;
2112: ELSE
2113: IF v_retcode < 2 THEN

Line 2114: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2110: v_retcode := 2;
2111: RAISE;
2112: ELSE
2113: IF v_retcode < 2 THEN
2114: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2115: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_PERIODS');
2116: v_retcode := 1;
2117: END IF;
2118: RETURN;

Line 2115: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_PERIODS');

2111: RAISE;
2112: ELSE
2113: IF v_retcode < 2 THEN
2114: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2115: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_PERIODS');
2116: v_retcode := 1;
2117: END IF;
2118: RETURN;
2119: END IF;

Line 2126: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_PFMC_MEASURES');

2122: PROCEDURE COPY_BIS_PFMC_MEASURES IS
2123:
2124: BEGIN
2125:
2126: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_PFMC_MEASURES');
2127: v_sql_stmt:=
2128: 'INSERT INTO MSC_ST_BIS_PFMC_MEASURES ('
2129: || 'MEASURE_ID,'
2130: || 'MEASURE_SHORT_NAME,'

Line 2187: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2183: EXECUTE IMMEDIATE v_sql_stmt USING
2184: v_inst_rp_src_id
2185: ;
2186:
2187: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2188: COMMIT;
2189:
2190: EXCEPTION
2191: WHEN OTHERS THEN

Line 2193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2189:
2190: EXCEPTION
2191: WHEN OTHERS THEN
2192: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_PFMC_MEASURES');
2195: v_retcode := 2;
2196: RAISE;
2197: ELSE

Line 2194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_PFMC_MEASURES');

2190: EXCEPTION
2191: WHEN OTHERS THEN
2192: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2193: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2194: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_PFMC_MEASURES');
2195: v_retcode := 2;
2196: RAISE;
2197: ELSE
2198: IF v_retcode < 2 THEN

Line 2199: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2195: v_retcode := 2;
2196: RAISE;
2197: ELSE
2198: IF v_retcode < 2 THEN
2199: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2200: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_PFMC_MEASURES');
2201: v_retcode := 1;
2202: END IF;
2203: RETURN;

Line 2200: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_PFMC_MEASURES');

2196: RAISE;
2197: ELSE
2198: IF v_retcode < 2 THEN
2199: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2200: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_PFMC_MEASURES');
2201: v_retcode := 1;
2202: END IF;
2203: RETURN;
2204: END IF;

Line 2210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_TARGETS');

2206: PROCEDURE COPY_BIS_TARGETS IS
2207:
2208: BEGIN
2209:
2210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_TARGETS');
2211: v_sql_stmt:=
2212: 'INSERT INTO MSC_ST_BIS_TARGETS ('
2213: || 'TARGET_ID,'
2214: || 'TARGET_LEVEL_ID,'

Line 2293: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2289: EXECUTE IMMEDIATE v_sql_stmt USING
2290: v_inst_rp_src_id
2291: ;
2292:
2293: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2294: COMMIT;
2295:
2296:
2297: EXCEPTION

Line 2300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2296:
2297: EXCEPTION
2298: WHEN OTHERS THEN
2299: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2301: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_TARGETS');
2302: v_retcode := 2;
2303: RAISE;
2304: ELSE

Line 2301: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_TARGETS');

2297: EXCEPTION
2298: WHEN OTHERS THEN
2299: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2301: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_TARGETS');
2302: v_retcode := 2;
2303: RAISE;
2304: ELSE
2305: IF v_retcode < 2 THEN

Line 2306: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2302: v_retcode := 2;
2303: RAISE;
2304: ELSE
2305: IF v_retcode < 2 THEN
2306: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2307: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_TARGETS');
2308: v_retcode := 1;
2309: END IF;
2310: RETURN;

Line 2307: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_TARGETS');

2303: RAISE;
2304: ELSE
2305: IF v_retcode < 2 THEN
2306: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2307: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_TARGETS');
2308: v_retcode := 1;
2309: END IF;
2310: RETURN;
2311: END IF;

Line 2318: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_TARGET_LEVELS');

2314: PROCEDURE COPY_BIS_TARGET_LEVELS IS
2315:
2316: BEGIN
2317:
2318: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BIS_TARGET_LEVELS');
2319: v_sql_stmt:=
2320: 'INSERT INTO MSC_ST_BIS_TARGET_LEVELS ('
2321: || 'TARGET_LEVEL_ID,'
2322: || 'TARGET_LEVEL_SHORT_NAME,'

Line 2396: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2392: v_inst_rp_src_id
2393:
2394: ;
2395:
2396: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2397: COMMIT;
2398:
2399: EXCEPTION
2400: WHEN OTHERS THEN

Line 2402: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2398:
2399: EXCEPTION
2400: WHEN OTHERS THEN
2401: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2402: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_TARGET_LEVELS');
2404: v_retcode := 2;
2405: RAISE;
2406: ELSE

Line 2403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_TARGET_LEVELS');

2399: EXCEPTION
2400: WHEN OTHERS THEN
2401: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2402: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BIS_TARGET_LEVELS');
2404: v_retcode := 2;
2405: RAISE;
2406: ELSE
2407: IF v_retcode < 2 THEN

Line 2408: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2404: v_retcode := 2;
2405: RAISE;
2406: ELSE
2407: IF v_retcode < 2 THEN
2408: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2409: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_TARGET_LEVELS');
2410: v_retcode := 1;
2411: END IF;
2412: RETURN;

Line 2409: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_TARGET_LEVELS');

2405: RAISE;
2406: ELSE
2407: IF v_retcode < 2 THEN
2408: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2409: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BIS_TARGET_LEVELS');
2410: v_retcode := 1;
2411: END IF;
2412: RETURN;
2413: END IF;

Line 2420: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BOMS');

2416: PROCEDURE COPY_BOMS IS
2417:
2418: BEGIN
2419:
2420: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BOMS');
2421: v_sql_stmt:=
2422: 'INSERT INTO MSC_ST_BOMS ('
2423: || 'BILL_SEQUENCE_ID,'
2424: || 'ORGANIZATION_ID,'

Line 2517: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2513: ,v_ascp_inst,v_icode
2514: ,v_ascp_inst,v_icode
2515: ;
2516:
2517: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2518: COMMIT;
2519:
2520: EXCEPTION
2521: WHEN OTHERS THEN

Line 2523: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2519:
2520: EXCEPTION
2521: WHEN OTHERS THEN
2522: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2523: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOMS');
2525: v_retcode := 2;
2526: RAISE;
2527: ELSE

Line 2524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOMS');

2520: EXCEPTION
2521: WHEN OTHERS THEN
2522: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2523: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOMS');
2525: v_retcode := 2;
2526: RAISE;
2527: ELSE
2528: IF v_retcode < 2 THEN

Line 2529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2525: v_retcode := 2;
2526: RAISE;
2527: ELSE
2528: IF v_retcode < 2 THEN
2529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOMS');
2531: v_retcode := 1;
2532: END IF;
2533: RETURN;

Line 2530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOMS');

2526: RAISE;
2527: ELSE
2528: IF v_retcode < 2 THEN
2529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOMS');
2531: v_retcode := 1;
2532: END IF;
2533: RETURN;
2534: END IF;

Line 2541: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BOM_COMPONENTS');

2537: PROCEDURE COPY_BOM_COMPONENTS IS
2538:
2539: BEGIN
2540:
2541: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BOM_COMPONENTS');
2542: v_sql_stmt:=
2543: 'INSERT INTO MSC_ST_BOM_COMPONENTS ('
2544: || 'COMPONENT_SEQUENCE_ID,'
2545: || 'ORGANIZATION_ID,'

Line 2688: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2684: ,v_ascp_inst,v_icode
2685: ,v_ascp_inst,v_icode
2686: ;
2687:
2688: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2689: COMMIT;
2690:
2691: EXCEPTION
2692: WHEN OTHERS THEN

Line 2694: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2690:
2691: EXCEPTION
2692: WHEN OTHERS THEN
2693: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2694: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2695: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOM_COMPONENTS');
2696: v_retcode := 2;
2697: RAISE;
2698: ELSE

Line 2695: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOM_COMPONENTS');

2691: EXCEPTION
2692: WHEN OTHERS THEN
2693: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2694: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2695: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOM_COMPONENTS');
2696: v_retcode := 2;
2697: RAISE;
2698: ELSE
2699: IF v_retcode < 2 THEN

Line 2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2696: v_retcode := 2;
2697: RAISE;
2698: ELSE
2699: IF v_retcode < 2 THEN
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2701: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOM_COMPONENTS');
2702: v_retcode := 1;
2703: END IF;
2704: RETURN;

Line 2701: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOM_COMPONENTS');

2697: RAISE;
2698: ELSE
2699: IF v_retcode < 2 THEN
2700: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2701: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOM_COMPONENTS');
2702: v_retcode := 1;
2703: END IF;
2704: RETURN;
2705: END IF;

Line 2711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BOR_REQUIREMENTS');

2707: PROCEDURE COPY_BOR_REQUIREMENTS IS
2708:
2709: BEGIN
2710:
2711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_BOR_REQUIREMENTS');
2712: v_sql_stmt:=
2713: 'INSERT INTO MSC_ST_BOR_REQUIREMENTS ('
2714: || 'BILL_OF_RESOURCES,'
2715: || 'ORGANIZATION_ID,'

Line 2782: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2778: EXECUTE IMMEDIATE v_sql_stmt USING
2779: v_inst_rp_src_id
2780: ;
2781:
2782: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2783: COMMIT;
2784:
2785: EXCEPTION
2786: WHEN OTHERS THEN

Line 2788: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2784:
2785: EXCEPTION
2786: WHEN OTHERS THEN
2787: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2788: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2789: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOR_REQUIREMENTS');
2790: v_retcode := 2;
2791: RAISE;
2792: ELSE

Line 2789: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOR_REQUIREMENTS');

2785: EXCEPTION
2786: WHEN OTHERS THEN
2787: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2788: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2789: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_BOR_REQUIREMENTS');
2790: v_retcode := 2;
2791: RAISE;
2792: ELSE
2793: IF v_retcode < 2 THEN

Line 2794: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2790: v_retcode := 2;
2791: RAISE;
2792: ELSE
2793: IF v_retcode < 2 THEN
2794: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2795: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOR_REQUIREMENTS');
2796: v_retcode := 1;
2797: END IF;
2798: RETURN;

Line 2795: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOR_REQUIREMENTS');

2791: RAISE;
2792: ELSE
2793: IF v_retcode < 2 THEN
2794: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2795: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_BOR_REQUIREMENTS');
2796: v_retcode := 1;
2797: END IF;
2798: RETURN;
2799: END IF;

Line 2805: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDARS');

2801: PROCEDURE COPY_CALENDARS IS
2802:
2803: BEGIN
2804:
2805: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDARS');
2806: v_sql_stmt:=
2807: 'INSERT INTO MSC_ST_CALENDARS ('
2808: || 'CALENDAR_CODE,'
2809: || 'DESCRIPTION,'

Line 2878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2874: ,v_ascp_inst,v_icode
2875: ,v_inst_rp_src_id
2876: ;
2877:
2878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2879: COMMIT;
2880:
2881: EXCEPTION
2882: WHEN OTHERS THEN

Line 2884: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2880:
2881: EXCEPTION
2882: WHEN OTHERS THEN
2883: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2884: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2885: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDARS');
2886: v_retcode := 2;
2887: RAISE;
2888: ELSE

Line 2885: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDARS');

2881: EXCEPTION
2882: WHEN OTHERS THEN
2883: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2884: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2885: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDARS');
2886: v_retcode := 2;
2887: RAISE;
2888: ELSE
2889: IF v_retcode < 2 THEN

Line 2890: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2886: v_retcode := 2;
2887: RAISE;
2888: ELSE
2889: IF v_retcode < 2 THEN
2890: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2891: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDARS');
2892: v_retcode := 1;
2893: END IF;
2894: RETURN;

Line 2891: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDARS');

2887: RAISE;
2888: ELSE
2889: IF v_retcode < 2 THEN
2890: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2891: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDARS');
2892: v_retcode := 1;
2893: END IF;
2894: RETURN;
2895: END IF;

Line 2901: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDAR_DATES');

2897: PROCEDURE COPY_CALENDAR_DATES IS
2898:
2899: BEGIN
2900:
2901: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDAR_DATES');
2902: v_sql_stmt:=
2903: 'INSERT INTO MSC_ST_CALENDAR_DATES ('
2904: || 'CALENDAR_DATE,'
2905: || 'CALENDAR_CODE,'

Line 2961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

2957: v_ascp_inst,v_icode
2958: ,v_inst_rp_src_id
2959: ;
2960:
2961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
2962: COMMIT;
2963:
2964: EXCEPTION
2965: WHEN OTHERS THEN

Line 2967: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

2963:
2964: EXCEPTION
2965: WHEN OTHERS THEN
2966: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2967: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2968: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_DATES');
2969: v_retcode := 2;
2970: RAISE;
2971: ELSE

Line 2968: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_DATES');

2964: EXCEPTION
2965: WHEN OTHERS THEN
2966: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
2967: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
2968: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_DATES');
2969: v_retcode := 2;
2970: RAISE;
2971: ELSE
2972: IF v_retcode < 2 THEN

Line 2973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2969: v_retcode := 2;
2970: RAISE;
2971: ELSE
2972: IF v_retcode < 2 THEN
2973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2974: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_DATES');
2975: v_retcode := 1;
2976: END IF;
2977: RETURN;

Line 2974: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_DATES');

2970: RAISE;
2971: ELSE
2972: IF v_retcode < 2 THEN
2973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2974: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_DATES');
2975: v_retcode := 1;
2976: END IF;
2977: RETURN;
2978: END IF;

Line 2984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDAR_EXCEPTIONS');

2980: PROCEDURE COPY_CALENDAR_EXCEPTIONS IS
2981:
2982: BEGIN
2983:
2984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDAR_EXCEPTIONS');
2985: v_sql_stmt:=
2986: 'INSERT INTO MSC_ST_CALENDAR_EXCEPTIONS ('
2987: || 'CALENDAR_CODE,'
2988: || 'EXCEPTION_DATE,'

Line 3047: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3043: ,v_inst_rp_src_id
3044: ,v_ascp_inst,v_icode
3045: ;
3046:
3047: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3048: COMMIT;
3049:
3050: EXCEPTION
3051: WHEN OTHERS THEN

Line 3053: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3049:
3050: EXCEPTION
3051: WHEN OTHERS THEN
3052: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3053: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_EXCEPTIONS');
3055: v_retcode := 2;
3056: RAISE;
3057: ELSE

Line 3054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_EXCEPTIONS');

3050: EXCEPTION
3051: WHEN OTHERS THEN
3052: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3053: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_EXCEPTIONS');
3055: v_retcode := 2;
3056: RAISE;
3057: ELSE
3058: IF v_retcode < 2 THEN

Line 3059: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3055: v_retcode := 2;
3056: RAISE;
3057: ELSE
3058: IF v_retcode < 2 THEN
3059: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3060: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_EXCEPTIONS');
3061: v_retcode := 1;
3062: END IF;
3063: RETURN;

Line 3060: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_EXCEPTIONS');

3056: RAISE;
3057: ELSE
3058: IF v_retcode < 2 THEN
3059: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3060: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_EXCEPTIONS');
3061: v_retcode := 1;
3062: END IF;
3063: RETURN;
3064: END IF;

Line 3070: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDAR_SHIFTS');

3066: PROCEDURE COPY_CALENDAR_SHIFTS IS
3067:
3068: BEGIN
3069:
3070: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CALENDAR_SHIFTS');
3071: v_sql_stmt:=
3072: 'INSERT INTO MSC_ST_CALENDAR_SHIFTS ('
3073: || 'CALENDAR_CODE,'
3074: || 'SHIFT_NUM,'

Line 3137: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3133: ,v_inst_rp_src_id
3134: ,v_ascp_inst,v_icode
3135: ;
3136:
3137: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3138: COMMIT;
3139:
3140: EXCEPTION
3141: WHEN OTHERS THEN

Line 3143: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3139:
3140: EXCEPTION
3141: WHEN OTHERS THEN
3142: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3143: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_SHIFTS');
3145: v_retcode := 2;
3146: RAISE;
3147: ELSE

Line 3144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_SHIFTS');

3140: EXCEPTION
3141: WHEN OTHERS THEN
3142: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3143: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CALENDAR_SHIFTS');
3145: v_retcode := 2;
3146: RAISE;
3147: ELSE
3148: IF v_retcode < 2 THEN

Line 3149: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3145: v_retcode := 2;
3146: RAISE;
3147: ELSE
3148: IF v_retcode < 2 THEN
3149: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3150: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_SHIFTS');
3151: v_retcode := 1;
3152: END IF;
3153: RETURN;

Line 3150: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_SHIFTS');

3146: RAISE;
3147: ELSE
3148: IF v_retcode < 2 THEN
3149: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3150: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CALENDAR_SHIFTS');
3151: v_retcode := 1;
3152: END IF;
3153: RETURN;
3154: END IF;

Line 3160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CAL_WEEK_START_DATES');

3156: PROCEDURE COPY_CAL_WEEK_START_DATES IS
3157:
3158: BEGIN
3159:
3160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CAL_WEEK_START_DATES');
3161: v_sql_stmt:=
3162: 'INSERT INTO MSC_ST_CAL_WEEK_START_DATES ('
3163: || 'CALENDAR_CODE,'
3164: || 'EXCEPTION_SET_ID,'

Line 3210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3206: v_ascp_inst,v_icode
3207: ,v_inst_rp_src_id
3208: ;
3209:
3210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3211: COMMIT;
3212:
3213: EXCEPTION
3214: WHEN OTHERS THEN

Line 3216: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3212:
3213: EXCEPTION
3214: WHEN OTHERS THEN
3215: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3216: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3217: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CAL_WEEK_START_DATES');
3218: v_retcode := 2;
3219: RAISE;
3220: ELSE

Line 3217: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CAL_WEEK_START_DATES');

3213: EXCEPTION
3214: WHEN OTHERS THEN
3215: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3216: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3217: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CAL_WEEK_START_DATES');
3218: v_retcode := 2;
3219: RAISE;
3220: ELSE
3221: IF v_retcode < 2 THEN

Line 3222: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3218: v_retcode := 2;
3219: RAISE;
3220: ELSE
3221: IF v_retcode < 2 THEN
3222: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3223: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CAL_WEEK_START_DATES');
3224: v_retcode := 1;
3225: END IF;
3226: RETURN;

Line 3223: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CAL_WEEK_START_DATES');

3219: RAISE;
3220: ELSE
3221: IF v_retcode < 2 THEN
3222: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3223: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CAL_WEEK_START_DATES');
3224: v_retcode := 1;
3225: END IF;
3226: RETURN;
3227: END IF;

Line 3233: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CAL_YEAR_START_DATES');

3229: PROCEDURE COPY_CAL_YEAR_START_DATES IS
3230:
3231: BEGIN
3232:
3233: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CAL_YEAR_START_DATES');
3234: v_sql_stmt:=
3235: 'INSERT INTO MSC_ST_CAL_YEAR_START_DATES ('
3236: || 'CALENDAR_CODE,'
3237: || 'EXCEPTION_SET_ID,'

Line 3277: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3273: v_ascp_inst,v_icode
3274: ,v_inst_rp_src_id
3275: ;
3276:
3277: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3278: COMMIT;
3279:
3280: EXCEPTION
3281: WHEN OTHERS THEN

Line 3283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3279:
3280: EXCEPTION
3281: WHEN OTHERS THEN
3282: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CAL_YEAR_START_DATES');
3285: v_retcode := 2;
3286: RAISE;
3287: ELSE

Line 3284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CAL_YEAR_START_DATES');

3280: EXCEPTION
3281: WHEN OTHERS THEN
3282: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CAL_YEAR_START_DATES');
3285: v_retcode := 2;
3286: RAISE;
3287: ELSE
3288: IF v_retcode < 2 THEN

Line 3289: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3285: v_retcode := 2;
3286: RAISE;
3287: ELSE
3288: IF v_retcode < 2 THEN
3289: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3290: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CAL_YEAR_START_DATES');
3291: v_retcode := 1;
3292: END IF;
3293: RETURN;

Line 3290: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CAL_YEAR_START_DATES');

3286: RAISE;
3287: ELSE
3288: IF v_retcode < 2 THEN
3289: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3290: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CAL_YEAR_START_DATES');
3291: v_retcode := 1;
3292: END IF;
3293: RETURN;
3294: END IF;

Line 3300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CATEGORY_SETS');

3296: PROCEDURE COPY_CATEGORY_SETS IS
3297:
3298: BEGIN
3299:
3300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CATEGORY_SETS');
3301: v_sql_stmt:=
3302: 'INSERT INTO MSC_ST_CATEGORY_SETS ('
3303: || 'CATEGORY_SET_ID,'
3304: || 'SR_CATEGORY_SET_ID,'

Line 3371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3367: v_inst_rp_src_id
3368: ,v_ascp_inst,v_icode
3369: ;
3370:
3371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3372: COMMIT;
3373: EXCEPTION
3374: WHEN OTHERS THEN
3375: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN

Line 3376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3372: COMMIT;
3373: EXCEPTION
3374: WHEN OTHERS THEN
3375: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3377: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CATEGORY_SETS');
3378: v_retcode := 2;
3379: RAISE;
3380: ELSE

Line 3377: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CATEGORY_SETS');

3373: EXCEPTION
3374: WHEN OTHERS THEN
3375: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3376: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3377: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CATEGORY_SETS');
3378: v_retcode := 2;
3379: RAISE;
3380: ELSE
3381: IF v_retcode < 2 THEN

Line 3382: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3378: v_retcode := 2;
3379: RAISE;
3380: ELSE
3381: IF v_retcode < 2 THEN
3382: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3383: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CATEGORY_SETS');
3384: v_retcode := 1;
3385: END IF;
3386: RETURN;

Line 3383: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CATEGORY_SETS');

3379: RAISE;
3380: ELSE
3381: IF v_retcode < 2 THEN
3382: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3383: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CATEGORY_SETS');
3384: v_retcode := 1;
3385: END IF;
3386: RETURN;
3387: END IF;

Line 3393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COMPANY_USERS');

3389: PROCEDURE COPY_COMPANY_USERS IS
3390:
3391: BEGIN
3392:
3393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COMPANY_USERS');
3394: v_sql_stmt:=
3395: 'INSERT INTO MSC_ST_COMPANY_USERS ('
3396: || 'USER_NAME,'
3397: || 'SR_COMPANY_ID,'

Line 3458: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3454: v_inst_rp_src_id
3455: ,v_ascp_inst,v_icode
3456: ;
3457:
3458: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3459: COMMIT;
3460:
3461: EXCEPTION
3462: WHEN OTHERS THEN

Line 3464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3460:
3461: EXCEPTION
3462: WHEN OTHERS THEN
3463: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3465: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_COMPANY_USERS');
3466: v_retcode := 2;
3467: RAISE;
3468: ELSE

Line 3465: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_COMPANY_USERS');

3461: EXCEPTION
3462: WHEN OTHERS THEN
3463: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3465: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_COMPANY_USERS');
3466: v_retcode := 2;
3467: RAISE;
3468: ELSE
3469: IF v_retcode < 2 THEN

Line 3470: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3466: v_retcode := 2;
3467: RAISE;
3468: ELSE
3469: IF v_retcode < 2 THEN
3470: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_COMPANY_USERS');
3472: v_retcode := 1;
3473: END IF;
3474: RETURN;

Line 3471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_COMPANY_USERS');

3467: RAISE;
3468: ELSE
3469: IF v_retcode < 2 THEN
3470: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3471: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_COMPANY_USERS');
3472: v_retcode := 1;
3473: END IF;
3474: RETURN;
3475: END IF;

Line 3481: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COMPONENT_SUBSTITUTES');

3477: PROCEDURE COPY_COMPONENT_SUBSTITUTES IS
3478:
3479: BEGIN
3480:
3481: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_COMPONENT_SUBSTITUTES');
3482: v_sql_stmt:=
3483: 'INSERT INTO MSC_ST_COMPONENT_SUBSTITUTES ('
3484: || 'COMPONENT_SEQUENCE_ID,'
3485: || 'SUBSTITUTE_ITEM_ID,'

Line 3569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3565: ,v_ascp_inst,v_icode
3566: ,v_ascp_inst,v_icode
3567: ;
3568:
3569: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3570: COMMIT;
3571:
3572: EXCEPTION
3573: WHEN OTHERS THEN

Line 3575: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3571:
3572: EXCEPTION
3573: WHEN OTHERS THEN
3574: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3575: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3576: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_COMPONENT_SUBSTITUTES');
3577: v_retcode := 2;
3578: RAISE;
3579: ELSE

Line 3576: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_COMPONENT_SUBSTITUTES');

3572: EXCEPTION
3573: WHEN OTHERS THEN
3574: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3575: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3576: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_COMPONENT_SUBSTITUTES');
3577: v_retcode := 2;
3578: RAISE;
3579: ELSE
3580: IF v_retcode < 2 THEN

Line 3581: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3577: v_retcode := 2;
3578: RAISE;
3579: ELSE
3580: IF v_retcode < 2 THEN
3581: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_COMPONENT_SUBSTITUTES');
3583: v_retcode := 1;
3584: END IF;
3585: RETURN;

Line 3582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_COMPONENT_SUBSTITUTES');

3578: RAISE;
3579: ELSE
3580: IF v_retcode < 2 THEN
3581: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_COMPONENT_SUBSTITUTES');
3583: v_retcode := 1;
3584: END IF;
3585: RETURN;
3586: END IF;

Line 3592: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CO_PRODUCTS');

3588: PROCEDURE COPY_CO_PRODUCTS IS
3589:
3590: BEGIN
3591:
3592: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_CO_PRODUCTS');
3593: v_sql_stmt:=
3594: 'INSERT INTO MSC_ST_CO_PRODUCTS ('
3595: || 'COMPONENT_NAME,'
3596: || 'COMPONENT_ID,'

Line 3670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3666: ,v_inst_rp_src_id
3667: ,v_ascp_inst,v_icode
3668: ;
3669:
3670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3671: COMMIT;
3672:
3673: EXCEPTION
3674: WHEN OTHERS THEN

Line 3676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3672:
3673: EXCEPTION
3674: WHEN OTHERS THEN
3675: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3677: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CO_PRODUCTS');
3678: v_retcode := 2;
3679: RAISE;
3680: ELSE

Line 3677: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CO_PRODUCTS');

3673: EXCEPTION
3674: WHEN OTHERS THEN
3675: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3676: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3677: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_CO_PRODUCTS');
3678: v_retcode := 2;
3679: RAISE;
3680: ELSE
3681: IF v_retcode < 2 THEN

Line 3682: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3678: v_retcode := 2;
3679: RAISE;
3680: ELSE
3681: IF v_retcode < 2 THEN
3682: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3683: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CO_PRODUCTS');
3684: v_retcode := 1;
3685: END IF;
3686: RETURN;

Line 3683: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CO_PRODUCTS');

3679: RAISE;
3680: ELSE
3681: IF v_retcode < 2 THEN
3682: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3683: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_CO_PRODUCTS');
3684: v_retcode := 1;
3685: END IF;
3686: RETURN;
3687: END IF;

Line 3693: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEMANDS');

3689: PROCEDURE COPY_DEMANDS IS
3690:
3691: BEGIN
3692:
3693: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEMANDS');
3694: v_sql_stmt:=
3695: 'INSERT INTO MSC_ST_DEMANDS ('
3696: || 'ORDER_PRIORITY,'
3697: || 'DEMAND_ID,'

Line 3961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

3957: ,v_ascp_inst,v_icode
3958: ,v_ascp_inst,v_icode
3959: ;
3960:
3961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
3962: COMMIT;
3963:
3964: EXCEPTION
3965: WHEN OTHERS THEN

Line 3967: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

3963:
3964: EXCEPTION
3965: WHEN OTHERS THEN
3966: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3967: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3968: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEMANDS');
3969: v_retcode := 2;
3970: RAISE;
3971: ELSE

Line 3968: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEMANDS');

3964: EXCEPTION
3965: WHEN OTHERS THEN
3966: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
3967: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
3968: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEMANDS');
3969: v_retcode := 2;
3970: RAISE;
3971: ELSE
3972: IF v_retcode < 2 THEN

Line 3973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

3969: v_retcode := 2;
3970: RAISE;
3971: ELSE
3972: IF v_retcode < 2 THEN
3973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3974: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEMANDS');
3975: v_retcode := 1;
3976: END IF;
3977: RETURN;

Line 3974: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEMANDS');

3970: RAISE;
3971: ELSE
3972: IF v_retcode < 2 THEN
3973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
3974: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEMANDS');
3975: v_retcode := 1;
3976: END IF;
3977: RETURN;
3978: END IF;

Line 3984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEMAND_CLASSES');

3980: PROCEDURE COPY_DEMAND_CLASSES IS
3981:
3982: BEGIN
3983:
3984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEMAND_CLASSES');
3985: v_sql_stmt:=
3986: 'INSERT INTO MSC_ST_DEMAND_CLASSES ('
3987: || 'DEMAND_CLASS,'
3988: || 'MEANING,'

Line 4083: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4079: v_inst_rp_src_id
4080: ,v_ascp_inst,v_icode
4081: ;
4082:
4083: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4084: COMMIT;
4085:
4086: EXCEPTION
4087: WHEN OTHERS THEN

Line 4089: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4085:
4086: EXCEPTION
4087: WHEN OTHERS THEN
4088: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4089: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4090: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEMAND_CLASSES');
4091: v_retcode := 2;
4092: RAISE;
4093: ELSE

Line 4090: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEMAND_CLASSES');

4086: EXCEPTION
4087: WHEN OTHERS THEN
4088: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4089: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4090: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEMAND_CLASSES');
4091: v_retcode := 2;
4092: RAISE;
4093: ELSE
4094: IF v_retcode < 2 THEN

Line 4095: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4091: v_retcode := 2;
4092: RAISE;
4093: ELSE
4094: IF v_retcode < 2 THEN
4095: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4096: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEMAND_CLASSES');
4097: v_retcode := 1;
4098: END IF;
4099: RETURN;

Line 4096: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEMAND_CLASSES');

4092: RAISE;
4093: ELSE
4094: IF v_retcode < 2 THEN
4095: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4096: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEMAND_CLASSES');
4097: v_retcode := 1;
4098: END IF;
4099: RETURN;
4100: END IF;

Line 4106: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEPARTMENT_RESOURCES');

4102: PROCEDURE COPY_DEPARTMENT_RESOURCES IS
4103:
4104: BEGIN
4105:
4106: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEPARTMENT_RESOURCES');
4107: v_sql_stmt:=
4108: 'INSERT INTO MSC_ST_DEPARTMENT_RESOURCES ('
4109: || 'ORGANIZATION_ID,'
4110: || 'RESOURCE_ID,'

Line 4290: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4286: ,v_ascp_inst,v_icode
4287: ,v_ascp_inst,v_icode
4288: ;
4289:
4290: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4291: COMMIT;
4292:
4293: EXCEPTION
4294: WHEN OTHERS THEN

Line 4296: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4292:
4293: EXCEPTION
4294: WHEN OTHERS THEN
4295: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4296: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4297: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEPARTMENT_RESOURCES');
4298: v_retcode := 2;
4299: RAISE;
4300: ELSE

Line 4297: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEPARTMENT_RESOURCES');

4293: EXCEPTION
4294: WHEN OTHERS THEN
4295: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4296: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4297: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEPARTMENT_RESOURCES');
4298: v_retcode := 2;
4299: RAISE;
4300: ELSE
4301: IF v_retcode < 2 THEN

Line 4302: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4298: v_retcode := 2;
4299: RAISE;
4300: ELSE
4301: IF v_retcode < 2 THEN
4302: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4303: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEPARTMENT_RESOURCES');
4304: v_retcode := 1;
4305: END IF;
4306: RETURN;

Line 4303: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEPARTMENT_RESOURCES');

4299: RAISE;
4300: ELSE
4301: IF v_retcode < 2 THEN
4302: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4303: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEPARTMENT_RESOURCES');
4304: v_retcode := 1;
4305: END IF;
4306: RETURN;
4307: END IF;

Line 4313: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'MSC_ST_DESIGNATORS');

4309: PROCEDURE COPY_DESIGNATORS IS
4310:
4311: BEGIN
4312:
4313: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'MSC_ST_DESIGNATORS');
4314: v_sql_stmt:=
4315: 'INSERT INTO MSC_ST_DESIGNATORS ('
4316: || 'DESIGNATOR_ID,'
4317: || 'DESIGNATOR,'

Line 4433: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4429: ,v_ascp_inst,v_icode
4430: ,v_ascp_inst,v_icode
4431: ;
4432:
4433: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4434: COMMIT;
4435:
4436: EXCEPTION
4437: WHEN OTHERS THEN

Line 4439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4435:
4436: EXCEPTION
4437: WHEN OTHERS THEN
4438: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DESIGNATORS');
4441: v_retcode := 2;
4442: RAISE;
4443: ELSE

Line 4440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DESIGNATORS');

4436: EXCEPTION
4437: WHEN OTHERS THEN
4438: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DESIGNATORS');
4441: v_retcode := 2;
4442: RAISE;
4443: ELSE
4444: IF v_retcode < 2 THEN

Line 4445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4441: v_retcode := 2;
4442: RAISE;
4443: ELSE
4444: IF v_retcode < 2 THEN
4445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DESIGNATORS');
4447: v_retcode := 1;
4448: END IF;
4449: RETURN;

Line 4446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DESIGNATORS');

4442: RAISE;
4443: ELSE
4444: IF v_retcode < 2 THEN
4445: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DESIGNATORS');
4447: v_retcode := 1;
4448: END IF;
4449: RETURN;
4450: END IF;

Line 4456: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_GROUPS');

4452: PROCEDURE COPY_GROUPS IS
4453:
4454: BEGIN
4455:
4456: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_GROUPS');
4457: v_sql_stmt:=
4458: 'INSERT INTO MSC_ST_GROUPS ('
4459: || 'GROUP_ID,'
4460: || 'GROUP_NAME,'

Line 4559: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4555: v_ascp_inst,v_icode
4556: ,v_inst_rp_src_id
4557: ;
4558:
4559: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4560: COMMIT;
4561:
4562: EXCEPTION
4563: WHEN OTHERS THEN

Line 4565: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4561:
4562: EXCEPTION
4563: WHEN OTHERS THEN
4564: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4565: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_GROUPS');
4567: v_retcode := 2;
4568: RAISE;
4569: ELSE

Line 4566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_GROUPS');

4562: EXCEPTION
4563: WHEN OTHERS THEN
4564: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4565: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4566: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_GROUPS');
4567: v_retcode := 2;
4568: RAISE;
4569: ELSE
4570: IF v_retcode < 2 THEN

Line 4571: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4567: v_retcode := 2;
4568: RAISE;
4569: ELSE
4570: IF v_retcode < 2 THEN
4571: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4572: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_GROUPS');
4573: v_retcode := 1;
4574: END IF;
4575: RETURN;

Line 4572: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_GROUPS');

4568: RAISE;
4569: ELSE
4570: IF v_retcode < 2 THEN
4571: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4572: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_GROUPS');
4573: v_retcode := 1;
4574: END IF;
4575: RETURN;
4576: END IF;

Line 4582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_GROUP_COMPANIES');

4578: PROCEDURE COPY_GROUP_COMPANIES IS
4579:
4580: BEGIN
4581:
4582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_GROUP_COMPANIES');
4583: v_sql_stmt:=
4584: 'INSERT INTO MSC_ST_GROUP_COMPANIES ('
4585: || 'GROUP_ID,'
4586: || 'GROUP_NAME,'

Line 4683: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4679: v_ascp_inst,v_icode
4680: ,v_inst_rp_src_id
4681: ;
4682:
4683: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4684: COMMIT;
4685:
4686: EXCEPTION
4687: WHEN OTHERS THEN

Line 4689: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4685:
4686: EXCEPTION
4687: WHEN OTHERS THEN
4688: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4689: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4690: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_GROUP_COMPANIES');
4691:
4692: v_retcode := 2;
4693: RAISE;

Line 4690: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_GROUP_COMPANIES');

4686: EXCEPTION
4687: WHEN OTHERS THEN
4688: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4689: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4690: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_GROUP_COMPANIES');
4691:
4692: v_retcode := 2;
4693: RAISE;
4694: ELSE

Line 4696: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4692: v_retcode := 2;
4693: RAISE;
4694: ELSE
4695: IF v_retcode < 2 THEN
4696: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4697: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_GROUP_COMPANIES');
4698: v_retcode := 1;
4699: END IF;
4700: RETURN;

Line 4697: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_GROUP_COMPANIES');

4693: RAISE;
4694: ELSE
4695: IF v_retcode < 2 THEN
4696: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4697: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_GROUP_COMPANIES');
4698: v_retcode := 1;
4699: END IF;
4700: RETURN;
4701: END IF;

Line 4707: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_INTERORG_SHIP_METHODS');

4703: PROCEDURE COPY_INTERORG_SHIP_METHODS IS
4704:
4705: BEGIN
4706:
4707: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_INTERORG_SHIP_METHODS');
4708: v_sql_stmt:=
4709: 'INSERT INTO MSC_ST_INTERORG_SHIP_METHODS ('
4710: || 'FROM_ORGANIZATION_ID,'
4711: || 'TO_ORGANIZATION_ID,'

Line 4855: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4851: ,v_inst_rp_src_id
4852: ,v_ascp_inst,v_icode
4853: ;
4854:
4855: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4856: COMMIT;
4857:
4858: EXCEPTION
4859: WHEN OTHERS THEN

Line 4861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4857:
4858: EXCEPTION
4859: WHEN OTHERS THEN
4860: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4862: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_INTERORG_SHIP_METHODS');
4863: v_retcode := 2;
4864: RAISE;
4865: ELSE

Line 4862: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_INTERORG_SHIP_METHODS');

4858: EXCEPTION
4859: WHEN OTHERS THEN
4860: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4862: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_INTERORG_SHIP_METHODS');
4863: v_retcode := 2;
4864: RAISE;
4865: ELSE
4866: IF v_retcode < 2 THEN

Line 4867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4863: v_retcode := 2;
4864: RAISE;
4865: ELSE
4866: IF v_retcode < 2 THEN
4867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4868: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_INTERORG_SHIP_METHODS');
4869: v_retcode := 1;
4870: END IF;
4871: RETURN;

Line 4868: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_INTERORG_SHIP_METHODS');

4864: RAISE;
4865: ELSE
4866: IF v_retcode < 2 THEN
4867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4868: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_INTERORG_SHIP_METHODS');
4869: v_retcode := 1;
4870: END IF;
4871: RETURN;
4872: END IF;

Line 4878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_CATEGORIES');

4874: PROCEDURE COPY_ITEM_CATEGORIES IS
4875:
4876: BEGIN
4877:
4878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_CATEGORIES');
4879: v_sql_stmt:=
4880: 'INSERT INTO MSC_ST_ITEM_CATEGORIES ('
4881: || 'INVENTORY_ITEM_ID,'
4882: || 'ORGANIZATION_ID,'

Line 4972: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

4968: ,v_ascp_inst,v_icode
4969: ,v_ascp_inst,v_icode
4970: ;
4971:
4972: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
4973: COMMIT;
4974:
4975: EXCEPTION
4976: WHEN OTHERS THEN

Line 4978: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

4974:
4975: EXCEPTION
4976: WHEN OTHERS THEN
4977: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4978: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4979: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_CATEGORIES');
4980: v_retcode := 2;
4981: RAISE;
4982: ELSE

Line 4979: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_CATEGORIES');

4975: EXCEPTION
4976: WHEN OTHERS THEN
4977: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
4978: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
4979: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_CATEGORIES');
4980: v_retcode := 2;
4981: RAISE;
4982: ELSE
4983: IF v_retcode < 2 THEN

Line 4984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

4980: v_retcode := 2;
4981: RAISE;
4982: ELSE
4983: IF v_retcode < 2 THEN
4984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4985: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_CATEGORIES');
4986: v_retcode := 1;
4987: END IF;
4988: RETURN;

Line 4985: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_CATEGORIES');

4981: RAISE;
4982: ELSE
4983: IF v_retcode < 2 THEN
4984: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
4985: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_CATEGORIES');
4986: v_retcode := 1;
4987: END IF;
4988: RETURN;
4989: END IF;

Line 4995: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_CUSTOMERS');

4991: PROCEDURE COPY_ITEM_CUSTOMERS IS
4992:
4993: BEGIN
4994:
4995: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_CUSTOMERS');
4996: v_sql_stmt:=
4997: 'INSERT INTO MSC_ST_ITEM_CUSTOMERS ('
4998: || 'INVENTORY_ITEM_ID,'
4999: || 'SR_INSTANCE_ID,'

Line 5078: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5074: v_inst_rp_src_id
5075: ,v_ascp_inst,v_icode
5076: ;
5077:
5078: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5079: COMMIT;
5080:
5081: EXCEPTION
5082: WHEN OTHERS THEN

Line 5084: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5080:
5081: EXCEPTION
5082: WHEN OTHERS THEN
5083: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5084: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5085: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_CUSTOMERS');
5086: v_retcode := 2;
5087: RAISE;
5088: ELSE

Line 5085: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_CUSTOMERS');

5081: EXCEPTION
5082: WHEN OTHERS THEN
5083: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5084: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5085: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_CUSTOMERS');
5086: v_retcode := 2;
5087: RAISE;
5088: ELSE
5089: IF v_retcode < 2 THEN

Line 5090: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5086: v_retcode := 2;
5087: RAISE;
5088: ELSE
5089: IF v_retcode < 2 THEN
5090: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5091: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_CUSTOMERS');
5092: v_retcode := 1;
5093: END IF;
5094: RETURN;

Line 5091: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_CUSTOMERS');

5087: RAISE;
5088: ELSE
5089: IF v_retcode < 2 THEN
5090: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5091: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_CUSTOMERS');
5092: v_retcode := 1;
5093: END IF;
5094: RETURN;
5095: END IF;

Line 5101: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_SOURCING');

5097: PROCEDURE COPY_ITEM_SOURCING IS
5098:
5099: BEGIN
5100:
5101: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_SOURCING');
5102: v_sql_stmt:=
5103: 'INSERT INTO MSC_ST_ITEM_SOURCING ('
5104: || 'SR_SOURCE_ID,'
5105: || 'SR_RECEIPT_ID,'

Line 5258: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5254: ,v_ascp_inst,v_icode
5255: ,v_ascp_inst,v_icode
5256: ;
5257:
5258: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5259: COMMIT;
5260:
5261: EXCEPTION
5262: WHEN OTHERS THEN

Line 5264: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5260:
5261: EXCEPTION
5262: WHEN OTHERS THEN
5263: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5264: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5265: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SOURCING');
5266: v_retcode := 2;
5267: RAISE;
5268: ELSE

Line 5265: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SOURCING');

5261: EXCEPTION
5262: WHEN OTHERS THEN
5263: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5264: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5265: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SOURCING');
5266: v_retcode := 2;
5267: RAISE;
5268: ELSE
5269: IF v_retcode < 2 THEN

Line 5270: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5266: v_retcode := 2;
5267: RAISE;
5268: ELSE
5269: IF v_retcode < 2 THEN
5270: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SOURCING');
5272: v_retcode := 1;
5273: END IF;
5274: RETURN;

Line 5271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SOURCING');

5267: RAISE;
5268: ELSE
5269: IF v_retcode < 2 THEN
5270: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SOURCING');
5272: v_retcode := 1;
5273: END IF;
5274: RETURN;
5275: END IF;

Line 5281: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_SUBSTITUTES');

5277: PROCEDURE COPY_ITEM_SUBSTITUTES IS
5278:
5279: BEGIN
5280:
5281: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_SUBSTITUTES');
5282: v_sql_stmt:=
5283: 'INSERT INTO MSC_ST_ITEM_SUBSTITUTES ('
5284: || 'SR_INSTANCE_ID,'
5285: || 'LOWER_ITEM_ID,'

Line 5366: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5362: v_inst_rp_src_id
5363: ,v_ascp_inst,v_icode
5364: ;
5365:
5366: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5367: COMMIT;
5368:
5369: EXCEPTION
5370: WHEN OTHERS THEN

Line 5372: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5368:
5369: EXCEPTION
5370: WHEN OTHERS THEN
5371: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5372: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SUBSTITUTES');
5374: v_retcode := 2;
5375: RAISE;
5376: ELSE

Line 5373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SUBSTITUTES');

5369: EXCEPTION
5370: WHEN OTHERS THEN
5371: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5372: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SUBSTITUTES');
5374: v_retcode := 2;
5375: RAISE;
5376: ELSE
5377: IF v_retcode < 2 THEN

Line 5378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5374: v_retcode := 2;
5375: RAISE;
5376: ELSE
5377: IF v_retcode < 2 THEN
5378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SUBSTITUTES');
5380: v_retcode := 1;
5381: END IF;
5382: RETURN;

Line 5379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SUBSTITUTES');

5375: RAISE;
5376: ELSE
5377: IF v_retcode < 2 THEN
5378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SUBSTITUTES');
5380: v_retcode := 1;
5381: END IF;
5382: RETURN;
5383: END IF;

Line 5389: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_SUPPLIERS');

5385: PROCEDURE COPY_ITEM_SUPPLIERS IS
5386:
5387: BEGIN
5388:
5389: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ITEM_SUPPLIERS');
5390: v_sql_stmt:=
5391: 'INSERT INTO MSC_ST_ITEM_SUPPLIERS ('
5392: || 'INVENTORY_ITEM_ID,'
5393: || 'ORGANIZATION_ID,'

Line 5521: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5517: ,v_ascp_inst,v_icode
5518: ,v_ascp_inst,v_icode
5519: ;
5520:
5521: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5522: COMMIT;
5523:
5524: EXCEPTION
5525: WHEN OTHERS THEN

Line 5527: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5523:
5524: EXCEPTION
5525: WHEN OTHERS THEN
5526: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5527: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5528: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SUPPLIERS');
5529: v_retcode := 2;
5530: RAISE;
5531: ELSE

Line 5528: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SUPPLIERS');

5524: EXCEPTION
5525: WHEN OTHERS THEN
5526: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5527: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5528: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ITEM_SUPPLIERS');
5529: v_retcode := 2;
5530: RAISE;
5531: ELSE
5532: IF v_retcode < 2 THEN

Line 5533: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5529: v_retcode := 2;
5530: RAISE;
5531: ELSE
5532: IF v_retcode < 2 THEN
5533: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5534: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SUPPLIERS');
5535: v_retcode := 1;
5536: END IF;
5537: RETURN;

Line 5534: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SUPPLIERS');

5530: RAISE;
5531: ELSE
5532: IF v_retcode < 2 THEN
5533: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5534: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ITEM_SUPPLIERS');
5535: v_retcode := 1;
5536: END IF;
5537: RETURN;
5538: END IF;

Line 5544: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_LOCATION_ASSOCIATIONS');

5540: PROCEDURE COPY_LOCATION_ASSOCIATIONS IS
5541:
5542: BEGIN
5543:
5544: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_LOCATION_ASSOCIATIONS');
5545: v_sql_stmt:=
5546: 'INSERT INTO MSC_ST_LOCATION_ASSOCIATIONS ('
5547: || 'LOCATION_ID,'
5548: || 'SR_INSTANCE_ID,'

Line 5633: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5629: ,v_ascp_inst,v_icode
5630: ,v_ascp_inst,v_icode
5631: ;
5632:
5633: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5634: COMMIT;
5635:
5636: EXCEPTION
5637: WHEN OTHERS THEN

Line 5639: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5635:
5636: EXCEPTION
5637: WHEN OTHERS THEN
5638: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5639: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5640: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_LOCATION_ASSOCIATIONS');
5641: v_retcode := 2;
5642: RAISE;
5643: ELSE

Line 5640: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_LOCATION_ASSOCIATIONS');

5636: EXCEPTION
5637: WHEN OTHERS THEN
5638: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5639: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5640: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_LOCATION_ASSOCIATIONS');
5641: v_retcode := 2;
5642: RAISE;
5643: ELSE
5644: IF v_retcode < 2 THEN

Line 5645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5641: v_retcode := 2;
5642: RAISE;
5643: ELSE
5644: IF v_retcode < 2 THEN
5645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5646: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_LOCATION_ASSOCIATIONS');
5647: v_retcode := 1;
5648: END IF;
5649: RETURN;

Line 5646: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_LOCATION_ASSOCIATIONS');

5642: RAISE;
5643: ELSE
5644: IF v_retcode < 2 THEN
5645: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5646: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_LOCATION_ASSOCIATIONS');
5647: v_retcode := 1;
5648: END IF;
5649: RETURN;
5650: END IF;

Line 5656: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_NET_RESOURCE_AVAIL');

5652: PROCEDURE COPY_NET_RESOURCE_AVAIL IS
5653:
5654: BEGIN
5655:
5656: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_NET_RESOURCE_AVAIL');
5657: v_sql_stmt:=
5658: 'INSERT INTO MSC_ST_NET_RESOURCE_AVAIL ('
5659: || 'ORGANIZATION_ID,'
5660: || 'DEPARTMENT_ID,'

Line 5714: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5710: EXECUTE IMMEDIATE v_sql_stmt USING
5711: v_inst_rp_src_id
5712: ;
5713:
5714: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5715: COMMIT;
5716:
5717: EXCEPTION
5718: WHEN OTHERS THEN

Line 5720: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5716:
5717: EXCEPTION
5718: WHEN OTHERS THEN
5719: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5720: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5721: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_NET_RESOURCE_AVAIL');
5722: v_retcode := 2;
5723: RAISE;
5724: ELSE

Line 5721: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_NET_RESOURCE_AVAIL');

5717: EXCEPTION
5718: WHEN OTHERS THEN
5719: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5720: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5721: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_NET_RESOURCE_AVAIL');
5722: v_retcode := 2;
5723: RAISE;
5724: ELSE
5725: IF v_retcode < 2 THEN

Line 5726: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5722: v_retcode := 2;
5723: RAISE;
5724: ELSE
5725: IF v_retcode < 2 THEN
5726: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5727: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_NET_RESOURCE_AVAIL');
5728: v_retcode := 1;
5729: END IF;
5730: RETURN;

Line 5727: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_NET_RESOURCE_AVAIL');

5723: RAISE;
5724: ELSE
5725: IF v_retcode < 2 THEN
5726: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5727: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_NET_RESOURCE_AVAIL');
5728: v_retcode := 1;
5729: END IF;
5730: RETURN;
5731: END IF;

Line 5737: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_COMPONENTS');

5733: PROCEDURE COPY_OPERATION_COMPONENTS IS
5734:
5735: BEGIN
5736:
5737: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_COMPONENTS');
5738: v_sql_stmt:=
5739: 'INSERT INTO MSC_ST_OPERATION_COMPONENTS ('
5740: || 'ORGANIZATION_ID,'
5741: || 'OPERATION_SEQUENCE_ID,'

Line 5785: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5781: EXECUTE IMMEDIATE v_sql_stmt USING
5782: v_inst_rp_src_id
5783: ;
5784:
5785: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5786: COMMIT;
5787:
5788: EXCEPTION
5789: WHEN OTHERS THEN

Line 5791: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5787:
5788: EXCEPTION
5789: WHEN OTHERS THEN
5790: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5791: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5792: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_COMPONENTS');
5793: v_retcode := 2;
5794: RAISE;
5795: ELSE

Line 5792: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_COMPONENTS');

5788: EXCEPTION
5789: WHEN OTHERS THEN
5790: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5791: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5792: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_COMPONENTS');
5793: v_retcode := 2;
5794: RAISE;
5795: ELSE
5796: IF v_retcode < 2 THEN

Line 5797: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5793: v_retcode := 2;
5794: RAISE;
5795: ELSE
5796: IF v_retcode < 2 THEN
5797: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5798: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_COMPONENTS');
5799: v_retcode := 1;
5800: END IF;
5801: RETURN;

Line 5798: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_COMPONENTS');

5794: RAISE;
5795: ELSE
5796: IF v_retcode < 2 THEN
5797: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5798: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_COMPONENTS');
5799: v_retcode := 1;
5800: END IF;
5801: RETURN;
5802: END IF;

Line 5808: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_NETWORKS:');

5804: PROCEDURE COPY_OPERATION_NETWORKS IS
5805:
5806: BEGIN
5807:
5808: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_NETWORKS:');
5809: v_sql_stmt:=
5810: 'INSERT INTO MSC_ST_OPERATION_NETWORKS ('
5811: || 'FROM_OP_SEQ_ID,'
5812: || 'TO_OP_SEQ_ID,'

Line 5964: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

5960: ,v_ascp_inst,v_icode
5961: ,v_ascp_inst,v_icode
5962: ;
5963:
5964: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
5965: COMMIT;
5966:
5967: EXCEPTION
5968: WHEN OTHERS THEN

Line 5970: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

5966:
5967: EXCEPTION
5968: WHEN OTHERS THEN
5969: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5970: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5971: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_NETWORKS');
5972: v_retcode := 2;
5973: RAISE;
5974: ELSE

Line 5971: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_NETWORKS');

5967: EXCEPTION
5968: WHEN OTHERS THEN
5969: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
5970: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
5971: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_NETWORKS');
5972: v_retcode := 2;
5973: RAISE;
5974: ELSE
5975: IF v_retcode < 2 THEN

Line 5976: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

5972: v_retcode := 2;
5973: RAISE;
5974: ELSE
5975: IF v_retcode < 2 THEN
5976: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5977: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_NETWORKS');
5978: v_retcode := 1;
5979: END IF;
5980: RETURN;

Line 5977: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_NETWORKS');

5973: RAISE;
5974: ELSE
5975: IF v_retcode < 2 THEN
5976: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
5977: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_NETWORKS');
5978: v_retcode := 1;
5979: END IF;
5980: RETURN;
5981: END IF;

Line 5987: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_RESOURCES');

5983: PROCEDURE COPY_OPERATION_RESOURCES IS
5984:
5985: BEGIN
5986:
5987: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_RESOURCES');
5988: v_sql_stmt:=
5989: 'INSERT INTO MSC_ST_OPERATION_RESOURCES ('
5990: || 'ROUTING_SEQUENCE_ID,'
5991: || 'RESOURCE_TYPE,'

Line 6119: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6115: ,v_ascp_inst,v_icode
6116: ,v_ascp_inst,v_icode
6117: ;
6118:
6119: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6120: COMMIT;
6121:
6122: EXCEPTION
6123: WHEN OTHERS THEN

Line 6125: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6121:
6122: EXCEPTION
6123: WHEN OTHERS THEN
6124: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6125: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6126: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_RESOURCES');
6127: v_retcode := 2;
6128: RAISE;
6129: ELSE

Line 6126: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_RESOURCES');

6122: EXCEPTION
6123: WHEN OTHERS THEN
6124: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6125: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6126: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_RESOURCES');
6127: v_retcode := 2;
6128: RAISE;
6129: ELSE
6130: IF v_retcode < 2 THEN

Line 6131: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6127: v_retcode := 2;
6128: RAISE;
6129: ELSE
6130: IF v_retcode < 2 THEN
6131: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_RESOURCES');
6133: v_retcode := 1;
6134: END IF;
6135: RETURN;

Line 6132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_RESOURCES');

6128: RAISE;
6129: ELSE
6130: IF v_retcode < 2 THEN
6131: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_RESOURCES');
6133: v_retcode := 1;
6134: END IF;
6135: RETURN;
6136: END IF;

Line 6142: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_RESOURCE_SEQS');

6138: PROCEDURE COPY_OPERATION_RESOURCE_SEQS IS
6139:
6140: BEGIN
6141:
6142: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_OPERATION_RESOURCE_SEQS');
6143: v_sql_stmt:=
6144: 'INSERT INTO MSC_ST_OPERATION_RESOURCE_SEQS ('
6145: || 'ROUTING_SEQUENCE_ID,'
6146: || 'OPERATION_SEQUENCE_ID,'

Line 6198: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6194: EXECUTE IMMEDIATE v_sql_stmt USING
6195: v_inst_rp_src_id
6196: ;
6197:
6198: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6199: COMMIT;
6200:
6201: EXCEPTION
6202: WHEN OTHERS THEN

Line 6204: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6200:
6201: EXCEPTION
6202: WHEN OTHERS THEN
6203: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6204: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_RESOURCE_SEQS');
6206: v_retcode := 2;
6207: RAISE;
6208: ELSE

Line 6205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_RESOURCE_SEQS');

6201: EXCEPTION
6202: WHEN OTHERS THEN
6203: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6204: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6205: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_OPERATION_RESOURCE_SEQS');
6206: v_retcode := 2;
6207: RAISE;
6208: ELSE
6209: IF v_retcode < 2 THEN

Line 6210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6206: v_retcode := 2;
6207: RAISE;
6208: ELSE
6209: IF v_retcode < 2 THEN
6210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6211: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_RESOURCE_SEQS');
6212: v_retcode := 1;
6213: END IF;
6214: RETURN;

Line 6211: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_RESOURCE_SEQS');

6207: RAISE;
6208: ELSE
6209: IF v_retcode < 2 THEN
6210: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6211: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_OPERATION_RESOURCE_SEQS');
6212: v_retcode := 1;
6213: END IF;
6214: RETURN;
6215: END IF;

Line 6221: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PARAMETERS');

6217: PROCEDURE COPY_PARAMETERS IS
6218:
6219: BEGIN
6220:
6221: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PARAMETERS');
6222: v_sql_stmt:=
6223: 'INSERT INTO MSC_ST_PARAMETERS ('
6224: || 'ORGANIZATION_ID,'
6225: || 'DEMAND_TIME_FENCE_FLAG,'

Line 6303: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6299: EXECUTE IMMEDIATE v_sql_stmt USING
6300: v_inst_rp_src_id
6301: ;
6302:
6303: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6304: COMMIT;
6305:
6306: EXCEPTION
6307: WHEN OTHERS THEN

Line 6309: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6305:
6306: EXCEPTION
6307: WHEN OTHERS THEN
6308: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6309: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6310: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PARAMETERS');
6311: v_retcode := 2;
6312: RAISE;
6313: ELSE

Line 6310: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PARAMETERS');

6306: EXCEPTION
6307: WHEN OTHERS THEN
6308: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6309: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6310: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PARAMETERS');
6311: v_retcode := 2;
6312: RAISE;
6313: ELSE
6314: IF v_retcode < 2 THEN

Line 6315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6311: v_retcode := 2;
6312: RAISE;
6313: ELSE
6314: IF v_retcode < 2 THEN
6315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6316: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PARAMETERS');
6317: v_retcode := 1;
6318: END IF;
6319: RETURN;

Line 6316: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PARAMETERS');

6312: RAISE;
6313: ELSE
6314: IF v_retcode < 2 THEN
6315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6316: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PARAMETERS');
6317: v_retcode := 1;
6318: END IF;
6319: RETURN;
6320: END IF;

Line 6326: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PARTNER_CONTACTS');

6322: PROCEDURE COPY_PARTNER_CONTACTS IS
6323:
6324: BEGIN
6325:
6326: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PARTNER_CONTACTS');
6327: v_sql_stmt:=
6328: 'INSERT INTO MSC_ST_PARTNER_CONTACTS ('
6329: || 'NAME,'
6330: || 'DISPLAY_NAME,'

Line 6404: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6400: ,v_ascp_inst,v_icode
6401: ,v_ascp_inst,v_icode
6402: ;
6403:
6404: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6405: COMMIT;
6406:
6407: EXCEPTION
6408: WHEN OTHERS THEN

Line 6410: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6406:
6407: EXCEPTION
6408: WHEN OTHERS THEN
6409: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6410: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PARTNER_CONTACTS');
6412: v_retcode := 2;
6413: RAISE;
6414: ELSE

Line 6411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PARTNER_CONTACTS');

6407: EXCEPTION
6408: WHEN OTHERS THEN
6409: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6410: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PARTNER_CONTACTS');
6412: v_retcode := 2;
6413: RAISE;
6414: ELSE
6415: IF v_retcode < 2 THEN

Line 6416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6412: v_retcode := 2;
6413: RAISE;
6414: ELSE
6415: IF v_retcode < 2 THEN
6416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PARTNER_CONTACTS');
6418: v_retcode := 1;
6419: END IF;
6420: RETURN;

Line 6417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PARTNER_CONTACTS');

6413: RAISE;
6414: ELSE
6415: IF v_retcode < 2 THEN
6416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PARTNER_CONTACTS');
6418: v_retcode := 1;
6419: END IF;
6420: RETURN;
6421: END IF;

Line 6427: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PERIOD_START_DATES');

6423: PROCEDURE COPY_PERIOD_START_DATES IS
6424:
6425: BEGIN
6426:
6427: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PERIOD_START_DATES');
6428: v_sql_stmt:=
6429: 'INSERT INTO MSC_ST_PERIOD_START_DATES ('
6430: || 'CALENDAR_CODE,'
6431: || 'EXCEPTION_SET_ID,'

Line 6480: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6476: v_ascp_inst,v_icode
6477: ,v_inst_rp_src_id
6478: ;
6479:
6480: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6481: COMMIT;
6482:
6483: EXCEPTION
6484: WHEN OTHERS THEN

Line 6486: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6482:
6483: EXCEPTION
6484: WHEN OTHERS THEN
6485: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6486: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6487: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PERIOD_START_DATES');
6488: v_retcode := 2;
6489: RAISE;
6490: ELSE

Line 6487: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PERIOD_START_DATES');

6483: EXCEPTION
6484: WHEN OTHERS THEN
6485: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6486: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6487: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PERIOD_START_DATES');
6488: v_retcode := 2;
6489: RAISE;
6490: ELSE
6491: IF v_retcode < 2 THEN

Line 6492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6488: v_retcode := 2;
6489: RAISE;
6490: ELSE
6491: IF v_retcode < 2 THEN
6492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PERIOD_START_DATES');
6494: v_retcode := 1;
6495: END IF;
6496: RETURN;

Line 6493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PERIOD_START_DATES');

6489: RAISE;
6490: ELSE
6491: IF v_retcode < 2 THEN
6492: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6493: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PERIOD_START_DATES');
6494: v_retcode := 1;
6495: END IF;
6496: RETURN;
6497: END IF;

Line 6503: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PLANNERS');

6499: PROCEDURE COPY_PLANNERS IS
6500:
6501: BEGIN
6502:
6503: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PLANNERS');
6504: v_sql_stmt:=
6505: 'INSERT INTO MSC_ST_PLANNERS ('
6506: || 'PLANNER_CODE,'
6507: || 'ORGANIZATION_ID,'

Line 6609: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6605: ,v_ascp_inst,v_icode
6606: ,v_ascp_inst,v_icode
6607: ;
6608:
6609: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6610: COMMIT;
6611:
6612: EXCEPTION
6613: WHEN OTHERS THEN

Line 6615: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6611:
6612: EXCEPTION
6613: WHEN OTHERS THEN
6614: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6615: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6616: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PLANNERS');
6617: v_retcode := 2;
6618: RAISE;
6619: ELSE

Line 6616: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PLANNERS');

6612: EXCEPTION
6613: WHEN OTHERS THEN
6614: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6615: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6616: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PLANNERS');
6617: v_retcode := 2;
6618: RAISE;
6619: ELSE
6620: IF v_retcode < 2 THEN

Line 6621: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6617: v_retcode := 2;
6618: RAISE;
6619: ELSE
6620: IF v_retcode < 2 THEN
6621: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6622: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PLANNERS');
6623: v_retcode := 1;
6624: END IF;
6625: RETURN;

Line 6622: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PLANNERS');

6618: RAISE;
6619: ELSE
6620: IF v_retcode < 2 THEN
6621: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6622: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PLANNERS');
6623: v_retcode := 1;
6624: END IF;
6625: RETURN;
6626: END IF;

Line 6632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PROCESS_EFFECTIVITY');

6628: PROCEDURE COPY_PROCESS_EFFECTIVITY IS
6629:
6630: BEGIN
6631:
6632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PROCESS_EFFECTIVITY');
6633: v_sql_stmt:=
6634: 'INSERT INTO MSC_ST_PROCESS_EFFECTIVITY ('
6635: || 'PROCESS_SEQUENCE_ID,'
6636: || 'ITEM_ID,'

Line 6703: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6699: EXECUTE IMMEDIATE v_sql_stmt USING
6700: v_inst_rp_src_id
6701: ;
6702:
6703: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6704: COMMIT;
6705:
6706: EXCEPTION
6707: WHEN OTHERS THEN

Line 6709: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6705:
6706: EXCEPTION
6707: WHEN OTHERS THEN
6708: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6709: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6710: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROCESS_EFFECTIVITY');
6711: v_retcode := 2;
6712: RAISE;
6713: ELSE

Line 6710: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROCESS_EFFECTIVITY');

6706: EXCEPTION
6707: WHEN OTHERS THEN
6708: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6709: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6710: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROCESS_EFFECTIVITY');
6711: v_retcode := 2;
6712: RAISE;
6713: ELSE
6714: IF v_retcode < 2 THEN

Line 6715: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6711: v_retcode := 2;
6712: RAISE;
6713: ELSE
6714: IF v_retcode < 2 THEN
6715: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROCESS_EFFECTIVITY');
6717: v_retcode := 1;
6718: END IF;
6719: RETURN;

Line 6716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROCESS_EFFECTIVITY');

6712: RAISE;
6713: ELSE
6714: IF v_retcode < 2 THEN
6715: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROCESS_EFFECTIVITY');
6717: v_retcode := 1;
6718: END IF;
6719: RETURN;
6720: END IF;

Line 6726: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PROJECTS');

6722: PROCEDURE COPY_PROJECTS IS
6723:
6724: BEGIN
6725:
6726: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PROJECTS');
6727: v_sql_stmt:=
6728: 'INSERT INTO MSC_ST_PROJECTS ('
6729: || 'PROJECT_ID,'
6730: || 'ORGANIZATION_ID,'

Line 6800: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6796:
6797: EXCEPTION
6798: WHEN OTHERS THEN
6799: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6800: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6801: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROJECTS');
6802: v_retcode := 2;
6803: RAISE;
6804: ELSE

Line 6801: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROJECTS');

6797: EXCEPTION
6798: WHEN OTHERS THEN
6799: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6800: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6801: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROJECTS');
6802: v_retcode := 2;
6803: RAISE;
6804: ELSE
6805: IF v_retcode < 2 THEN

Line 6806: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6802: v_retcode := 2;
6803: RAISE;
6804: ELSE
6805: IF v_retcode < 2 THEN
6806: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6807: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROJECTS');
6808: v_retcode := 1;
6809: END IF;
6810: RETURN;

Line 6807: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROJECTS');

6803: RAISE;
6804: ELSE
6805: IF v_retcode < 2 THEN
6806: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6807: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROJECTS');
6808: v_retcode := 1;
6809: END IF;
6810: RETURN;
6811: END IF;

Line 6817: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PROJECT_TASKS');

6813: PROCEDURE COPY_PROJECT_TASKS IS
6814:
6815: BEGIN
6816:
6817: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_PROJECT_TASKS');
6818: v_sql_stmt:=
6819: 'INSERT INTO MSC_ST_PROJECT_TASKS ('
6820: || 'PROJECT_ID,'
6821: || 'TASK_ID,'

Line 6925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

6921: ,v_ascp_inst,v_icode
6922: ,v_ascp_inst,v_icode
6923: ;
6924:
6925: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
6926: COMMIT;
6927:
6928: EXCEPTION
6929: WHEN OTHERS THEN

Line 6931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

6927:
6928: EXCEPTION
6929: WHEN OTHERS THEN
6930: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6932: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROJECT_TASKS');
6933: v_retcode := 2;
6934: RAISE;
6935: ELSE

Line 6932: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROJECT_TASKS');

6928: EXCEPTION
6929: WHEN OTHERS THEN
6930: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
6931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
6932: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_PROJECT_TASKS');
6933: v_retcode := 2;
6934: RAISE;
6935: ELSE
6936: IF v_retcode < 2 THEN

Line 6937: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

6933: v_retcode := 2;
6934: RAISE;
6935: ELSE
6936: IF v_retcode < 2 THEN
6937: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6938: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROJECT_TASKS');
6939: v_retcode := 1;
6940: END IF;
6941: RETURN;

Line 6938: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROJECT_TASKS');

6934: RAISE;
6935: ELSE
6936: IF v_retcode < 2 THEN
6937: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
6938: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_PROJECT_TASKS');
6939: v_retcode := 1;
6940: END IF;
6941: RETURN;
6942: END IF;

Line 6948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_REGIONS');

6944: PROCEDURE COPY_REGIONS IS
6945:
6946: BEGIN
6947:
6948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_REGIONS');
6949: v_sql_stmt:=
6950: 'INSERT INTO MSC_ST_REGIONS ('
6951: || 'REGION_ID,'
6952: || 'REGION_TYPE,'

Line 7054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7050: v_inst_rp_src_id
7051: ,v_ascp_inst,v_icode
7052: ;
7053:
7054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7055: COMMIT;
7056:
7057: EXCEPTION
7058: WHEN OTHERS THEN

Line 7060: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7056:
7057: EXCEPTION
7058: WHEN OTHERS THEN
7059: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7060: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7061: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGIONS');
7062: v_retcode := 2;
7063: RAISE;
7064: ELSE

Line 7061: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGIONS');

7057: EXCEPTION
7058: WHEN OTHERS THEN
7059: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7060: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7061: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGIONS');
7062: v_retcode := 2;
7063: RAISE;
7064: ELSE
7065: IF v_retcode < 2 THEN

Line 7066: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7062: v_retcode := 2;
7063: RAISE;
7064: ELSE
7065: IF v_retcode < 2 THEN
7066: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7067: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGIONS');
7068: v_retcode := 1;
7069: END IF;
7070: RETURN;

Line 7067: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGIONS');

7063: RAISE;
7064: ELSE
7065: IF v_retcode < 2 THEN
7066: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7067: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGIONS');
7068: v_retcode := 1;
7069: END IF;
7070: RETURN;
7071: END IF;

Line 7077: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_REGION_LOCATIONS');

7073: PROCEDURE COPY_REGION_LOCATIONS IS
7074:
7075: BEGIN
7076:
7077: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_REGION_LOCATIONS');
7078: v_sql_stmt:=
7079: 'INSERT INTO MSC_ST_REGION_LOCATIONS ('
7080: || 'REGION_ID,'
7081: || 'LOCATION_ID,'

Line 7160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7156: v_inst_rp_src_id
7157: ,v_ascp_inst,v_icode
7158: ;
7159:
7160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7161: COMMIT;
7162:
7163: EXCEPTION
7164: WHEN OTHERS THEN

Line 7166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7162:
7163: EXCEPTION
7164: WHEN OTHERS THEN
7165: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7167: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGION_LOCATIONS');
7168: v_retcode := 2;
7169: RAISE;
7170: ELSE

Line 7167: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGION_LOCATIONS');

7163: EXCEPTION
7164: WHEN OTHERS THEN
7165: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7167: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_REGION_LOCATIONS');
7168: v_retcode := 2;
7169: RAISE;
7170: ELSE
7171: IF v_retcode < 2 THEN

Line 7172: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7168: v_retcode := 2;
7169: RAISE;
7170: ELSE
7171: IF v_retcode < 2 THEN
7172: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGION_LOCATIONS');
7174: v_retcode := 1;
7175: END IF;
7176: RETURN;

Line 7173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGION_LOCATIONS');

7169: RAISE;
7170: ELSE
7171: IF v_retcode < 2 THEN
7172: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7173: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_REGION_LOCATIONS');
7174: v_retcode := 1;
7175: END IF;
7176: RETURN;
7177: END IF;

Line 7184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESERVATIONS');

7180: PROCEDURE COPY_RESERVATIONS IS
7181:
7182: BEGIN
7183:
7184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESERVATIONS');
7185: v_sql_stmt:=
7186: 'INSERT INTO MSC_ST_RESERVATIONS ('
7187: || 'INVENTORY_ITEM_ID,'
7188: || 'ORGANIZATION_ID,'

Line 7287: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7283: ,v_ascp_inst,v_icode
7284: ,v_ascp_inst,v_icode
7285: ;
7286:
7287: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7288: COMMIT;
7289:
7290: EXCEPTION
7291: WHEN OTHERS THEN

Line 7293: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7289:
7290: EXCEPTION
7291: WHEN OTHERS THEN
7292: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7293: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7294: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESERVATIONS');
7295: v_retcode := 2;
7296: RAISE;
7297: ELSE

Line 7294: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESERVATIONS');

7290: EXCEPTION
7291: WHEN OTHERS THEN
7292: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7293: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7294: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESERVATIONS');
7295: v_retcode := 2;
7296: RAISE;
7297: ELSE
7298: IF v_retcode < 2 THEN

Line 7299: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7295: v_retcode := 2;
7296: RAISE;
7297: ELSE
7298: IF v_retcode < 2 THEN
7299: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESERVATIONS');
7301: v_retcode := 1;
7302: END IF;
7303: RETURN;

Line 7300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESERVATIONS');

7296: RAISE;
7297: ELSE
7298: IF v_retcode < 2 THEN
7299: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7300: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESERVATIONS');
7301: v_retcode := 1;
7302: END IF;
7303: RETURN;
7304: END IF;

Line 7311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_CHANGES');

7307: PROCEDURE COPY_RESOURCE_CHANGES IS
7308:
7309: BEGIN
7310:
7311: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_CHANGES');
7312: v_sql_stmt:=
7313: 'INSERT INTO MSC_ST_RESOURCE_CHANGES ('
7314: || 'DEPARTMENT_ID,'
7315: || 'RESOURCE_ID,'

Line 7400: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7396: ,v_ascp_inst,v_icode
7397: ,v_ascp_inst,v_icode
7398: ;
7399:
7400: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7401: COMMIT;
7402:
7403: EXCEPTION
7404: WHEN OTHERS THEN

Line 7406: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7402:
7403: EXCEPTION
7404: WHEN OTHERS THEN
7405: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7406: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_CHANGES');
7408: v_retcode := 2;
7409: RAISE;
7410: ELSE

Line 7407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_CHANGES');

7403: EXCEPTION
7404: WHEN OTHERS THEN
7405: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7406: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7407: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_CHANGES');
7408: v_retcode := 2;
7409: RAISE;
7410: ELSE
7411: IF v_retcode < 2 THEN

Line 7412: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7408: v_retcode := 2;
7409: RAISE;
7410: ELSE
7411: IF v_retcode < 2 THEN
7412: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7413: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_CHANGES');
7414: v_retcode := 1;
7415: END IF;
7416: RETURN;

Line 7413: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_CHANGES');

7409: RAISE;
7410: ELSE
7411: IF v_retcode < 2 THEN
7412: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7413: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_CHANGES');
7414: v_retcode := 1;
7415: END IF;
7416: RETURN;
7417: END IF;

Line 7424: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_GROUPS');

7420: PROCEDURE COPY_RESOURCE_GROUPS IS
7421:
7422: BEGIN
7423:
7424: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_GROUPS');
7425: v_sql_stmt:=
7426: 'INSERT INTO MSC_ST_RESOURCE_GROUPS ('
7427: || 'GROUP_CODE,'
7428: || 'MEANING,'

Line 7524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7520: v_inst_rp_src_id
7521: ,v_ascp_inst,v_icode
7522: ;
7523:
7524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7525: COMMIT;
7526:
7527: EXCEPTION
7528: WHEN OTHERS THEN

Line 7530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7526:
7527: EXCEPTION
7528: WHEN OTHERS THEN
7529: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7531: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_GROUPS');
7532: v_retcode := 2;
7533: RAISE;
7534: ELSE

Line 7531: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_GROUPS');

7527: EXCEPTION
7528: WHEN OTHERS THEN
7529: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7531: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_GROUPS');
7532: v_retcode := 2;
7533: RAISE;
7534: ELSE
7535: IF v_retcode < 2 THEN

Line 7536: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7532: v_retcode := 2;
7533: RAISE;
7534: ELSE
7535: IF v_retcode < 2 THEN
7536: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7537: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_GROUPS');
7538: v_retcode := 1;
7539: END IF;
7540: RETURN;

Line 7537: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_GROUPS');

7533: RAISE;
7534: ELSE
7535: IF v_retcode < 2 THEN
7536: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7537: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_GROUPS');
7538: v_retcode := 1;
7539: END IF;
7540: RETURN;
7541: END IF;

Line 7548: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_REQUIREMENTS');

7544: PROCEDURE COPY_RESOURCE_REQUIREMENTS IS
7545:
7546: BEGIN
7547:
7548: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_REQUIREMENTS');
7549: v_sql_stmt:=
7550: 'INSERT INTO MSC_ST_RESOURCE_REQUIREMENTS ('
7551: || 'DEPARTMENT_ID,'
7552: || 'RESOURCE_ID,'

Line 7738: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7734: ,v_ascp_inst,v_icode
7735: ,v_ascp_inst,v_icode
7736: ;
7737:
7738: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7739: COMMIT;
7740:
7741: EXCEPTION
7742: WHEN OTHERS THEN

Line 7744: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7740:
7741: EXCEPTION
7742: WHEN OTHERS THEN
7743: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7744: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7745: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_REQUIREMENTS');
7746: v_retcode := 2;
7747: RAISE;
7748: ELSE

Line 7745: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_REQUIREMENTS');

7741: EXCEPTION
7742: WHEN OTHERS THEN
7743: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7744: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7745: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_REQUIREMENTS');
7746: v_retcode := 2;
7747: RAISE;
7748: ELSE
7749: IF v_retcode < 2 THEN

Line 7750: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7746: v_retcode := 2;
7747: RAISE;
7748: ELSE
7749: IF v_retcode < 2 THEN
7750: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7751: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_REQUIREMENTS');
7752: v_retcode := 1;
7753: END IF;
7754: RETURN;

Line 7751: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_REQUIREMENTS');

7747: RAISE;
7748: ELSE
7749: IF v_retcode < 2 THEN
7750: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7751: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_REQUIREMENTS');
7752: v_retcode := 1;
7753: END IF;
7754: RETURN;
7755: END IF;

Line 7762: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_SHIFTS');

7758: PROCEDURE COPY_RESOURCE_SHIFTS IS
7759:
7760: BEGIN
7761:
7762: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_SHIFTS');
7763: v_sql_stmt:=
7764: 'INSERT INTO MSC_ST_RESOURCE_SHIFTS ('
7765: || 'DEPARTMENT_ID,'
7766: || 'RESOURCE_ID,'

Line 7836: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

7832: ,v_ascp_inst,v_icode
7833: ,v_ascp_inst,v_icode
7834: ;
7835:
7836: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
7837: COMMIT;
7838:
7839: EXCEPTION
7840: WHEN OTHERS THEN

Line 7842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

7838:
7839: EXCEPTION
7840: WHEN OTHERS THEN
7841: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_SHIFTS');
7844: v_retcode := 2;
7845: RAISE;
7846: ELSE

Line 7843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_SHIFTS');

7839: EXCEPTION
7840: WHEN OTHERS THEN
7841: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
7842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
7843: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_SHIFTS');
7844: v_retcode := 2;
7845: RAISE;
7846: ELSE
7847: IF v_retcode < 2 THEN

Line 7848: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

7844: v_retcode := 2;
7845: RAISE;
7846: ELSE
7847: IF v_retcode < 2 THEN
7848: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7849: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_SHIFTS');
7850: v_retcode := 1;
7851: END IF;
7852: RETURN;

Line 7849: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_SHIFTS');

7845: RAISE;
7846: ELSE
7847: IF v_retcode < 2 THEN
7848: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
7849: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_RESOURCE_SHIFTS');
7850: v_retcode := 1;
7851: END IF;
7852: RETURN;
7853: END IF;

Line 7860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ROUTINGS');

7856: PROCEDURE COPY_ROUTINGS IS
7857:
7858: BEGIN
7859:
7860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ROUTINGS');
7861: v_sql_stmt:=
7862: 'INSERT INTO MSC_ST_ROUTINGS ('
7863: || 'ROUTING_SEQUENCE_ID,'
7864: || 'ASSEMBLY_ITEM_ID,'

Line 8004: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8000: ,v_ascp_inst,v_icode
8001: ,v_ascp_inst,v_icode
8002: ;
8003:
8004: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8005: COMMIT;
8006:
8007: EXCEPTION
8008: WHEN OTHERS THEN

Line 8010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8006:
8007: EXCEPTION
8008: WHEN OTHERS THEN
8009: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8011: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ROUTINGS');
8012: v_retcode := 2;
8013: RAISE;
8014: ELSE

Line 8011: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ROUTINGS');

8007: EXCEPTION
8008: WHEN OTHERS THEN
8009: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8010: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8011: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ROUTINGS');
8012: v_retcode := 2;
8013: RAISE;
8014: ELSE
8015: IF v_retcode < 2 THEN

Line 8016: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8012: v_retcode := 2;
8013: RAISE;
8014: ELSE
8015: IF v_retcode < 2 THEN
8016: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8017: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ROUTINGS');
8018: v_retcode := 1;
8019: END IF;
8020: RETURN;

Line 8017: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ROUTINGS');

8013: RAISE;
8014: ELSE
8015: IF v_retcode < 2 THEN
8016: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8017: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ROUTINGS');
8018: v_retcode := 1;
8019: END IF;
8020: RETURN;
8021: END IF;

Line 8028: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ROUTING_OPERATIONS');

8024: PROCEDURE COPY_ROUTING_OPERATIONS IS
8025:
8026: BEGIN
8027:
8028: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ROUTING_OPERATIONS');
8029: v_sql_stmt:=
8030: 'INSERT INTO MSC_ST_ROUTING_OPERATIONS ('
8031: || 'OPERATION_SEQUENCE_ID,'
8032: || 'ROUTING_SEQUENCE_ID,'

Line 8154: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8150: ,v_ascp_inst,v_icode
8151: ,v_ascp_inst,v_icode
8152: ;
8153:
8154: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8155: COMMIT;
8156:
8157: EXCEPTION
8158: WHEN OTHERS THEN

Line 8160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8156:
8157: EXCEPTION
8158: WHEN OTHERS THEN
8159: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8161: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ROUTING_OPERATIONS');
8162: v_retcode := 2;
8163: RAISE;
8164: ELSE

Line 8161: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ROUTING_OPERATIONS');

8157: EXCEPTION
8158: WHEN OTHERS THEN
8159: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8160: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8161: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ROUTING_OPERATIONS');
8162: v_retcode := 2;
8163: RAISE;
8164: ELSE
8165: IF v_retcode < 2 THEN

Line 8166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8162: v_retcode := 2;
8163: RAISE;
8164: ELSE
8165: IF v_retcode < 2 THEN
8166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8167: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ROUTING_OPERATIONS');
8168: v_retcode := 1;
8169: END IF;
8170: RETURN;

Line 8167: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ROUTING_OPERATIONS');

8163: RAISE;
8164: ELSE
8165: IF v_retcode < 2 THEN
8166: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8167: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ROUTING_OPERATIONS');
8168: v_retcode := 1;
8169: END IF;
8170: RETURN;
8171: END IF;

Line 8178: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SAFETY_STOCKS');

8174: PROCEDURE COPY_SAFETY_STOCKS IS
8175:
8176: BEGIN
8177:
8178: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SAFETY_STOCKS');
8179: v_sql_stmt:=
8180: 'INSERT INTO MSC_ST_SAFETY_STOCKS ('
8181: || 'ORGANIZATION_ID,'
8182: || 'INVENTORY_ITEM_ID,'

Line 8260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8256: ,v_ascp_inst,v_icode
8257: ,v_ascp_inst,v_icode
8258: ;
8259:
8260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8261: COMMIT;
8262:
8263: EXCEPTION
8264: WHEN OTHERS THEN

Line 8266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8262:
8263: EXCEPTION
8264: WHEN OTHERS THEN
8265: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8267: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SAFETY_STOCKS');
8268: v_retcode := 2;
8269: RAISE;
8270: ELSE

Line 8267: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SAFETY_STOCKS');

8263: EXCEPTION
8264: WHEN OTHERS THEN
8265: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8267: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SAFETY_STOCKS');
8268: v_retcode := 2;
8269: RAISE;
8270: ELSE
8271: IF v_retcode < 2 THEN

Line 8272: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8268: v_retcode := 2;
8269: RAISE;
8270: ELSE
8271: IF v_retcode < 2 THEN
8272: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8273: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SAFETY_STOCKS');
8274: v_retcode := 1;
8275: END IF;
8276: RETURN;

Line 8273: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SAFETY_STOCKS');

8269: RAISE;
8270: ELSE
8271: IF v_retcode < 2 THEN
8272: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8273: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SAFETY_STOCKS');
8274: v_retcode := 1;
8275: END IF;
8276: RETURN;
8277: END IF;

Line 8284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SALES_ORDERS');

8280: PROCEDURE COPY_SALES_ORDERS IS
8281:
8282: BEGIN
8283:
8284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SALES_ORDERS');
8285: v_sql_stmt:=
8286: 'INSERT INTO MSC_ST_SALES_ORDERS ('
8287: || 'INVENTORY_ITEM_ID,'
8288: || 'ORGANIZATION_ID,'

Line 8517: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8513: ,v_ascp_inst,v_icode
8514: ,v_ascp_inst,v_icode
8515: ;
8516:
8517: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8518: COMMIT;
8519:
8520: EXCEPTION
8521: WHEN OTHERS THEN

Line 8523: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8519:
8520: EXCEPTION
8521: WHEN OTHERS THEN
8522: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8523: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SALES_ORDERS');
8525: v_retcode := 2;
8526: RAISE;
8527: ELSE

Line 8524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SALES_ORDERS');

8520: EXCEPTION
8521: WHEN OTHERS THEN
8522: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8523: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8524: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SALES_ORDERS');
8525: v_retcode := 2;
8526: RAISE;
8527: ELSE
8528: IF v_retcode < 2 THEN

Line 8529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8525: v_retcode := 2;
8526: RAISE;
8527: ELSE
8528: IF v_retcode < 2 THEN
8529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SALES_ORDERS');
8531: v_retcode := 1;
8532: END IF;
8533: RETURN;

Line 8530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SALES_ORDERS');

8526: RAISE;
8527: ELSE
8528: IF v_retcode < 2 THEN
8529: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8530: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SALES_ORDERS');
8531: v_retcode := 1;
8532: END IF;
8533: RETURN;
8534: END IF;

Line 8541: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SHIFT_DATES');

8537: PROCEDURE COPY_SHIFT_DATES IS
8538:
8539: BEGIN
8540:
8541: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SHIFT_DATES');
8542: v_sql_stmt:=
8543: 'INSERT INTO MSC_ST_SHIFT_DATES ('
8544: || 'CALENDAR_CODE,'
8545: || 'EXCEPTION_SET_ID,'

Line 8599: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8595: v_ascp_inst,v_icode
8596: ,v_inst_rp_src_id
8597: ;
8598:
8599: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8600: COMMIT;
8601:
8602: EXCEPTION
8603: WHEN OTHERS THEN

Line 8605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8601:
8602: EXCEPTION
8603: WHEN OTHERS THEN
8604: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8606: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_DATES');
8607: v_retcode := 2;
8608: RAISE;
8609: ELSE

Line 8606: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_DATES');

8602: EXCEPTION
8603: WHEN OTHERS THEN
8604: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8606: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_DATES');
8607: v_retcode := 2;
8608: RAISE;
8609: ELSE
8610: IF v_retcode < 2 THEN

Line 8611: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8607: v_retcode := 2;
8608: RAISE;
8609: ELSE
8610: IF v_retcode < 2 THEN
8611: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8612: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_DATES');
8613: v_retcode := 1;
8614: END IF;
8615: RETURN;

Line 8612: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_DATES');

8608: RAISE;
8609: ELSE
8610: IF v_retcode < 2 THEN
8611: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8612: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_DATES');
8613: v_retcode := 1;
8614: END IF;
8615: RETURN;
8616: END IF;

Line 8623: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SHIFT_EXCEPTIONS');

8619: PROCEDURE COPY_SHIFT_EXCEPTIONS IS
8620:
8621: BEGIN
8622:
8623: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SHIFT_EXCEPTIONS');
8624: v_sql_stmt:=
8625: 'INSERT INTO MSC_ST_SHIFT_EXCEPTIONS ('
8626: || 'CALENDAR_CODE,'
8627: || 'SHIFT_NUM,'

Line 8692: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8688: ,v_inst_rp_src_id
8689: ,v_ascp_inst,v_icode
8690: ;
8691:
8692: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8693: COMMIT;
8694:
8695: EXCEPTION
8696: WHEN OTHERS THEN

Line 8698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8694:
8695: EXCEPTION
8696: WHEN OTHERS THEN
8697: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8699: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_EXCEPTIONS');
8700: v_retcode := 2;
8701: RAISE;
8702: ELSE

Line 8699: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_EXCEPTIONS');

8695: EXCEPTION
8696: WHEN OTHERS THEN
8697: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8698: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8699: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_EXCEPTIONS');
8700: v_retcode := 2;
8701: RAISE;
8702: ELSE
8703: IF v_retcode < 2 THEN

Line 8704: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8700: v_retcode := 2;
8701: RAISE;
8702: ELSE
8703: IF v_retcode < 2 THEN
8704: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8705: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_EXCEPTIONS');
8706: v_retcode := 1;
8707: END IF;
8708: RETURN;

Line 8705: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_EXCEPTIONS');

8701: RAISE;
8702: ELSE
8703: IF v_retcode < 2 THEN
8704: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8705: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_EXCEPTIONS');
8706: v_retcode := 1;
8707: END IF;
8708: RETURN;
8709: END IF;

Line 8716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SHIFT_TIMES');

8712: PROCEDURE COPY_SHIFT_TIMES IS
8713:
8714: BEGIN
8715:
8716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SHIFT_TIMES');
8717: v_sql_stmt:=
8718: 'INSERT INTO MSC_ST_SHIFT_TIMES ('
8719: || 'CALENDAR_CODE,'
8720: || 'SHIFT_NUM,'

Line 8783: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8779: ,v_inst_rp_src_id
8780: ,v_ascp_inst,v_icode
8781: ;
8782:
8783: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8784: COMMIT;
8785:
8786: EXCEPTION
8787: WHEN OTHERS THEN

Line 8789: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8785:
8786: EXCEPTION
8787: WHEN OTHERS THEN
8788: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8789: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8790: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_EXCEPTIONS');
8791: v_retcode := 2;
8792: RAISE;
8793: ELSE

Line 8790: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_EXCEPTIONS');

8786: EXCEPTION
8787: WHEN OTHERS THEN
8788: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8789: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8790: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SHIFT_EXCEPTIONS');
8791: v_retcode := 2;
8792: RAISE;
8793: ELSE
8794: IF v_retcode < 2 THEN

Line 8795: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8791: v_retcode := 2;
8792: RAISE;
8793: ELSE
8794: IF v_retcode < 2 THEN
8795: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8796: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_EXCEPTIONS');
8797: v_retcode := 1;
8798: END IF;
8799: RETURN;

Line 8796: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_EXCEPTIONS');

8792: RAISE;
8793: ELSE
8794: IF v_retcode < 2 THEN
8795: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8796: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SHIFT_EXCEPTIONS');
8797: v_retcode := 1;
8798: END IF;
8799: RETURN;
8800: END IF;

Line 8807: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SIMULATION_SETS');

8803: PROCEDURE COPY_SIMULATION_SETS IS
8804:
8805: BEGIN
8806:
8807: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SIMULATION_SETS');
8808: v_sql_stmt:=
8809: 'INSERT INTO MSC_ST_SIMULATION_SETS ('
8810: || 'ORGANIZATION_ID,'
8811: || 'SIMULATION_SET,'

Line 8854: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8850: EXECUTE IMMEDIATE v_sql_stmt USING
8851: v_inst_rp_src_id
8852: ;
8853:
8854: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8855: COMMIT;
8856:
8857: EXCEPTION
8858: WHEN OTHERS THEN

Line 8860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8856:
8857: EXCEPTION
8858: WHEN OTHERS THEN
8859: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SIMULATION_SETS');
8862: v_retcode := 2;
8863: RAISE;
8864: ELSE

Line 8861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SIMULATION_SETS');

8857: EXCEPTION
8858: WHEN OTHERS THEN
8859: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SIMULATION_SETS');
8862: v_retcode := 2;
8863: RAISE;
8864: ELSE
8865: IF v_retcode < 2 THEN

Line 8866: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8862: v_retcode := 2;
8863: RAISE;
8864: ELSE
8865: IF v_retcode < 2 THEN
8866: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SIMULATION_SETS');
8868: v_retcode := 1;
8869: END IF;
8870: RETURN;

Line 8867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SIMULATION_SETS');

8863: RAISE;
8864: ELSE
8865: IF v_retcode < 2 THEN
8866: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SIMULATION_SETS');
8868: v_retcode := 1;
8869: END IF;
8870: RETURN;
8871: END IF;

Line 8878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SOURCING_HISTORY');

8874: PROCEDURE COPY_SOURCING_HISTORY IS
8875:
8876: BEGIN
8877:
8878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SOURCING_HISTORY');
8879: v_sql_stmt:=
8880: 'INSERT INTO MSC_ST_SOURCING_HISTORY ('
8881: || 'INVENTORY_ITEM_ID,'
8882: || 'ORGANIZATION_ID,'

Line 8933: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

8929: EXECUTE IMMEDIATE v_sql_stmt USING
8930: v_inst_rp_src_id
8931: ;
8932:
8933: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
8934: COMMIT;
8935:
8936: EXCEPTION
8937: WHEN OTHERS THEN

Line 8939: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

8935:
8936: EXCEPTION
8937: WHEN OTHERS THEN
8938: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8939: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8940: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SOURCING_HISTORY');
8941: v_retcode := 2;
8942: RAISE;
8943: ELSE

Line 8940: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SOURCING_HISTORY');

8936: EXCEPTION
8937: WHEN OTHERS THEN
8938: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
8939: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
8940: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SOURCING_HISTORY');
8941: v_retcode := 2;
8942: RAISE;
8943: ELSE
8944: IF v_retcode < 2 THEN

Line 8945: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

8941: v_retcode := 2;
8942: RAISE;
8943: ELSE
8944: IF v_retcode < 2 THEN
8945: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SOURCING_HISTORY');
8947: v_retcode := 1;
8948: END IF;
8949: RETURN;

Line 8946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SOURCING_HISTORY');

8942: RAISE;
8943: ELSE
8944: IF v_retcode < 2 THEN
8945: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
8946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SOURCING_HISTORY');
8947: v_retcode := 1;
8948: END IF;
8949: RETURN;
8950: END IF;

Line 8957: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SOURCING_RULES');

8953: PROCEDURE COPY_SOURCING_RULES IS
8954:
8955: BEGIN
8956:
8957: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SOURCING_RULES');
8958: v_sql_stmt:=
8959: 'INSERT INTO MSC_ST_SOURCING_RULES ('
8960: || 'SOURCING_RULE_ID,'
8961: || 'SR_SOURCING_RULE_ID,'

Line 9012: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9008: EXECUTE IMMEDIATE v_sql_stmt USING
9009: v_inst_rp_src_id
9010: ;
9011:
9012: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9013: COMMIT;
9014:
9015: EXCEPTION
9016: WHEN OTHERS THEN

Line 9018: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9014:
9015: EXCEPTION
9016: WHEN OTHERS THEN
9017: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9018: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SOURCING_RULES');
9020: v_retcode := 2;
9021: RAISE;
9022: ELSE

Line 9019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SOURCING_RULES');

9015: EXCEPTION
9016: WHEN OTHERS THEN
9017: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9018: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9019: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SOURCING_RULES');
9020: v_retcode := 2;
9021: RAISE;
9022: ELSE
9023: IF v_retcode < 2 THEN

Line 9024: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9020: v_retcode := 2;
9021: RAISE;
9022: ELSE
9023: IF v_retcode < 2 THEN
9024: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9025: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SOURCING_RULES');
9026: v_retcode := 1;
9027: END IF;
9028: RETURN;

Line 9025: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SOURCING_RULES');

9021: RAISE;
9022: ELSE
9023: IF v_retcode < 2 THEN
9024: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9025: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SOURCING_RULES');
9026: v_retcode := 1;
9027: END IF;
9028: RETURN;
9029: END IF;

Line 9036: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_ASSIGNMENTS');

9032: PROCEDURE COPY_SR_ASSIGNMENTS IS
9033:
9034: BEGIN
9035:
9036: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_ASSIGNMENTS');
9037: v_sql_stmt:=
9038: 'INSERT INTO MSC_ST_SR_ASSIGNMENTS ('
9039: || 'ASSIGNMENT_ID,'
9040: || 'SR_ASSIGNMENT_ID,'

Line 9109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9105: EXECUTE IMMEDIATE v_sql_stmt USING
9106: v_inst_rp_src_id
9107: ;
9108:
9109: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9110: COMMIT;
9111:
9112: EXCEPTION
9113: WHEN OTHERS THEN

Line 9115: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9111:
9112: EXCEPTION
9113: WHEN OTHERS THEN
9114: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9115: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9116: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_ASSIGNMENTS');
9117: v_retcode := 2;
9118: RAISE;
9119: ELSE

Line 9116: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_ASSIGNMENTS');

9112: EXCEPTION
9113: WHEN OTHERS THEN
9114: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9115: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9116: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_ASSIGNMENTS');
9117: v_retcode := 2;
9118: RAISE;
9119: ELSE
9120: IF v_retcode < 2 THEN

Line 9121: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9117: v_retcode := 2;
9118: RAISE;
9119: ELSE
9120: IF v_retcode < 2 THEN
9121: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9122: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_ASSIGNMENTS');
9123: v_retcode := 1;
9124: END IF;
9125: RETURN;

Line 9122: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_ASSIGNMENTS');

9118: RAISE;
9119: ELSE
9120: IF v_retcode < 2 THEN
9121: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9122: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_ASSIGNMENTS');
9123: v_retcode := 1;
9124: END IF;
9125: RETURN;
9126: END IF;

Line 9133: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_RECEIPT_ORG');

9129: PROCEDURE COPY_SR_RECEIPT_ORG IS
9130:
9131: BEGIN
9132:
9133: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_RECEIPT_ORG');
9134: v_sql_stmt:=
9135: 'INSERT INTO MSC_ST_SR_RECEIPT_ORG ('
9136: || 'SR_RECEIPT_ID,'
9137: || 'SR_SR_RECEIPT_ORG,'

Line 9184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9180: EXECUTE IMMEDIATE v_sql_stmt USING
9181: v_inst_rp_src_id
9182: ;
9183:
9184: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9185: COMMIT;
9186:
9187: EXCEPTION
9188: WHEN OTHERS THEN

Line 9190: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9186:
9187: EXCEPTION
9188: WHEN OTHERS THEN
9189: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9190: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9191: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_RECEIPT_ORG');
9192: v_retcode := 2;
9193: RAISE;
9194: ELSE

Line 9191: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_RECEIPT_ORG');

9187: EXCEPTION
9188: WHEN OTHERS THEN
9189: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9190: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9191: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_RECEIPT_ORG');
9192: v_retcode := 2;
9193: RAISE;
9194: ELSE
9195: IF v_retcode < 2 THEN

Line 9196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9192: v_retcode := 2;
9193: RAISE;
9194: ELSE
9195: IF v_retcode < 2 THEN
9196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9197: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_RECEIPT_ORG');
9198: v_retcode := 1;
9199: END IF;
9200: RETURN;

Line 9197: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_RECEIPT_ORG');

9193: RAISE;
9194: ELSE
9195: IF v_retcode < 2 THEN
9196: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9197: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_RECEIPT_ORG');
9198: v_retcode := 1;
9199: END IF;
9200: RETURN;
9201: END IF;

Line 9208: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_SOURCE_ORG');

9204: PROCEDURE COPY_SR_SOURCE_ORG IS
9205:
9206: BEGIN
9207:
9208: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_SOURCE_ORG');
9209: v_sql_stmt:=
9210: 'INSERT INTO MSC_ST_SR_SOURCE_ORG ('
9211: || 'SR_SOURCE_ID,'
9212: || 'SR_SR_SOURCE_ID,'

Line 9271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9267: EXECUTE IMMEDIATE v_sql_stmt USING
9268: v_inst_rp_src_id
9269: ;
9270:
9271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9272: COMMIT;
9273:
9274: EXCEPTION
9275: WHEN OTHERS THEN

Line 9277: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9273:
9274: EXCEPTION
9275: WHEN OTHERS THEN
9276: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9277: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9278: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_SOURCE_ORG');
9279: v_retcode := 2;
9280: RAISE;
9281: ELSE

Line 9278: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_SOURCE_ORG');

9274: EXCEPTION
9275: WHEN OTHERS THEN
9276: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9277: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9278: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_SOURCE_ORG');
9279: v_retcode := 2;
9280: RAISE;
9281: ELSE
9282: IF v_retcode < 2 THEN

Line 9283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9279: v_retcode := 2;
9280: RAISE;
9281: ELSE
9282: IF v_retcode < 2 THEN
9283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_SOURCE_ORG');
9285: v_retcode := 1;
9286: END IF;
9287: RETURN;

Line 9284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_SOURCE_ORG');

9280: RAISE;
9281: ELSE
9282: IF v_retcode < 2 THEN
9283: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9284: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_SOURCE_ORG');
9285: v_retcode := 1;
9286: END IF;
9287: RETURN;
9288: END IF;

Line 9295: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUB_INVENTORIES');

9291: PROCEDURE COPY_SUB_INVENTORIES IS
9292:
9293: BEGIN
9294:
9295: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUB_INVENTORIES');
9296: v_sql_stmt:=
9297: 'INSERT INTO MSC_ST_SUB_INVENTORIES ('
9298: || 'ORGANIZATION_ID,'
9299: || 'SUB_INVENTORY_CODE,'

Line 9378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9374: ,v_ascp_inst,v_icode
9375: ,v_ascp_inst,v_icode
9376: ;
9377:
9378: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9379: COMMIT;
9380:
9381: EXCEPTION
9382: WHEN OTHERS THEN

Line 9384: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9380:
9381: EXCEPTION
9382: WHEN OTHERS THEN
9383: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9384: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUB_INVENTORIES');
9386: v_retcode := 2;
9387: RAISE;
9388: ELSE

Line 9385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUB_INVENTORIES');

9381: EXCEPTION
9382: WHEN OTHERS THEN
9383: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9384: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUB_INVENTORIES');
9386: v_retcode := 2;
9387: RAISE;
9388: ELSE
9389: IF v_retcode < 2 THEN

Line 9390: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9386: v_retcode := 2;
9387: RAISE;
9388: ELSE
9389: IF v_retcode < 2 THEN
9390: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUB_INVENTORIES');
9392: v_retcode := 1;
9393: END IF;
9394: RETURN;

Line 9391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUB_INVENTORIES');

9387: RAISE;
9388: ELSE
9389: IF v_retcode < 2 THEN
9390: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUB_INVENTORIES');
9392: v_retcode := 1;
9393: END IF;
9394: RETURN;
9395: END IF;

Line 9403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUPPLIER_CAPACITIES');

9399: PROCEDURE COPY_SUPPLIER_CAPACITIES IS
9400:
9401: BEGIN
9402:
9403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUPPLIER_CAPACITIES');
9404: v_sql_stmt:=
9405: 'INSERT INTO MSC_ST_SUPPLIER_CAPACITIES ('
9406: || 'SUPPLIER_ID,'
9407: || 'SUPPLIER_SITE_ID,'

Line 9489: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9485: ,v_ascp_inst,v_icode
9486: ,v_ascp_inst,v_icode
9487: ;
9488:
9489: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9490: COMMIT;
9491:
9492: EXCEPTION
9493: WHEN OTHERS THEN

Line 9495: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9491:
9492: EXCEPTION
9493: WHEN OTHERS THEN
9494: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9495: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9496: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIER_CAPACITIES');
9497: v_retcode := 2;
9498: RAISE;
9499: ELSE

Line 9496: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIER_CAPACITIES');

9492: EXCEPTION
9493: WHEN OTHERS THEN
9494: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9495: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9496: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIER_CAPACITIES');
9497: v_retcode := 2;
9498: RAISE;
9499: ELSE
9500: IF v_retcode < 2 THEN

Line 9501: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9497: v_retcode := 2;
9498: RAISE;
9499: ELSE
9500: IF v_retcode < 2 THEN
9501: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9502: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIER_CAPACITIES');
9503: v_retcode := 1;
9504: END IF;
9505: RETURN;

Line 9502: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIER_CAPACITIES');

9498: RAISE;
9499: ELSE
9500: IF v_retcode < 2 THEN
9501: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9502: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIER_CAPACITIES');
9503: v_retcode := 1;
9504: END IF;
9505: RETURN;
9506: END IF;

Line 9513: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUPPLIER_FLEX_FENCES');

9509: PROCEDURE COPY_SUPPLIER_FLEX_FENCES IS
9510:
9511: BEGIN
9512:
9513: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUPPLIER_FLEX_FENCES');
9514: v_sql_stmt:=
9515: 'INSERT INTO MSC_ST_SUPPLIER_FLEX_FENCES ('
9516: || 'SUPPLIER_ID,'
9517: || 'SUPPLIER_SITE_ID,'

Line 9593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

9589: ,v_ascp_inst,v_icode
9590: ,v_ascp_inst,v_icode
9591: ;
9592:
9593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
9594: COMMIT;
9595:
9596: EXCEPTION
9597: WHEN OTHERS THEN

Line 9599: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

9595:
9596: EXCEPTION
9597: WHEN OTHERS THEN
9598: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9599: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9600: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIER_FLEX_FENCES');
9601: v_retcode := 2;
9602: RAISE;
9603: ELSE

Line 9600: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIER_FLEX_FENCES');

9596: EXCEPTION
9597: WHEN OTHERS THEN
9598: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
9599: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
9600: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIER_FLEX_FENCES');
9601: v_retcode := 2;
9602: RAISE;
9603: ELSE
9604: IF v_retcode < 2 THEN

Line 9605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

9601: v_retcode := 2;
9602: RAISE;
9603: ELSE
9604: IF v_retcode < 2 THEN
9605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9606: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIER_FLEX_FENCES');
9607: v_retcode := 1;
9608: END IF;
9609: RETURN;

Line 9606: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIER_FLEX_FENCES');

9602: RAISE;
9603: ELSE
9604: IF v_retcode < 2 THEN
9605: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
9606: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIER_FLEX_FENCES');
9607: v_retcode := 1;
9608: END IF;
9609: RETURN;
9610: END IF;

Line 9617: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUPPLIES');

9613: PROCEDURE COPY_SUPPLIES IS
9614:
9615: BEGIN
9616:
9617: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SUPPLIES');
9618: v_sql_stmt:=
9619: 'INSERT INTO MSC_ST_SUPPLIES ('
9620: || 'PLAN_ID,'
9621: || 'TRANSACTION_ID,'

Line 10056: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

10052: ,v_ascp_inst,v_icode
10053: ,v_ascp_inst,v_icode
10054: ;
10055:
10056: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
10057: COMMIT;
10058:
10059: EXCEPTION
10060: WHEN OTHERS THEN

Line 10062: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

10058:
10059: EXCEPTION
10060: WHEN OTHERS THEN
10061: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10062: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10063: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIES');
10064: v_retcode := 2;
10065: RAISE;
10066: ELSE

Line 10063: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIES');

10059: EXCEPTION
10060: WHEN OTHERS THEN
10061: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10062: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10063: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SUPPLIES');
10064: v_retcode := 2;
10065: RAISE;
10066: ELSE
10067: IF v_retcode < 2 THEN

Line 10068: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

10064: v_retcode := 2;
10065: RAISE;
10066: ELSE
10067: IF v_retcode < 2 THEN
10068: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10069: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIES');
10070: v_retcode := 1;
10071: END IF;
10072: RETURN;

Line 10069: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIES');

10065: RAISE;
10066: ELSE
10067: IF v_retcode < 2 THEN
10068: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10069: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SUPPLIES');
10070: v_retcode := 1;
10071: END IF;
10072: RETURN;
10073: END IF;

Line 10080: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SYSTEM_ITEMS');

10076: PROCEDURE COPY_SYSTEM_ITEMS IS
10077:
10078: BEGIN
10079:
10080: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SYSTEM_ITEMS');
10081: v_sql_stmt:=
10082: 'INSERT INTO MSC_ST_SYSTEM_ITEMS ('
10083: || 'ORGANIZATION_ID,'
10084: || 'SR_ORGANIZATION_ID,'

Line 10418: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

10414: ,v_inst_rp_src_id
10415: ,v_ascp_inst,v_icode
10416: ;
10417:
10418: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
10419: COMMIT;
10420:
10421: EXCEPTION
10422: WHEN OTHERS THEN

Line 10424: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

10420:
10421: EXCEPTION
10422: WHEN OTHERS THEN
10423: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10424: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10425: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SYSTEM_ITEMS');
10426: v_retcode := 2;
10427: RAISE;
10428: ELSE

Line 10425: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SYSTEM_ITEMS');

10421: EXCEPTION
10422: WHEN OTHERS THEN
10423: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10424: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10425: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SYSTEM_ITEMS');
10426: v_retcode := 2;
10427: RAISE;
10428: ELSE
10429: IF v_retcode < 2 THEN

Line 10430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

10426: v_retcode := 2;
10427: RAISE;
10428: ELSE
10429: IF v_retcode < 2 THEN
10430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10431: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SYSTEM_ITEMS');
10432: v_retcode := 1;
10433: END IF;
10434: RETURN;

Line 10431: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SYSTEM_ITEMS');

10427: RAISE;
10428: ELSE
10429: IF v_retcode < 2 THEN
10430: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10431: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SYSTEM_ITEMS');
10432: v_retcode := 1;
10433: END IF;
10434: RETURN;
10435: END IF;

Line 10442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRADING_PARTNERS');

10438: PROCEDURE COPY_TRADING_PARTNERS IS
10439:
10440: BEGIN
10441:
10442: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRADING_PARTNERS');
10443: v_sql_stmt:=
10444: 'INSERT INTO MSC_ST_TRADING_PARTNERS ('
10445: || 'PARTNER_ID,'
10446: || 'ORGANIZATION_CODE,'

Line 10610: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'The formed SQL is'||v_sql_stmt);

10606: ||' WHERE '
10607: ||' sr_instance_id = ' || to_char(v_src_instance_id)
10608: ||' and company_id is NULL';
10609:
10610: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'The formed SQL is'||v_sql_stmt);
10611: EXECUTE IMMEDIATE v_sql_stmt USING
10612: v_ascp_inst,v_icode
10613: ,v_ascp_inst,v_icode
10614: ,v_ascp_inst,v_icode

Line 10619: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

10615: ,v_inst_rp_src_id
10616: ,v_ascp_inst,v_icode
10617: ;
10618:
10619: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
10620: COMMIT;
10621:
10622: EXCEPTION
10623: WHEN OTHERS THEN

Line 10625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

10621:
10622: EXCEPTION
10623: WHEN OTHERS THEN
10624: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10626: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRADING_PARTNERS');
10627: v_retcode := 2;
10628: RAISE;
10629: ELSE

Line 10626: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRADING_PARTNERS');

10622: EXCEPTION
10623: WHEN OTHERS THEN
10624: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10625: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10626: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRADING_PARTNERS');
10627: v_retcode := 2;
10628: RAISE;
10629: ELSE
10630: IF v_retcode < 2 THEN

Line 10631: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

10627: v_retcode := 2;
10628: RAISE;
10629: ELSE
10630: IF v_retcode < 2 THEN
10631: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRADING_PARTNERS');
10633: v_retcode := 1;
10634: END IF;
10635: RETURN;

Line 10632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRADING_PARTNERS');

10628: RAISE;
10629: ELSE
10630: IF v_retcode < 2 THEN
10631: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRADING_PARTNERS');
10633: v_retcode := 1;
10634: END IF;
10635: RETURN;
10636: END IF;

Line 10643: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRADING_PARTNER_SITES');

10639: PROCEDURE COPY_TRADING_PARTNER_SITES IS
10640:
10641: BEGIN
10642:
10643: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_TRADING_PARTNER_SITES');
10644: v_sql_stmt:=
10645: 'INSERT INTO MSC_ST_TRADING_PARTNER_SITES ('
10646: || 'PARTNER_ID,'
10647: || 'PARTNER_SITE_ID,'

Line 10761: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

10757: ,v_ascp_inst,v_icode
10758: ,v_ascp_inst,v_icode
10759: ;
10760:
10761: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
10762: COMMIT;
10763:
10764: EXCEPTION
10765: WHEN OTHERS THEN

Line 10767: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

10763:
10764: EXCEPTION
10765: WHEN OTHERS THEN
10766: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10767: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10768: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRADING_PARTNER_SITES');
10769: v_retcode := 2;
10770: RAISE;
10771: ELSE

Line 10768: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRADING_PARTNER_SITES');

10764: EXCEPTION
10765: WHEN OTHERS THEN
10766: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10767: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10768: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_TRADING_PARTNER_SITES');
10769: v_retcode := 2;
10770: RAISE;
10771: ELSE
10772: IF v_retcode < 2 THEN

Line 10773: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

10769: v_retcode := 2;
10770: RAISE;
10771: ELSE
10772: IF v_retcode < 2 THEN
10773: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10774: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRADING_PARTNER_SITES');
10775: v_retcode := 1;
10776: END IF;
10777: RETURN;

Line 10774: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRADING_PARTNER_SITES');

10770: RAISE;
10771: ELSE
10772: IF v_retcode < 2 THEN
10773: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10774: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_TRADING_PARTNER_SITES');
10775: v_retcode := 1;
10776: END IF;
10777: RETURN;
10778: END IF;

Line 10785: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UNITS_OF_MEASURE');

10781: PROCEDURE COPY_UNITS_OF_MEASURE IS
10782:
10783: BEGIN
10784:
10785: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UNITS_OF_MEASURE');
10786: v_sql_stmt:=
10787: 'INSERT INTO MSC_ST_UNITS_OF_MEASURE ('
10788: || 'UNIT_OF_MEASURE,'
10789: || 'UOM_CODE,'

Line 10854: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

10850: v_inst_rp_src_id
10851: ,v_ascp_inst,v_icode
10852: ;
10853:
10854: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
10855: COMMIT;
10856:
10857: EXCEPTION
10858: WHEN OTHERS THEN

Line 10860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

10856:
10857: EXCEPTION
10858: WHEN OTHERS THEN
10859: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UNITS_OF_MEASURE');
10862: v_retcode := 2;
10863: RAISE;
10864: ELSE

Line 10861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UNITS_OF_MEASURE');

10857: EXCEPTION
10858: WHEN OTHERS THEN
10859: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10860: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10861: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UNITS_OF_MEASURE');
10862: v_retcode := 2;
10863: RAISE;
10864: ELSE
10865: IF v_retcode < 2 THEN

Line 10866: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

10862: v_retcode := 2;
10863: RAISE;
10864: ELSE
10865: IF v_retcode < 2 THEN
10866: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UNITS_OF_MEASURE');
10868: v_retcode := 1;
10869: END IF;
10870: RETURN;

Line 10867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UNITS_OF_MEASURE');

10863: RAISE;
10864: ELSE
10865: IF v_retcode < 2 THEN
10866: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10867: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UNITS_OF_MEASURE');
10868: v_retcode := 1;
10869: END IF;
10870: RETURN;
10871: END IF;

Line 10878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UNITS_OF_MEASURE');

10874: PROCEDURE COPY_UNIT_NUMBERS IS
10875:
10876: BEGIN
10877:
10878: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UNITS_OF_MEASURE');
10879: v_sql_stmt:=
10880: 'INSERT INTO MSC_ST_UNIT_NUMBERS ('
10881: || 'UNIT_NUMBER,'
10882: || 'END_ITEM_ID,'

Line 10924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

10920: EXECUTE IMMEDIATE v_sql_stmt USING
10921: v_inst_rp_src_id
10922: ;
10923:
10924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
10925: COMMIT;
10926:
10927: EXCEPTION
10928: WHEN OTHERS THEN

Line 10930: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

10926:
10927: EXCEPTION
10928: WHEN OTHERS THEN
10929: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10930: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UNIT_NUMBERS');
10932: v_retcode := 2;
10933: RAISE;
10934: ELSE

Line 10931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UNIT_NUMBERS');

10927: EXCEPTION
10928: WHEN OTHERS THEN
10929: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
10930: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
10931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UNIT_NUMBERS');
10932: v_retcode := 2;
10933: RAISE;
10934: ELSE
10935: IF v_retcode < 2 THEN

Line 10936: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

10932: v_retcode := 2;
10933: RAISE;
10934: ELSE
10935: IF v_retcode < 2 THEN
10936: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10937: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UNIT_NUMBERS');
10938: v_retcode := 1;
10939: END IF;
10940: RETURN;

Line 10937: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UNIT_NUMBERS');

10933: RAISE;
10934: ELSE
10935: IF v_retcode < 2 THEN
10936: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
10937: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UNIT_NUMBERS');
10938: v_retcode := 1;
10939: END IF;
10940: RETURN;
10941: END IF;

Line 10948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UOM_CLASS_CONVERSIONS');

10944: PROCEDURE COPY_UOM_CLASS_CONVERSIONS IS
10945:
10946: BEGIN
10947:
10948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UOM_CLASS_CONVERSIONS');
10949: v_sql_stmt:=
10950: 'INSERT INTO MSC_ST_UOM_CLASS_CONVERSIONS ('
10951: || 'INVENTORY_ITEM_ID,'
10952: || 'FROM_UNIT_OF_MEASURE,'

Line 11030: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11026: ,v_ascp_inst,v_icode
11027: ,v_ascp_inst,v_icode
11028: ;
11029:
11030: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11031: COMMIT;
11032:
11033: EXCEPTION
11034: WHEN OTHERS THEN

Line 11036: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11032:
11033: EXCEPTION
11034: WHEN OTHERS THEN
11035: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11036: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11037: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UOM_CLASS_CONVERSIONS');
11038: v_retcode := 2;
11039: RAISE;
11040: ELSE

Line 11037: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UOM_CLASS_CONVERSIONS');

11033: EXCEPTION
11034: WHEN OTHERS THEN
11035: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11036: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11037: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UOM_CLASS_CONVERSIONS');
11038: v_retcode := 2;
11039: RAISE;
11040: ELSE
11041: IF v_retcode < 2 THEN

Line 11042: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11038: v_retcode := 2;
11039: RAISE;
11040: ELSE
11041: IF v_retcode < 2 THEN
11042: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11043: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UOM_CLASS_CONVERSIONS');
11044: v_retcode := 1;
11045: END IF;
11046: RETURN;

Line 11043: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UOM_CLASS_CONVERSIONS');

11039: RAISE;
11040: ELSE
11041: IF v_retcode < 2 THEN
11042: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11043: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UOM_CLASS_CONVERSIONS');
11044: v_retcode := 1;
11045: END IF;
11046: RETURN;
11047: END IF;

Line 11054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UOM_CONVERSIONS');

11050: PROCEDURE COPY_UOM_CONVERSIONS IS
11051:
11052: BEGIN
11053:
11054: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_UOM_CONVERSIONS');
11055: v_sql_stmt:=
11056: 'INSERT INTO MSC_ST_UOM_CONVERSIONS ('
11057: || 'UNIT_OF_MEASURE,'
11058: || 'UOM_CODE,'

Line 11132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11128: ,v_ascp_inst,v_icode
11129: ,v_ascp_inst,v_icode
11130: ;
11131:
11132: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11133: COMMIT;
11134:
11135: EXCEPTION
11136: WHEN OTHERS THEN

Line 11138: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11134:
11135: EXCEPTION
11136: WHEN OTHERS THEN
11137: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11138: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11139: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UOM_CONVERSIONS');
11140: v_retcode := 2;
11141: RAISE;
11142: ELSE

Line 11139: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UOM_CONVERSIONS');

11135: EXCEPTION
11136: WHEN OTHERS THEN
11137: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11138: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11139: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_UOM_CONVERSIONS');
11140: v_retcode := 2;
11141: RAISE;
11142: ELSE
11143: IF v_retcode < 2 THEN

Line 11144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11140: v_retcode := 2;
11141: RAISE;
11142: ELSE
11143: IF v_retcode < 2 THEN
11144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11145: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UOM_CONVERSIONS');
11146: v_retcode := 1;
11147: END IF;
11148: RETURN;

Line 11145: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UOM_CONVERSIONS');

11141: RAISE;
11142: ELSE
11143: IF v_retcode < 2 THEN
11144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11145: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_UOM_CONVERSIONS');
11146: v_retcode := 1;
11147: END IF;
11148: RETURN;
11149: END IF;

Line 11156: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_WORKDAY_PATTERNS');

11152: PROCEDURE COPY_WORKDAY_PATTERNS IS
11153:
11154: BEGIN
11155:
11156: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_WORKDAY_PATTERNS');
11157: v_sql_stmt:=
11158: 'INSERT INTO MSC_ST_WORKDAY_PATTERNS ('
11159: || 'CALENDAR_CODE,'
11160: || 'DESCRIPTION,'

Line 11226: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11222: ,v_ascp_inst,v_icode
11223: ,v_inst_rp_src_id
11224: ;
11225:
11226: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11227: COMMIT;
11228:
11229: EXCEPTION
11230: WHEN OTHERS THEN

Line 11232: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11228:
11229: EXCEPTION
11230: WHEN OTHERS THEN
11231: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11232: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11233: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_WORKDAY_PATTERNS');
11234: v_retcode := 2;
11235: RAISE;
11236: ELSE

Line 11233: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_WORKDAY_PATTERNS');

11229: EXCEPTION
11230: WHEN OTHERS THEN
11231: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11232: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11233: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_WORKDAY_PATTERNS');
11234: v_retcode := 2;
11235: RAISE;
11236: ELSE
11237: IF v_retcode < 2 THEN

Line 11238: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11234: v_retcode := 2;
11235: RAISE;
11236: ELSE
11237: IF v_retcode < 2 THEN
11238: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11239: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_WORKDAY_PATTERNS');
11240: v_retcode := 1;
11241: END IF;
11242: RETURN;

Line 11239: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_WORKDAY_PATTERNS');

11235: RAISE;
11236: ELSE
11237: IF v_retcode < 2 THEN
11238: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11239: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_WORKDAY_PATTERNS');
11240: v_retcode := 1;
11241: END IF;
11242: RETURN;
11243: END IF;

Line 11250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ZONE_REGIONS');

11246: PROCEDURE COPY_ZONE_REGIONS IS
11247:
11248: BEGIN
11249:
11250: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_ZONE_REGIONS');
11251: v_sql_stmt:=
11252: 'INSERT INTO MSC_ST_ZONE_REGIONS ('
11253: || 'ZONE_REGION_ID,'
11254: || 'REGION_ID,'

Line 11331: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11327: v_inst_rp_src_id
11328: ,v_ascp_inst,v_icode
11329: ;
11330:
11331: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11332: COMMIT;
11333:
11334: EXCEPTION
11335: WHEN OTHERS THEN

Line 11337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11333:
11334: EXCEPTION
11335: WHEN OTHERS THEN
11336: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11338: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ZONE_REGIONS');
11339: v_retcode := 2;
11340: RAISE;
11341: ELSE

Line 11338: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ZONE_REGIONS');

11334: EXCEPTION
11335: WHEN OTHERS THEN
11336: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11338: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_ZONE_REGIONS');
11339: v_retcode := 2;
11340: RAISE;
11341: ELSE
11342: IF v_retcode < 2 THEN

Line 11343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11339: v_retcode := 2;
11340: RAISE;
11341: ELSE
11342: IF v_retcode < 2 THEN
11343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ZONE_REGIONS');
11345: v_retcode := 1;
11346: END IF;
11347: RETURN;

Line 11344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ZONE_REGIONS');

11340: RAISE;
11341: ELSE
11342: IF v_retcode < 2 THEN
11343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11344: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_ZONE_REGIONS');
11345: v_retcode := 1;
11346: END IF;
11347: RETURN;
11348: END IF;

Line 11355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_LOOKUPS');

11351: PROCEDURE COPY_SR_LOOKUPS IS
11352:
11353: BEGIN
11354:
11355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_SR_LOOKUPS');
11356: v_sql_stmt:=
11357: 'INSERT INTO MSC_ST_SR_LOOKUPS ('
11358: || 'LOOKUP_CODE,'
11359: || 'LOOKUP_TYPE,'

Line 11456: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11452: v_inst_rp_src_id
11453: ,v_ascp_inst,v_icode
11454: ;
11455:
11456: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11457: COMMIT;
11458:
11459: EXCEPTION
11460: WHEN OTHERS THEN

Line 11462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11458:
11459: EXCEPTION
11460: WHEN OTHERS THEN
11461: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11463: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_LOOKUPS');
11464: v_retcode := 2;
11465: RAISE;
11466: ELSE

Line 11463: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_LOOKUPS');

11459: EXCEPTION
11460: WHEN OTHERS THEN
11461: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11462: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11463: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_SR_LOOKUPS');
11464: v_retcode := 2;
11465: RAISE;
11466: ELSE
11467: IF v_retcode < 2 THEN

Line 11468: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11464: v_retcode := 2;
11465: RAISE;
11466: ELSE
11467: IF v_retcode < 2 THEN
11468: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_LOOKUPS');
11470: v_retcode := 1;
11471: END IF;
11472: RETURN;

Line 11469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_LOOKUPS');

11465: RAISE;
11466: ELSE
11467: IF v_retcode < 2 THEN
11468: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_SR_LOOKUPS');
11470: v_retcode := 1;
11471: END IF;
11472: RETURN;
11473: END IF;

Line 11480: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEPT_RES_INSTANCES');

11476: PROCEDURE COPY_DEPT_RES_INSTANCES IS
11477:
11478: BEGIN
11479:
11480: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_DEPT_RES_INSTANCES');
11481: v_sql_stmt:=
11482: 'INSERT INTO MSC_ST_DEPT_RES_INSTANCES ('
11483: || 'SR_INSTANCE_ID,'
11484: || 'RES_INSTANCE_ID,'

Line 11570: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11566: ,v_ascp_inst,v_icode
11567: ,v_ascp_inst,v_icode
11568: ;
11569:
11570: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11571: COMMIT;
11572:
11573: EXCEPTION
11574: WHEN OTHERS THEN

Line 11576: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11572:
11573: EXCEPTION
11574: WHEN OTHERS THEN
11575: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11576: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11577: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEPT_RES_INSTANCES');
11578: v_retcode := 2;
11579: RAISE;
11580: ELSE

Line 11577: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEPT_RES_INSTANCES');

11573: EXCEPTION
11574: WHEN OTHERS THEN
11575: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11576: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11577: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_DEPT_RES_INSTANCES');
11578: v_retcode := 2;
11579: RAISE;
11580: ELSE
11581: IF v_retcode < 2 THEN

Line 11582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11578: v_retcode := 2;
11579: RAISE;
11580: ELSE
11581: IF v_retcode < 2 THEN
11582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11583: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEPT_RES_INSTANCES');
11584: v_retcode := 1;
11585: END IF;
11586: RETURN;

Line 11583: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEPT_RES_INSTANCES');

11579: RAISE;
11580: ELSE
11581: IF v_retcode < 2 THEN
11582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11583: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_DEPT_RES_INSTANCES');
11584: v_retcode := 1;
11585: END IF;
11586: RETURN;
11587: END IF;

Line 11594: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_NET_RES_INST_AVAIL');

11590: PROCEDURE COPY_NET_RES_INST_AVAIL IS
11591:
11592: BEGIN
11593:
11594: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_NET_RES_INST_AVAIL');
11595: v_sql_stmt:=
11596: 'INSERT INTO MSC_ST_NET_RES_INST_AVAIL ('
11597: || 'SR_INSTANCE_ID,'
11598: || 'RES_INSTANCE_ID,'

Line 11654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11650: EXECUTE IMMEDIATE v_sql_stmt USING
11651: v_inst_rp_src_id
11652: ;
11653:
11654: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11655: COMMIT;
11656:
11657: EXCEPTION
11658: WHEN OTHERS THEN

Line 11660: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11656:
11657: EXCEPTION
11658: WHEN OTHERS THEN
11659: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11660: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11661: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_NET_RES_INST_AVAIL');
11662: v_retcode := 2;
11663: RAISE;
11664: ELSE

Line 11661: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_NET_RES_INST_AVAIL');

11657: EXCEPTION
11658: WHEN OTHERS THEN
11659: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11660: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11661: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_NET_RES_INST_AVAIL');
11662: v_retcode := 2;
11663: RAISE;
11664: ELSE
11665: IF v_retcode < 2 THEN

Line 11666: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11662: v_retcode := 2;
11663: RAISE;
11664: ELSE
11665: IF v_retcode < 2 THEN
11666: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11667: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_NET_RES_INST_AVAIL');
11668: v_retcode := 1;
11669: END IF;
11670: RETURN;

Line 11667: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_NET_RES_INST_AVAIL');

11663: RAISE;
11664: ELSE
11665: IF v_retcode < 2 THEN
11666: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11667: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_NET_RES_INST_AVAIL');
11668: v_retcode := 1;
11669: END IF;
11670: RETURN;
11671: END IF;

Line 11678: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OP_RES_INSTANCES');

11674: PROCEDURE COPY_JOB_OP_RES_INSTANCES IS
11675:
11676: BEGIN
11677:
11678: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_JOB_OP_RES_INSTANCES');
11679: v_sql_stmt:=
11680: 'INSERT INTO MSC_ST_JOB_OP_RES_INSTANCES ('
11681: || 'WIP_ENTITY_ID,'
11682: || 'OPERATION_SEQ_NUM,'

Line 11774: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11770: ,v_ascp_inst,v_icode
11771: ,v_ascp_inst,v_icode
11772: ;
11773:
11774: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11775: COMMIT;
11776:
11777: EXCEPTION
11778: WHEN OTHERS THEN

Line 11780: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11776:
11777: EXCEPTION
11778: WHEN OTHERS THEN
11779: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11780: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11781: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OP_RES_INSTANCES');
11782: v_retcode := 2;
11783: RAISE;
11784: ELSE

Line 11781: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OP_RES_INSTANCES');

11777: EXCEPTION
11778: WHEN OTHERS THEN
11779: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11780: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11781: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_JOB_OP_RES_INSTANCES');
11782: v_retcode := 2;
11783: RAISE;
11784: ELSE
11785: IF v_retcode < 2 THEN

Line 11786: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

11782: v_retcode := 2;
11783: RAISE;
11784: ELSE
11785: IF v_retcode < 2 THEN
11786: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11787: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OP_RES_INSTANCES');
11788: v_retcode := 1;
11789: END IF;
11790: RETURN;

Line 11787: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OP_RES_INSTANCES');

11783: RAISE;
11784: ELSE
11785: IF v_retcode < 2 THEN
11786: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
11787: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Warning copying MSC_ST_JOB_OP_RES_INSTANCES');
11788: v_retcode := 1;
11789: END IF;
11790: RETURN;
11791: END IF;

Line 11798: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_INSTANCE_REQS');

11794: PROCEDURE COPY_RESOURCE_INSTANCE_REQS IS
11795:
11796: BEGIN
11797:
11798: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'COPY_RESOURCE_INSTANCE_REQS');
11799: v_sql_stmt:=
11800: 'INSERT INTO MSC_ST_RESOURCE_INSTANCE_REQS ('
11801: || 'RESOURCE_ID,'
11802: || 'RES_INSTANCE_ID,'

Line 11904: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');

11900: ,v_ascp_inst,v_icode
11901: ,v_ascp_inst,v_icode
11902: ;
11903:
11904: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQL%ROWCOUNT||' row(s) copied');
11905: COMMIT;
11906:
11907: EXCEPTION
11908: WHEN OTHERS THEN

Line 11910: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);

11906:
11907: EXCEPTION
11908: WHEN OTHERS THEN
11909: IF SQLCODE IN (-01653,-01650,-01562,-01683) THEN
11910: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, SQLERRM);
11911: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,'Error copying MSC_ST_RESOURCE_INSTANCE_REQS');
11912: v_retcode := 2;
11913: RAISE;
11914: ELSE