216: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
217: --
218: IF l_debug_on IS NULL
219: THEN
220: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
221: END IF;
222: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.push(l_module_name);
220: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
221: END IF;
222: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.push(l_module_name);
225: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
226: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
227: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
228: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
221: END IF;
222: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.push(l_module_name);
225: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
226: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
227: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
228: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
229: END IF;
222: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.push(l_module_name);
225: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
226: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
227: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
228: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
229: END IF;
230: --
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.push(l_module_name);
225: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
226: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
227: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
228: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
229: END IF;
230: --
231: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
224: WSH_DEBUG_SV.push(l_module_name);
225: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
226: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
227: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
228: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
229: END IF;
230: --
231: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
232: --
231: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
232: --
233:
234: IF l_debug_on THEN
235: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
236: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_Shipping_Integration_PUB.Check_Import_Pending_Lines',WSH_DEBUG_SV.C_PROC_LEVEL);
237: END IF;
238:
239: -- Checks if any lines in the ship set are not yet imported
232: --
233:
234: IF l_debug_on THEN
235: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
236: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_Shipping_Integration_PUB.Check_Import_Pending_Lines',WSH_DEBUG_SV.C_PROC_LEVEL);
237: END IF;
238:
239: -- Checks if any lines in the ship set are not yet imported
240: -- Bug :3832310. The call to "WSH_DELIVERY_VALIDATIONS.Check_SS_Imp_Pending"
251: x_return_status => x_api_status );
252:
253: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
254: IF l_debug_on THEN
255: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WSH_DELIVERY_VALIDATIONS.CHECK_SS_IMP_PENDING');
256: WSH_DEBUG_SV.pop(l_module_name);
257: END IF;
258: RETURN;
259: END IF;
252:
253: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
254: IF l_debug_on THEN
255: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WSH_DELIVERY_VALIDATIONS.CHECK_SS_IMP_PENDING');
256: WSH_DEBUG_SV.pop(l_module_name);
257: END IF;
258: RETURN;
259: END IF;
260:
273: AND released_status IN ('R','N','B')
274: AND pickable_flag = 'Y';
275: --
276: IF l_debug_on THEN
277: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND '||L_SS_COUNT||' RECORDS IN DB' );
278: END IF;
279: --
280: ELSE
281:
280: ELSE
281:
282: -- Some of the lines in SS are not imported
283: IF l_debug_on THEN
284: WSH_DEBUG_SV.logmsg(l_module_name, 'THERE EXISTS A LINE IN THIS SHIP SET WHICH IS NOT YET IMPORTED' );
285: END IF;
286: --
287: l_ss_count := -1;
288: --
300: l_start_index := g_rel_current_line - 1;
301: l_db_count := l_start_index - l_end_index;
302: --
303: IF l_debug_on THEN
304: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND '||L_DB_COUNT||' RECORDS IN RELEASE_TABLE');
305: END IF;
306: --
307:
308:
309: IF (l_db_count <> l_ss_count) THEN
310: -- release_table SS doesn't match with Database SS
311: IF (l_ss_count <> -1) THEN
312: IF l_debug_on THEN
313: WSH_DEBUG_SV.logmsg(l_module_name, 'THE DB COUNT FOR SS '||P_SHIP_SET_ID || ' DOES NOT MATCH WITH THE SELECTED RECORD COUNT');
314: END IF;
315: END IF;
316:
317:
315: END IF;
316:
317:
318: IF l_debug_on THEN
319: WSH_DEBUG_SV.logmsg(l_module_name,'REMOVING THE SHIP SET FROM RELEASE TABLE');
320: END IF;
321:
322: --Removing Ship Set lines from release table as SS doesn't match with Database SS
323: FOR i in l_end_index+1..l_start_index LOOP
327: -- reset the g_rel_current_line after deletion
328: g_rel_current_line := l_end_index + 1;
329: --
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.log(l_module_name,'G_REL_CURRENT_LINE',G_REL_CURRENT_LINE);
332: END IF;
333: --
334: END IF;
335: --}
336: ELSE --p_ship_set_id is NULL
337: --{
338:
339: IF l_debug_on THEN
340: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR SMC WITH TOP_MODEL_LINE_ID '||P_TOP_MODEL_LINE_ID ||' FOR ORDER HEADER '||P_ORDER_HEADER_ID||' SOURCE CODE '||P_SOURCE_CODE );
341: END IF;
342: --
343:
344: IF (l_status = FALSE) THEN
353: AND released_status IN ('R','N','B')
354: AND pickable_flag = 'Y';
355:
356: IF l_debug_on THEN
357: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND '||L_SMC_COUNT||' RECORDS IN DB' );
358: END IF;
359:
360: ELSE
361: -- Some of the lines in SMC are not imported
359:
360: ELSE
361: -- Some of the lines in SMC are not imported
362: IF l_debug_on THEN
363: WSH_DEBUG_SV.logmsg(l_module_name, 'THERE EXISTS A LINE IN THIS SMC SET WHICH IS NOT YET IMPORTED' );
364: END IF;
365: --
366: l_smc_count := -1;
367: --
380: l_db_count := l_start_index - l_end_index;
381:
382:
383: IF l_debug_on THEN
384: WSH_DEBUG_SV.logmsg(l_module_name,'FOUND '||L_DB_COUNT||' RECORDS IN RELEASE_TABLE');
385: END IF;
386: --
387: IF (l_db_count <> l_smc_count) THEN
388: -- release_table SMC count doesn't match with Database SMC count
387: IF (l_db_count <> l_smc_count) THEN
388: -- release_table SMC count doesn't match with Database SMC count
389: --
390: IF l_debug_on THEN
391: WSH_DEBUG_SV.logmsg(l_module_name, 'THE DB COUNT FOR SMC '||P_TOP_MODEL_LINE_ID || ' DOES NOT MATCH WITH THE SELECTED RECORD COUNT');
392: WSH_DEBUG_SV.logmsg(l_module_name, 'REMOVING THE SMC FROM RELEASE TABLE' );
393: END IF;
394:
395:
388: -- release_table SMC count doesn't match with Database SMC count
389: --
390: IF l_debug_on THEN
391: WSH_DEBUG_SV.logmsg(l_module_name, 'THE DB COUNT FOR SMC '||P_TOP_MODEL_LINE_ID || ' DOES NOT MATCH WITH THE SELECTED RECORD COUNT');
392: WSH_DEBUG_SV.logmsg(l_module_name, 'REMOVING THE SMC FROM RELEASE TABLE' );
393: END IF;
394:
395:
396: --Removing the SMC lines from Release Table.
402: -- reset the g_rel_current_line after deletion
403: g_rel_current_line := l_end_index + 1;
404: --
405: IF l_debug_on THEN
406: WSH_DEBUG_SV.logmsg(l_module_name, 'G_REL_CURRENT_LINE SET BACK TO '||G_REL_CURRENT_LINE );
407: END IF;
408: --
409: END IF;
410: --}
412:
413:
414: --
415: IF l_debug_on THEN
416: WSH_DEBUG_SV.pop(l_module_name);
417: END IF;
418: --
419: EXCEPTION
420: --
422: wsh_util_core.default_handler('WSH_PR_CRITERIA.validate_ss_smc');
423: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
424: --
425: IF l_debug_on THEN
426: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
427: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
429: END IF;
430: --
423: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
424: --
425: IF l_debug_on THEN
426: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
427: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
429: END IF;
430: --
431: END validate_ss_smc;
424: --
425: IF l_debug_on THEN
426: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
427: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
428: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
429: END IF;
430: --
431: END validate_ss_smc;
432:
458: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
459: --
460: IF l_debug_on IS NULL
461: THEN
462: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
463: END IF;
464: --
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.push(l_module_name);
462: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
463: END IF;
464: --
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.push(l_module_name);
467: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
468: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
469: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
470: END IF;
463: END IF;
464: --
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.push(l_module_name);
467: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
468: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
469: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
470: END IF;
471: --
464: --
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.push(l_module_name);
467: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
468: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
469: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
470: END IF;
471: --
472:
465: IF l_debug_on THEN
466: WSH_DEBUG_SV.push(l_module_name);
467: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
468: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
469: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
470: END IF;
471: --
472:
473: --IF only enforce ship set and SMC
479: g_last_top_model_line_id := p_top_model_line_id;
480: END IF;
481: --
482: IF l_debug_on THEN
483: WSH_DEBUG_SV.pop(l_module_name);
484: END IF;
485: --
486: END Set_Globals;
487:
625: --
626: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
627: --
628: IF l_debug_on IS NULL THEN
629: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
630: END IF;
631: --
632: IF l_debug_on THEN
633: WSH_DEBUG_SV.push(l_module_name);
629: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
630: END IF;
631: --
632: IF l_debug_on THEN
633: WSH_DEBUG_SV.push(l_module_name);
634: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
635: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
636: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
637: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
630: END IF;
631: --
632: IF l_debug_on THEN
633: WSH_DEBUG_SV.push(l_module_name);
634: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
635: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
636: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
637: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
638: END IF;
631: --
632: IF l_debug_on THEN
633: WSH_DEBUG_SV.push(l_module_name);
634: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
635: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
636: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
637: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
638: END IF;
639: --
632: IF l_debug_on THEN
633: WSH_DEBUG_SV.push(l_module_name);
634: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
635: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
636: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
637: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
638: END IF;
639: --
640: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
633: WSH_DEBUG_SV.push(l_module_name);
634: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
635: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
636: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
637: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
638: END IF;
639: --
640: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
641: x_skip_detail := 'N'; --Bug# 3248578
653: END IF;
654:
655: -- Start Bug# 3248578
656: IF l_debug_on THEN
657: WSH_DEBUG_SV.log(l_module_name,'l_last_update_date',l_last_update_date);
658: WSH_DEBUG_SV.log(l_module_name,'v_last_update_date',v_last_update_date);
659: END IF;
660:
661:
654:
655: -- Start Bug# 3248578
656: IF l_debug_on THEN
657: WSH_DEBUG_SV.log(l_module_name,'l_last_update_date',l_last_update_date);
658: WSH_DEBUG_SV.log(l_module_name,'v_last_update_date',v_last_update_date);
659: END IF;
660:
661:
662: IF l_last_update_date <> v_last_update_date THEN
661:
662: IF l_last_update_date <> v_last_update_date THEN
663: -- Record has been changed during the Pick Release process
664: IF l_debug_on THEN
665: WSH_DEBUG_SV.log(l_module_name,'Record has been changed during the Pick Release process');
666: END IF;
667:
668: --Cursor to get the detail info.
669: OPEN new_detail_info(p_delivery_detail_id);
703: v_client_id; -- LSP PROJECT :
704: IF new_detail_info%NOTFOUND THEN
705: --jckwok wrap debug stmts around if.. end if
706: IF l_debug_on THEN
707: WSH_DEBUG_SV.logmsg(l_module_name,'Ignoring delivery detail : '||p_delivery_detail_id ||' since no longer satisfies the pick release criteria' );
708: END IF;
709: x_skip_detail := 'Y';
710: IF lock_for_update%ISOPEN THEN
711: CLOSE lock_for_update;
718: --
719:
720: --Successfully lock the detail lines.
721: IF l_debug_on THEN
722: WSH_DEBUG_SV.logmsg(l_module_name, 'SUCCESSFULLY LOCKED DELIVERY DETAIL '||P_DELIVERY_DETAIL_ID);
723: WSH_DEBUG_SV.pop(l_module_name);
724: END IF;
725: --
726: EXCEPTION
719:
720: --Successfully lock the detail lines.
721: IF l_debug_on THEN
722: WSH_DEBUG_SV.logmsg(l_module_name, 'SUCCESSFULLY LOCKED DELIVERY DETAIL '||P_DELIVERY_DETAIL_ID);
723: WSH_DEBUG_SV.pop(l_module_name);
724: END IF;
725: --
726: EXCEPTION
727: --
738:
739: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
740: --
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.logmsg(l_module_name, 'CANNOT LOCK DELIVERY DETAIL FOR UPDATE: '|| P_DELIVERY_DETAIL_ID);
743: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
745: END IF;
746: --
739: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
740: --
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.logmsg(l_module_name, 'CANNOT LOCK DELIVERY DETAIL FOR UPDATE: '|| P_DELIVERY_DETAIL_ID);
743: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
745: END IF;
746: --
747: WHEN no_data_found THEN
740: --
741: IF l_debug_on THEN
742: WSH_DEBUG_SV.logmsg(l_module_name, 'CANNOT LOCK DELIVERY DETAIL FOR UPDATE: '|| P_DELIVERY_DETAIL_ID);
743: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
745: END IF;
746: --
747: WHEN no_data_found THEN
748: --
749: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
750: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
751: --
752: IF l_debug_on THEN
753: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY DETAIL LINE NOT FOUND: '|| P_DELIVERY_DETAIL_ID);
754: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
756: END IF;
757: --
750: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
751: --
752: IF l_debug_on THEN
753: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY DETAIL LINE NOT FOUND: '|| P_DELIVERY_DETAIL_ID);
754: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
756: END IF;
757: --
758: END Get_Detail_Lock;
751: --
752: IF l_debug_on THEN
753: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY DETAIL LINE NOT FOUND: '|| P_DELIVERY_DETAIL_ID);
754: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
755: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
756: END IF;
757: --
758: END Get_Detail_Lock;
759:
968: BEGIN
969: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
970: IF l_debug_on IS NULL
971: THEN
972: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
973: END IF;
974:
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.push(l_module_name);
972: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
973: END IF;
974:
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.push(l_module_name);
977: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
978: WSH_DEBUG_SV.log(l_module_name,'P_WORKER_ID',P_WORKER_ID);
979: END IF;
980: --
973: END IF;
974:
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.push(l_module_name);
977: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
978: WSH_DEBUG_SV.log(l_module_name,'P_WORKER_ID',P_WORKER_ID);
979: END IF;
980: --
981: -- initialize the WHO session variables
974:
975: IF l_debug_on THEN
976: WSH_DEBUG_SV.push(l_module_name);
977: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
978: WSH_DEBUG_SV.log(l_module_name,'P_WORKER_ID',P_WORKER_ID);
979: END IF;
980: --
981: -- initialize the WHO session variables
982: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
985: g_user_id := FND_GLOBAL.USER_ID;
986: g_login_id := FND_GLOBAL.CONC_LOGIN_ID;
987:
988: IF l_debug_on THEN
989: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
990: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
991: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
992: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
993: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
986: g_login_id := FND_GLOBAL.CONC_LOGIN_ID;
987:
988: IF l_debug_on THEN
989: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
990: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
991: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
992: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
993: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
994: END IF;
987:
988: IF l_debug_on THEN
989: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
990: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
991: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
992: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
993: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
994: END IF;
995:
988: IF l_debug_on THEN
989: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
990: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
991: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
992: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
993: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
994: END IF;
995:
996: IF p_worker_id IS NULL THEN --{
989: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
990: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
991: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
992: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
993: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
994: END IF;
995:
996: IF p_worker_id IS NULL THEN --{
997: -- fetch release criteria for the batch and lock row
1054: -- Handle batch does not exist condition
1055: IF get_lock_batch%NOTFOUND THEN
1056: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1057: IF l_debug_on THEN
1058: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1059: WSH_DEBUG_SV.pop(l_module_name);
1060: END IF;
1061: IF get_lock_batch%ISOPEN THEN
1062: CLOSE get_lock_batch;
1055: IF get_lock_batch%NOTFOUND THEN
1056: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1057: IF l_debug_on THEN
1058: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1059: WSH_DEBUG_SV.pop(l_module_name);
1060: END IF;
1061: IF get_lock_batch%ISOPEN THEN
1062: CLOSE get_lock_batch;
1063: END IF;
1128: -- Handle batch does not exist condition
1129: IF get_batch%NOTFOUND THEN
1130: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1131: IF l_debug_on THEN
1132: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1133: WSH_DEBUG_SV.pop(l_module_name);
1134: END IF;
1135: IF get_batch%ISOPEN THEN
1136: CLOSE get_batch;
1129: IF get_batch%NOTFOUND THEN
1130: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1131: IF l_debug_on THEN
1132: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1133: WSH_DEBUG_SV.pop(l_module_name);
1134: END IF;
1135: IF get_batch%ISOPEN THEN
1136: CLOSE get_batch;
1137: END IF;
1153: END IF; --}
1154:
1155: -- Write to log the variables that have been initialized
1156: IF l_debug_on THEN
1157: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1158: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1154:
1155: -- Write to log the variables that have been initialized
1156: IF l_debug_on THEN
1157: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1158: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1155: -- Write to log the variables that have been initialized
1156: IF l_debug_on THEN
1157: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1158: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1156: IF l_debug_on THEN
1157: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1158: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1157: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1158: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1158: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1159: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1161: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1162: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1163: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1165: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1173: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1166: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1173: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1174: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1167: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1173: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1174: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1175: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1168: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1169: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1173: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1174: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1175: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1176: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1170: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1171: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1173: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1174: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1175: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1176: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1177: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1178: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1172: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1173: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1174: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1175: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1176: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1177: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1178: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1179: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1174: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1175: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1176: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1177: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1178: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1179: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1176: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1177: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1178: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1179: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1177: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1178: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1179: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1178: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1179: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1179: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1180: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1181: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1182: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1183: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1184: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1185: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1186: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1187: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1188: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1189: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1190: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1191: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1192: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1193: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1194: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1195: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1196: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1197: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1205: -- deliveryMerge
1198: -- rlanka : Pack J Enhancement
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1205: -- deliveryMerge
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1199: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1205: -- deliveryMerge
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1207: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1200: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1201: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1205: -- deliveryMerge
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1207: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1208: -- anxsharm, X-dock
1202: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1205: -- deliveryMerge
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1207: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1208: -- anxsharm, X-dock
1209: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1210: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1203: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1204: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1205: -- deliveryMerge
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1207: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1208: -- anxsharm, X-dock
1209: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1210: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1211: --bug# 6689448 (replenishment project)
1205: -- deliveryMerge
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1207: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1208: -- anxsharm, X-dock
1209: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1210: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1211: --bug# 6689448 (replenishment project)
1212: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1213: WSH_DEBUG_SV.log(l_module_name, 'CLIENT ID', G_CLIENT_ID); -- LSP PROJECT
1206: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1207: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1208: -- anxsharm, X-dock
1209: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1210: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1211: --bug# 6689448 (replenishment project)
1212: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1213: WSH_DEBUG_SV.log(l_module_name, 'CLIENT ID', G_CLIENT_ID); -- LSP PROJECT
1214: END IF;
1208: -- anxsharm, X-dock
1209: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1210: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1211: --bug# 6689448 (replenishment project)
1212: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1213: WSH_DEBUG_SV.log(l_module_name, 'CLIENT ID', G_CLIENT_ID); -- LSP PROJECT
1214: END IF;
1215:
1216: -- Validate only if Parent Worker Process
1209: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1210: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1211: --bug# 6689448 (replenishment project)
1212: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1213: WSH_DEBUG_SV.log(l_module_name, 'CLIENT ID', G_CLIENT_ID); -- LSP PROJECT
1214: END IF;
1215:
1216: -- Validate only if Parent Worker Process
1217: IF p_worker_id IS NULL THEN --{
1227:
1228: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1229: --
1230: IF l_debug_on THEN
1231: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1232: || 'DOES NOT EXIST' );
1233: WSH_DEBUG_SV.pop(l_module_name);
1234: END IF;
1235: --
1229: --
1230: IF l_debug_on THEN
1231: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1232: || 'DOES NOT EXIST' );
1233: WSH_DEBUG_SV.pop(l_module_name);
1234: END IF;
1235: --
1236: RETURN;
1237:
1241:
1242: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1243: --
1244: IF l_debug_on THEN
1245: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1246: || 'DOES NOT BELONG TO');
1247: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER ID ' || TO_CHAR ( G_ORDER_HEADER_ID ));
1248: WSH_DEBUG_SV.pop(l_module_name);
1249: END IF;
1243: --
1244: IF l_debug_on THEN
1245: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1246: || 'DOES NOT BELONG TO');
1247: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER ID ' || TO_CHAR ( G_ORDER_HEADER_ID ));
1248: WSH_DEBUG_SV.pop(l_module_name);
1249: END IF;
1250: --
1251: RETURN;
1244: IF l_debug_on THEN
1245: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1246: || 'DOES NOT BELONG TO');
1247: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER ID ' || TO_CHAR ( G_ORDER_HEADER_ID ));
1248: WSH_DEBUG_SV.pop(l_module_name);
1249: END IF;
1250: --
1251: RETURN;
1252: END IF;
1315: -- Validating From_Subinventory and From_Locator
1316: IF (g_from_subinventory IS NOT NULL) THEN --{
1317:
1318: IF l_debug_on THEN
1319: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.From_Subinventory',WSH_DEBUG_SV.C_PROC_LEVEL);
1320: END IF;
1321: l_validate_org := NULL;
1322: l_validate_sub := NULL;
1323: l_validate_locator := NULL;
1333:
1334: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1335: --
1336: IF l_debug_on THEN
1337: WSH_DEBUG_SV.logmsg(l_module_name, g_from_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1338: WSH_DEBUG_SV.pop(l_module_name);
1339: END IF;
1340: --
1341: RETURN;
1334: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1335: --
1336: IF l_debug_on THEN
1337: WSH_DEBUG_SV.logmsg(l_module_name, g_from_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1338: WSH_DEBUG_SV.pop(l_module_name);
1339: END IF;
1340: --
1341: RETURN;
1342: --
1343: END IF;
1344:
1345: IF (g_from_locator IS NOT NULL) THEN
1346: IF l_debug_on THEN
1347: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.From_Locator',WSH_DEBUG_SV.C_PROC_LEVEL);
1348: END IF;
1349: l_validate_locator.inventory_location_id := g_from_locator;
1350: IF (INV_Validate.From_Locator( p_locator => l_validate_locator,
1351: p_org => l_validate_org,
1357: --
1358: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1359: --
1360: IF l_debug_on THEN
1361: WSH_DEBUG_SV.logmsg(l_module_name, g_from_locator||' is not a Valid Locator for Subinventory :'|| g_from_subinventory);
1362: WSH_DEBUG_SV.pop(l_module_name);
1363: END IF;
1364: --
1365: RETURN;
1358: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1359: --
1360: IF l_debug_on THEN
1361: WSH_DEBUG_SV.logmsg(l_module_name, g_from_locator||' is not a Valid Locator for Subinventory :'|| g_from_subinventory);
1362: WSH_DEBUG_SV.pop(l_module_name);
1363: END IF;
1364: --
1365: RETURN;
1366: --
1372: -- Validating To_Subinventory and To_Locator
1373: IF (g_to_subinventory IS NOT NULL) THEN --{
1374:
1375: IF l_debug_on THEN
1376: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.To_Subinventory',WSH_DEBUG_SV.C_PROC_LEVEL);
1377: END IF;
1378: l_validate_org := NULL;
1379: l_validate_sub := NULL;
1380: l_validate_from_sub := NULL;
1393:
1394: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1395: --
1396: IF l_debug_on THEN
1397: WSH_DEBUG_SV.logmsg(l_module_name, g_to_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1398: WSH_DEBUG_SV.pop(l_module_name);
1399: END IF;
1400: --
1401: RETURN;
1394: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1395: --
1396: IF l_debug_on THEN
1397: WSH_DEBUG_SV.logmsg(l_module_name, g_to_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1398: WSH_DEBUG_SV.pop(l_module_name);
1399: END IF;
1400: --
1401: RETURN;
1402: --
1403: END IF;
1404:
1405: IF (g_to_locator IS NOT NULL) THEN
1406: IF l_debug_on THEN
1407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.To_Locator',WSH_DEBUG_SV.C_PROC_LEVEL);
1408: END IF;
1409: l_validate_locator.inventory_location_id := g_to_locator;
1410: IF (INV_Validate.To_Locator( p_locator => l_validate_locator,
1411: p_org => l_validate_org,
1417:
1418: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1419: --
1420: IF l_debug_on THEN
1421: WSH_DEBUG_SV.logmsg(l_module_name, g_to_locator||' is not a Valid Locator for Subinventory :'|| g_to_subinventory);
1422: WSH_DEBUG_SV.pop(l_module_name);
1423: END IF;
1424: --
1425: RETURN;
1418: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1419: --
1420: IF l_debug_on THEN
1421: WSH_DEBUG_SV.logmsg(l_module_name, g_to_locator||' is not a Valid Locator for Subinventory :'|| g_to_subinventory);
1422: WSH_DEBUG_SV.pop(l_module_name);
1423: END IF;
1424: --
1425: RETURN;
1426:
1430:
1431: -- Validating RelSubinventory
1432: IF (g_relsubinventory IS NOT NULL) THEN --{
1433: IF l_debug_on THEN
1434: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.From_Subinventory',WSH_DEBUG_SV.C_PROC_LEVEL);
1435: END IF;
1436: l_validate_org := NULL;
1437: l_validate_sub := NULL;
1438: l_validate_locator := NULL;
1448:
1449: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1450: --
1451: IF l_debug_on THEN
1452: WSH_DEBUG_SV.logmsg(l_module_name, g_relsubinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1453: WSH_DEBUG_SV.pop(l_module_name);
1454: END IF;
1455: --
1456: RETURN;
1449: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1450: --
1451: IF l_debug_on THEN
1452: WSH_DEBUG_SV.logmsg(l_module_name, g_relsubinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1453: WSH_DEBUG_SV.pop(l_module_name);
1454: END IF;
1455: --
1456: RETURN;
1457:
1458: END IF;
1459: END IF; --}
1460:
1461: IF l_debug_on THEN
1462: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATING REQUEST ID FOR BATCH' );
1463: END IF;
1464:
1465: -- Update picking batch setting request id and other who parameters
1466: UPDATE WSH_PICKING_BATCHES
1475: AND (REQUEST_ID IS NULL OR REQUEST_ID = g_request_id);
1476:
1477: IF SQL%NOTFOUND THEN
1478: IF l_debug_on THEN
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'PICKING BATCH ' || TO_CHAR(P_BATCH_ID) || ' NOT EXIST');
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'OR ANOTHER REQUEST HAS ALREADY RELEASED THIS BATCH');
1481: END IF;
1482: END IF;
1483:
1476:
1477: IF SQL%NOTFOUND THEN
1478: IF l_debug_on THEN
1479: WSH_DEBUG_SV.logmsg(l_module_name, 'PICKING BATCH ' || TO_CHAR(P_BATCH_ID) || ' NOT EXIST');
1480: WSH_DEBUG_SV.logmsg(l_module_name, 'OR ANOTHER REQUEST HAS ALREADY RELEASED THIS BATCH');
1481: END IF;
1482: END IF;
1483:
1484: END IF; --}
1486: g_initialized := TRUE;
1487: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1488:
1489: IF l_debug_on THEN
1490: WSH_DEBUG_SV.pop(l_module_name);
1491: END IF;
1492:
1493: EXCEPTION
1494: WHEN OTHERS THEN
1511: CLOSE get_inner_items;
1512: END IF;
1513:
1514: IF l_debug_on THEN
1515: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN WSH_PR_CRITERIA.INIT');
1516: WSH_DEBUG_SV.logmsg(l_module_name,'Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1518: END IF;
1519:
1512: END IF;
1513:
1514: IF l_debug_on THEN
1515: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN WSH_PR_CRITERIA.INIT');
1516: WSH_DEBUG_SV.logmsg(l_module_name,'Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1518: END IF;
1519:
1520: END Init;
1513:
1514: IF l_debug_on THEN
1515: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN WSH_PR_CRITERIA.INIT');
1516: WSH_DEBUG_SV.logmsg(l_module_name,'Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1518: END IF;
1519:
1520: END Init;
1521:
1592: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1593: --
1594: IF l_debug_on IS NULL
1595: THEN
1596: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1597: END IF;
1598: --
1599: IF l_debug_on THEN
1600: WSH_DEBUG_SV.push(l_module_name);
1596: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1597: END IF;
1598: --
1599: IF l_debug_on THEN
1600: WSH_DEBUG_SV.push(l_module_name);
1601: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1602: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1603: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1604: END IF;
1597: END IF;
1598: --
1599: IF l_debug_on THEN
1600: WSH_DEBUG_SV.push(l_module_name);
1601: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1602: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1603: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1604: END IF;
1605: --
1598: --
1599: IF l_debug_on THEN
1600: WSH_DEBUG_SV.push(l_module_name);
1601: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1602: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1603: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1604: END IF;
1605: --
1606: -- fetch pick sequence rule parameters
1599: IF l_debug_on THEN
1600: WSH_DEBUG_SV.push(l_module_name);
1601: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1602: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1603: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1604: END IF;
1605: --
1606: -- fetch pick sequence rule parameters
1607: OPEN pick_seq_rule(p_pick_seq_rule_id);
1623: --
1624: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1625: --
1626: IF l_debug_on THEN
1627: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK SEQUENCE RULE ID ' || TO_CHAR ( G_PICK_SEQ_RULE_ID ) || ' DOES NOT EXIST.');
1628: WSH_DEBUG_SV.pop(l_module_name);
1629: END IF;
1630: --
1631: RETURN;
1624: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1625: --
1626: IF l_debug_on THEN
1627: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK SEQUENCE RULE ID ' || TO_CHAR ( G_PICK_SEQ_RULE_ID ) || ' DOES NOT EXIST.');
1628: WSH_DEBUG_SV.pop(l_module_name);
1629: END IF;
1630: --
1631: RETURN;
1632: END IF;
1696: -- determine the most significant pick sequence rule attribute
1697: g_primary_psr := g_ordered_psr(1).attribute_name;
1698:
1699: IF l_debug_on THEN
1700: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIMARY PICK RULE IS ' || G_PRIMARY_PSR );
1701: END IF;
1702: --
1703:
1704: -- print pick sequence rule information for debugging purposes
1704: -- print pick sequence rule information for debugging purposes
1705: FOR i IN 1..g_total_pick_criteria LOOP
1706: --
1707: IF l_debug_on THEN
1708: WSH_DEBUG_SV.logmsg(l_module_name, 'ATTRIBUTE = ' || G_ORDERED_PSR ( I ) .ATTRIBUTE_NAME || ' ' || 'PRIORITY = ' || TO_CHAR ( G_ORDERED_PSR ( I ) .PRIORITY ) || ' ' || 'SORT = ' || G_ORDERED_PSR ( I ) .SORT_ORDER );
1709: END IF;
1710: --
1711: END LOOP;
1712: --
1710: --
1711: END LOOP;
1712: --
1713: IF l_debug_on THEN
1714: WSH_DEBUG_SV.logmsg(l_module_name, 'DETERMINING IF ORDER NUMBER IS IN GROUPING RULE...');
1715: END IF;
1716:
1717: --Determine if order number is in grouping rule.
1718: OPEN order_ps_group(p_pick_grouping_rule_id);
1727:
1728: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1729: --
1730: IF l_debug_on THEN
1731: WSH_DEBUG_SV.log(l_module_name, 'g_use_order_ps ' , g_use_order_ps );
1732: WSH_DEBUG_SV.log(l_module_name, 'g_use_delivery_ps ' , g_use_delivery_ps );
1733: WSH_DEBUG_SV.pop(l_module_name);
1734: END IF;
1735: --
1728: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1729: --
1730: IF l_debug_on THEN
1731: WSH_DEBUG_SV.log(l_module_name, 'g_use_order_ps ' , g_use_order_ps );
1732: WSH_DEBUG_SV.log(l_module_name, 'g_use_delivery_ps ' , g_use_delivery_ps );
1733: WSH_DEBUG_SV.pop(l_module_name);
1734: END IF;
1735: --
1736: EXCEPTION
1729: --
1730: IF l_debug_on THEN
1731: WSH_DEBUG_SV.log(l_module_name, 'g_use_order_ps ' , g_use_order_ps );
1732: WSH_DEBUG_SV.log(l_module_name, 'g_use_delivery_ps ' , g_use_delivery_ps );
1733: WSH_DEBUG_SV.pop(l_module_name);
1734: END IF;
1735: --
1736: EXCEPTION
1737: --
1746: CLOSE order_ps_group;
1747: END IF;
1748: --
1749: IF l_debug_on THEN
1750: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1751: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1752: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1753: END IF;
1754: --
1747: END IF;
1748: --
1749: IF l_debug_on THEN
1750: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1751: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1752: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1753: END IF;
1754: --
1755: END Init_Rules;
1748: --
1749: IF l_debug_on THEN
1750: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1751: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1752: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1753: END IF;
1754: --
1755: END Init_Rules;
1756:
1785: --
1786: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1787: --
1788: IF l_debug_on IS NULL THEN
1789: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1790: END IF;
1791: --
1792: IF l_debug_on THEN
1793: WSH_DEBUG_SV.push(l_module_name);
1789: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1790: END IF;
1791: --
1792: IF l_debug_on THEN
1793: WSH_DEBUG_SV.push(l_module_name);
1794: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1796: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1797: END IF;
1790: END IF;
1791: --
1792: IF l_debug_on THEN
1793: WSH_DEBUG_SV.push(l_module_name);
1794: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1796: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1797: END IF;
1798:
1791: --
1792: IF l_debug_on THEN
1793: WSH_DEBUG_SV.push(l_module_name);
1794: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1796: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1797: END IF;
1798:
1799: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1792: IF l_debug_on THEN
1793: WSH_DEBUG_SV.push(l_module_name);
1794: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1795: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1796: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1797: END IF;
1798:
1799: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1800:
1804:
1805: OPEN c_work_cursorID(p_batch_id, p_organization_id, p_mode);
1806:
1807: IF l_debug_on THEN
1808: WSH_DEBUG_SV.logmsg(l_module_name, 'Status '||x_api_status);
1809: WSH_DEBUG_SV.pop(l_module_name);
1810: END IF;
1811:
1812: EXCEPTION
1805: OPEN c_work_cursorID(p_batch_id, p_organization_id, p_mode);
1806:
1807: IF l_debug_on THEN
1808: WSH_DEBUG_SV.logmsg(l_module_name, 'Status '||x_api_status);
1809: WSH_DEBUG_SV.pop(l_module_name);
1810: END IF;
1811:
1812: EXCEPTION
1813: --
1819: CLOSE c_work_cursorID;
1820: END IF;
1821: --
1822: IF l_debug_on THEN
1823: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1824: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1826: END IF;
1827: --
1820: END IF;
1821: --
1822: IF l_debug_on THEN
1823: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1824: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1826: END IF;
1827: --
1828: END Get_Worker_Records;
1821: --
1822: IF l_debug_on THEN
1823: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1824: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1825: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1826: END IF;
1827: --
1828: END Get_Worker_Records;
1829:
1880: --
1881: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1882: --
1883: IF l_debug_on IS NULL THEN
1884: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1885: END IF;
1886: --
1887: IF l_debug_on THEN
1888: --
1885: END IF;
1886: --
1887: IF l_debug_on THEN
1888: --
1889: WSH_DEBUG_SV.push(l_module_name);
1890: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1886: --
1887: IF l_debug_on THEN
1888: --
1889: WSH_DEBUG_SV.push(l_module_name);
1890: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1887: IF l_debug_on THEN
1888: --
1889: WSH_DEBUG_SV.push(l_module_name);
1890: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1888: --
1889: WSH_DEBUG_SV.push(l_module_name);
1890: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1889: WSH_DEBUG_SV.push(l_module_name);
1890: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1897: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1890: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1897: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1898: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1891: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1897: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1898: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1899: --
1892: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1897: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1898: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1899: --
1900: END IF;
1893: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1897: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1898: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1899: --
1900: END IF;
1901: --
1894: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1895: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1896: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1897: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1898: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1899: --
1900: END IF;
1901: --
1902: --bug# 6719369(replenishment project) : need to consider the replenishment status value.
1904: --
1905: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1906: --
1907: IF l_debug_on THEN
1908: WSH_DEBUG_SV.logmsg(l_module_name, 'INVALID BACKORDER MODE.');
1909: WSH_DEBUG_SV.pop(l_module_name);
1910: END IF;
1911: --
1912: RETURN;
1905: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1906: --
1907: IF l_debug_on THEN
1908: WSH_DEBUG_SV.logmsg(l_module_name, 'INVALID BACKORDER MODE.');
1909: WSH_DEBUG_SV.pop(l_module_name);
1910: END IF;
1911: --
1912: RETURN;
1913: --
2148: -- Both unreleased and backordered SQL share common conditions
2149: IF p_print_flag = 'Y' THEN
2150: --
2151: IF l_debug_on THEN
2152: WSH_DEBUG_SV.logmsg(l_module_name, '
2154: --
2155: END IF;
2156:
2335: --
2336: -- Debug Statements
2337: --
2338: IF l_debug_on THEN
2339: WSH_DEBUG_SV.logmsg(l_module_name, 'OM: SOURCE CODE IS '|| L_ONT_SOURCE_CODE );
2340: END IF;
2341: --
2342: Process_Buffer(p_print_flag,'c', ' AND MSORD1.SEGMENT1 = WDD.SOURCE_HEADER_NUMBER');
2343: --bug 6082122: Comparing MSORD1.SEGMENT2 with the order type name for the base language
2433: --
2434: -- Determine the order by clause
2435: --
2436: IF l_debug_on THEN
2437: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER BY CLAUSE FOR ORGANIZATION ' || TO_CHAR(P_ORGANIZATION_ID));
2438: END IF;
2439: --
2440: g_orderby_SQL := '';
2441:
2530:
2531: --HVOP
2532:
2533: IF l_debug_on THEN
2534: WSH_DEBUG_SV.logmsg(l_module_name,'Dynamic SQL-'||g_Unreleased_SQL||g_cond_SQL||g_orderby_SQL);
2535: END IF;
2536:
2537: -- 70. Parse Cursor
2538: v_CursorID := DBMS_SQL.Open_Cursor;
2537: -- 70. Parse Cursor
2538: v_CursorID := DBMS_SQL.Open_Cursor;
2539: --
2540: IF l_debug_on THEN
2541: WSH_DEBUG_SV.logmsg(l_module_name, 'PARSE CURSOR' );
2542: END IF;
2543: --
2544: DBMS_SQL.Parse(v_CursorID, g_Unreleased_SQL || g_Cond_SQL|| g_orderby_SQL, DBMS_SQL.v7 );
2545: --
2543: --
2544: DBMS_SQL.Parse(v_CursorID, g_Unreleased_SQL || g_Cond_SQL|| g_orderby_SQL, DBMS_SQL.v7 );
2545: --
2546: IF l_debug_on THEN
2547: WSH_DEBUG_SV.logmsg(l_module_name, 'COLUMN DEFINITION FOR CURSOR' );
2548: END IF;
2549: --
2550: --{
2551: IF p_mode = 'SUMMARY' THEN
2600:
2601: -- 80. Bind release criteria values
2602: --
2603: IF l_debug_on THEN
2604: WSH_DEBUG_SV.logmsg(l_module_name, 'BIND CURSOR' );
2605: END IF;
2606: --
2607: --{
2608: -- bug # 8915460 : Added g_del_detail_id = - 2 condition.
2718:
2719: -- 90. Execute the cursor
2720: --
2721: IF l_debug_on THEN
2722: WSH_DEBUG_SV.logmsg(l_module_name, 'EXECUTING CURSOR' );
2723: END IF;
2724: --
2725: v_ignore := DBMS_SQL.Execute(v_CursorID);
2726:
2770:
2771: x_dd_count := nvl(x_dd_count,0) + l_count;
2772:
2773: IF l_debug_on THEN
2774: WSH_DEBUG_SV.log(l_module_name,'x_dd_count ',x_dd_count);
2775: WSH_DEBUG_SV.log(l_module_name,'x_worker_count ',x_worker_count);
2776: WSH_DEBUG_SV.log(l_module_name,'x_smc_worker_count ',x_smc_worker_count);
2777: END IF;
2778: END IF;
2771: x_dd_count := nvl(x_dd_count,0) + l_count;
2772:
2773: IF l_debug_on THEN
2774: WSH_DEBUG_SV.log(l_module_name,'x_dd_count ',x_dd_count);
2775: WSH_DEBUG_SV.log(l_module_name,'x_worker_count ',x_worker_count);
2776: WSH_DEBUG_SV.log(l_module_name,'x_smc_worker_count ',x_smc_worker_count);
2777: END IF;
2778: END IF;
2779: --}
2772:
2773: IF l_debug_on THEN
2774: WSH_DEBUG_SV.log(l_module_name,'x_dd_count ',x_dd_count);
2775: WSH_DEBUG_SV.log(l_module_name,'x_worker_count ',x_worker_count);
2776: WSH_DEBUG_SV.log(l_module_name,'x_smc_worker_count ',x_smc_worker_count);
2777: END IF;
2778: END IF;
2779: --}
2780:
2780:
2781: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2782:
2783: IF l_debug_on THEN
2784: WSH_DEBUG_SV.pop(l_module_name);
2785: END IF;
2786:
2787: EXCEPTION
2788: --
2793: --
2794: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2795: --
2796: IF l_debug_on THEN
2797: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2798: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2799: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2801: END IF;
2794: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2795: --
2796: IF l_debug_on THEN
2797: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2798: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2799: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2801: END IF;
2802: --
2795: --
2796: IF l_debug_on THEN
2797: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2798: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2799: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2801: END IF;
2802: --
2803: END Init_Cursor;
2796: IF l_debug_on THEN
2797: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2798: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2799: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2801: END IF;
2802: --
2803: END Init_Cursor;
2804:
2865: BEGIN
2866: --
2867: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2868: IF l_debug_on IS NULL THEN
2869: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2870: END IF;
2871: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.push(l_module_name);
2869: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2870: END IF;
2871: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.push(l_module_name);
2874: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2875: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2876: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2877: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2870: END IF;
2871: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.push(l_module_name);
2874: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2875: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2876: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2877: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2878: END IF;
2871: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.push(l_module_name);
2874: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2875: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2876: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2877: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2878: END IF;
2879: --
2872: IF l_debug_on THEN
2873: WSH_DEBUG_SV.push(l_module_name);
2874: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2875: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2876: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2877: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2878: END IF;
2879: --
2880: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2873: WSH_DEBUG_SV.push(l_module_name);
2874: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2875: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2876: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2877: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2878: END IF;
2879: --
2880: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2881: -- handle uninitialized package errors here
2883: --{
2884: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2885: --
2886: IF l_debug_on THEN
2887: WSH_DEBUG_SV.logmsg(l_module_name, 'THE PACKAGE MUST BE INITIALIZED BEFORE USE' );
2888: WSH_DEBUG_SV.pop(l_module_name);
2889: END IF;
2890: --
2891: RETURN;
2884: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2885: --
2886: IF l_debug_on THEN
2887: WSH_DEBUG_SV.logmsg(l_module_name, 'THE PACKAGE MUST BE INITIALIZED BEFORE USE' );
2888: WSH_DEBUG_SV.pop(l_module_name);
2889: END IF;
2890: --
2891: RETURN;
2892: --}
2931: IF (l_get_lock_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2932: --{
2933: IF l_skip_detail = 'N' THEN
2934: IF l_debug_on THEN
2935: WSH_DEBUG_SV.logmsg(l_module_name, 'GOT LOCK ON DELIVERY DETAIL '||
2936: FIRST_LINE.DELIVERY_DETAIL_ID||' AGAIN');
2937: END IF;
2938: --
2939: release_table(g_rel_current_line) := first_line;
2945: g_rel_current_line := g_rel_current_line + 1;
2946: --}
2947: ELSE
2948: IF l_debug_on THEN
2949: WSH_DEBUG_SV.logmsg(l_module_name,'No longer eligible to pick release. Ignoring Delivery Detail '||first_line.delivery_detail_id);
2950: END IF;
2951: END IF;
2952:
2953: ELSE
2952:
2953: ELSE
2954: --{
2955: IF l_debug_on THEN
2956: WSH_DEBUG_SV.logmsg(l_module_name, 'UNABLE TO LOCK. IGNORING DELIVERY DETAIL '
2957: ||FIRST_LINE.DELIVERY_DETAIL_ID );
2958: END IF;
2959: --}
2960: END IF;
2972: --}
2973: END IF; /* if first_line */
2974:
2975: IF l_debug_on THEN
2976: wsh_debug_sv.log(l_module_name, 'g_rel_current_line', g_rel_current_line);
2977: END IF;
2978:
2979: LOOP
2980: --{
2984: IF ( v_cursorID IS NULL ) OR ( l_dummy = 0 ) THEN
2985: -- Either all lines are fetched for a worker record or a New Organization
2986: --{
2987: IF l_debug_on THEN
2988: WSH_DEBUG_SV.log(l_module_name, 'v_cursorID',v_cursorID);
2989: END IF;
2990:
2991: --{
2992: -- Fetch and lock worker record to get Organization - Item combination
2994: LOOP
2995: FETCH c_work_cursorID INTO v_pr_org_id, v_pr_inv_item_id, v_pr_mo_line_number, v_pr_mo_line_count,v_rowid; -- Bug # 9369504 : added rowid
2996: IF c_work_cursorID%NOTFOUND THEN --{
2997: IF l_debug_on THEN
2998: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHED ALL LINES FOR ORGANIZATION');
2999: END IF;
3000: IF c_work_cursorID%ISOPEN THEN
3001: CLOSE c_work_cursorID;
3002: END IF;
3008: EXIT;
3009: ELSE
3010: --{
3011: IF l_debug_on THEN
3012: WSH_DEBUG_SV.logmsg(l_module_name,'Getting lock for worker record Batch '||p_batch_id
3013: ||' Org '||v_pr_org_id|| ' Item '||v_pr_inv_item_id);
3014: END IF;
3015: DECLARE
3016: worker_row_locked exception;
3026: EXIT; -- successfully locked
3027: EXCEPTION
3028: WHEN worker_row_locked THEN
3029: IF l_debug_on THEN
3030: WSH_DEBUG_SV.logmsg(l_module_name,'Unable to lock as worker record as it is already locked');
3031: END IF;
3032: l_temp := 'N';
3033: WHEN no_data_found THEN
3034: IF l_debug_on THEN
3031: END IF;
3032: l_temp := 'N';
3033: WHEN no_data_found THEN
3034: IF l_debug_on THEN
3035: WSH_DEBUG_SV.logmsg(l_module_name,'Record already processed by one of the other workers');
3036: END IF;
3037: l_temp := 'N';
3038: WHEN OTHERS THEN
3039: IF l_debug_on THEN
3036: END IF;
3037: l_temp := 'N';
3038: WHEN OTHERS THEN
3039: IF l_debug_on THEN
3040: WSH_DEBUG_SV.logmsg(l_module_name,'Unable to lock as worker record due to error');
3041: WSH_DEBUG_SV.logmsg(l_module_name,SQLERRM);
3042: END IF;
3043: l_temp := 'N';
3044: END;
3037: l_temp := 'N';
3038: WHEN OTHERS THEN
3039: IF l_debug_on THEN
3040: WSH_DEBUG_SV.logmsg(l_module_name,'Unable to lock as worker record due to error');
3041: WSH_DEBUG_SV.logmsg(l_module_name,SQLERRM);
3042: END IF;
3043: l_temp := 'N';
3044: END;
3045: --}
3067: g_return_status);
3068: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3069: x_api_status := g_return_status;
3070: IF l_debug_on THEN
3071: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN VALIDATE_SS_SMC/0' );
3072: END IF;
3073: raise e_return_excp; -- LPN CONV. rv
3074: END IF;
3075: --}
3084: WHERE ROWID= v_rowid;
3085: EXCEPTION WHEN OTHERS THEN
3086: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3087: IF l_debug_on THEN
3088: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in updating worker records as processed');
3089: WSH_DEBUG_SV.pop(l_module_name);
3090: END IF;
3091: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3092: DBMS_SQL.Close_Cursor(v_CursorID);
3085: EXCEPTION WHEN OTHERS THEN
3086: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3087: IF l_debug_on THEN
3088: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in updating worker records as processed');
3089: WSH_DEBUG_SV.pop(l_module_name);
3090: END IF;
3091: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3092: DBMS_SQL.Close_Cursor(v_CursorID);
3093: END IF;
3103: -- Open Cursor for Organization - Item combination, only if called for new Organization OR
3104: -- if the previous call was for SMC and now for regular item as Item Bind Variable changes
3105: IF ( v_cursorID IS NULL ) OR ( v_prev_item_id IS NULL ) THEN
3106: IF l_debug_on THEN
3107: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PR_CRITERIA.Init_Cursor', WSH_DEBUG_SV.C_PROC_LEVEL);
3108: END IF;
3109: Init_Cursor (
3110: p_organization_id => v_pr_org_id,
3111: p_mode => l_mode,
3122: x_dd_count => l_dummy1,
3123: x_api_status => x_api_status);
3124: IF (x_api_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_api_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3125: IF l_debug_on THEN
3126: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in Init_Cursor');
3127: WSH_DEBUG_SV.pop(l_module_name);
3128: END IF;
3129: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3130: DBMS_SQL.Close_Cursor(v_CursorID);
3123: x_api_status => x_api_status);
3124: IF (x_api_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_api_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3125: IF l_debug_on THEN
3126: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in Init_Cursor');
3127: WSH_DEBUG_SV.pop(l_module_name);
3128: END IF;
3129: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3130: DBMS_SQL.Close_Cursor(v_CursorID);
3131: END IF;
3138: v_total_rec_fetched := 0;
3139: ELSE
3140: -- Bind the new Item and execute the cursor again
3141: IF l_debug_on THEN
3142: WSH_DEBUG_SV.logmsg(l_module_name, 'Binding new Item '||v_pr_inv_item_id||' and Executing Cursor' );
3143: END IF;
3144: DBMS_SQL.BIND_VARIABLE(v_CursorID,':X_inventory_item_id',v_pr_inv_item_id);
3145: l_dummy := DBMS_SQL.Execute(v_CursorID);
3146: v_total_rec_fetched := 0;
3150: --}
3151: ELSE
3152: --{
3153: IF l_debug_on THEN
3154: WSH_DEBUG_SV.logmsg(l_module_name, 'MAP OUTPUT COLUMNS' );
3155: END IF;
3156:
3157: DBMS_SQL.Column_Value(v_CursorID, 1, v_line_id);
3158: DBMS_SQL.Column_Value(v_CursorID, 2, v_header_id);
3195: DBMS_SQL.Column_Value(v_CursorID, 37, v_lot_number);
3196: -- Standalone project Changes end
3197: DBMS_SQL.Column_Value(v_CursorID, 38, v_client_id); -- LSP PROJECT
3198: IF l_debug_on THEN
3199: WSH_DEBUG_SV.log(l_module_name, 'CURRENT LINE IS', TO_CHAR(G_REL_CURRENT_LINE));
3200: WSH_DEBUG_SV.log(l_module_name, 'Delivery detail ID', v_delivery_detail_id);
3201: END IF;
3202:
3203: -- Save fetched record into release table
3196: -- Standalone project Changes end
3197: DBMS_SQL.Column_Value(v_CursorID, 38, v_client_id); -- LSP PROJECT
3198: IF l_debug_on THEN
3199: WSH_DEBUG_SV.log(l_module_name, 'CURRENT LINE IS', TO_CHAR(G_REL_CURRENT_LINE));
3200: WSH_DEBUG_SV.log(l_module_name, 'Delivery detail ID', v_delivery_detail_id);
3201: END IF;
3202:
3203: -- Save fetched record into release table
3204: Insert_RL_Row(p_enforce_ship_set_and_smc, l_skip_detail, g_return_status);
3205:
3206: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) OR (g_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3207: x_api_status := g_return_status;
3208: IF l_debug_on THEN
3209: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN INSERT_RL_ROW');
3210: --WSH_DEBUG_SV.pop(l_module_name);
3211: END IF;
3212: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3213: DBMS_SQL.Close_Cursor(v_CursorID);
3206: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) OR (g_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3207: x_api_status := g_return_status;
3208: IF l_debug_on THEN
3209: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN INSERT_RL_ROW');
3210: --WSH_DEBUG_SV.pop(l_module_name);
3211: END IF;
3212: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3213: DBMS_SQL.Close_Cursor(v_CursorID);
3214: END IF;
3218: --RETURN;
3219: raise e_return_excp; -- LPN CONV. rv
3220: ELSIF (g_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3221: IF l_debug_on THEN
3222: WSH_DEBUG_SV.logmsg(l_module_name, 'WARNING: SKIPPING THE ORDER LINE');
3223: END IF;
3224: x_api_status := g_return_status;
3225: ELSE
3226: IF l_skip_detail = 'N' THEN
3227: g_rel_current_line := g_rel_current_line + 1;
3228: v_total_rec_fetched := v_total_rec_fetched + 1;
3229: ELSE
3230: IF l_debug_on THEN
3231: WSH_DEBUG_SV.logmsg(l_module_name,'Skipping the Order Line');
3232: END IF;
3233: x_api_status := g_return_status;
3234: END IF;
3235: END IF;
3236: --}
3237: END IF;
3238:
3239: IF l_debug_on THEN
3240: WSH_DEBUG_SV.logmsg(l_module_name,'v_pr_mo_line_count : '||v_pr_mo_line_count||
3241: ' , v_total_rec_fetched : '||v_total_rec_fetched);
3242: END IF;
3243:
3244: IF (v_pr_mo_line_count is not null AND v_total_rec_fetched > v_pr_mo_line_count) THEN
3271: ((release_table(g_rel_current_line - 1).top_model_line_id > 0) AND
3272: (release_table(g_rel_current_line - 1).top_model_line_id =
3273: release_table(g_rel_current_line - 2).top_model_line_id))) THEN
3274: IF l_debug_on THEN
3275: WSH_DEBUG_SV.logmsg(l_module_name,'LARGE MODEL OR SS, IN MODEL FETCH MODE');
3276: END IF;
3277: ELSE
3278: first_line := release_table(g_rel_current_line - 1);
3279: release_table.delete(g_rel_current_line - 1);
3292: THEN
3293: --{
3294:
3295: IF l_debug_on THEN
3296: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3297: END IF;
3298:
3299:
3300: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3304: x_out_rec => l_lpn_out_sync_comm_rec
3305: );
3306: --
3307: IF l_debug_on THEN
3308: WSH_DEBUG_SV.log(l_module_name, 'Return Status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS API is ', g_return_status);
3309: WSH_DEBUG_SV.log(l_module_name, 'current value of x_api_status is ', x_api_status);
3310: END IF;
3311: --
3312: IF g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
3305: );
3306: --
3307: IF l_debug_on THEN
3308: WSH_DEBUG_SV.log(l_module_name, 'Return Status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS API is ', g_return_status);
3309: WSH_DEBUG_SV.log(l_module_name, 'current value of x_api_status is ', x_api_status);
3310: END IF;
3311: --
3312: IF g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
3313: THEN
3313: THEN
3314: --{
3315: x_api_status := g_return_status;
3316: IF l_debug_on THEN
3317: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR OCCURRED IN WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS');
3318: END IF;
3319: --}
3320: ELSIF (g_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
3321: AND nvl(x_api_status, WSH_UTIL_CORE.G_RET_STS_SUCCESS) NOT IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR))
3322: THEN
3323: --{
3324: x_api_status := g_return_status;
3325: IF l_debug_on THEN
3326: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS');
3327: END IF;
3328: --}
3329: ELSIF (g_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
3330: AND nvl(x_api_status, WSH_UTIL_CORE.G_RET_STS_SUCCESS) NOT IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR))
3331: THEN
3332: --{
3333: x_api_status := g_return_status;
3334: IF l_debug_on THEN
3335: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS API returned warning');
3336: END IF;
3337: --}
3338: END IF;
3339: --}
3341: -- LPN CONV. rvishnuv
3342:
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name, 'release_table.COUNT', release_table.COUNT);
3346: WSH_DEBUG_SV.pop(l_module_name);
3347: END IF;
3348: --
3349: EXCEPTION
3342:
3343: --
3344: IF l_debug_on THEN
3345: WSH_DEBUG_SV.log(l_module_name, 'release_table.COUNT', release_table.COUNT);
3346: WSH_DEBUG_SV.pop(l_module_name);
3347: END IF;
3348: --
3349: EXCEPTION
3350: --
3355: THEN
3356: --{
3357: --
3358: IF l_debug_on THEN
3359: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3360: END IF;
3361: --
3362: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3363: (
3366: x_out_rec => l_lpn_out_sync_comm_rec
3367: );
3368: --
3369: IF l_debug_on THEN
3370: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', g_return_status);
3371: END IF;
3372: IF (g_return_status IN (WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR, WSH_UTIL_CORE.G_RET_STS_ERROR) AND x_api_status <> WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3373: x_api_status := g_return_status;
3374: END IF;
3375: --}
3376: END IF;
3377: --
3378: IF l_debug_on THEN
3379: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_RETURN_EXCP');
3380: END IF;
3381: -- LPN CONV. rv
3382: --
3383:
3384:
3385: WHEN OTHERS THEN
3386: --
3387: IF l_debug_on THEN
3388: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3389: END IF;
3390: --
3391: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3392: DBMS_SQL.Close_Cursor(v_CursorID);
3403: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3404: THEN
3405: --{
3406: IF l_debug_on THEN
3407: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',WSH_DEBUG_SV.C_PROC_LEVEL);
3408: END IF;
3409:
3410: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3411: (
3415: );
3416: --
3417: --
3418: IF l_debug_on THEN
3419: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',g_return_status);
3420: END IF;
3421: --
3422: --
3423: --}
3426: -- K LPN CONV. rv
3427: --
3428: --
3429: IF l_debug_on THEN
3430: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3431: END IF;
3432: --
3433: END Get_Lines;
3434:
3505: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3506: --
3507: IF l_debug_on IS NULL
3508: THEN
3509: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3510: END IF;
3511: --
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.push(l_module_name);
3509: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3510: END IF;
3511: --
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.push(l_module_name);
3514: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3510: END IF;
3511: --
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.push(l_module_name);
3514: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3511: --
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.push(l_module_name);
3514: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.push(l_module_name);
3514: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3513: WSH_DEBUG_SV.push(l_module_name);
3514: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3521: WSH_DEBUG_SV.log(l_module_name, 'Quantity2', v_requested_quantity2);
3514: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3521: WSH_DEBUG_SV.log(l_module_name, 'Quantity2', v_requested_quantity2);
3522: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM2', v_requested_quantity_uom2);
3515: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3521: WSH_DEBUG_SV.log(l_module_name, 'Quantity2', v_requested_quantity2);
3522: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM2', v_requested_quantity_uom2);
3523: END IF;
3516: WSH_DEBUG_SV.log(l_module_name, 'Line ID', v_line_id);
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3521: WSH_DEBUG_SV.log(l_module_name, 'Quantity2', v_requested_quantity2);
3522: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM2', v_requested_quantity_uom2);
3523: END IF;
3524:
3517: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3521: WSH_DEBUG_SV.log(l_module_name, 'Quantity2', v_requested_quantity2);
3522: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM2', v_requested_quantity_uom2);
3523: END IF;
3524:
3525: x_skip_detail := 'N'; --Bug# 3248578
3518: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3519: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3520: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3521: WSH_DEBUG_SV.log(l_module_name, 'Quantity2', v_requested_quantity2);
3522: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM2', v_requested_quantity_uom2);
3523: END IF;
3524:
3525: x_skip_detail := 'N'; --Bug# 3248578
3526:
3530: l_fulfill_base := WSH_UTIL_CORE.Get_Line_Fulfillment_Base('OE',v_line_id);
3531: IF (l_fulfill_base = 'P' and v_requested_quantity = 0) OR (l_fulfill_base = 'S' and v_requested_quantity2 = 0) THEN
3532: x_skip_detail := 'Y';
3533: IF l_debug_on THEN
3534: WSH_DEBUG_SV.logmsg(l_module_name,'Zero Requested Quantity/Requested Quantity2 detail cannot be Picked');
3535: END IF;
3536: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3537: RETURN;
3538: END IF;
3542: --{
3543: IF (v_released_status IN ('X')) THEN
3544: --None pick release eligible line, ignore
3545: IF l_debug_on THEN
3546: WSH_DEBUG_SV.logmsg(l_module_name, 'THIS IS NON-TRANSACTABLE LINE. IGNORING SS/SMC' );
3547: END IF;
3548: v_ship_set_id := NULL;
3549: v_top_model_line_id := NULL;
3550: v_ship_model_complete_flag := NULL;
3552:
3553: IF (v_ship_set_id IS NOT NULL) THEN
3554: -- Ignore SMC if SS is Specified
3555: IF l_debug_on THEN
3556: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING SMC AS SHIP SET IS SPECIFIED' );
3557: END IF;
3558: v_ship_model_complete_flag := NULL;
3559: v_top_model_line_id := NULL;
3560: ELSE
3573: g_last_source_code := NULL;
3574: END IF;
3575:
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3578: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3579: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3580: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3581: END IF;
3574: END IF;
3575:
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3578: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3579: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3580: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3581: END IF;
3582:
3575:
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3578: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3579: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3580: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3581: END IF;
3582:
3583: IF (((g_last_ship_set_id IS NOT NULL) AND (g_last_ship_set_id <> NVL(v_ship_set_id,-99))) OR
3576: IF l_debug_on THEN
3577: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3578: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3579: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3580: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3581: END IF;
3582:
3583: IF (((g_last_ship_set_id IS NOT NULL) AND (g_last_ship_set_id <> NVL(v_ship_set_id,-99))) OR
3584: ((g_last_top_model_line_id IS NOT NULL) AND (g_last_top_model_line_id <> NVL(v_top_model_line_id,-99)))) THEN
3590: g_last_source_code,
3591: l_return_status);
3592: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3593: IF l_debug_on THEN
3594: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN VALIDATE_SS_SMC/5' );
3595: END IF;
3596: x_api_status := l_return_status;
3597: IF l_debug_on THEN
3598: WSH_DEBUG_SV.pop(l_module_name);
3594: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN VALIDATE_SS_SMC/5' );
3595: END IF;
3596: x_api_status := l_return_status;
3597: IF l_debug_on THEN
3598: WSH_DEBUG_SV.pop(l_module_name);
3599: END IF;
3600: RETURN;
3601: END IF;
3602:
3621:
3622: IF (v_source_code = 'OE') THEN --{
3623: -- Bug 1287776: Check for Credit Check and Holds
3624: IF l_debug_on THEN
3625: WSH_DEBUG_SV.logmsg(l_module_name,
3626: 'PROCESSING HEADER '
3627: ||TO_CHAR ( V_HEADER_ID )
3628: ||' LINE '
3629: ||TO_CHAR ( V_LINE_ID )
3641: (g_lock_or_hold_failed) AND
3642: ((g_failed_ship_set_id IS NOT NULL) OR (g_failed_top_model_line_id IS NOT NULL))) THEN
3643: --{
3644: IF l_debug_on THEN
3645: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THIS LINE SINCE ONE OF THE PREVIOUS LINES IN SHIP SET/SMC FAILED' );
3646: END IF;
3647: -- Ignore this line as previous line in ship set or model is faild.
3648: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3649: IF l_debug_on THEN
3646: END IF;
3647: -- Ignore this line as previous line in ship set or model is faild.
3648: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3649: IF l_debug_on THEN
3650: WSH_DEBUG_SV.pop(l_module_name);
3651: END IF;
3652: RETURN;
3653: --}
3654: END IF;
3657: IF (WSH_PR_CRITERIA.g_credit_check_option = 'A') OR
3658: (WSH_PR_CRITERIA.g_credit_check_option = 'R' AND v_released_status = 'R') OR
3659: (WSH_PR_CRITERIA.g_credit_check_option = 'B' AND v_released_status = 'B') THEN --{
3660: IF l_debug_on THEN
3661: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR CREDIT CHECK/HOLDS' );
3662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
3663: END IF;
3664: WSH_DETAILS_VALIDATIONS.check_credit_holds(
3665: p_detail_id => v_delivery_detail_id,
3658: (WSH_PR_CRITERIA.g_credit_check_option = 'R' AND v_released_status = 'R') OR
3659: (WSH_PR_CRITERIA.g_credit_check_option = 'B' AND v_released_status = 'B') THEN --{
3660: IF l_debug_on THEN
3661: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR CREDIT CHECK/HOLDS' );
3662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
3663: END IF;
3664: WSH_DETAILS_VALIDATIONS.check_credit_holds(
3665: p_detail_id => v_delivery_detail_id,
3666: p_activity_type => 'PICK',
3674: /* Don't error out. Raise Warning only */
3675: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3676: Set_Globals(p_enforce_ship_set_and_smc, v_ship_set_id, v_top_model_line_id);
3677: IF l_debug_on THEN
3678: WSH_DEBUG_SV.pop(l_module_name);
3679: END IF;
3680: RETURN;
3681: END IF;
3682: END IF; --}
3699: x_return_status => x_api_status);
3700:
3701: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3702: IF l_debug_on THEN
3703: WSH_DEBUG_SV.logmsg(l_module_name, 'GET_DETAIL_LOCK RETURNED WITH WARNING' );
3704: WSH_DEBUG_SV.pop(l_module_name);
3705: END IF;
3706: --
3707: RETURN;
3700:
3701: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3702: IF l_debug_on THEN
3703: WSH_DEBUG_SV.logmsg(l_module_name, 'GET_DETAIL_LOCK RETURNED WITH WARNING' );
3704: WSH_DEBUG_SV.pop(l_module_name);
3705: END IF;
3706: --
3707: RETURN;
3708: -- Bug# 3248578 start of change
3707: RETURN;
3708: -- Bug# 3248578 start of change
3709: ELSIF (x_api_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) AND (x_skip_detail = 'Y') THEN
3710: IF l_debug_on THEN
3711: WSH_DEBUG_SV.logmsg(l_module_name,'No longer eligible to Pick Release, ignoring the line');
3712: END IF;
3713: RETURN;
3714: END IF;
3715:
3727:
3728: --Bug8683087 now fetching demand_source_header_id for all the cases.
3729: IF v_header_id <> NVL(g_cache_header_id, -99) THEN
3730: IF l_debug_on THEN
3731: WSH_DEBUG_SV.logmsg(l_module_name, 'Call API to get demand sales order number for '||v_header_id);
3732: END IF;
3733: IF NVL(v_demand_source_header_id,-1) = -1 THEN
3734: v_demand_source_header_id := INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER(v_header_id);
3735: END IF;
3736: g_cache_header_id := v_header_id;
3737: g_cache_demand_header_id := v_demand_source_header_id;
3738: ELSE
3739: IF l_debug_on THEN
3740: WSH_DEBUG_SV.logmsg(l_module_name, 'use cached value '||g_cache_demand_header_id);
3741: END IF;
3742: v_demand_source_header_id := g_cache_demand_header_id;
3743: END IF;
3744: --8683087
3747: IF ((g_existing_rsvs_only_flag = 'Y' or (g_honor_pick_from = 'Y' and g_from_subinventory is not null)) and (v_released_status <> 'X')) THEN
3748: --{
3749: -- Bug 4775539
3750: IF l_debug_on THEN
3751: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR RESERVATIONS' );
3752: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.CALCULATE_RESERVATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3753: END IF;
3754: --Calculate Reservations
3755: -- HW OPMCONV - Pass and return qty2
3748: --{
3749: -- Bug 4775539
3750: IF l_debug_on THEN
3751: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR RESERVATIONS' );
3752: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.CALCULATE_RESERVATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3753: END IF;
3754: --Calculate Reservations
3755: -- HW OPMCONV - Pass and return qty2
3756: WSH_PICK_LIST.Calculate_Reservations(
3776: -- Bug 4775539
3777: -- muom
3778: IF (l_fulfill_base = 'P' and l_result = 0) THEN
3779: IF g_existing_rsvs_only_flag = 'Y' THEN
3780: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY IS 0' );
3781: ELSE
3782: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY IS 0' );
3783: END IF;
3784: ELSE
3778: IF (l_fulfill_base = 'P' and l_result = 0) THEN
3779: IF g_existing_rsvs_only_flag = 'Y' THEN
3780: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY IS 0' );
3781: ELSE
3782: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY IS 0' );
3783: END IF;
3784: ELSE
3785: IF g_existing_rsvs_only_flag = 'Y' THEN
3786: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY2 IS 0' );
3782: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY IS 0' );
3783: END IF;
3784: ELSE
3785: IF g_existing_rsvs_only_flag = 'Y' THEN
3786: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY2 IS 0' );
3787: ELSE
3788: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY2 IS 0' );
3789: END IF;
3790: END IF;
3784: ELSE
3785: IF g_existing_rsvs_only_flag = 'Y' THEN
3786: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY2 IS 0' );
3787: ELSE
3788: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY2 IS 0' );
3789: END IF;
3790: END IF;
3791: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3792: END IF;
3787: ELSE
3788: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY2 IS 0' );
3789: END IF;
3790: END IF;
3791: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3792: END IF;
3793: --
3794: Set_Globals(p_enforce_ship_set_and_smc, v_ship_set_id, v_top_model_line_id);
3795:
3828: END IF;
3829: -- end bug 2164110
3830:
3831: IF l_debug_on THEN
3832: WSH_DEBUG_SV.pop(l_module_name);
3833: END IF;
3834: RETURN;
3835: -- muom
3836: ELSIF (l_fulfill_base = 'P' and l_result = l_requested_quantity) OR (l_fulfill_base = 'S' and l_result2 = l_requested_quantity2) THEN -- Complete Fulfillment */
3839: IF ((v_ship_set_id > 0) OR (v_top_model_line_id > 0)) THEN
3840: IF l_debug_on THEN
3841: IF l_debug_on THEN
3842: IF g_existing_rsvs_only_flag = 'Y' THEN
3843: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3844: ELSE
3845: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM HONOR IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3846: END IF;
3847: END IF;
3841: IF l_debug_on THEN
3842: IF g_existing_rsvs_only_flag = 'Y' THEN
3843: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3844: ELSE
3845: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM HONOR IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3846: END IF;
3847: END IF;
3848: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3849: END IF;
3844: ELSE
3845: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM HONOR IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3846: END IF;
3847: END IF;
3848: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3849: END IF;
3850:
3851: Set_Globals(p_enforce_ship_set_and_smc, v_ship_set_id, v_top_model_line_id);
3852: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3884: END IF;
3885: -- end bug 2164110
3886:
3887: IF l_debug_on THEN
3888: WSH_DEBUG_SV.pop(l_module_name);
3889: END IF;
3890: RETURN;
3891: ELSE
3892: l_requested_quantity := l_requested_quantity - l_result;
3893: -- HW OPMCONV - Added qty2
3894: l_requested_quantity2 := l_requested_quantity2 - l_result2;
3895:
3896: IF l_debug_on THEN
3897: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
3898: END IF;
3899:
3900: -- HW OPMCONV - Added l_requested_quantity2 and re-arranged parameters
3901:
3908: p_unassign_flag => 'N'
3909: );
3910:
3911: IF l_debug_on THEN
3912: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED NEW DELIVERY DETAIL '||L_NEW_DELIVERY_DETAIL_ID );
3913: END IF;
3914: END IF;
3915: END IF;
3916: --}
3924: G_NONRESERVABLE_ITEM := 'Y';
3925: END IF;
3926:
3927: IF l_debug_on THEN
3928: WSH_DEBUG_SV.logmsg(l_module_name, 'INSERT INTO TABLE' );
3929: END IF;
3930:
3931: --Store the detail line values to release table
3932: release_table(g_rel_current_line).source_line_id := v_line_id;
3970: FETCH c_order_line INTO l_ordered_quantity, l_order_quantity_uom;
3971: CLOSE c_order_line;
3972:
3973: IF l_debug_on THEN
3974: WSH_DEBUG_SV.log(l_module_name, 'l_ordered_quantity',l_ordered_quantity);
3975: WSH_DEBUG_SV.log(l_module_name, 'l_order_quantity_uom',l_order_quantity_uom);
3976: END IF;
3977:
3978: release_table(g_rel_current_line).top_model_quantity := l_ordered_quantity;
3971: CLOSE c_order_line;
3972:
3973: IF l_debug_on THEN
3974: WSH_DEBUG_SV.log(l_module_name, 'l_ordered_quantity',l_ordered_quantity);
3975: WSH_DEBUG_SV.log(l_module_name, 'l_order_quantity_uom',l_order_quantity_uom);
3976: END IF;
3977:
3978: release_table(g_rel_current_line).top_model_quantity := l_ordered_quantity;
3979: g_last_model_quantity := l_ordered_quantity;
4015: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4016:
4017: --
4018: IF l_debug_on THEN
4019: WSH_DEBUG_SV.pop(l_module_name);
4020: END IF;
4021: --
4022: EXCEPTION
4023: WHEN OTHERS THEN
4021: --
4022: EXCEPTION
4023: WHEN OTHERS THEN
4024: IF l_debug_on THEN
4025: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INSERT_RL_ROW' );
4026: END IF;
4027: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4028: IF l_debug_on THEN
4029: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4025: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INSERT_RL_ROW' );
4026: END IF;
4027: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4028: IF l_debug_on THEN
4029: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4030: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4031: END IF;
4032:
4033: END Insert_RL_Row;
4026: END IF;
4027: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4028: IF l_debug_on THEN
4029: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4030: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4031: END IF;
4032:
4033: END Insert_RL_Row;
4034:
4065: --
4066: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4067: --
4068: IF l_debug_on IS NULL THEN
4069: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4070: END IF;
4071: --
4072: IF p_buffer_name = 'u' THEN
4073: g_Unreleased_SQL := g_Unreleased_SQL || p_buffer_text;