202: CLOSE c_email;
203:
204: lv_pointer:= 2;
205: IF lv_protocol_address IS NULL THEN
206: fnd_message.set_name ('ECX', 'ECX_TP_ADMIN_EMAIL_NOT_FOUND');
207: fnd_message.set_token ('TP_ID', c.party_site_id);
208: lv_errbuf := fnd_message.get;
209: LOG_MESSAGE( lv_errbuf);
210: fnd_profile.get('ECX_SYS_ADMIN_EMAIL',lv_protocol_address);
203:
204: lv_pointer:= 2;
205: IF lv_protocol_address IS NULL THEN
206: fnd_message.set_name ('ECX', 'ECX_TP_ADMIN_EMAIL_NOT_FOUND');
207: fnd_message.set_token ('TP_ID', c.party_site_id);
208: lv_errbuf := fnd_message.get;
209: LOG_MESSAGE( lv_errbuf);
210: fnd_profile.get('ECX_SYS_ADMIN_EMAIL',lv_protocol_address);
211: END IF;
204: lv_pointer:= 2;
205: IF lv_protocol_address IS NULL THEN
206: fnd_message.set_name ('ECX', 'ECX_TP_ADMIN_EMAIL_NOT_FOUND');
207: fnd_message.set_token ('TP_ID', c.party_site_id);
208: lv_errbuf := fnd_message.get;
209: LOG_MESSAGE( lv_errbuf);
210: fnd_profile.get('ECX_SYS_ADMIN_EMAIL',lv_protocol_address);
211: END IF;
212:
211: END IF;
212:
213: lv_pointer:= 3;
214: IF lv_protocol_address IS NULL THEN
215: fnd_message.set_name ('ECX', 'ECX_SYS_ADMIN_EMAIL_NOT_FOUND');
216: LOG_MESSAGE(fnd_message.get);
217: ELSE
218: IF v_debug THEN
219: LOG_MESSAGE('lv_protocol_address: '||lv_protocol_address);
212:
213: lv_pointer:= 3;
214: IF lv_protocol_address IS NULL THEN
215: fnd_message.set_name ('ECX', 'ECX_SYS_ADMIN_EMAIL_NOT_FOUND');
216: LOG_MESSAGE(fnd_message.get);
217: ELSE
218: IF v_debug THEN
219: LOG_MESSAGE('lv_protocol_address: '||lv_protocol_address);
220: END IF;
218: IF v_debug THEN
219: LOG_MESSAGE('lv_protocol_address: '||lv_protocol_address);
220: END IF;
221: IF c.severity = 1 THEN
222: fnd_message.set_name ('MSC', 'MSC_PP_ERROR_EMAIL');
223: ELSE
224: fnd_message.set_name ('MSC', 'MSC_PP_WARN_EMAIL');
225: END IF;
226:
220: END IF;
221: IF c.severity = 1 THEN
222: fnd_message.set_name ('MSC', 'MSC_PP_ERROR_EMAIL');
223: ELSE
224: fnd_message.set_name ('MSC', 'MSC_PP_WARN_EMAIL');
225: END IF;
226:
227: lv_pointer:= 4;
228: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
224: fnd_message.set_name ('MSC', 'MSC_PP_WARN_EMAIL');
225: END IF;
226:
227: lv_pointer:= 4;
228: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
229: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
230: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
231: lv_errbuf := lv_errbuf ||fnd_message.get;
232: lv_errbuf := lv_errbuf ||c.error_text;
225: END IF;
226:
227: lv_pointer:= 4;
228: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
229: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
230: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
231: lv_errbuf := lv_errbuf ||fnd_message.get;
232: lv_errbuf := lv_errbuf ||c.error_text;
233:
226:
227: lv_pointer:= 4;
228: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
229: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
230: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
231: lv_errbuf := lv_errbuf ||fnd_message.get;
232: lv_errbuf := lv_errbuf ||c.error_text;
233:
234: IF v_debug THEN
227: lv_pointer:= 4;
228: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
229: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
230: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
231: lv_errbuf := lv_errbuf ||fnd_message.get;
232: lv_errbuf := lv_errbuf ||c.error_text;
233:
234: IF v_debug THEN
235: LOG_MESSAGE('lv_errbuf : '||lv_errbuf );
2957: 'FND', lv_dummy1,lv_dummy2, v_applsys_schema);
2958:
2959: EXCEPTION
2960: WHEN NO_DATA_FOUND THEN
2961: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_INVALID_INSTANCE_ID');
2962: FND_MESSAGE.SET_TOKEN('INSTANCE_ID', v_pipe_wm);
2963: raise_application_error(-20101,FND_MESSAGE.GET);
2964: END INITIALIZE;
2965:
2958:
2959: EXCEPTION
2960: WHEN NO_DATA_FOUND THEN
2961: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_INVALID_INSTANCE_ID');
2962: FND_MESSAGE.SET_TOKEN('INSTANCE_ID', v_pipe_wm);
2963: raise_application_error(-20101,FND_MESSAGE.GET);
2964: END INITIALIZE;
2965:
2966:
2959: EXCEPTION
2960: WHEN NO_DATA_FOUND THEN
2961: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_INVALID_INSTANCE_ID');
2962: FND_MESSAGE.SET_TOKEN('INSTANCE_ID', v_pipe_wm);
2963: raise_application_error(-20101,FND_MESSAGE.GET);
2964: END INITIALIZE;
2965:
2966:
2967: PROCEDURE FINAL
5656: v_cal_build := true;
5657: IF lv_request_id <> 0 THEN
5658: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
5659: request_data => to_char(G_CAL_REQ_DATA)) ;
5660: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
5661: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_request_id);
5662: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
5663: END IF;
5664:
5657: IF lv_request_id <> 0 THEN
5658: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
5659: request_data => to_char(G_CAL_REQ_DATA)) ;
5660: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
5661: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_request_id);
5662: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
5663: END IF;
5664:
5665: EXCEPTION
5658: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
5659: request_data => to_char(G_CAL_REQ_DATA)) ;
5660: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
5661: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_request_id);
5662: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
5663: END IF;
5664:
5665: EXCEPTION
5666: WHEN too_many_rows THEN
51262: -- ============= Execute the task according to its task number ===========
51263:
51264: IF p_tasknum= TASK_SUPPLIER_CAPACITY THEN
51265:
51266: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51267: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SUPPLIER_CAPACITY');
51268: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51269: LOAD_SUPPLIER_CAPACITY;
51270:
51263:
51264: IF p_tasknum= TASK_SUPPLIER_CAPACITY THEN
51265:
51266: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51267: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SUPPLIER_CAPACITY');
51268: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51269: LOAD_SUPPLIER_CAPACITY;
51270:
51271: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
51264: IF p_tasknum= TASK_SUPPLIER_CAPACITY THEN
51265:
51266: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51267: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SUPPLIER_CAPACITY');
51268: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51269: LOAD_SUPPLIER_CAPACITY;
51270:
51271: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
51272:
51269: LOAD_SUPPLIER_CAPACITY;
51270:
51271: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
51272:
51273: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51274: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SAFETY_STOCKS');
51275: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51276: LOAD_SAFETY_STOCK;
51277:
51270:
51271: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
51272:
51273: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51274: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SAFETY_STOCKS');
51275: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51276: LOAD_SAFETY_STOCK;
51277:
51278: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
51271: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
51272:
51273: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51274: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SAFETY_STOCKS');
51275: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51276: LOAD_SAFETY_STOCK;
51277:
51278: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
51279:
51276: LOAD_SAFETY_STOCK;
51277:
51278: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
51279:
51280: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51281: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BIS_PERIODS');
51282: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51283: LOAD_BIS_PERIODS;
51284:
51277:
51278: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
51279:
51280: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51281: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BIS_PERIODS');
51282: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51283: LOAD_BIS_PERIODS;
51284:
51285: ELSIF p_tasknum= TASK_UOM_CONV THEN
51278: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
51279:
51280: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51281: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BIS_PERIODS');
51282: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51283: LOAD_BIS_PERIODS;
51284:
51285: ELSIF p_tasknum= TASK_UOM_CONV THEN
51286:
51283: LOAD_BIS_PERIODS;
51284:
51285: ELSIF p_tasknum= TASK_UOM_CONV THEN
51286:
51287: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51288: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CLASS_CONV');
51289: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51290: LOAD_UOM_CLASS_CONV;
51291:
51284:
51285: ELSIF p_tasknum= TASK_UOM_CONV THEN
51286:
51287: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51288: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CLASS_CONV');
51289: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51290: LOAD_UOM_CLASS_CONV;
51291:
51292: ELSIF p_tasknum= TASK_ITEM THEN
51285: ELSIF p_tasknum= TASK_UOM_CONV THEN
51286:
51287: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51288: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CLASS_CONV');
51289: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51290: LOAD_UOM_CLASS_CONV;
51291:
51292: ELSIF p_tasknum= TASK_ITEM THEN
51293:
51290: LOAD_UOM_CLASS_CONV;
51291:
51292: ELSIF p_tasknum= TASK_ITEM THEN
51293:
51294: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51295: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM');
51296: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51297: LOAD_ITEM(p_batch_id);
51298:
51291:
51292: ELSIF p_tasknum= TASK_ITEM THEN
51293:
51294: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51295: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM');
51296: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51297: LOAD_ITEM(p_batch_id);
51298:
51299: -- Product Item Substitute
51292: ELSIF p_tasknum= TASK_ITEM THEN
51293:
51294: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51295: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM');
51296: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51297: LOAD_ITEM(p_batch_id);
51298:
51299: -- Product Item Substitute
51300:
51298:
51299: -- Product Item Substitute
51300:
51301: ELSIF p_tasknum= TASK_ITEM_SUBSTITUTE THEN
51302: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51303: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_SUBSTITUTE');
51304: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51305: LOAD_ITEM_SUBSTITUTE;
51306:
51299: -- Product Item Substitute
51300:
51301: ELSIF p_tasknum= TASK_ITEM_SUBSTITUTE THEN
51302: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51303: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_SUBSTITUTE');
51304: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51305: LOAD_ITEM_SUBSTITUTE;
51306:
51307:
51300:
51301: ELSIF p_tasknum= TASK_ITEM_SUBSTITUTE THEN
51302: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51303: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_SUBSTITUTE');
51304: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51305: LOAD_ITEM_SUBSTITUTE;
51306:
51307:
51308: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
51306:
51307:
51308: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
51309:
51310: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51311: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CATEGORIES_SOURCING');
51312: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51313: LOAD_CATEGORIES_SOURCING;
51314:
51307:
51308: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
51309:
51310: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51311: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CATEGORIES_SOURCING');
51312: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51313: LOAD_CATEGORIES_SOURCING;
51314:
51315: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
51308: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
51309:
51310: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51311: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CATEGORIES_SOURCING');
51312: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51313: LOAD_CATEGORIES_SOURCING;
51314:
51315: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
51316:
51313: LOAD_CATEGORIES_SOURCING;
51314:
51315: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
51316:
51317: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51318: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_DEPT_RESOURCES');
51319: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51320: LOAD_DEPT_RESOURCES;
51321:
51314:
51315: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
51316:
51317: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51318: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_DEPT_RESOURCES');
51319: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51320: LOAD_DEPT_RESOURCES;
51321:
51322: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
51315: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
51316:
51317: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51318: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_DEPT_RESOURCES');
51319: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51320: LOAD_DEPT_RESOURCES;
51321:
51322: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
51323:
51320: LOAD_DEPT_RESOURCES;
51321:
51322: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
51323:
51324: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51325: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_SUPPLY');
51326: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51327: LOAD_MATERIAL_SUPPLY(p_batch_id);
51328:
51321:
51322: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
51323:
51324: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51325: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_SUPPLY');
51326: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51327: LOAD_MATERIAL_SUPPLY(p_batch_id);
51328:
51329: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
51322: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
51323:
51324: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51325: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_SUPPLY');
51326: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51327: LOAD_MATERIAL_SUPPLY(p_batch_id);
51328:
51329: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
51330:
51327: LOAD_MATERIAL_SUPPLY(p_batch_id);
51328:
51329: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
51330:
51331: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51332: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_DEMAND');
51333: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51334: LOAD_MATERIAL_DEMAND(p_batch_id);
51335:
51328:
51329: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
51330:
51331: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51332: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_DEMAND');
51333: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51334: LOAD_MATERIAL_DEMAND(p_batch_id);
51335:
51336: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
51329: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
51330:
51331: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51332: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_DEMAND');
51333: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51334: LOAD_MATERIAL_DEMAND(p_batch_id);
51335:
51336: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
51337:
51334: LOAD_MATERIAL_DEMAND(p_batch_id);
51335:
51336: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
51337:
51338: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51339: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOM_ROUTING');
51340: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51341: LOAD_BOM_ROUTING;
51342:
51335:
51336: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
51337:
51338: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51339: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOM_ROUTING');
51340: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51341: LOAD_BOM_ROUTING;
51342:
51343: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
51336: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
51337:
51338: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51339: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOM_ROUTING');
51340: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51341: LOAD_BOM_ROUTING;
51342:
51343: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
51344:
51341: LOAD_BOM_ROUTING;
51342:
51343: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
51344:
51345: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51346: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE_DEMAND');
51347: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51348: LOAD_RESOURCE_DEMAND;
51349:
51342:
51343: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
51344:
51345: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51346: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE_DEMAND');
51347: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51348: LOAD_RESOURCE_DEMAND;
51349:
51350: ELSIF p_tasknum= TASK_SO_DEMAND THEN
51343: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
51344:
51345: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51346: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE_DEMAND');
51347: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51348: LOAD_RESOURCE_DEMAND;
51349:
51350: ELSIF p_tasknum= TASK_SO_DEMAND THEN
51351:
51348: LOAD_RESOURCE_DEMAND;
51349:
51350: ELSIF p_tasknum= TASK_SO_DEMAND THEN
51351:
51352: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51353: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SO_DEMAND');
51354: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51355: LOAD_SO_DEMAND(p_batch_id);
51356:
51349:
51350: ELSIF p_tasknum= TASK_SO_DEMAND THEN
51351:
51352: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51353: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SO_DEMAND');
51354: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51355: LOAD_SO_DEMAND(p_batch_id);
51356:
51357:
51350: ELSIF p_tasknum= TASK_SO_DEMAND THEN
51351:
51352: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51353: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SO_DEMAND');
51354: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51355: LOAD_SO_DEMAND(p_batch_id);
51356:
51357:
51358: ELSIF p_tasknum= TASK_RESERVATION THEN
51356:
51357:
51358: ELSIF p_tasknum= TASK_RESERVATION THEN
51359:
51360: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51361: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESERVATION');
51362: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51363: LOAD_RESERVATION;
51364:
51357:
51358: ELSIF p_tasknum= TASK_RESERVATION THEN
51359:
51360: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51361: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESERVATION');
51362: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51363: LOAD_RESERVATION;
51364:
51365: ELSIF p_tasknum= TASK_ITEM_CST THEN
51358: ELSIF p_tasknum= TASK_RESERVATION THEN
51359:
51360: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51361: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESERVATION');
51362: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51363: LOAD_RESERVATION;
51364:
51365: ELSIF p_tasknum= TASK_ITEM_CST THEN
51366:
51363: LOAD_RESERVATION;
51364:
51365: ELSIF p_tasknum= TASK_ITEM_CST THEN
51366:
51367: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51368: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_CST');
51369: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51370: LOAD_ITEM_CST;
51371:
51364:
51365: ELSIF p_tasknum= TASK_ITEM_CST THEN
51366:
51367: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51368: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_CST');
51369: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51370: LOAD_ITEM_CST;
51371:
51372: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
51365: ELSIF p_tasknum= TASK_ITEM_CST THEN
51366:
51367: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51368: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_CST');
51369: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51370: LOAD_ITEM_CST;
51371:
51372: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
51373: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51369: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51370: LOAD_ITEM_CST;
51371:
51372: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
51373: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51374: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_VALUE');
51375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51376: LOAD_LEVEL_VALUE(p_batch_id);
51377:
51370: LOAD_ITEM_CST;
51371:
51372: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
51373: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51374: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_VALUE');
51375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51376: LOAD_LEVEL_VALUE(p_batch_id);
51377:
51378: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
51371:
51372: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
51373: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51374: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_VALUE');
51375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51376: LOAD_LEVEL_VALUE(p_batch_id);
51377:
51378: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
51379: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51375: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51376: LOAD_LEVEL_VALUE(p_batch_id);
51377:
51378: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
51379: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51380: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_ASSOCIATION');
51381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51382: LOAD_LEVEL_ASSOCIATION(p_batch_id);
51383:
51376: LOAD_LEVEL_VALUE(p_batch_id);
51377:
51378: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
51379: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51380: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_ASSOCIATION');
51381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51382: LOAD_LEVEL_ASSOCIATION(p_batch_id);
51383:
51384: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
51377:
51378: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
51379: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51380: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_ASSOCIATION');
51381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51382: LOAD_LEVEL_ASSOCIATION(p_batch_id);
51383:
51384: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
51385: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51381: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51382: LOAD_LEVEL_ASSOCIATION(p_batch_id);
51383:
51384: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
51385: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51386: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOOKING_DATA');
51387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51388: LOAD_BOOKING_DATA(p_batch_id);
51389:
51382: LOAD_LEVEL_ASSOCIATION(p_batch_id);
51383:
51384: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
51385: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51386: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOOKING_DATA');
51387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51388: LOAD_BOOKING_DATA(p_batch_id);
51389:
51390: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
51383:
51384: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
51385: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51386: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOOKING_DATA');
51387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51388: LOAD_BOOKING_DATA(p_batch_id);
51389:
51390: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
51391: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51387: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51388: LOAD_BOOKING_DATA(p_batch_id);
51389:
51390: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
51391: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51392: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SHIPMENT_DATA');
51393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51394: LOAD_SHIPMENT_DATA(p_batch_id);
51395:
51388: LOAD_BOOKING_DATA(p_batch_id);
51389:
51390: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
51391: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51392: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SHIPMENT_DATA');
51393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51394: LOAD_SHIPMENT_DATA(p_batch_id);
51395:
51396: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
51389:
51390: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
51391: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51392: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SHIPMENT_DATA');
51393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51394: LOAD_SHIPMENT_DATA(p_batch_id);
51395:
51396: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
51397: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51393: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51394: LOAD_SHIPMENT_DATA(p_batch_id);
51395:
51396: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
51397: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51398: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MFG_FORECAST');
51399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51400: LOAD_MFG_FORECAST(p_batch_id);
51401:
51394: LOAD_SHIPMENT_DATA(p_batch_id);
51395:
51396: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
51397: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51398: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MFG_FORECAST');
51399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51400: LOAD_MFG_FORECAST(p_batch_id);
51401:
51402: ELSIF p_tasknum= TASK_PRICE_LIST THEN
51395:
51396: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
51397: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51398: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MFG_FORECAST');
51399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51400: LOAD_MFG_FORECAST(p_batch_id);
51401:
51402: ELSIF p_tasknum= TASK_PRICE_LIST THEN
51403: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51399: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51400: LOAD_MFG_FORECAST(p_batch_id);
51401:
51402: ELSIF p_tasknum= TASK_PRICE_LIST THEN
51403: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51404: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_PRICE_LIST');
51405: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51406: LOAD_PRICE_LIST(p_batch_id);
51407: /*
51400: LOAD_MFG_FORECAST(p_batch_id);
51401:
51402: ELSIF p_tasknum= TASK_PRICE_LIST THEN
51403: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51404: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_PRICE_LIST');
51405: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51406: LOAD_PRICE_LIST(p_batch_id);
51407: /*
51408: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
51401:
51402: ELSIF p_tasknum= TASK_PRICE_LIST THEN
51403: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51404: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_PRICE_LIST');
51405: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51406: LOAD_PRICE_LIST(p_batch_id);
51407: /*
51408: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
51409: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51405: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51406: LOAD_PRICE_LIST(p_batch_id);
51407: /*
51408: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
51409: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51410: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_LIST_PRICE');
51411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51412: LOAD_ITEM_LIST_PRICE(p_batch_id);
51413: */
51406: LOAD_PRICE_LIST(p_batch_id);
51407: /*
51408: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
51409: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51410: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_LIST_PRICE');
51411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51412: LOAD_ITEM_LIST_PRICE(p_batch_id);
51413: */
51414: ELSIF p_tasknum= TASK_CS_DATA THEN
51407: /*
51408: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
51409: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51410: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_LIST_PRICE');
51411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51412: LOAD_ITEM_LIST_PRICE(p_batch_id);
51413: */
51414: ELSIF p_tasknum= TASK_CS_DATA THEN
51415: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51411: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51412: LOAD_ITEM_LIST_PRICE(p_batch_id);
51413: */
51414: ELSIF p_tasknum= TASK_CS_DATA THEN
51415: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51416: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CS_DATA');
51417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51418: LOAD_CS_DATA(p_batch_id);
51419:
51412: LOAD_ITEM_LIST_PRICE(p_batch_id);
51413: */
51414: ELSIF p_tasknum= TASK_CS_DATA THEN
51415: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51416: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CS_DATA');
51417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51418: LOAD_CS_DATA(p_batch_id);
51419:
51420: ELSIF p_tasknum= TASK_CURR_CONV THEN
51413: */
51414: ELSIF p_tasknum= TASK_CS_DATA THEN
51415: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51416: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CS_DATA');
51417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51418: LOAD_CS_DATA(p_batch_id);
51419:
51420: ELSIF p_tasknum= TASK_CURR_CONV THEN
51421: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51417: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51418: LOAD_CS_DATA(p_batch_id);
51419:
51420: ELSIF p_tasknum= TASK_CURR_CONV THEN
51421: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51422: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CURR_CONV');
51423: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51424: LOAD_CURR_CONV(p_batch_id);
51425:
51418: LOAD_CS_DATA(p_batch_id);
51419:
51420: ELSIF p_tasknum= TASK_CURR_CONV THEN
51421: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51422: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CURR_CONV');
51423: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51424: LOAD_CURR_CONV(p_batch_id);
51425:
51426: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
51419:
51420: ELSIF p_tasknum= TASK_CURR_CONV THEN
51421: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51422: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CURR_CONV');
51423: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51424: LOAD_CURR_CONV(p_batch_id);
51425:
51426: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
51427: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51423: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51424: LOAD_CURR_CONV(p_batch_id);
51425:
51426: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
51427: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51428: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CONV');
51429: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51430: LOAD_UOM_CONV(p_batch_id);
51431:
51424: LOAD_CURR_CONV(p_batch_id);
51425:
51426: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
51427: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51428: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CONV');
51429: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51430: LOAD_UOM_CONV(p_batch_id);
51431:
51432: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
51425:
51426: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
51427: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51428: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CONV');
51429: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51430: LOAD_UOM_CONV(p_batch_id);
51431:
51432: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
51433: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51429: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51430: LOAD_UOM_CONV(p_batch_id);
51431:
51432: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
51433: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51434: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL_TIME');
51435: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51436: LOAD_FISCAL_TIME;
51437:
51430: LOAD_UOM_CONV(p_batch_id);
51431:
51432: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
51433: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51434: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL_TIME');
51435: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51436: LOAD_FISCAL_TIME;
51437:
51438: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
51431:
51432: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
51433: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51434: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL_TIME');
51435: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51436: LOAD_FISCAL_TIME;
51437:
51438: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
51439: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51435: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51436: LOAD_FISCAL_TIME;
51437:
51438: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
51439: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51440: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_COMPOSITE_TIME');
51441: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51442: LOAD_COMPOSITE_TIME;
51443:
51436: LOAD_FISCAL_TIME;
51437:
51438: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
51439: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51440: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_COMPOSITE_TIME');
51441: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51442: LOAD_COMPOSITE_TIME;
51443:
51444:
51437:
51438: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
51439: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51440: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_COMPOSITE_TIME');
51441: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51442: LOAD_COMPOSITE_TIME;
51443:
51444:
51445: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
51442: LOAD_COMPOSITE_TIME;
51443:
51444:
51445: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
51446: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51447: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'TASK_COMPANY_USERS');
51448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51449: LOAD_COMPANY_USER;
51450:
51443:
51444:
51445: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
51446: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51447: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'TASK_COMPANY_USERS');
51448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51449: LOAD_COMPANY_USER;
51450:
51451: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
51444:
51445: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
51446: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51447: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'TASK_COMPANY_USERS');
51448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51449: LOAD_COMPANY_USER;
51450:
51451: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
51452: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51448: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51449: LOAD_COMPANY_USER;
51450:
51451: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
51452: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51453: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CAL_ASSIGNMENTS');
51454: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51455: LOAD_CAL_ASSIGNMENTS;
51456:
51449: LOAD_COMPANY_USER;
51450:
51451: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
51452: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51453: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CAL_ASSIGNMENTS');
51454: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51455: LOAD_CAL_ASSIGNMENTS;
51456:
51457: ELSIF p_tasknum= TASK_IRO THEN
51450:
51451: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
51452: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51453: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CAL_ASSIGNMENTS');
51454: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51455: LOAD_CAL_ASSIGNMENTS;
51456:
51457: ELSIF p_tasknum= TASK_IRO THEN
51458: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51454: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51455: LOAD_CAL_ASSIGNMENTS;
51456:
51457: ELSIF p_tasknum= TASK_IRO THEN
51458: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51459: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_IRO_SUPPLY_DEMAND');
51460: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51461: LOAD_IRO_SUPPLY_DEMAND;
51462:
51455: LOAD_CAL_ASSIGNMENTS;
51456:
51457: ELSIF p_tasknum= TASK_IRO THEN
51458: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51459: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_IRO_SUPPLY_DEMAND');
51460: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51461: LOAD_IRO_SUPPLY_DEMAND;
51462:
51463: ELSIF p_tasknum= TASK_ERO THEN
51456:
51457: ELSIF p_tasknum= TASK_IRO THEN
51458: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51459: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_IRO_SUPPLY_DEMAND');
51460: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51461: LOAD_IRO_SUPPLY_DEMAND;
51462:
51463: ELSIF p_tasknum= TASK_ERO THEN
51464: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51460: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51461: LOAD_IRO_SUPPLY_DEMAND;
51462:
51463: ELSIF p_tasknum= TASK_ERO THEN
51464: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51465: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ERO_SUPPLY_DEMAND');
51466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51467: LOAD_ERO_SUPPLY_DEMAND;
51468:
51461: LOAD_IRO_SUPPLY_DEMAND;
51462:
51463: ELSIF p_tasknum= TASK_ERO THEN
51464: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51465: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ERO_SUPPLY_DEMAND');
51466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51467: LOAD_ERO_SUPPLY_DEMAND;
51468:
51469:
51462:
51463: ELSIF p_tasknum= TASK_ERO THEN
51464: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
51465: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ERO_SUPPLY_DEMAND');
51466: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51467: LOAD_ERO_SUPPLY_DEMAND;
51468:
51469:
51470: END IF;
51472: -- ======== If no EXCEPTION occurs, then returns with status = OK =========
51473:
51474: p_status := OK;
51475:
51476: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
51477: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
51478: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
51479: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51480:
51473:
51474: p_status := OK;
51475:
51476: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
51477: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
51478: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
51479: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51480:
51481: EXCEPTION
51475:
51476: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
51477: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
51478: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
51479: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
51480:
51481: EXCEPTION
51482:
51483: WHEN others THEN
52609: WHERE mai.INSTANCE_ID= p_instance_id
52610: FOR UPDATE;
52611:
52612: IF lv_staging_table_status= G_ST_PULLING THEN
52613: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PULLING');
52614: ERRBUF:= FND_MESSAGE.GET;
52615:
52616: RETCODE := G_ERROR;
52617: RETURN FALSE;
52610: FOR UPDATE;
52611:
52612: IF lv_staging_table_status= G_ST_PULLING THEN
52613: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PULLING');
52614: ERRBUF:= FND_MESSAGE.GET;
52615:
52616: RETCODE := G_ERROR;
52617: RETURN FALSE;
52618:
52616: RETCODE := G_ERROR;
52617: RETURN FALSE;
52618:
52619: ELSIF lv_staging_table_status= G_ST_COLLECTING THEN
52620: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_LOADING');
52621: ERRBUF:= FND_MESSAGE.GET;
52622:
52623: RETCODE := G_ERROR;
52624: RETURN FALSE;
52617: RETURN FALSE;
52618:
52619: ELSIF lv_staging_table_status= G_ST_COLLECTING THEN
52620: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_LOADING');
52621: ERRBUF:= FND_MESSAGE.GET;
52622:
52623: RETCODE := G_ERROR;
52624: RETURN FALSE;
52625:
52624: RETURN FALSE;
52625:
52626: ELSIF lv_staging_table_status= G_ST_PURGING THEN
52627:
52628: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PURGING');
52629: ERRBUF:= FND_MESSAGE.GET;
52630:
52631: RETCODE := G_ERROR;
52632: RETURN FALSE;
52625:
52626: ELSIF lv_staging_table_status= G_ST_PURGING THEN
52627:
52628: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PURGING');
52629: ERRBUF:= FND_MESSAGE.GET;
52630:
52631: RETCODE := G_ERROR;
52632: RETURN FALSE;
52633:
52632: RETURN FALSE;
52633:
52634: ELSIF lv_staging_table_status= G_ST_PRE_PROCESSING THEN
52635:
52636: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PRE_PROCESSING');
52637: ERRBUF:= FND_MESSAGE.GET;
52638:
52639: RETCODE := G_ERROR;
52640: RETURN FALSE;
52633:
52634: ELSIF lv_staging_table_status= G_ST_PRE_PROCESSING THEN
52635:
52636: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PRE_PROCESSING');
52637: ERRBUF:= FND_MESSAGE.GET;
52638:
52639: RETCODE := G_ERROR;
52640: RETURN FALSE;
52641:
52883: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_status)<>0 THEN
52884: RAISE EX_PIPE_SND;
52885: END IF;
52886:
52887: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
52888: ERRBUF:= FND_MESSAGE.GET;
52889:
52890: IF v_flag=SYS_YES THEN
52891: RETCODE:= G_WARNING;
52884: RAISE EX_PIPE_SND;
52885: END IF;
52886:
52887: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
52888: ERRBUF:= FND_MESSAGE.GET;
52889:
52890: IF v_flag=SYS_YES THEN
52891: RETCODE:= G_WARNING;
52892: ELSE
52902: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_status)<>0 THEN
52903: RAISE EX_PIPE_SND;
52904: END IF;
52905:
52906: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
52907: ERRBUF:= FND_MESSAGE.GET;
52908:
52909: RETCODE := G_ERROR;
52910:
52903: RAISE EX_PIPE_SND;
52904: END IF;
52905:
52906: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
52907: ERRBUF:= FND_MESSAGE.GET;
52908:
52909: RETCODE := G_ERROR;
52910:
52911: END IF;
52916: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
52917:
52918: ROLLBACK;
52919:
52920: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
52921: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_mw);
52922: ERRBUF:= FND_MESSAGE.GET;
52923: RETCODE := G_ERROR;
52924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
52917:
52918: ROLLBACK;
52919:
52920: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
52921: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_mw);
52922: ERRBUF:= FND_MESSAGE.GET;
52923: RETCODE := G_ERROR;
52924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
52925:
52918: ROLLBACK;
52919:
52920: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
52921: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_mw);
52922: ERRBUF:= FND_MESSAGE.GET;
52923: RETCODE := G_ERROR;
52924: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
52925:
52926: -- send a message of 'unresolvable error' to monitor
52926: -- send a message of 'unresolvable error' to monitor
52927: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52928:
52929: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52930: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52931: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52932: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52933: END IF;
52934:
52927: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52928:
52929: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52930: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52931: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52932: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52933: END IF;
52934:
52935: WHEN EX_PIPE_SND THEN
52928:
52929: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52930: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52931: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52932: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52933: END IF;
52934:
52935: WHEN EX_PIPE_SND THEN
52936: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
52936: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
52937:
52938: ROLLBACK;
52939:
52940: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52941: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52942: ERRBUF:= FND_MESSAGE.GET;
52943: RETCODE := G_ERROR;
52944: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
52937:
52938: ROLLBACK;
52939:
52940: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52941: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52942: ERRBUF:= FND_MESSAGE.GET;
52943: RETCODE := G_ERROR;
52944: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
52945:
52938: ROLLBACK;
52939:
52940: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52941: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52942: ERRBUF:= FND_MESSAGE.GET;
52943: RETCODE := G_ERROR;
52944: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
52945:
52946: -- send a message of 'unresolavable error' to monitor
52946: -- send a message of 'unresolavable error' to monitor
52947: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52948:
52949: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52950: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52951: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52952: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52953: END IF;
52954:
52947: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52948:
52949: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52950: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52951: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52952: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52953: END IF;
52954:
52955: WHEN EX_PROCESS_TIME_OUT THEN
52948:
52949: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52950: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52951: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52952: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52953: END IF;
52954:
52955: WHEN EX_PROCESS_TIME_OUT THEN
52956: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
52956: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
52957:
52958: ROLLBACK;
52959:
52960: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
52961: ERRBUF:= FND_MESSAGE.GET;
52962: RETCODE := G_ERROR;
52963: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
52964:
52957:
52958: ROLLBACK;
52959:
52960: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
52961: ERRBUF:= FND_MESSAGE.GET;
52962: RETCODE := G_ERROR;
52963: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
52964:
52965: -- send a message of 'unresolavable error' to monitor
52965: -- send a message of 'unresolavable error' to monitor
52966: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52967:
52968: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52969: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52970: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52971: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52972: END IF;
52973:
52966: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52967:
52968: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52969: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52970: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52971: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52972: END IF;
52973:
52974: WHEN OTHERS THEN
52967:
52968: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52969: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52970: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52971: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52972: END IF;
52973:
52974: WHEN OTHERS THEN
52975: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
52983: -- send a message of 'unresolavable error' to monitor
52984: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52985:
52986: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52987: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52988: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52989: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52990: END IF;
52991:
52984: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
52985:
52986: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52987: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52988: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52989: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52990: END IF;
52991:
52992: -- send a message of 'the worker ends its process' to monitor
52985:
52986: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
52987: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
52988: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
52989: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
52990: END IF;
52991:
52992: -- send a message of 'the worker ends its process' to monitor
52993: DBMS_PIPE.PACK_MESSAGE( SYS_YES);
53158: commit;
53159:
53160: ELSE
53161:
53162: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_BOM_PROCESSING_FAIL');
53163: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
53164: RETCODE := G_WARNING;
53165:
53166: commit;
53159:
53160: ELSE
53161:
53162: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_BOM_PROCESSING_FAIL');
53163: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
53164: RETCODE := G_WARNING;
53165:
53166: commit;
53167:
53567: END IF;
53568:
53569: END LOOP;
53570:
53571: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_LAUNCH_WORKER_FAIL');
53572: ERRBUF:= FND_MESSAGE.GET;
53573: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
53574: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
53575: RETCODE := G_ERROR;
53568:
53569: END LOOP;
53570:
53571: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_LAUNCH_WORKER_FAIL');
53572: ERRBUF:= FND_MESSAGE.GET;
53573: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
53574: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
53575: RETCODE := G_ERROR;
53576:
53576:
53577: COMMIT;
53578: RETURN;
53579: ELSE
53580: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
53581: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lvs_request_id(lc_i));
53582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
53583: --MSC_UTIL.print_trace_file_name(lvs_request_id(lc_i));
53584: END IF;
53577: COMMIT;
53578: RETURN;
53579: ELSE
53580: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
53581: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lvs_request_id(lc_i));
53582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
53583: --MSC_UTIL.print_trace_file_name(lvs_request_id(lc_i));
53584: END IF;
53585:
53578: RETURN;
53579: ELSE
53580: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
53581: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lvs_request_id(lc_i));
53582: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
53583: --MSC_UTIL.print_trace_file_name(lvs_request_id(lc_i));
53584: END IF;
53585:
53586: END LOOP;
54427: lv_task_number:= -1;
54428:
54429: ROLLBACK;
54430:
54431: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54432: ERRBUF:= FND_MESSAGE.GET;
54433: RETCODE := G_ERROR;
54434: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54435:
54428:
54429: ROLLBACK;
54430:
54431: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54432: ERRBUF:= FND_MESSAGE.GET;
54433: RETCODE := G_ERROR;
54434: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54435:
54436: ELSE
54442: LAST_UPDATED_BY= v_current_user,
54443: REQUEST_ID= FND_GLOBAL.CONC_REQUEST_ID
54444: WHERE mai.INSTANCE_ID= v_instance_id;
54445:
54446: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
54447: ERRBUF:= FND_MESSAGE.GET;
54448: RETCODE := G_SUCCESS;
54449: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54450:
54443: REQUEST_ID= FND_GLOBAL.CONC_REQUEST_ID
54444: WHERE mai.INSTANCE_ID= v_instance_id;
54445:
54446: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
54447: ERRBUF:= FND_MESSAGE.GET;
54448: RETCODE := G_SUCCESS;
54449: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54450:
54451: FINAL;
54492: END LOOP;
54493:
54494: IF lv_worker_committed<> p_total_worker_num THEN
54495:
54496: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL_TO_COMMIT');
54497: ERRBUF:= FND_MESSAGE.GET;
54498: RETCODE := G_ERROR;
54499:
54500: END IF;
54493:
54494: IF lv_worker_committed<> p_total_worker_num THEN
54495:
54496: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL_TO_COMMIT');
54497: ERRBUF:= FND_MESSAGE.GET;
54498: RETCODE := G_ERROR;
54499:
54500: END IF;
54501:
54562:
54563: IF lv_monitor_id <> 0 THEN
54564: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
54565: request_data => to_char(G_ODS_REQ_DATA)) ;
54566: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
54567: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_monitor_id);
54568: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
54569: END IF;
54570:
54563: IF lv_monitor_id <> 0 THEN
54564: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
54565: request_data => to_char(G_ODS_REQ_DATA)) ;
54566: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
54567: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_monitor_id);
54568: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
54569: END IF;
54570:
54571: commit;
54564: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
54565: request_data => to_char(G_ODS_REQ_DATA)) ;
54566: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
54567: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_monitor_id);
54568: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
54569: END IF;
54570:
54571: commit;
54572:
54585: DROP_INDEXES;
54586: END IF;
54587:
54588: RETCODE := G_ERROR;
54589: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
54590: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
54591: ERRBUF:= FND_MESSAGE.GET;
54592: RETCODE := G_ERROR;
54593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
54586: END IF;
54587:
54588: RETCODE := G_ERROR;
54589: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
54590: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
54591: ERRBUF:= FND_MESSAGE.GET;
54592: RETCODE := G_ERROR;
54593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
54594:
54587:
54588: RETCODE := G_ERROR;
54589: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
54590: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
54591: ERRBUF:= FND_MESSAGE.GET;
54592: RETCODE := G_ERROR;
54593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
54594:
54595: IF lv_check_point < 3 THEN
54592: RETCODE := G_ERROR;
54593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
54594:
54595: IF lv_check_point < 3 THEN
54596: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54597: ERRBUF:= FND_MESSAGE.GET;
54598: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
54599: END IF;
54600:
54593: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
54594:
54595: IF lv_check_point < 3 THEN
54596: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54597: ERRBUF:= FND_MESSAGE.GET;
54598: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
54599: END IF;
54600:
54601: COMMIT;
54610: END IF;
54611: DROP_INDEXES;
54612: END IF;
54613:
54614: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
54615: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
54616: ERRBUF:= FND_MESSAGE.GET;
54617: RETCODE := G_ERROR;
54618: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54611: DROP_INDEXES;
54612: END IF;
54613:
54614: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
54615: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
54616: ERRBUF:= FND_MESSAGE.GET;
54617: RETCODE := G_ERROR;
54618: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54619:
54612: END IF;
54613:
54614: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
54615: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
54616: ERRBUF:= FND_MESSAGE.GET;
54617: RETCODE := G_ERROR;
54618: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54619:
54620: IF lv_check_point < 3 THEN
54617: RETCODE := G_ERROR;
54618: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54619:
54620: IF lv_check_point < 3 THEN
54621: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54622: ERRBUF:= FND_MESSAGE.GET;
54623: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
54624: END IF;
54625:
54618: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54619:
54620: IF lv_check_point < 3 THEN
54621: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54622: ERRBUF:= FND_MESSAGE.GET;
54623: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
54624: END IF;
54625:
54626: COMMIT;
54635: END IF;
54636: DROP_INDEXES;
54637: END IF;
54638:
54639: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
54640: ERRBUF:= FND_MESSAGE.GET;
54641: RETCODE := G_ERROR;
54642: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54643:
54636: DROP_INDEXES;
54637: END IF;
54638:
54639: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
54640: ERRBUF:= FND_MESSAGE.GET;
54641: RETCODE := G_ERROR;
54642: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54643:
54644: IF lv_check_point < 3 THEN
54641: RETCODE := G_ERROR;
54642: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54643:
54644: IF lv_check_point < 3 THEN
54645: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54646: ERRBUF:= FND_MESSAGE.GET;
54647: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54648: END IF;
54649:
54642: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54643:
54644: IF lv_check_point < 3 THEN
54645: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54646: ERRBUF:= FND_MESSAGE.GET;
54647: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54648: END IF;
54649:
54650: COMMIT;
54664: RETCODE := G_ERROR;
54665: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54666:
54667: IF lv_check_point < 3 THEN
54668: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54669: ERRBUF:= FND_MESSAGE.GET;
54670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54671: END IF;
54672:
54665: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
54666:
54667: IF lv_check_point < 3 THEN
54668: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
54669: ERRBUF:= FND_MESSAGE.GET;
54670: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
54671: END IF;
54672:
54673: COMMIT;