210: CLOSE c_email;
211:
212: lv_pointer:= 2;
213: IF lv_protocol_address IS NULL THEN
214: fnd_message.set_name ('ECX', 'ECX_TP_ADMIN_EMAIL_NOT_FOUND');
215: fnd_message.set_token ('TP_ID', c.party_site_id);
216: lv_errbuf := fnd_message.get;
217: LOG_MESSAGE( lv_errbuf);
218: fnd_profile.get('ECX_SYS_ADMIN_EMAIL',lv_protocol_address);
211:
212: lv_pointer:= 2;
213: IF lv_protocol_address IS NULL THEN
214: fnd_message.set_name ('ECX', 'ECX_TP_ADMIN_EMAIL_NOT_FOUND');
215: fnd_message.set_token ('TP_ID', c.party_site_id);
216: lv_errbuf := fnd_message.get;
217: LOG_MESSAGE( lv_errbuf);
218: fnd_profile.get('ECX_SYS_ADMIN_EMAIL',lv_protocol_address);
219: END IF;
212: lv_pointer:= 2;
213: IF lv_protocol_address IS NULL THEN
214: fnd_message.set_name ('ECX', 'ECX_TP_ADMIN_EMAIL_NOT_FOUND');
215: fnd_message.set_token ('TP_ID', c.party_site_id);
216: lv_errbuf := fnd_message.get;
217: LOG_MESSAGE( lv_errbuf);
218: fnd_profile.get('ECX_SYS_ADMIN_EMAIL',lv_protocol_address);
219: END IF;
220:
219: END IF;
220:
221: lv_pointer:= 3;
222: IF lv_protocol_address IS NULL THEN
223: fnd_message.set_name ('ECX', 'ECX_SYS_ADMIN_EMAIL_NOT_FOUND');
224: LOG_MESSAGE(fnd_message.get);
225: ELSE
226: IF v_debug THEN
227: LOG_MESSAGE('lv_protocol_address: '||lv_protocol_address);
220:
221: lv_pointer:= 3;
222: IF lv_protocol_address IS NULL THEN
223: fnd_message.set_name ('ECX', 'ECX_SYS_ADMIN_EMAIL_NOT_FOUND');
224: LOG_MESSAGE(fnd_message.get);
225: ELSE
226: IF v_debug THEN
227: LOG_MESSAGE('lv_protocol_address: '||lv_protocol_address);
228: END IF;
226: IF v_debug THEN
227: LOG_MESSAGE('lv_protocol_address: '||lv_protocol_address);
228: END IF;
229: IF c.severity = 1 THEN
230: fnd_message.set_name ('MSC', 'MSC_PP_ERROR_EMAIL');
231: ELSE
232: fnd_message.set_name ('MSC', 'MSC_PP_WARN_EMAIL');
233: END IF;
234:
228: END IF;
229: IF c.severity = 1 THEN
230: fnd_message.set_name ('MSC', 'MSC_PP_ERROR_EMAIL');
231: ELSE
232: fnd_message.set_name ('MSC', 'MSC_PP_WARN_EMAIL');
233: END IF;
234:
235: lv_pointer:= 4;
236: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
232: fnd_message.set_name ('MSC', 'MSC_PP_WARN_EMAIL');
233: END IF;
234:
235: lv_pointer:= 4;
236: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
237: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
238: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
239: lv_errbuf := lv_errbuf ||fnd_message.get;
240: lv_errbuf := lv_errbuf ||c.error_text;
233: END IF;
234:
235: lv_pointer:= 4;
236: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
237: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
238: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
239: lv_errbuf := lv_errbuf ||fnd_message.get;
240: lv_errbuf := lv_errbuf ||c.error_text;
241:
234:
235: lv_pointer:= 4;
236: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
237: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
238: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
239: lv_errbuf := lv_errbuf ||fnd_message.get;
240: lv_errbuf := lv_errbuf ||c.error_text;
241:
242: IF v_debug THEN
235: lv_pointer:= 4;
236: fnd_message.set_token ('TRANSACTION_TYPE', c.transaction_type);
237: fnd_message.set_token ('TRANSACTION_SUB_TYPE', c.transaction_subtype);
238: fnd_message.set_token ('DOCUMENT_NUMBER', c.document_number);
239: lv_errbuf := lv_errbuf ||fnd_message.get;
240: lv_errbuf := lv_errbuf ||c.error_text;
241:
242: IF v_debug THEN
243: LOG_MESSAGE('lv_errbuf : '||lv_errbuf );
2965: 'FND', lv_dummy1,lv_dummy2, v_applsys_schema);
2966:
2967: EXCEPTION
2968: WHEN NO_DATA_FOUND THEN
2969: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_INVALID_INSTANCE_ID');
2970: FND_MESSAGE.SET_TOKEN('INSTANCE_ID', v_pipe_wm);
2971: raise_application_error(-20101,FND_MESSAGE.GET);
2972: END INITIALIZE;
2973:
2966:
2967: EXCEPTION
2968: WHEN NO_DATA_FOUND THEN
2969: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_INVALID_INSTANCE_ID');
2970: FND_MESSAGE.SET_TOKEN('INSTANCE_ID', v_pipe_wm);
2971: raise_application_error(-20101,FND_MESSAGE.GET);
2972: END INITIALIZE;
2973:
2974:
2967: EXCEPTION
2968: WHEN NO_DATA_FOUND THEN
2969: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_INVALID_INSTANCE_ID');
2970: FND_MESSAGE.SET_TOKEN('INSTANCE_ID', v_pipe_wm);
2971: raise_application_error(-20101,FND_MESSAGE.GET);
2972: END INITIALIZE;
2973:
2974:
2975: PROCEDURE FINAL
5663: v_cal_build := true;
5664: IF lv_request_id <> 0 THEN
5665: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
5666: request_data => to_char(G_CAL_REQ_DATA)) ;
5667: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
5668: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_request_id);
5669: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
5670: END IF;
5671:
5664: IF lv_request_id <> 0 THEN
5665: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
5666: request_data => to_char(G_CAL_REQ_DATA)) ;
5667: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
5668: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_request_id);
5669: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
5670: END IF;
5671:
5672: EXCEPTION
5665: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
5666: request_data => to_char(G_CAL_REQ_DATA)) ;
5667: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
5668: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_request_id);
5669: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
5670: END IF;
5671:
5672: EXCEPTION
5673: WHEN too_many_rows THEN
56229: -- ============= Execute the task according to its task number ===========
56230:
56231: IF p_tasknum= TASK_SUPPLIER_CAPACITY THEN
56232:
56233: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56234: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SUPPLIER_CAPACITY');
56235: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56236: LOAD_SUPPLIER_CAPACITY;
56237:
56230:
56231: IF p_tasknum= TASK_SUPPLIER_CAPACITY THEN
56232:
56233: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56234: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SUPPLIER_CAPACITY');
56235: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56236: LOAD_SUPPLIER_CAPACITY;
56237:
56238: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
56231: IF p_tasknum= TASK_SUPPLIER_CAPACITY THEN
56232:
56233: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56234: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SUPPLIER_CAPACITY');
56235: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56236: LOAD_SUPPLIER_CAPACITY;
56237:
56238: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
56239:
56236: LOAD_SUPPLIER_CAPACITY;
56237:
56238: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
56239:
56240: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56241: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SAFETY_STOCKS');
56242: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56243: LOAD_SAFETY_STOCK;
56244:
56237:
56238: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
56239:
56240: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56241: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SAFETY_STOCKS');
56242: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56243: LOAD_SAFETY_STOCK;
56244:
56245: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
56238: ELSIF p_tasknum= TASK_SAFETY_STOCK THEN
56239:
56240: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56241: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SAFETY_STOCKS');
56242: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56243: LOAD_SAFETY_STOCK;
56244:
56245: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
56246:
56243: LOAD_SAFETY_STOCK;
56244:
56245: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
56246:
56247: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56248: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BIS_PERIODS');
56249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56250: LOAD_BIS_PERIODS;
56251:
56244:
56245: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
56246:
56247: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56248: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BIS_PERIODS');
56249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56250: LOAD_BIS_PERIODS;
56251:
56252: ELSIF p_tasknum= TASK_UOM_CONV THEN
56245: ELSIF p_tasknum= TASK_BIS_PERIODS THEN
56246:
56247: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56248: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BIS_PERIODS');
56249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56250: LOAD_BIS_PERIODS;
56251:
56252: ELSIF p_tasknum= TASK_UOM_CONV THEN
56253:
56250: LOAD_BIS_PERIODS;
56251:
56252: ELSIF p_tasknum= TASK_UOM_CONV THEN
56253:
56254: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56255: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CLASS_CONV');
56256: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56257: LOAD_UOM_CLASS_CONV;
56258:
56251:
56252: ELSIF p_tasknum= TASK_UOM_CONV THEN
56253:
56254: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56255: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CLASS_CONV');
56256: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56257: LOAD_UOM_CLASS_CONV;
56258:
56259: ELSIF p_tasknum= TASK_ITEM THEN
56252: ELSIF p_tasknum= TASK_UOM_CONV THEN
56253:
56254: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56255: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CLASS_CONV');
56256: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56257: LOAD_UOM_CLASS_CONV;
56258:
56259: ELSIF p_tasknum= TASK_ITEM THEN
56260:
56257: LOAD_UOM_CLASS_CONV;
56258:
56259: ELSIF p_tasknum= TASK_ITEM THEN
56260:
56261: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56262: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM');
56263: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56264: LOAD_ITEM(p_batch_id);
56265:
56258:
56259: ELSIF p_tasknum= TASK_ITEM THEN
56260:
56261: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56262: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM');
56263: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56264: LOAD_ITEM(p_batch_id);
56265:
56266: -- Product Item Substitute
56259: ELSIF p_tasknum= TASK_ITEM THEN
56260:
56261: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56262: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM');
56263: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56264: LOAD_ITEM(p_batch_id);
56265:
56266: -- Product Item Substitute
56267:
56265:
56266: -- Product Item Substitute
56267:
56268: ELSIF p_tasknum= TASK_ITEM_SUBSTITUTE THEN
56269: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56270: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_SUBSTITUTE');
56271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56272: LOAD_ITEM_SUBSTITUTE;
56273:
56266: -- Product Item Substitute
56267:
56268: ELSIF p_tasknum= TASK_ITEM_SUBSTITUTE THEN
56269: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56270: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_SUBSTITUTE');
56271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56272: LOAD_ITEM_SUBSTITUTE;
56273:
56274:
56267:
56268: ELSIF p_tasknum= TASK_ITEM_SUBSTITUTE THEN
56269: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56270: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_SUBSTITUTE');
56271: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56272: LOAD_ITEM_SUBSTITUTE;
56273:
56274:
56275: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
56273:
56274:
56275: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
56276:
56277: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56278: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CATEGORIES_SOURCING');
56279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56280: LOAD_CATEGORIES_SOURCING;
56281:
56274:
56275: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
56276:
56277: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56278: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CATEGORIES_SOURCING');
56279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56280: LOAD_CATEGORIES_SOURCING;
56281:
56282: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
56275: ELSIF p_tasknum= TASK_CATEGORIES_SOURCING THEN
56276:
56277: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56278: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CATEGORIES_SOURCING');
56279: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56280: LOAD_CATEGORIES_SOURCING;
56281:
56282: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
56283:
56280: LOAD_CATEGORIES_SOURCING;
56281:
56282: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
56283:
56284: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56285: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_DEPT_RESOURCES');
56286: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56287: LOAD_DEPT_RESOURCES;
56288: LOAD_RESOURCE_SETUPS;
56281:
56282: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
56283:
56284: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56285: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_DEPT_RESOURCES');
56286: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56287: LOAD_DEPT_RESOURCES;
56288: LOAD_RESOURCE_SETUPS;
56289: LOAD_SETUP_TRANSITIONS;
56282: ELSIF p_tasknum= TASK_DEPT_RESOURCES THEN
56283:
56284: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56285: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_DEPT_RESOURCES');
56286: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56287: LOAD_DEPT_RESOURCES;
56288: LOAD_RESOURCE_SETUPS;
56289: LOAD_SETUP_TRANSITIONS;
56290: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
56288: LOAD_RESOURCE_SETUPS;
56289: LOAD_SETUP_TRANSITIONS;
56290: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
56291:
56292: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56293: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_SUPPLY');
56294: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56295: LOAD_MATERIAL_SUPPLY(p_batch_id);
56296:
56289: LOAD_SETUP_TRANSITIONS;
56290: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
56291:
56292: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56293: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_SUPPLY');
56294: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56295: LOAD_MATERIAL_SUPPLY(p_batch_id);
56296:
56297: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
56290: ELSIF p_tasknum= TASK_MATERIAL_SUPPLY THEN
56291:
56292: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56293: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_SUPPLY');
56294: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56295: LOAD_MATERIAL_SUPPLY(p_batch_id);
56296:
56297: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
56298:
56295: LOAD_MATERIAL_SUPPLY(p_batch_id);
56296:
56297: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
56298:
56299: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56300: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_DEMAND');
56301: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56302: LOAD_MATERIAL_DEMAND(p_batch_id);
56303:
56296:
56297: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
56298:
56299: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56300: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_DEMAND');
56301: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56302: LOAD_MATERIAL_DEMAND(p_batch_id);
56303:
56304: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
56297: ELSIF p_tasknum= TASK_MATERIAL_DEMAND THEN
56298:
56299: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56300: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MATERIAL_DEMAND');
56301: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56302: LOAD_MATERIAL_DEMAND(p_batch_id);
56303:
56304: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
56305:
56302: LOAD_MATERIAL_DEMAND(p_batch_id);
56303:
56304: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
56305:
56306: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56307: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOM_ROUTING');
56308: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56309: LOAD_BOM_ROUTING;
56310:
56303:
56304: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
56305:
56306: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56307: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOM_ROUTING');
56308: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56309: LOAD_BOM_ROUTING;
56310:
56311: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
56304: ELSIF p_tasknum= TASK_BOM_ROUTING THEN
56305:
56306: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56307: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOM_ROUTING');
56308: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56309: LOAD_BOM_ROUTING;
56310:
56311: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
56312:
56309: LOAD_BOM_ROUTING;
56310:
56311: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
56312:
56313: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56314: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE_DEMAND');
56315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56316: LOAD_RESOURCE_DEMAND;
56317:
56310:
56311: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
56312:
56313: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56314: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE_DEMAND');
56315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56316: LOAD_RESOURCE_DEMAND;
56317:
56318: ELSIF p_tasknum= TASK_SO_DEMAND THEN
56311: ELSIF p_tasknum= TASK_RESOURCE_DEMAND THEN
56312:
56313: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56314: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESOURCE_DEMAND');
56315: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56316: LOAD_RESOURCE_DEMAND;
56317:
56318: ELSIF p_tasknum= TASK_SO_DEMAND THEN
56319:
56316: LOAD_RESOURCE_DEMAND;
56317:
56318: ELSIF p_tasknum= TASK_SO_DEMAND THEN
56319:
56320: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56321: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SO_DEMAND');
56322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56323: LOAD_SO_DEMAND(p_batch_id);
56324:
56317:
56318: ELSIF p_tasknum= TASK_SO_DEMAND THEN
56319:
56320: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56321: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SO_DEMAND');
56322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56323: LOAD_SO_DEMAND(p_batch_id);
56324:
56325:
56318: ELSIF p_tasknum= TASK_SO_DEMAND THEN
56319:
56320: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56321: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SO_DEMAND');
56322: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56323: LOAD_SO_DEMAND(p_batch_id);
56324:
56325:
56326: ELSIF p_tasknum= TASK_RESERVATION THEN
56324:
56325:
56326: ELSIF p_tasknum= TASK_RESERVATION THEN
56327:
56328: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56329: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESERVATION');
56330: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56331: LOAD_RESERVATION;
56332:
56325:
56326: ELSIF p_tasknum= TASK_RESERVATION THEN
56327:
56328: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56329: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESERVATION');
56330: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56331: LOAD_RESERVATION;
56332:
56333: ELSIF p_tasknum= TASK_ITEM_CST THEN
56326: ELSIF p_tasknum= TASK_RESERVATION THEN
56327:
56328: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56329: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_RESERVATION');
56330: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56331: LOAD_RESERVATION;
56332:
56333: ELSIF p_tasknum= TASK_ITEM_CST THEN
56334:
56331: LOAD_RESERVATION;
56332:
56333: ELSIF p_tasknum= TASK_ITEM_CST THEN
56334:
56335: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56336: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_CST');
56337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56338: LOAD_ITEM_CST;
56339:
56332:
56333: ELSIF p_tasknum= TASK_ITEM_CST THEN
56334:
56335: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56336: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_CST');
56337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56338: LOAD_ITEM_CST;
56339:
56340: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
56333: ELSIF p_tasknum= TASK_ITEM_CST THEN
56334:
56335: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56336: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_CST');
56337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56338: LOAD_ITEM_CST;
56339:
56340: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
56341: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56337: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56338: LOAD_ITEM_CST;
56339:
56340: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
56341: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56342: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_VALUE');
56343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56344: LOAD_LEVEL_VALUE(p_batch_id);
56345:
56338: LOAD_ITEM_CST;
56339:
56340: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
56341: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56342: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_VALUE');
56343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56344: LOAD_LEVEL_VALUE(p_batch_id);
56345:
56346: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
56339:
56340: ELSIF p_tasknum= TASK_LEVEL_VALUE THEN
56341: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56342: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_VALUE');
56343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56344: LOAD_LEVEL_VALUE(p_batch_id);
56345:
56346: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
56347: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56343: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56344: LOAD_LEVEL_VALUE(p_batch_id);
56345:
56346: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
56347: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56348: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_ASSOCIATION');
56349: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56350: LOAD_LEVEL_ASSOCIATION(p_batch_id);
56351:
56344: LOAD_LEVEL_VALUE(p_batch_id);
56345:
56346: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
56347: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56348: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_ASSOCIATION');
56349: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56350: LOAD_LEVEL_ASSOCIATION(p_batch_id);
56351:
56352: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
56345:
56346: ELSIF p_tasknum= TASK_LEVEL_ASSOCIATION THEN
56347: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56348: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_LEVEL_ASSOCIATION');
56349: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56350: LOAD_LEVEL_ASSOCIATION(p_batch_id);
56351:
56352: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
56353: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56349: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56350: LOAD_LEVEL_ASSOCIATION(p_batch_id);
56351:
56352: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
56353: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56354: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOOKING_DATA');
56355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56356: LOAD_BOOKING_DATA(p_batch_id);
56357:
56350: LOAD_LEVEL_ASSOCIATION(p_batch_id);
56351:
56352: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
56353: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56354: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOOKING_DATA');
56355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56356: LOAD_BOOKING_DATA(p_batch_id);
56357:
56358: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
56351:
56352: ELSIF p_tasknum= TASK_BOOKING_DATA THEN
56353: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56354: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_BOOKING_DATA');
56355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56356: LOAD_BOOKING_DATA(p_batch_id);
56357:
56358: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
56359: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56356: LOAD_BOOKING_DATA(p_batch_id);
56357:
56358: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
56359: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56360: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SHIPMENT_DATA');
56361: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56362: LOAD_SHIPMENT_DATA(p_batch_id);
56363:
56356: LOAD_BOOKING_DATA(p_batch_id);
56357:
56358: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
56359: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56360: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SHIPMENT_DATA');
56361: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56362: LOAD_SHIPMENT_DATA(p_batch_id);
56363:
56364: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
56357:
56358: ELSIF p_tasknum= TASK_SHIPMENT_DATA THEN
56359: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56360: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SHIPMENT_DATA');
56361: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56362: LOAD_SHIPMENT_DATA(p_batch_id);
56363:
56364: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
56365: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56361: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56362: LOAD_SHIPMENT_DATA(p_batch_id);
56363:
56364: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
56365: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56366: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MFG_FORECAST');
56367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56368: LOAD_MFG_FORECAST(p_batch_id);
56369:
56362: LOAD_SHIPMENT_DATA(p_batch_id);
56363:
56364: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
56365: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56366: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MFG_FORECAST');
56367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56368: LOAD_MFG_FORECAST(p_batch_id);
56369:
56370: ELSIF p_tasknum= TASK_PRICE_LIST THEN
56363:
56364: ELSIF p_tasknum= TASK_MFG_FORECAST THEN
56365: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56366: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_MFG_FORECAST');
56367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56368: LOAD_MFG_FORECAST(p_batch_id);
56369:
56370: ELSIF p_tasknum= TASK_PRICE_LIST THEN
56371: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56368: LOAD_MFG_FORECAST(p_batch_id);
56369:
56370: ELSIF p_tasknum= TASK_PRICE_LIST THEN
56371: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56372: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_PRICE_LIST');
56373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56374: LOAD_PRICE_LIST(p_batch_id);
56375: /*
56368: LOAD_MFG_FORECAST(p_batch_id);
56369:
56370: ELSIF p_tasknum= TASK_PRICE_LIST THEN
56371: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56372: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_PRICE_LIST');
56373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56374: LOAD_PRICE_LIST(p_batch_id);
56375: /*
56376: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
56369:
56370: ELSIF p_tasknum= TASK_PRICE_LIST THEN
56371: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56372: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_PRICE_LIST');
56373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56374: LOAD_PRICE_LIST(p_batch_id);
56375: /*
56376: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
56377: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56373: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56374: LOAD_PRICE_LIST(p_batch_id);
56375: /*
56376: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
56377: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56378: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_LIST_PRICE');
56379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56380: LOAD_ITEM_LIST_PRICE(p_batch_id);
56381: */
56374: LOAD_PRICE_LIST(p_batch_id);
56375: /*
56376: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
56377: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56378: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_LIST_PRICE');
56379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56380: LOAD_ITEM_LIST_PRICE(p_batch_id);
56381: */
56382: ELSIF p_tasknum= TASK_CS_DATA THEN
56375: /*
56376: ELSIF p_tasknum= TASK_ITEM_LIST_PRICE THEN
56377: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56378: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ITEM_LIST_PRICE');
56379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56380: LOAD_ITEM_LIST_PRICE(p_batch_id);
56381: */
56382: ELSIF p_tasknum= TASK_CS_DATA THEN
56383: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56379: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56380: LOAD_ITEM_LIST_PRICE(p_batch_id);
56381: */
56382: ELSIF p_tasknum= TASK_CS_DATA THEN
56383: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56384: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CS_DATA');
56385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56386: LOAD_CS_DATA(p_batch_id);
56387:
56380: LOAD_ITEM_LIST_PRICE(p_batch_id);
56381: */
56382: ELSIF p_tasknum= TASK_CS_DATA THEN
56383: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56384: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CS_DATA');
56385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56386: LOAD_CS_DATA(p_batch_id);
56387:
56388: ELSIF p_tasknum= TASK_CURR_CONV THEN
56381: */
56382: ELSIF p_tasknum= TASK_CS_DATA THEN
56383: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56384: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CS_DATA');
56385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56386: LOAD_CS_DATA(p_batch_id);
56387:
56388: ELSIF p_tasknum= TASK_CURR_CONV THEN
56389: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56385: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56386: LOAD_CS_DATA(p_batch_id);
56387:
56388: ELSIF p_tasknum= TASK_CURR_CONV THEN
56389: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56390: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CURR_CONV');
56391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56392: LOAD_CURR_CONV(p_batch_id);
56393:
56386: LOAD_CS_DATA(p_batch_id);
56387:
56388: ELSIF p_tasknum= TASK_CURR_CONV THEN
56389: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56390: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CURR_CONV');
56391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56392: LOAD_CURR_CONV(p_batch_id);
56393:
56394: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
56387:
56388: ELSIF p_tasknum= TASK_CURR_CONV THEN
56389: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56390: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CURR_CONV');
56391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56392: LOAD_CURR_CONV(p_batch_id);
56393:
56394: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
56395: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56391: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56392: LOAD_CURR_CONV(p_batch_id);
56393:
56394: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
56395: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56396: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CONV');
56397: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56398: LOAD_UOM_CONV(p_batch_id);
56399:
56392: LOAD_CURR_CONV(p_batch_id);
56393:
56394: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
56395: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56396: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CONV');
56397: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56398: LOAD_UOM_CONV(p_batch_id);
56399:
56400: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
56393:
56394: ELSIF p_tasknum= TASK_DP_UOM_CONV THEN
56395: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56396: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_UOM_CONV');
56397: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56398: LOAD_UOM_CONV(p_batch_id);
56399:
56400: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
56401: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56397: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56398: LOAD_UOM_CONV(p_batch_id);
56399:
56400: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
56401: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56402: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL_TIME');
56403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56404: LOAD_FISCAL_TIME;
56405:
56398: LOAD_UOM_CONV(p_batch_id);
56399:
56400: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
56401: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56402: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL_TIME');
56403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56404: LOAD_FISCAL_TIME;
56405:
56406: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
56399:
56400: ELSIF p_tasknum= TASK_FISCAL_TIME THEN
56401: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56402: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL_TIME');
56403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56404: LOAD_FISCAL_TIME;
56405:
56406: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
56407: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56403: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56404: LOAD_FISCAL_TIME;
56405:
56406: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
56407: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56408: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_COMPOSITE_TIME');
56409: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56410: LOAD_COMPOSITE_TIME;
56411:
56404: LOAD_FISCAL_TIME;
56405:
56406: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
56407: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56408: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_COMPOSITE_TIME');
56409: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56410: LOAD_COMPOSITE_TIME;
56411:
56412:
56405:
56406: ELSIF p_tasknum= TASK_COMPOSITE_TIME THEN
56407: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56408: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_COMPOSITE_TIME');
56409: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56410: LOAD_COMPOSITE_TIME;
56411:
56412:
56413: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
56410: LOAD_COMPOSITE_TIME;
56411:
56412:
56413: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
56414: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56415: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'TASK_COMPANY_USERS');
56416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56417: LOAD_COMPANY_USER;
56418:
56411:
56412:
56413: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
56414: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56415: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'TASK_COMPANY_USERS');
56416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56417: LOAD_COMPANY_USER;
56418:
56419: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
56412:
56413: ELSIF p_tasknum= TASK_COMPANY_USERS THEN
56414: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56415: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'TASK_COMPANY_USERS');
56416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56417: LOAD_COMPANY_USER;
56418:
56419: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
56420: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56416: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56417: LOAD_COMPANY_USER;
56418:
56419: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
56420: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56421: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CAL_ASSIGNMENTS');
56422: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56423: LOAD_CAL_ASSIGNMENTS;
56424:
56417: LOAD_COMPANY_USER;
56418:
56419: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
56420: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56421: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CAL_ASSIGNMENTS');
56422: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56423: LOAD_CAL_ASSIGNMENTS;
56424:
56425: ELSIF p_tasknum= TASK_IRO THEN
56418:
56419: ELSIF p_tasknum= TASK_CAL_ASSIGNMENTS THEN
56420: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56421: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CAL_ASSIGNMENTS');
56422: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56423: LOAD_CAL_ASSIGNMENTS;
56424:
56425: ELSIF p_tasknum= TASK_IRO THEN
56426: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56422: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56423: LOAD_CAL_ASSIGNMENTS;
56424:
56425: ELSIF p_tasknum= TASK_IRO THEN
56426: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56427: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_IRO_SUPPLY_DEMAND');
56428: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56429: LOAD_IRO_SUPPLY_DEMAND;
56430:
56423: LOAD_CAL_ASSIGNMENTS;
56424:
56425: ELSIF p_tasknum= TASK_IRO THEN
56426: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56427: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_IRO_SUPPLY_DEMAND');
56428: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56429: LOAD_IRO_SUPPLY_DEMAND;
56430:
56431: ELSIF p_tasknum= TASK_ERO THEN
56424:
56425: ELSIF p_tasknum= TASK_IRO THEN
56426: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56427: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_IRO_SUPPLY_DEMAND');
56428: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56429: LOAD_IRO_SUPPLY_DEMAND;
56430:
56431: ELSIF p_tasknum= TASK_ERO THEN
56432: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56428: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56429: LOAD_IRO_SUPPLY_DEMAND;
56430:
56431: ELSIF p_tasknum= TASK_ERO THEN
56432: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56433: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ERO_SUPPLY_DEMAND');
56434: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56435: LOAD_ERO_SUPPLY_DEMAND;
56436:
56429: LOAD_IRO_SUPPLY_DEMAND;
56430:
56431: ELSIF p_tasknum= TASK_ERO THEN
56432: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56433: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ERO_SUPPLY_DEMAND');
56434: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56435: LOAD_ERO_SUPPLY_DEMAND;
56436:
56437: ELSIF p_tasknum= TASK_SALES_CHANNEL THEN
56430:
56431: ELSIF p_tasknum= TASK_ERO THEN
56432: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56433: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_ERO_SUPPLY_DEMAND');
56434: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56435: LOAD_ERO_SUPPLY_DEMAND;
56436:
56437: ELSIF p_tasknum= TASK_SALES_CHANNEL THEN
56438: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56434: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56435: LOAD_ERO_SUPPLY_DEMAND;
56436:
56437: ELSIF p_tasknum= TASK_SALES_CHANNEL THEN
56438: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56439: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SALES_CHNL');
56440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56441: LOAD_SALES_CHNL;
56442:
56435: LOAD_ERO_SUPPLY_DEMAND;
56436:
56437: ELSIF p_tasknum= TASK_SALES_CHANNEL THEN
56438: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56439: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SALES_CHNL');
56440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56441: LOAD_SALES_CHNL;
56442:
56443: ELSIF p_tasknum= TASK_FISCAL_CALENDAR THEN
56436:
56437: ELSIF p_tasknum= TASK_SALES_CHANNEL THEN
56438: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56439: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_SALES_CHNL');
56440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56441: LOAD_SALES_CHNL;
56442:
56443: ELSIF p_tasknum= TASK_FISCAL_CALENDAR THEN
56444: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56441: LOAD_SALES_CHNL;
56442:
56443: ELSIF p_tasknum= TASK_FISCAL_CALENDAR THEN
56444: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56445: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL');
56446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56447: LOAD_FISCAL;
56448:
56441: LOAD_SALES_CHNL;
56442:
56443: ELSIF p_tasknum= TASK_FISCAL_CALENDAR THEN
56444: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56445: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL');
56446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56447: LOAD_FISCAL;
56448:
56449: ELSIF p_tasknum= TASK_CMRO THEN
56442:
56443: ELSIF p_tasknum= TASK_FISCAL_CALENDAR THEN
56444: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56445: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_FISCAL');
56446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56447: LOAD_FISCAL;
56448:
56449: ELSIF p_tasknum= TASK_CMRO THEN
56450: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56446: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56447: LOAD_FISCAL;
56448:
56449: ELSIF p_tasknum= TASK_CMRO THEN
56450: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56451: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CMRO');
56452: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56453: LOAD_CMRO;
56454:
56447: LOAD_FISCAL;
56448:
56449: ELSIF p_tasknum= TASK_CMRO THEN
56450: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56451: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CMRO');
56452: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56453: LOAD_CMRO;
56454:
56455: END IF;
56448:
56449: ELSIF p_tasknum= TASK_CMRO THEN
56450: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_TASK_START');
56451: FND_MESSAGE.SET_TOKEN('PROCEDURE', 'LOAD_CMRO');
56452: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56453: LOAD_CMRO;
56454:
56455: END IF;
56456:
56457: -- ======== If no EXCEPTION occurs, then returns with status = OK =========
56458:
56459: p_status := OK;
56460:
56461: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
56462: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
56463: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
56464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56465:
56458:
56459: p_status := OK;
56460:
56461: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
56462: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
56463: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
56464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56465:
56466: EXCEPTION
56460:
56461: FND_MESSAGE.SET_NAME('MSC', 'MSC_ELAPSED_TIME');
56462: FND_MESSAGE.SET_TOKEN('ELAPSED_TIME',
56463: TO_CHAR(CEIL((SYSDATE- lv_task_start_time)*14400.0)/10));
56464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
56465:
56466: EXCEPTION
56467:
56468: WHEN others THEN
57640: WHERE mai.INSTANCE_ID= p_instance_id
57641: FOR UPDATE;
57642:
57643: IF lv_staging_table_status= G_ST_PULLING THEN
57644: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PULLING');
57645: ERRBUF:= FND_MESSAGE.GET;
57646:
57647: RETCODE := G_ERROR;
57648: RETURN FALSE;
57641: FOR UPDATE;
57642:
57643: IF lv_staging_table_status= G_ST_PULLING THEN
57644: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PULLING');
57645: ERRBUF:= FND_MESSAGE.GET;
57646:
57647: RETCODE := G_ERROR;
57648: RETURN FALSE;
57649:
57647: RETCODE := G_ERROR;
57648: RETURN FALSE;
57649:
57650: ELSIF lv_staging_table_status= G_ST_COLLECTING THEN
57651: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_LOADING');
57652: ERRBUF:= FND_MESSAGE.GET;
57653:
57654: RETCODE := G_ERROR;
57655: RETURN FALSE;
57648: RETURN FALSE;
57649:
57650: ELSIF lv_staging_table_status= G_ST_COLLECTING THEN
57651: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_LOADING');
57652: ERRBUF:= FND_MESSAGE.GET;
57653:
57654: RETCODE := G_ERROR;
57655: RETURN FALSE;
57656:
57655: RETURN FALSE;
57656:
57657: ELSIF lv_staging_table_status= G_ST_PURGING THEN
57658:
57659: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PURGING');
57660: ERRBUF:= FND_MESSAGE.GET;
57661:
57662: RETCODE := G_ERROR;
57663: RETURN FALSE;
57656:
57657: ELSIF lv_staging_table_status= G_ST_PURGING THEN
57658:
57659: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PURGING');
57660: ERRBUF:= FND_MESSAGE.GET;
57661:
57662: RETCODE := G_ERROR;
57663: RETURN FALSE;
57664:
57663: RETURN FALSE;
57664:
57665: ELSIF lv_staging_table_status= G_ST_PRE_PROCESSING THEN
57666:
57667: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PRE_PROCESSING');
57668: ERRBUF:= FND_MESSAGE.GET;
57669:
57670: RETCODE := G_ERROR;
57671: RETURN FALSE;
57664:
57665: ELSIF lv_staging_table_status= G_ST_PRE_PROCESSING THEN
57666:
57667: FND_MESSAGE.SET_NAME('MSC', 'MSC_ST_ERROR_PRE_PROCESSING');
57668: ERRBUF:= FND_MESSAGE.GET;
57669:
57670: RETCODE := G_ERROR;
57671: RETURN FALSE;
57672:
57920: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_status)<>0 THEN
57921: RAISE EX_PIPE_SND;
57922: END IF;
57923:
57924: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
57925: ERRBUF:= FND_MESSAGE.GET;
57926:
57927: IF v_flag=SYS_YES THEN
57928: RETCODE:= G_WARNING;
57921: RAISE EX_PIPE_SND;
57922: END IF;
57923:
57924: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
57925: ERRBUF:= FND_MESSAGE.GET;
57926:
57927: IF v_flag=SYS_YES THEN
57928: RETCODE:= G_WARNING;
57929: ELSE
57939: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_status)<>0 THEN
57940: RAISE EX_PIPE_SND;
57941: END IF;
57942:
57943: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
57944: ERRBUF:= FND_MESSAGE.GET;
57945:
57946: RETCODE := G_ERROR;
57947:
57940: RAISE EX_PIPE_SND;
57941: END IF;
57942:
57943: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
57944: ERRBUF:= FND_MESSAGE.GET;
57945:
57946: RETCODE := G_ERROR;
57947:
57948: END IF;
57953: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
57954:
57955: ROLLBACK;
57956:
57957: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
57958: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_mw);
57959: ERRBUF:= FND_MESSAGE.GET;
57960: RETCODE := G_ERROR;
57961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
57954:
57955: ROLLBACK;
57956:
57957: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
57958: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_mw);
57959: ERRBUF:= FND_MESSAGE.GET;
57960: RETCODE := G_ERROR;
57961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
57962:
57955: ROLLBACK;
57956:
57957: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
57958: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_mw);
57959: ERRBUF:= FND_MESSAGE.GET;
57960: RETCODE := G_ERROR;
57961: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
57962:
57963: -- send a message of 'unresolvable error' to monitor
57963: -- send a message of 'unresolvable error' to monitor
57964: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
57965:
57966: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
57967: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57968: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57969: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
57970: END IF;
57971:
57964: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
57965:
57966: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
57967: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57968: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57969: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
57970: END IF;
57971:
57972: WHEN EX_PIPE_SND THEN
57965:
57966: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
57967: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57968: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57969: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
57970: END IF;
57971:
57972: WHEN EX_PIPE_SND THEN
57973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
57973: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
57974:
57975: ROLLBACK;
57976:
57977: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57978: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57979: ERRBUF:= FND_MESSAGE.GET;
57980: RETCODE := G_ERROR;
57981: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
57974:
57975: ROLLBACK;
57976:
57977: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57978: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57979: ERRBUF:= FND_MESSAGE.GET;
57980: RETCODE := G_ERROR;
57981: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
57982:
57975: ROLLBACK;
57976:
57977: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57978: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57979: ERRBUF:= FND_MESSAGE.GET;
57980: RETCODE := G_ERROR;
57981: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
57982:
57983: -- send a message of 'unresolavable error' to monitor
57983: -- send a message of 'unresolavable error' to monitor
57984: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
57985:
57986: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
57987: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57988: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57989: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
57990: END IF;
57991:
57984: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
57985:
57986: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
57987: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57988: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57989: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
57990: END IF;
57991:
57992: WHEN EX_PROCESS_TIME_OUT THEN
57985:
57986: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
57987: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
57988: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
57989: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
57990: END IF;
57991:
57992: WHEN EX_PROCESS_TIME_OUT THEN
57993: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
57993: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
57994:
57995: ROLLBACK;
57996:
57997: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
57998: ERRBUF:= FND_MESSAGE.GET;
57999: RETCODE := G_ERROR;
58000: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
58001:
57994:
57995: ROLLBACK;
57996:
57997: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
57998: ERRBUF:= FND_MESSAGE.GET;
57999: RETCODE := G_ERROR;
58000: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
58001:
58002: -- send a message of 'unresolavable error' to monitor
58002: -- send a message of 'unresolavable error' to monitor
58003: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
58004:
58005: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
58006: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
58007: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
58008: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58009: END IF;
58010:
58003: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
58004:
58005: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
58006: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
58007: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
58008: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58009: END IF;
58010:
58011: WHEN OTHERS THEN
58004:
58005: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
58006: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
58007: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
58008: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58009: END IF;
58010:
58011: WHEN OTHERS THEN
58012: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
58020: -- send a message of 'unresolavable error' to monitor
58021: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
58022:
58023: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
58024: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
58025: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
58026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58027: END IF;
58028:
58021: DBMS_PIPE.PACK_MESSAGE( UNRESOVLABLE_ERROR);
58022:
58023: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
58024: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
58025: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
58026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58027: END IF;
58028:
58029: -- send a message of 'the worker ends its process' to monitor
58022:
58023: IF DBMS_PIPE.SEND_MESSAGE( v_pipe_wm)<>0 THEN
58024: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
58025: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
58026: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58027: END IF;
58028:
58029: -- send a message of 'the worker ends its process' to monitor
58030: DBMS_PIPE.PACK_MESSAGE( SYS_YES);
58198: commit;
58199:
58200: ELSE
58201:
58202: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_BOM_PROCESSING_FAIL');
58203: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
58204: RETCODE := G_WARNING;
58205:
58206: commit;
58199:
58200: ELSE
58201:
58202: FND_MESSAGE.SET_NAME('MSC', 'MSC_DP_BOM_PROCESSING_FAIL');
58203: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, FND_MESSAGE.GET);
58204: RETCODE := G_WARNING;
58205:
58206: commit;
58207:
58635: END IF;
58636:
58637: END LOOP;
58638:
58639: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_LAUNCH_WORKER_FAIL');
58640: ERRBUF:= FND_MESSAGE.GET;
58641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
58642: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
58643: RETCODE := G_ERROR;
58636:
58637: END LOOP;
58638:
58639: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_LAUNCH_WORKER_FAIL');
58640: ERRBUF:= FND_MESSAGE.GET;
58641: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
58642: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,dbms_utility.format_error_stack);
58643: RETCODE := G_ERROR;
58644:
58644:
58645: COMMIT;
58646: RETURN;
58647: ELSE
58648: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
58649: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lvs_request_id(lc_i));
58650: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58651: --MSC_UTIL.print_trace_file_name(lvs_request_id(lc_i));
58652: END IF;
58645: COMMIT;
58646: RETURN;
58647: ELSE
58648: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
58649: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lvs_request_id(lc_i));
58650: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58651: --MSC_UTIL.print_trace_file_name(lvs_request_id(lc_i));
58652: END IF;
58653:
58646: RETURN;
58647: ELSE
58648: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
58649: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lvs_request_id(lc_i));
58650: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
58651: --MSC_UTIL.print_trace_file_name(lvs_request_id(lc_i));
58652: END IF;
58653:
58654: END LOOP;
59520: lv_task_number:= -1;
59521:
59522: ROLLBACK;
59523:
59524: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59525: ERRBUF:= FND_MESSAGE.GET;
59526: RETCODE := G_ERROR;
59527: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59528:
59521:
59522: ROLLBACK;
59523:
59524: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59525: ERRBUF:= FND_MESSAGE.GET;
59526: RETCODE := G_ERROR;
59527: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59528:
59529: ELSE
59535: LAST_UPDATED_BY= v_current_user,
59536: REQUEST_ID= FND_GLOBAL.CONC_REQUEST_ID
59537: WHERE mai.INSTANCE_ID= v_instance_id;
59538:
59539: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
59540: ERRBUF:= FND_MESSAGE.GET;
59541: RETCODE := G_SUCCESS;
59542: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59543:
59536: REQUEST_ID= FND_GLOBAL.CONC_REQUEST_ID
59537: WHERE mai.INSTANCE_ID= v_instance_id;
59538:
59539: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_SUCCEED');
59540: ERRBUF:= FND_MESSAGE.GET;
59541: RETCODE := G_SUCCESS;
59542: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59543:
59544: FINAL;
59585: END LOOP;
59586:
59587: IF lv_worker_committed<> p_total_worker_num THEN
59588:
59589: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL_TO_COMMIT');
59590: ERRBUF:= FND_MESSAGE.GET;
59591: RETCODE := G_ERROR;
59592:
59593: END IF;
59586:
59587: IF lv_worker_committed<> p_total_worker_num THEN
59588:
59589: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL_TO_COMMIT');
59590: ERRBUF:= FND_MESSAGE.GET;
59591: RETCODE := G_ERROR;
59592:
59593: END IF;
59594:
59655:
59656: IF lv_monitor_id <> 0 THEN
59657: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
59658: request_data => to_char(G_ODS_REQ_DATA)) ;
59659: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
59660: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_monitor_id);
59661: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
59662: END IF;
59663:
59656: IF lv_monitor_id <> 0 THEN
59657: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
59658: request_data => to_char(G_ODS_REQ_DATA)) ;
59659: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
59660: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_monitor_id);
59661: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
59662: END IF;
59663:
59664: commit;
59657: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
59658: request_data => to_char(G_ODS_REQ_DATA)) ;
59659: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_WORKER_REQUEST_ID');
59660: FND_MESSAGE.SET_TOKEN('REQUEST_ID', lv_monitor_id);
59661: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,FND_MESSAGE.GET);
59662: END IF;
59663:
59664: commit;
59665:
59678: DROP_INDEXES;
59679: END IF;
59680:
59681: RETCODE := G_ERROR;
59682: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
59683: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
59684: ERRBUF:= FND_MESSAGE.GET;
59685: RETCODE := G_ERROR;
59686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
59679: END IF;
59680:
59681: RETCODE := G_ERROR;
59682: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
59683: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
59684: ERRBUF:= FND_MESSAGE.GET;
59685: RETCODE := G_ERROR;
59686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
59687:
59680:
59681: RETCODE := G_ERROR;
59682: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_RCV_FAIL');
59683: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
59684: ERRBUF:= FND_MESSAGE.GET;
59685: RETCODE := G_ERROR;
59686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
59687:
59688: IF lv_check_point < 3 THEN
59685: RETCODE := G_ERROR;
59686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
59687:
59688: IF lv_check_point < 3 THEN
59689: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59690: ERRBUF:= FND_MESSAGE.GET;
59691: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
59692: END IF;
59693:
59686: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
59687:
59688: IF lv_check_point < 3 THEN
59689: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59690: ERRBUF:= FND_MESSAGE.GET;
59691: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
59692: END IF;
59693:
59694: COMMIT;
59703: END IF;
59704: DROP_INDEXES;
59705: END IF;
59706:
59707: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
59708: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
59709: ERRBUF:= FND_MESSAGE.GET;
59710: RETCODE := G_ERROR;
59711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59704: DROP_INDEXES;
59705: END IF;
59706:
59707: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
59708: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
59709: ERRBUF:= FND_MESSAGE.GET;
59710: RETCODE := G_ERROR;
59711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59712:
59705: END IF;
59706:
59707: FND_MESSAGE.SET_NAME('MSC', 'MSC_MSG_SEND_FAIL');
59708: FND_MESSAGE.SET_TOKEN('PIPE', v_pipe_wm);
59709: ERRBUF:= FND_MESSAGE.GET;
59710: RETCODE := G_ERROR;
59711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59712:
59713: IF lv_check_point < 3 THEN
59710: RETCODE := G_ERROR;
59711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59712:
59713: IF lv_check_point < 3 THEN
59714: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59715: ERRBUF:= FND_MESSAGE.GET;
59716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
59717: END IF;
59718:
59711: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59712:
59713: IF lv_check_point < 3 THEN
59714: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59715: ERRBUF:= FND_MESSAGE.GET;
59716: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,ERRBUF);
59717: END IF;
59718:
59719: COMMIT;
59728: END IF;
59729: DROP_INDEXES;
59730: END IF;
59731:
59732: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
59733: ERRBUF:= FND_MESSAGE.GET;
59734: RETCODE := G_ERROR;
59735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59736:
59729: DROP_INDEXES;
59730: END IF;
59731:
59732: FND_MESSAGE.SET_NAME('MSC', 'MSC_TIMEOUT');
59733: ERRBUF:= FND_MESSAGE.GET;
59734: RETCODE := G_ERROR;
59735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59736:
59737: IF lv_check_point < 3 THEN
59734: RETCODE := G_ERROR;
59735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59736:
59737: IF lv_check_point < 3 THEN
59738: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59739: ERRBUF:= FND_MESSAGE.GET;
59740: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59741: END IF;
59742:
59735: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59736:
59737: IF lv_check_point < 3 THEN
59738: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59739: ERRBUF:= FND_MESSAGE.GET;
59740: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59741: END IF;
59742:
59743: COMMIT;
59757: RETCODE := G_ERROR;
59758: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59759:
59760: IF lv_check_point < 3 THEN
59761: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59762: ERRBUF:= FND_MESSAGE.GET;
59763: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59764: END IF;
59765:
59758: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR,ERRBUF);
59759:
59760: IF lv_check_point < 3 THEN
59761: FND_MESSAGE.SET_NAME('MSC', 'MSC_PP_FAIL');
59762: ERRBUF:= FND_MESSAGE.GET;
59763: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS, ERRBUF);
59764: END IF;
59765:
59766: COMMIT;