[Home] [Help]
205: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
206: --
207: IF l_debug_on IS NULL
208: THEN
209: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
210: END IF;
211: --
212: IF l_debug_on THEN
213: WSH_DEBUG_SV.push(l_module_name);
209: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
210: END IF;
211: --
212: IF l_debug_on THEN
213: WSH_DEBUG_SV.push(l_module_name);
214: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
215: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
216: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
217: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
210: END IF;
211: --
212: IF l_debug_on THEN
213: WSH_DEBUG_SV.push(l_module_name);
214: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
215: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
216: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
217: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
218: END IF;
211: --
212: IF l_debug_on THEN
213: WSH_DEBUG_SV.push(l_module_name);
214: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
215: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
216: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
217: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
218: END IF;
219: --
212: IF l_debug_on THEN
213: WSH_DEBUG_SV.push(l_module_name);
214: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
215: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
216: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
217: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
218: END IF;
219: --
220: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
213: WSH_DEBUG_SV.push(l_module_name);
214: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
215: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
216: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_HEADER_ID',P_ORDER_HEADER_ID);
217: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
218: END IF;
219: --
220: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
221: --
220: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
221: --
222:
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
225: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_Shipping_Integration_PUB.Check_Import_Pending_Lines',WSH_DEBUG_SV.C_PROC_LEVEL);
226: END IF;
227:
228: -- Checks if any lines in the ship set are not yet imported
221: --
222:
223: IF l_debug_on THEN
224: WSH_DEBUG_SV.log(l_module_name,'Current Time is ',SYSDATE);
225: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_Shipping_Integration_PUB.Check_Import_Pending_Lines',WSH_DEBUG_SV.C_PROC_LEVEL);
226: END IF;
227:
228: -- Checks if any lines in the ship set are not yet imported
229: -- Bug :3832310. The call to "WSH_DELIVERY_VALIDATIONS.Check_SS_Imp_Pending"
240: x_return_status => x_api_status );
241:
242: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
243: IF l_debug_on THEN
244: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WSH_DELIVERY_VALIDATIONS.CHECK_SS_IMP_PENDING');
245: WSH_DEBUG_SV.pop(l_module_name);
246: END IF;
247: RETURN;
248: END IF;
241:
242: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
243: IF l_debug_on THEN
244: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR FROM WSH_DELIVERY_VALIDATIONS.CHECK_SS_IMP_PENDING');
245: WSH_DEBUG_SV.pop(l_module_name);
246: END IF;
247: RETURN;
248: END IF;
249:
262: AND released_status IN ('R','N','B')
263: AND pickable_flag = 'Y';
264: --
265: IF l_debug_on THEN
266: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND '||L_SS_COUNT||' RECORDS IN DB' );
267: END IF;
268: --
269: ELSE
270:
269: ELSE
270:
271: -- Some of the lines in SS are not imported
272: IF l_debug_on THEN
273: WSH_DEBUG_SV.logmsg(l_module_name, 'THERE EXISTS A LINE IN THIS SHIP SET WHICH IS NOT YET IMPORTED' );
274: END IF;
275: --
276: l_ss_count := -1;
277: --
289: l_start_index := g_rel_current_line - 1;
290: l_db_count := l_start_index - l_end_index;
291: --
292: IF l_debug_on THEN
293: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND '||L_DB_COUNT||' RECORDS IN RELEASE_TABLE');
294: END IF;
295: --
296:
297:
298: IF (l_db_count <> l_ss_count) THEN
299: -- release_table SS doesn't match with Database SS
300: IF (l_ss_count <> -1) THEN
301: IF l_debug_on THEN
302: WSH_DEBUG_SV.logmsg(l_module_name, 'THE DB COUNT FOR SS '||P_SHIP_SET_ID || ' DOES NOT MATCH WITH THE SELECTED RECORD COUNT');
303: END IF;
304: END IF;
305:
306:
304: END IF;
305:
306:
307: IF l_debug_on THEN
308: WSH_DEBUG_SV.logmsg(l_module_name,'REMOVING THE SHIP SET FROM RELEASE TABLE');
309: END IF;
310:
311: --Removing Ship Set lines from release table as SS doesn't match with Database SS
312: FOR i in l_end_index+1..l_start_index LOOP
316: -- reset the g_rel_current_line after deletion
317: g_rel_current_line := l_end_index + 1;
318: --
319: IF l_debug_on THEN
320: WSH_DEBUG_SV.log(l_module_name,'G_REL_CURRENT_LINE',G_REL_CURRENT_LINE);
321: END IF;
322: --
323: END IF;
324: --}
325: ELSE --p_ship_set_id is NULL
326: --{
327:
328: IF l_debug_on THEN
329: 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 );
330: END IF;
331: --
332:
333: IF (l_status = FALSE) THEN
342: AND released_status IN ('R','N','B')
343: AND pickable_flag = 'Y';
344:
345: IF l_debug_on THEN
346: WSH_DEBUG_SV.logmsg(l_module_name, 'FOUND '||L_SMC_COUNT||' RECORDS IN DB' );
347: END IF;
348:
349: ELSE
350: -- Some of the lines in SMC are not imported
348:
349: ELSE
350: -- Some of the lines in SMC are not imported
351: IF l_debug_on THEN
352: WSH_DEBUG_SV.logmsg(l_module_name, 'THERE EXISTS A LINE IN THIS SMC SET WHICH IS NOT YET IMPORTED' );
353: END IF;
354: --
355: l_smc_count := -1;
356: --
369: l_db_count := l_start_index - l_end_index;
370:
371:
372: IF l_debug_on THEN
373: WSH_DEBUG_SV.logmsg(l_module_name,'FOUND '||L_DB_COUNT||' RECORDS IN RELEASE_TABLE');
374: END IF;
375: --
376: IF (l_db_count <> l_smc_count) THEN
377: -- release_table SMC count doesn't match with Database SMC count
376: IF (l_db_count <> l_smc_count) THEN
377: -- release_table SMC count doesn't match with Database SMC count
378: --
379: IF l_debug_on THEN
380: 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');
381: WSH_DEBUG_SV.logmsg(l_module_name, 'REMOVING THE SMC FROM RELEASE TABLE' );
382: END IF;
383:
384:
377: -- release_table SMC count doesn't match with Database SMC count
378: --
379: IF l_debug_on THEN
380: 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');
381: WSH_DEBUG_SV.logmsg(l_module_name, 'REMOVING THE SMC FROM RELEASE TABLE' );
382: END IF;
383:
384:
385: --Removing the SMC lines from Release Table.
391: -- reset the g_rel_current_line after deletion
392: g_rel_current_line := l_end_index + 1;
393: --
394: IF l_debug_on THEN
395: WSH_DEBUG_SV.logmsg(l_module_name, 'G_REL_CURRENT_LINE SET BACK TO '||G_REL_CURRENT_LINE );
396: END IF;
397: --
398: END IF;
399: --}
401:
402:
403: --
404: IF l_debug_on THEN
405: WSH_DEBUG_SV.pop(l_module_name);
406: END IF;
407: --
408: EXCEPTION
409: --
411: wsh_util_core.default_handler('WSH_PR_CRITERIA.validate_ss_smc');
412: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
413: --
414: IF l_debug_on THEN
415: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
416: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
417: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
418: END IF;
419: --
412: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
413: --
414: IF l_debug_on THEN
415: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
416: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
417: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
418: END IF;
419: --
420: END validate_ss_smc;
413: --
414: IF l_debug_on THEN
415: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
416: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
417: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
418: END IF;
419: --
420: END validate_ss_smc;
421:
447: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
448: --
449: IF l_debug_on IS NULL
450: THEN
451: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
452: END IF;
453: --
454: IF l_debug_on THEN
455: WSH_DEBUG_SV.push(l_module_name);
451: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
452: END IF;
453: --
454: IF l_debug_on THEN
455: WSH_DEBUG_SV.push(l_module_name);
456: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
457: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
458: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
459: END IF;
452: END IF;
453: --
454: IF l_debug_on THEN
455: WSH_DEBUG_SV.push(l_module_name);
456: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
457: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
458: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
459: END IF;
460: --
453: --
454: IF l_debug_on THEN
455: WSH_DEBUG_SV.push(l_module_name);
456: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
457: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
458: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
459: END IF;
460: --
461:
454: IF l_debug_on THEN
455: WSH_DEBUG_SV.push(l_module_name);
456: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
457: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
458: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
459: END IF;
460: --
461:
462: --IF only enforce ship set and SMC
468: g_last_top_model_line_id := p_top_model_line_id;
469: END IF;
470: --
471: IF l_debug_on THEN
472: WSH_DEBUG_SV.pop(l_module_name);
473: END IF;
474: --
475: END Set_Globals;
476:
603: --
604: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
605: --
606: IF l_debug_on IS NULL THEN
607: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
608: END IF;
609: --
610: IF l_debug_on THEN
611: WSH_DEBUG_SV.push(l_module_name);
607: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
608: END IF;
609: --
610: IF l_debug_on THEN
611: WSH_DEBUG_SV.push(l_module_name);
612: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
613: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
614: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
615: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
608: END IF;
609: --
610: IF l_debug_on THEN
611: WSH_DEBUG_SV.push(l_module_name);
612: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
613: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
614: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
615: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
616: END IF;
609: --
610: IF l_debug_on THEN
611: WSH_DEBUG_SV.push(l_module_name);
612: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
613: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
614: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
615: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
616: END IF;
617: --
610: IF l_debug_on THEN
611: WSH_DEBUG_SV.push(l_module_name);
612: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
613: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
614: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
615: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
616: END IF;
617: --
618: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
611: WSH_DEBUG_SV.push(l_module_name);
612: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
613: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_SET_ID',P_SHIP_SET_ID);
614: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
615: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
616: END IF;
617: --
618: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
619: x_skip_detail := 'N'; --Bug# 3248578
631: END IF;
632:
633: -- Start Bug# 3248578
634: IF l_debug_on THEN
635: WSH_DEBUG_SV.log(l_module_name,'l_last_update_date',l_last_update_date);
636: WSH_DEBUG_SV.log(l_module_name,'v_last_update_date',v_last_update_date);
637: END IF;
638:
639:
632:
633: -- Start Bug# 3248578
634: IF l_debug_on THEN
635: WSH_DEBUG_SV.log(l_module_name,'l_last_update_date',l_last_update_date);
636: WSH_DEBUG_SV.log(l_module_name,'v_last_update_date',v_last_update_date);
637: END IF;
638:
639:
640: IF l_last_update_date <> v_last_update_date THEN
639:
640: IF l_last_update_date <> v_last_update_date THEN
641: -- Record has been changed during the Pick Release process
642: IF l_debug_on THEN
643: WSH_DEBUG_SV.log(l_module_name,'Record has been changed during the Pick Release process');
644: END IF;
645:
646: --Cursor to get the detail info.
647: OPEN new_detail_info(p_delivery_detail_id);
675: v_last_update_date;
676: IF new_detail_info%NOTFOUND THEN
677: --jckwok wrap debug stmts around if.. end if
678: IF l_debug_on THEN
679: WSH_DEBUG_SV.logmsg(l_module_name,'Ignoring delivery detail : '||p_delivery_detail_id ||' since no longer satisfies the pick release criteria' );
680: END IF;
681: x_skip_detail := 'Y';
682: IF lock_for_update%ISOPEN THEN
683: CLOSE lock_for_update;
690: --
691:
692: --Successfully lock the detail lines.
693: IF l_debug_on THEN
694: WSH_DEBUG_SV.logmsg(l_module_name, 'SUCCESSFULLY LOCKED DELIVERY DETAIL '||P_DELIVERY_DETAIL_ID);
695: WSH_DEBUG_SV.pop(l_module_name);
696: END IF;
697: --
698: EXCEPTION
691:
692: --Successfully lock the detail lines.
693: IF l_debug_on THEN
694: WSH_DEBUG_SV.logmsg(l_module_name, 'SUCCESSFULLY LOCKED DELIVERY DETAIL '||P_DELIVERY_DETAIL_ID);
695: WSH_DEBUG_SV.pop(l_module_name);
696: END IF;
697: --
698: EXCEPTION
699: --
708:
709: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.logmsg(l_module_name, 'CANNOT LOCK DELIVERY DETAIL FOR UPDATE: '|| P_DELIVERY_DETAIL_ID);
713: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
715: END IF;
716: --
709: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.logmsg(l_module_name, 'CANNOT LOCK DELIVERY DETAIL FOR UPDATE: '|| P_DELIVERY_DETAIL_ID);
713: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
715: END IF;
716: --
717: WHEN no_data_found THEN
710: --
711: IF l_debug_on THEN
712: WSH_DEBUG_SV.logmsg(l_module_name, 'CANNOT LOCK DELIVERY DETAIL FOR UPDATE: '|| P_DELIVERY_DETAIL_ID);
713: WSH_DEBUG_SV.logmsg(l_module_name,'RECORD_LOCKED exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
714: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:RECORD_LOCKED');
715: END IF;
716: --
717: WHEN no_data_found THEN
718: --
719: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
720: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
721: --
722: IF l_debug_on THEN
723: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY DETAIL LINE NOT FOUND: '|| P_DELIVERY_DETAIL_ID);
724: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
726: END IF;
727: --
720: Set_Globals(p_enforce_ship_set_and_smc, p_ship_set_id, p_top_model_line_id);
721: --
722: IF l_debug_on THEN
723: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY DETAIL LINE NOT FOUND: '|| P_DELIVERY_DETAIL_ID);
724: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
726: END IF;
727: --
728: END Get_Detail_Lock;
721: --
722: IF l_debug_on THEN
723: WSH_DEBUG_SV.logmsg(l_module_name, 'DELIVERY DETAIL LINE NOT FOUND: '|| P_DELIVERY_DETAIL_ID);
724: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
725: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
726: END IF;
727: --
728: END Get_Detail_Lock;
729:
936: BEGIN
937: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
938: IF l_debug_on IS NULL
939: THEN
940: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
941: END IF;
942:
943: IF l_debug_on THEN
944: WSH_DEBUG_SV.push(l_module_name);
940: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
941: END IF;
942:
943: IF l_debug_on THEN
944: WSH_DEBUG_SV.push(l_module_name);
945: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
946: WSH_DEBUG_SV.log(l_module_name,'P_WORKER_ID',P_WORKER_ID);
947: END IF;
948: --
941: END IF;
942:
943: IF l_debug_on THEN
944: WSH_DEBUG_SV.push(l_module_name);
945: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
946: WSH_DEBUG_SV.log(l_module_name,'P_WORKER_ID',P_WORKER_ID);
947: END IF;
948: --
949: -- initialize the WHO session variables
942:
943: IF l_debug_on THEN
944: WSH_DEBUG_SV.push(l_module_name);
945: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
946: WSH_DEBUG_SV.log(l_module_name,'P_WORKER_ID',P_WORKER_ID);
947: END IF;
948: --
949: -- initialize the WHO session variables
950: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
953: g_user_id := FND_GLOBAL.USER_ID;
954: g_login_id := FND_GLOBAL.CONC_LOGIN_ID;
955:
956: IF l_debug_on THEN
957: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
958: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
959: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
960: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
961: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
954: g_login_id := FND_GLOBAL.CONC_LOGIN_ID;
955:
956: IF l_debug_on THEN
957: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
958: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
959: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
960: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
961: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
962: END IF;
955:
956: IF l_debug_on THEN
957: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
958: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
959: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
960: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
961: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
962: END IF;
963:
956: IF l_debug_on THEN
957: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
958: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
959: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
960: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
961: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
962: END IF;
963:
964: IF p_worker_id IS NULL THEN --{
957: WSH_DEBUG_SV.log(l_module_name, 'REQUEST_ID', TO_CHAR(G_REQUEST_ID));
958: WSH_DEBUG_SV.log(l_module_name, 'APPLICATION_ID',TO_CHAR(G_APPLICATION_ID));
959: WSH_DEBUG_SV.log(l_module_name, 'PROGRAM_ID', TO_CHAR(G_PROGRAM_ID));
960: WSH_DEBUG_SV.log(l_module_name, 'USER_ID', TO_CHAR(G_USER_ID));
961: WSH_DEBUG_SV.log(l_module_name, 'LOGIN_ID', TO_CHAR(G_LOGIN_ID));
962: END IF;
963:
964: IF p_worker_id IS NULL THEN --{
965: -- fetch release criteria for the batch and lock row
1021: -- Handle batch does not exist condition
1022: IF get_lock_batch%NOTFOUND THEN
1023: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1024: IF l_debug_on THEN
1025: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1026: WSH_DEBUG_SV.pop(l_module_name);
1027: END IF;
1028: IF get_lock_batch%ISOPEN THEN
1029: CLOSE get_lock_batch;
1022: IF get_lock_batch%NOTFOUND THEN
1023: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1024: IF l_debug_on THEN
1025: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1026: WSH_DEBUG_SV.pop(l_module_name);
1027: END IF;
1028: IF get_lock_batch%ISOPEN THEN
1029: CLOSE get_lock_batch;
1030: END IF;
1094: -- Handle batch does not exist condition
1095: IF get_batch%NOTFOUND THEN
1096: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1097: IF l_debug_on THEN
1098: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1099: WSH_DEBUG_SV.pop(l_module_name);
1100: END IF;
1101: IF get_batch%ISOPEN THEN
1102: CLOSE get_batch;
1095: IF get_batch%NOTFOUND THEN
1096: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1097: IF l_debug_on THEN
1098: WSH_DEBUG_SV.logmsg(l_module_name, 'BATCH ID ' || TO_CHAR(P_BATCH_ID) || ' DOES NOT EXIST.');
1099: WSH_DEBUG_SV.pop(l_module_name);
1100: END IF;
1101: IF get_batch%ISOPEN THEN
1102: CLOSE get_batch;
1103: END IF;
1110: END IF; --}
1111:
1112: -- Write to log the variables that have been initialized
1113: IF l_debug_on THEN
1114: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1115: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1111:
1112: -- Write to log the variables that have been initialized
1113: IF l_debug_on THEN
1114: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1115: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1112: -- Write to log the variables that have been initialized
1113: IF l_debug_on THEN
1114: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1115: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1113: IF l_debug_on THEN
1114: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1115: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1114: WSH_DEBUG_SV.logmsg(l_module_name,'PICK RELEASE PARAMETERS ARE...' );
1115: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1115: WSH_DEBUG_SV.log(l_module_name, 'BATCH_NAME', G_BATCH_NAME);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1116: WSH_DEBUG_SV.log(l_module_name, 'BACKORDERS_FLAG', G_BACKORDERS_FLAG);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1117: WSH_DEBUG_SV.log(l_module_name, 'AUTODETAIL_PR_FLAG', G_AUTODETAIL_FLAG);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1118: WSH_DEBUG_SV.log(l_module_name, 'AUTO_PICK_CONFIRM_FLAG', G_AUTO_PICK_CONFIRM_FLAG);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1119: WSH_DEBUG_SV.log(l_module_name, 'ORDER_HEADER_ID', G_ORDER_HEADER_ID);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1120: WSH_DEBUG_SV.log(l_module_name, 'ORDER_TYPE_ID', G_ORDER_TYPE_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1121: WSH_DEBUG_SV.log(l_module_name, 'SHIP_FROM_LOC_ID', G_SHIP_FROM_LOC_ID);
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1122: WSH_DEBUG_SV.log(l_module_name, 'ORGANIZATION_ID', G_ORGANIZATION_ID);
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1130: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1123: WSH_DEBUG_SV.log(l_module_name, 'CUSTOMER_ID', G_CUSTOMER_ID);
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1130: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1131: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1124: WSH_DEBUG_SV.log(l_module_name, 'SHIP_TO_LOC_ID', G_SHIP_TO_LOC_ID);
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1130: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1131: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1132: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1125: WSH_DEBUG_SV.log(l_module_name, 'SHIPMENT_PRIORITY', G_SHIPMENT_PRIORITY);
1126: WSH_DEBUG_SV.log(l_module_name, 'SHIP_METHOD_CODE', G_SHIP_METHOD_CODE);
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1130: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1131: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1132: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1133: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1127: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_NUMBER', G_SHIP_SET_NUMBER);
1128: WSH_DEBUG_SV.log(l_module_name, 'LINE/CONTAINER ID', G_DEL_DETAIL_ID);
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1130: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1131: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1132: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1133: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1134: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1135: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1129: WSH_DEBUG_SV.log(l_module_name, 'FROM_REQUEST_DATE',
1130: TO_CHAR(G_FROM_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1131: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1132: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1133: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1134: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1135: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1136: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1131: WSH_DEBUG_SV.log(l_module_name, 'TO_REQUEST_DATE',
1132: TO_CHAR(G_TO_REQUEST_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1133: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1134: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1135: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1136: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1133: WSH_DEBUG_SV.log(l_module_name, 'FROM_SCHED_SHIP_DATE',
1134: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1135: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1136: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1134: TO_CHAR(G_FROM_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1135: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1136: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1135: WSH_DEBUG_SV.log(l_module_name, 'TO_SCHED_SHIP_DATE',
1136: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1136: TO_CHAR(G_TO_SCHED_SHIP_DATE , 'DD-MON-YYYY HH24:MI:SS'));
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1137: WSH_DEBUG_SV.log(l_module_name, 'EXISTING_RSVS_ONLY_FLAG', G_EXISTING_RSVS_ONLY_FLAG);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1138: WSH_DEBUG_SV.log(l_module_name, 'TO_SUBINVENTORY', G_TO_SUBINVENTORY);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1139: WSH_DEBUG_SV.log(l_module_name, 'TO_LOCATOR', G_TO_LOCATOR);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1140: WSH_DEBUG_SV.log(l_module_name, 'FROM_SUBINVENTORY', G_FROM_SUBINVENTORY);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1141: WSH_DEBUG_SV.log(l_module_name, 'FROM_LOCATOR', G_FROM_LOCATOR);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1142: WSH_DEBUG_SV.log(l_module_name, 'INVENTORY_ITEM_ID', G_INVENTORY_ITEM_ID);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1143: WSH_DEBUG_SV.log(l_module_name, 'TRIP_ID', G_TRIP_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1144: WSH_DEBUG_SV.log(l_module_name, 'TRIP_STOP_ID', G_TRIP_STOP_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1145: WSH_DEBUG_SV.log(l_module_name, 'DELIVERY_ID', G_DELIVERY_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1146: WSH_DEBUG_SV.log(l_module_name, 'PICK_GROUPING_RULE_ID', G_PICK_GROUPING_RULE_ID);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1147: WSH_DEBUG_SV.log(l_module_name, 'PICK_SEQ_RULE_ID', G_PICK_SEQ_RULE_ID);
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1148: WSH_DEBUG_SV.log(l_module_name, 'DOC_SET_ID', G_DOC_SET_ID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1149: WSH_DEBUG_SV.log(l_module_name, 'INCLUDE_PLANNED_LINES', G_INCLUDE_PLANNED_LINES);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1150: WSH_DEBUG_SV.log(l_module_name, 'AUTOCREATE_DELIVERY_FLAG', G_AUTOCREATE_DELIVERIES);
1151: WSH_DEBUG_SV.log(l_module_name, 'ORDER_LINE_ID', G_ORDER_LINE_ID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1152: WSH_DEBUG_SV.log(l_module_name, 'PROJECT_ID', G_PROJECT_ID);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1153: WSH_DEBUG_SV.log(l_module_name, 'TASK_ID', G_TASK_ID);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1154: WSH_DEBUG_SV.log(l_module_name, 'TASK_PLANNING_FLAG', G_TASK_PLANNING_FLAG);
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1162: -- deliveryMerge
1155: -- rlanka : Pack J Enhancement
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1162: -- deliveryMerge
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1156: WSH_DEBUG_SV.log(l_module_name, 'Region ID', g_RegionID);
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1162: -- deliveryMerge
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1157: WSH_DEBUG_SV.log(l_module_name, 'Zone ID', g_ZoneID);
1158: WSH_DEBUG_SV.log(l_module_name, 'Category Set ID',g_CategorySetID);
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1162: -- deliveryMerge
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1165: -- anxsharm, X-dock
1159: WSH_DEBUG_SV.log(l_module_name, 'Category ID', g_CategoryID);
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1162: -- deliveryMerge
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1165: -- anxsharm, X-dock
1166: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1167: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1160: WSH_DEBUG_SV.log(l_module_name, 'AC Deliv Criteria',g_acDelivCriteria);
1161: WSH_DEBUG_SV.log(l_module_name, 'Rel Subinventory', g_RelSubInventory);
1162: -- deliveryMerge
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1165: -- anxsharm, X-dock
1166: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1167: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1168: --bug# 6689448 (replenishment project)
1162: -- deliveryMerge
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1165: -- anxsharm, X-dock
1166: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1167: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1168: --bug# 6689448 (replenishment project)
1169: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1170: END IF;
1163: WSH_DEBUG_SV.log(l_module_name, 'Append Flag', g_append_flag);
1164: WSH_DEBUG_SV.log(l_module_name, 'SHIP_SET_SMC_FLAG', G_SHIP_SET_SMC_FLAG );
1165: -- anxsharm, X-dock
1166: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1167: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1168: --bug# 6689448 (replenishment project)
1169: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1170: END IF;
1171:
1165: -- anxsharm, X-dock
1166: WSH_DEBUG_SV.log(l_module_name, 'ALLOCATION METHOD', G_ALLOCATION_METHOD );
1167: WSH_DEBUG_SV.log(l_module_name, 'CROSSDOCK CRITERIA ID', G_CROSSDOCK_CRITERIA_ID );
1168: --bug# 6689448 (replenishment project)
1169: WSH_DEBUG_SV.log(l_module_name, 'DYNAMIC REPLENISHMENT FLAG', G_DYNAMIC_REPLENISHMENT_FLAG);
1170: END IF;
1171:
1172: -- Validate only if Parent Worker Process
1173: IF p_worker_id IS NULL THEN --{
1183:
1184: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1185: --
1186: IF l_debug_on THEN
1187: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1188: || 'DOES NOT EXIST' );
1189: WSH_DEBUG_SV.pop(l_module_name);
1190: END IF;
1191: --
1185: --
1186: IF l_debug_on THEN
1187: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1188: || 'DOES NOT EXIST' );
1189: WSH_DEBUG_SV.pop(l_module_name);
1190: END IF;
1191: --
1192: RETURN;
1193:
1197:
1198: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1199: --
1200: IF l_debug_on THEN
1201: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1202: || 'DOES NOT BELONG TO');
1203: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER ID ' || TO_CHAR ( G_ORDER_HEADER_ID ));
1204: WSH_DEBUG_SV.pop(l_module_name);
1205: END IF;
1199: --
1200: IF l_debug_on THEN
1201: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1202: || 'DOES NOT BELONG TO');
1203: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER ID ' || TO_CHAR ( G_ORDER_HEADER_ID ));
1204: WSH_DEBUG_SV.pop(l_module_name);
1205: END IF;
1206: --
1207: RETURN;
1200: IF l_debug_on THEN
1201: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE ID ' || TO_CHAR (G_ORDER_LINE_ID)
1202: || 'DOES NOT BELONG TO');
1203: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER ID ' || TO_CHAR ( G_ORDER_HEADER_ID ));
1204: WSH_DEBUG_SV.pop(l_module_name);
1205: END IF;
1206: --
1207: RETURN;
1208: END IF;
1254: -- Validating From_Subinventory and From_Locator
1255: IF (g_from_subinventory IS NOT NULL) THEN --{
1256:
1257: IF l_debug_on THEN
1258: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.From_Subinventory',WSH_DEBUG_SV.C_PROC_LEVEL);
1259: END IF;
1260: l_validate_org := NULL;
1261: l_validate_sub := NULL;
1262: l_validate_locator := NULL;
1272:
1273: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1274: --
1275: IF l_debug_on THEN
1276: WSH_DEBUG_SV.logmsg(l_module_name, g_from_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1277: WSH_DEBUG_SV.pop(l_module_name);
1278: END IF;
1279: --
1280: RETURN;
1273: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1274: --
1275: IF l_debug_on THEN
1276: WSH_DEBUG_SV.logmsg(l_module_name, g_from_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1277: WSH_DEBUG_SV.pop(l_module_name);
1278: END IF;
1279: --
1280: RETURN;
1281: --
1282: END IF;
1283:
1284: IF (g_from_locator IS NOT NULL) THEN
1285: IF l_debug_on THEN
1286: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.From_Locator',WSH_DEBUG_SV.C_PROC_LEVEL);
1287: END IF;
1288: l_validate_locator.inventory_location_id := g_from_locator;
1289: IF (INV_Validate.From_Locator( p_locator => l_validate_locator,
1290: p_org => l_validate_org,
1296: --
1297: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1298: --
1299: IF l_debug_on THEN
1300: WSH_DEBUG_SV.logmsg(l_module_name, g_from_locator||' is not a Valid Locator for Subinventory :'|| g_from_subinventory);
1301: WSH_DEBUG_SV.pop(l_module_name);
1302: END IF;
1303: --
1304: RETURN;
1297: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1298: --
1299: IF l_debug_on THEN
1300: WSH_DEBUG_SV.logmsg(l_module_name, g_from_locator||' is not a Valid Locator for Subinventory :'|| g_from_subinventory);
1301: WSH_DEBUG_SV.pop(l_module_name);
1302: END IF;
1303: --
1304: RETURN;
1305: --
1311: -- Validating To_Subinventory and To_Locator
1312: IF (g_to_subinventory IS NOT NULL) THEN --{
1313:
1314: IF l_debug_on THEN
1315: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.To_Subinventory',WSH_DEBUG_SV.C_PROC_LEVEL);
1316: END IF;
1317: l_validate_org := NULL;
1318: l_validate_sub := NULL;
1319: l_validate_from_sub := NULL;
1332:
1333: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1334: --
1335: IF l_debug_on THEN
1336: WSH_DEBUG_SV.logmsg(l_module_name, g_to_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1337: WSH_DEBUG_SV.pop(l_module_name);
1338: END IF;
1339: --
1340: RETURN;
1333: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1334: --
1335: IF l_debug_on THEN
1336: WSH_DEBUG_SV.logmsg(l_module_name, g_to_subinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1337: WSH_DEBUG_SV.pop(l_module_name);
1338: END IF;
1339: --
1340: RETURN;
1341: --
1342: END IF;
1343:
1344: IF (g_to_locator IS NOT NULL) THEN
1345: IF l_debug_on THEN
1346: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.To_Locator',WSH_DEBUG_SV.C_PROC_LEVEL);
1347: END IF;
1348: l_validate_locator.inventory_location_id := g_to_locator;
1349: IF (INV_Validate.To_Locator( p_locator => l_validate_locator,
1350: p_org => l_validate_org,
1356:
1357: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1358: --
1359: IF l_debug_on THEN
1360: WSH_DEBUG_SV.logmsg(l_module_name, g_to_locator||' is not a Valid Locator for Subinventory :'|| g_to_subinventory);
1361: WSH_DEBUG_SV.pop(l_module_name);
1362: END IF;
1363: --
1364: RETURN;
1357: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1358: --
1359: IF l_debug_on THEN
1360: WSH_DEBUG_SV.logmsg(l_module_name, g_to_locator||' is not a Valid Locator for Subinventory :'|| g_to_subinventory);
1361: WSH_DEBUG_SV.pop(l_module_name);
1362: END IF;
1363: --
1364: RETURN;
1365:
1369:
1370: -- Validating RelSubinventory
1371: IF (g_relsubinventory IS NOT NULL) THEN --{
1372: IF l_debug_on THEN
1373: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_Validate.From_Subinventory',WSH_DEBUG_SV.C_PROC_LEVEL);
1374: END IF;
1375: l_validate_org := NULL;
1376: l_validate_sub := NULL;
1377: l_validate_locator := NULL;
1387:
1388: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1389: --
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.logmsg(l_module_name, g_relsubinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1392: WSH_DEBUG_SV.pop(l_module_name);
1393: END IF;
1394: --
1395: RETURN;
1388: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1389: --
1390: IF l_debug_on THEN
1391: WSH_DEBUG_SV.logmsg(l_module_name, g_relsubinventory||' is not a Valid Subinventory for Org ID :'|| g_organization_id);
1392: WSH_DEBUG_SV.pop(l_module_name);
1393: END IF;
1394: --
1395: RETURN;
1396:
1397: END IF;
1398: END IF; --}
1399:
1400: IF l_debug_on THEN
1401: WSH_DEBUG_SV.logmsg(l_module_name, 'UPDATING REQUEST ID FOR BATCH' );
1402: END IF;
1403:
1404: -- Update picking batch setting request id and other who parameters
1405: UPDATE WSH_PICKING_BATCHES
1414: AND (REQUEST_ID IS NULL OR REQUEST_ID = g_request_id);
1415:
1416: IF SQL%NOTFOUND THEN
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name, 'PICKING BATCH ' || TO_CHAR(P_BATCH_ID) || ' NOT EXIST');
1419: WSH_DEBUG_SV.logmsg(l_module_name, 'OR ANOTHER REQUEST HAS ALREADY RELEASED THIS BATCH');
1420: END IF;
1421: END IF;
1422:
1415:
1416: IF SQL%NOTFOUND THEN
1417: IF l_debug_on THEN
1418: WSH_DEBUG_SV.logmsg(l_module_name, 'PICKING BATCH ' || TO_CHAR(P_BATCH_ID) || ' NOT EXIST');
1419: WSH_DEBUG_SV.logmsg(l_module_name, 'OR ANOTHER REQUEST HAS ALREADY RELEASED THIS BATCH');
1420: END IF;
1421: END IF;
1422:
1423: END IF; --}
1425: g_initialized := TRUE;
1426: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1427:
1428: IF l_debug_on THEN
1429: WSH_DEBUG_SV.pop(l_module_name);
1430: END IF;
1431:
1432: EXCEPTION
1433: WHEN OTHERS THEN
1450: CLOSE get_inner_items;
1451: END IF;
1452:
1453: IF l_debug_on THEN
1454: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN WSH_PR_CRITERIA.INIT');
1455: WSH_DEBUG_SV.logmsg(l_module_name,'Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1456: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1457: END IF;
1458:
1451: END IF;
1452:
1453: IF l_debug_on THEN
1454: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN WSH_PR_CRITERIA.INIT');
1455: WSH_DEBUG_SV.logmsg(l_module_name,'Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1456: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1457: END IF;
1458:
1459: END Init;
1452:
1453: IF l_debug_on THEN
1454: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN WSH_PR_CRITERIA.INIT');
1455: WSH_DEBUG_SV.logmsg(l_module_name,'Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1456: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1457: END IF;
1458:
1459: END Init;
1460:
1531: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1532: --
1533: IF l_debug_on IS NULL
1534: THEN
1535: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1536: END IF;
1537: --
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.push(l_module_name);
1535: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1536: END IF;
1537: --
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.push(l_module_name);
1540: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1541: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1542: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1543: END IF;
1536: END IF;
1537: --
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.push(l_module_name);
1540: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1541: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1542: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1543: END IF;
1544: --
1537: --
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.push(l_module_name);
1540: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1541: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1542: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1543: END IF;
1544: --
1545: -- fetch pick sequence rule parameters
1538: IF l_debug_on THEN
1539: WSH_DEBUG_SV.push(l_module_name);
1540: WSH_DEBUG_SV.log(l_module_name,'P_PICK_SEQ_RULE_ID',P_PICK_SEQ_RULE_ID);
1541: WSH_DEBUG_SV.log(l_module_name,'P_PICK_GROUPING_RULE_ID',P_PICK_GROUPING_RULE_ID);
1542: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHING PICK SEQUENCE RULE INFORMATION FOR THE BATCH');
1543: END IF;
1544: --
1545: -- fetch pick sequence rule parameters
1546: OPEN pick_seq_rule(p_pick_seq_rule_id);
1562: --
1563: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1564: --
1565: IF l_debug_on THEN
1566: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK SEQUENCE RULE ID ' || TO_CHAR ( G_PICK_SEQ_RULE_ID ) || ' DOES NOT EXIST.');
1567: WSH_DEBUG_SV.pop(l_module_name);
1568: END IF;
1569: --
1570: RETURN;
1563: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1564: --
1565: IF l_debug_on THEN
1566: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK SEQUENCE RULE ID ' || TO_CHAR ( G_PICK_SEQ_RULE_ID ) || ' DOES NOT EXIST.');
1567: WSH_DEBUG_SV.pop(l_module_name);
1568: END IF;
1569: --
1570: RETURN;
1571: END IF;
1635: -- determine the most significant pick sequence rule attribute
1636: g_primary_psr := g_ordered_psr(1).attribute_name;
1637:
1638: IF l_debug_on THEN
1639: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIMARY PICK RULE IS ' || G_PRIMARY_PSR );
1640: END IF;
1641: --
1642:
1643: -- print pick sequence rule information for debugging purposes
1643: -- print pick sequence rule information for debugging purposes
1644: FOR i IN 1..g_total_pick_criteria LOOP
1645: --
1646: IF l_debug_on THEN
1647: 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 );
1648: END IF;
1649: --
1650: END LOOP;
1651: --
1649: --
1650: END LOOP;
1651: --
1652: IF l_debug_on THEN
1653: WSH_DEBUG_SV.logmsg(l_module_name, 'DETERMINING IF ORDER NUMBER IS IN GROUPING RULE...');
1654: END IF;
1655:
1656: --Determine if order number is in grouping rule.
1657: OPEN order_ps_group(p_pick_grouping_rule_id);
1666:
1667: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1668: --
1669: IF l_debug_on THEN
1670: WSH_DEBUG_SV.log(l_module_name, 'g_use_order_ps ' , g_use_order_ps );
1671: WSH_DEBUG_SV.log(l_module_name, 'g_use_delivery_ps ' , g_use_delivery_ps );
1672: WSH_DEBUG_SV.pop(l_module_name);
1673: END IF;
1674: --
1667: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1668: --
1669: IF l_debug_on THEN
1670: WSH_DEBUG_SV.log(l_module_name, 'g_use_order_ps ' , g_use_order_ps );
1671: WSH_DEBUG_SV.log(l_module_name, 'g_use_delivery_ps ' , g_use_delivery_ps );
1672: WSH_DEBUG_SV.pop(l_module_name);
1673: END IF;
1674: --
1675: EXCEPTION
1668: --
1669: IF l_debug_on THEN
1670: WSH_DEBUG_SV.log(l_module_name, 'g_use_order_ps ' , g_use_order_ps );
1671: WSH_DEBUG_SV.log(l_module_name, 'g_use_delivery_ps ' , g_use_delivery_ps );
1672: WSH_DEBUG_SV.pop(l_module_name);
1673: END IF;
1674: --
1675: EXCEPTION
1676: --
1685: CLOSE order_ps_group;
1686: END IF;
1687: --
1688: IF l_debug_on THEN
1689: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1690: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1692: END IF;
1693: --
1686: END IF;
1687: --
1688: IF l_debug_on THEN
1689: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1690: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1692: END IF;
1693: --
1694: END Init_Rules;
1687: --
1688: IF l_debug_on THEN
1689: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1690: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1691: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1692: END IF;
1693: --
1694: END Init_Rules;
1695:
1724: --
1725: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1726: --
1727: IF l_debug_on IS NULL THEN
1728: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1729: END IF;
1730: --
1731: IF l_debug_on THEN
1732: WSH_DEBUG_SV.push(l_module_name);
1728: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1729: END IF;
1730: --
1731: IF l_debug_on THEN
1732: WSH_DEBUG_SV.push(l_module_name);
1733: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1734: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1735: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1736: END IF;
1729: END IF;
1730: --
1731: IF l_debug_on THEN
1732: WSH_DEBUG_SV.push(l_module_name);
1733: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1734: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1735: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1736: END IF;
1737:
1730: --
1731: IF l_debug_on THEN
1732: WSH_DEBUG_SV.push(l_module_name);
1733: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1734: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1735: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1736: END IF;
1737:
1738: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1731: IF l_debug_on THEN
1732: WSH_DEBUG_SV.push(l_module_name);
1733: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1734: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1735: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1736: END IF;
1737:
1738: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1739:
1743:
1744: OPEN c_work_cursorID(p_batch_id, p_organization_id, p_mode);
1745:
1746: IF l_debug_on THEN
1747: WSH_DEBUG_SV.logmsg(l_module_name, 'Status '||x_api_status);
1748: WSH_DEBUG_SV.pop(l_module_name);
1749: END IF;
1750:
1751: EXCEPTION
1744: OPEN c_work_cursorID(p_batch_id, p_organization_id, p_mode);
1745:
1746: IF l_debug_on THEN
1747: WSH_DEBUG_SV.logmsg(l_module_name, 'Status '||x_api_status);
1748: WSH_DEBUG_SV.pop(l_module_name);
1749: END IF;
1750:
1751: EXCEPTION
1752: --
1758: CLOSE c_work_cursorID;
1759: END IF;
1760: --
1761: IF l_debug_on THEN
1762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1764: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1765: END IF;
1766: --
1759: END IF;
1760: --
1761: IF l_debug_on THEN
1762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1764: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1765: END IF;
1766: --
1767: END Get_Worker_Records;
1760: --
1761: IF l_debug_on THEN
1762: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
1763: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1764: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1765: END IF;
1766: --
1767: END Get_Worker_Records;
1768:
1819: --
1820: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1821: --
1822: IF l_debug_on IS NULL THEN
1823: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1824: END IF;
1825: --
1826: IF l_debug_on THEN
1827: --
1824: END IF;
1825: --
1826: IF l_debug_on THEN
1827: --
1828: WSH_DEBUG_SV.push(l_module_name);
1829: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1825: --
1826: IF l_debug_on THEN
1827: --
1828: WSH_DEBUG_SV.push(l_module_name);
1829: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1826: IF l_debug_on THEN
1827: --
1828: WSH_DEBUG_SV.push(l_module_name);
1829: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1827: --
1828: WSH_DEBUG_SV.push(l_module_name);
1829: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1828: WSH_DEBUG_SV.push(l_module_name);
1829: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1836: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1829: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1836: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1837: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1830: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1836: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1837: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1838: --
1831: WSH_DEBUG_SV.log(l_module_name,'P_WMS_ORG',P_WMS_ORG);
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1836: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1837: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1838: --
1839: END IF;
1832: WSH_DEBUG_SV.log(l_module_name,'P_MO_HEADER_ID',P_MO_HEADER_ID);
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1836: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1837: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1838: --
1839: END IF;
1840: --
1833: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1834: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
1835: WSH_DEBUG_SV.log(l_module_name,'P_PRINT_FLAG',P_PRINT_FLAG);
1836: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK',P_EXPRESS_PICK);
1837: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
1838: --
1839: END IF;
1840: --
1841: --bug# 6719369(replenishment project) : need to consider the replenishment status value.
1843: --
1844: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1845: --
1846: IF l_debug_on THEN
1847: WSH_DEBUG_SV.logmsg(l_module_name, 'INVALID BACKORDER MODE.');
1848: WSH_DEBUG_SV.pop(l_module_name);
1849: END IF;
1850: --
1851: RETURN;
1844: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1845: --
1846: IF l_debug_on THEN
1847: WSH_DEBUG_SV.logmsg(l_module_name, 'INVALID BACKORDER MODE.');
1848: WSH_DEBUG_SV.pop(l_module_name);
1849: END IF;
1850: --
1851: RETURN;
1852: --
2064: -- Both unreleased and backordered SQL share common conditions
2065: IF p_print_flag = 'Y' THEN
2066: --
2067: IF l_debug_on THEN
2068: WSH_DEBUG_SV.logmsg(l_module_name, '
2070: --
2071: END IF;
2072:
2244: --
2245: -- Debug Statements
2246: --
2247: IF l_debug_on THEN
2248: WSH_DEBUG_SV.logmsg(l_module_name, 'OM: SOURCE CODE IS '|| L_ONT_SOURCE_CODE );
2249: END IF;
2250: --
2251: Process_Buffer(p_print_flag,'c', ' AND MSORD1.SEGMENT1 = WDD.SOURCE_HEADER_NUMBER');
2252: --bug 6082122: Comparing MSORD1.SEGMENT2 with the order type name for the base language
2342: --
2343: -- Determine the order by clause
2344: --
2345: IF l_debug_on THEN
2346: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER BY CLAUSE FOR ORGANIZATION ' || TO_CHAR(P_ORGANIZATION_ID));
2347: END IF;
2348: --
2349: g_orderby_SQL := '';
2350:
2436:
2437: --HVOP
2438:
2439: IF l_debug_on THEN
2440: WSH_DEBUG_SV.logmsg(l_module_name,'Dynamic SQL-'||g_Unreleased_SQL||g_cond_SQL||g_orderby_SQL);
2441: END IF;
2442:
2443: -- 70. Parse Cursor
2444: v_CursorID := DBMS_SQL.Open_Cursor;
2443: -- 70. Parse Cursor
2444: v_CursorID := DBMS_SQL.Open_Cursor;
2445: --
2446: IF l_debug_on THEN
2447: WSH_DEBUG_SV.logmsg(l_module_name, 'PARSE CURSOR' );
2448: END IF;
2449: --
2450: DBMS_SQL.Parse(v_CursorID, g_Unreleased_SQL || g_Cond_SQL|| g_orderby_SQL, DBMS_SQL.v7 );
2451: --
2449: --
2450: DBMS_SQL.Parse(v_CursorID, g_Unreleased_SQL || g_Cond_SQL|| g_orderby_SQL, DBMS_SQL.v7 );
2451: --
2452: IF l_debug_on THEN
2453: WSH_DEBUG_SV.logmsg(l_module_name, 'COLUMN DEFINITION FOR CURSOR' );
2454: END IF;
2455: --
2456: --{
2457: IF p_mode = 'SUMMARY' THEN
2500:
2501: -- 80. Bind release criteria values
2502: --
2503: IF l_debug_on THEN
2504: WSH_DEBUG_SV.logmsg(l_module_name, 'BIND CURSOR' );
2505: END IF;
2506: --
2507: --{
2508: IF (g_del_detail_id = -1) THEN
2612:
2613: -- 90. Execute the cursor
2614: --
2615: IF l_debug_on THEN
2616: WSH_DEBUG_SV.logmsg(l_module_name, 'EXECUTING CURSOR' );
2617: END IF;
2618: --
2619: v_ignore := DBMS_SQL.Execute(v_CursorID);
2620:
2664:
2665: x_dd_count := nvl(x_dd_count,0) + l_count;
2666:
2667: IF l_debug_on THEN
2668: WSH_DEBUG_SV.log(l_module_name,'x_dd_count ',x_dd_count);
2669: WSH_DEBUG_SV.log(l_module_name,'x_worker_count ',x_worker_count);
2670: WSH_DEBUG_SV.log(l_module_name,'x_smc_worker_count ',x_smc_worker_count);
2671: END IF;
2672: END IF;
2665: x_dd_count := nvl(x_dd_count,0) + l_count;
2666:
2667: IF l_debug_on THEN
2668: WSH_DEBUG_SV.log(l_module_name,'x_dd_count ',x_dd_count);
2669: WSH_DEBUG_SV.log(l_module_name,'x_worker_count ',x_worker_count);
2670: WSH_DEBUG_SV.log(l_module_name,'x_smc_worker_count ',x_smc_worker_count);
2671: END IF;
2672: END IF;
2673: --}
2666:
2667: IF l_debug_on THEN
2668: WSH_DEBUG_SV.log(l_module_name,'x_dd_count ',x_dd_count);
2669: WSH_DEBUG_SV.log(l_module_name,'x_worker_count ',x_worker_count);
2670: WSH_DEBUG_SV.log(l_module_name,'x_smc_worker_count ',x_smc_worker_count);
2671: END IF;
2672: END IF;
2673: --}
2674:
2674:
2675: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2676:
2677: IF l_debug_on THEN
2678: WSH_DEBUG_SV.pop(l_module_name);
2679: END IF;
2680:
2681: EXCEPTION
2682: --
2687: --
2688: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2689: --
2690: IF l_debug_on THEN
2691: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2692: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2693: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2694: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2695: END IF;
2688: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
2689: --
2690: IF l_debug_on THEN
2691: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2692: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2693: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2694: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2695: END IF;
2696: --
2689: --
2690: IF l_debug_on THEN
2691: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2692: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2693: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2694: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2695: END IF;
2696: --
2697: END Init_Cursor;
2690: IF l_debug_on THEN
2691: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN CREATING SELECT STATEMENT');
2692: WSH_DEBUG_SV.logmsg(l_module_name, 'SQL ERROR: ' || SQLERRM ( SQLCODE ));
2693: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2694: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2695: END IF;
2696: --
2697: END Init_Cursor;
2698:
2757: BEGIN
2758: --
2759: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2760: IF l_debug_on IS NULL THEN
2761: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2762: END IF;
2763: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.push(l_module_name);
2761: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2762: END IF;
2763: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.push(l_module_name);
2766: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2767: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2768: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2769: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2762: END IF;
2763: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.push(l_module_name);
2766: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2767: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2768: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2769: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2770: END IF;
2763: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.push(l_module_name);
2766: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2767: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2768: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2769: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2770: END IF;
2771: --
2764: IF l_debug_on THEN
2765: WSH_DEBUG_SV.push(l_module_name);
2766: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2767: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2768: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2769: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2770: END IF;
2771: --
2772: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2765: WSH_DEBUG_SV.push(l_module_name);
2766: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
2767: WSH_DEBUG_SV.log(l_module_name,'P_WMS_FLAG',P_WMS_FLAG);
2768: WSH_DEBUG_SV.log(l_module_name,'P_EXPRESS_PICK_FLAG',P_EXPRESS_PICK_FLAG);
2769: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_ID',P_BATCH_ID);
2770: END IF;
2771: --
2772: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2773: -- handle uninitialized package errors here
2775: --{
2776: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2777: --
2778: IF l_debug_on THEN
2779: WSH_DEBUG_SV.logmsg(l_module_name, 'THE PACKAGE MUST BE INITIALIZED BEFORE USE' );
2780: WSH_DEBUG_SV.pop(l_module_name);
2781: END IF;
2782: --
2783: RETURN;
2776: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2777: --
2778: IF l_debug_on THEN
2779: WSH_DEBUG_SV.logmsg(l_module_name, 'THE PACKAGE MUST BE INITIALIZED BEFORE USE' );
2780: WSH_DEBUG_SV.pop(l_module_name);
2781: END IF;
2782: --
2783: RETURN;
2784: --}
2821: IF (l_get_lock_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
2822: --{
2823: IF l_skip_detail = 'N' THEN
2824: IF l_debug_on THEN
2825: WSH_DEBUG_SV.logmsg(l_module_name, 'GOT LOCK ON DELIVERY DETAIL '||
2826: FIRST_LINE.DELIVERY_DETAIL_ID||' AGAIN');
2827: END IF;
2828: --
2829: release_table(g_rel_current_line) := first_line;
2835: g_rel_current_line := g_rel_current_line + 1;
2836: --}
2837: ELSE
2838: IF l_debug_on THEN
2839: WSH_DEBUG_SV.logmsg(l_module_name,'No longer eligible to pick release. Ignoring Delivery Detail '||first_line.delivery_detail_id);
2840: END IF;
2841: END IF;
2842:
2843: ELSE
2842:
2843: ELSE
2844: --{
2845: IF l_debug_on THEN
2846: WSH_DEBUG_SV.logmsg(l_module_name, 'UNABLE TO LOCK. IGNORING DELIVERY DETAIL '
2847: ||FIRST_LINE.DELIVERY_DETAIL_ID );
2848: END IF;
2849: --}
2850: END IF;
2862: --}
2863: END IF; /* if first_line */
2864:
2865: IF l_debug_on THEN
2866: wsh_debug_sv.log(l_module_name, 'g_rel_current_line', g_rel_current_line);
2867: END IF;
2868:
2869: LOOP
2870: --{
2874: IF ( v_cursorID IS NULL ) OR ( l_dummy = 0 ) THEN
2875: -- Either all lines are fetched for a worker record or a New Organization
2876: --{
2877: IF l_debug_on THEN
2878: WSH_DEBUG_SV.log(l_module_name, 'v_cursorID',v_cursorID);
2879: END IF;
2880:
2881: --{
2882: -- Fetch and lock worker record to get Organization - Item combination
2884: LOOP
2885: FETCH c_work_cursorID INTO v_pr_org_id, v_pr_inv_item_id, v_pr_mo_line_number, v_pr_mo_line_count;
2886: IF c_work_cursorID%NOTFOUND THEN --{
2887: IF l_debug_on THEN
2888: WSH_DEBUG_SV.logmsg(l_module_name, 'FETCHED ALL LINES FOR ORGANIZATION');
2889: END IF;
2890: IF c_work_cursorID%ISOPEN THEN
2891: CLOSE c_work_cursorID;
2892: END IF;
2898: EXIT;
2899: ELSE
2900: --{
2901: IF l_debug_on THEN
2902: WSH_DEBUG_SV.logmsg(l_module_name,'Getting lock for worker record Batch '||p_batch_id
2903: ||' Org '||v_pr_org_id|| ' Item '||v_pr_inv_item_id);
2904: END IF;
2905: DECLARE
2906: worker_row_locked exception;
2918: EXIT; -- successfully locked
2919: EXCEPTION
2920: WHEN worker_row_locked THEN
2921: IF l_debug_on THEN
2922: WSH_DEBUG_SV.logmsg(l_module_name,'Unable to lock as worker record as it is already locked');
2923: END IF;
2924: l_temp := 'N';
2925: WHEN no_data_found THEN
2926: IF l_debug_on THEN
2923: END IF;
2924: l_temp := 'N';
2925: WHEN no_data_found THEN
2926: IF l_debug_on THEN
2927: WSH_DEBUG_SV.logmsg(l_module_name,'Record already processed by one of the other workers');
2928: END IF;
2929: l_temp := 'N';
2930: WHEN OTHERS THEN
2931: IF l_debug_on THEN
2928: END IF;
2929: l_temp := 'N';
2930: WHEN OTHERS THEN
2931: IF l_debug_on THEN
2932: WSH_DEBUG_SV.logmsg(l_module_name,'Unable to lock as worker record due to error');
2933: WSH_DEBUG_SV.logmsg(l_module_name,SQLERRM);
2934: END IF;
2935: l_temp := 'N';
2936: END;
2929: l_temp := 'N';
2930: WHEN OTHERS THEN
2931: IF l_debug_on THEN
2932: WSH_DEBUG_SV.logmsg(l_module_name,'Unable to lock as worker record due to error');
2933: WSH_DEBUG_SV.logmsg(l_module_name,SQLERRM);
2934: END IF;
2935: l_temp := 'N';
2936: END;
2937: --}
2959: g_return_status);
2960: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
2961: x_api_status := g_return_status;
2962: IF l_debug_on THEN
2963: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN VALIDATE_SS_SMC/0' );
2964: END IF;
2965: raise e_return_excp; -- LPN CONV. rv
2966: END IF;
2967: --}
2978: AND type = 'PICK';
2979: EXCEPTION WHEN OTHERS THEN
2980: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2981: IF l_debug_on THEN
2982: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in updating worker records as processed');
2983: WSH_DEBUG_SV.pop(l_module_name);
2984: END IF;
2985: IF DBMS_SQL.Is_Open(v_CursorID) THEN
2986: DBMS_SQL.Close_Cursor(v_CursorID);
2979: EXCEPTION WHEN OTHERS THEN
2980: x_api_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2981: IF l_debug_on THEN
2982: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in updating worker records as processed');
2983: WSH_DEBUG_SV.pop(l_module_name);
2984: END IF;
2985: IF DBMS_SQL.Is_Open(v_CursorID) THEN
2986: DBMS_SQL.Close_Cursor(v_CursorID);
2987: END IF;
2997: -- Open Cursor for Organization - Item combination, only if called for new Organization OR
2998: -- if the previous call was for SMC and now for regular item as Item Bind Variable changes
2999: IF ( v_cursorID IS NULL ) OR ( v_prev_item_id IS NULL ) THEN
3000: IF l_debug_on THEN
3001: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PR_CRITERIA.Init_Cursor', WSH_DEBUG_SV.C_PROC_LEVEL);
3002: END IF;
3003: Init_Cursor (
3004: p_organization_id => v_pr_org_id,
3005: p_mode => l_mode,
3016: x_dd_count => l_dummy1,
3017: x_api_status => x_api_status);
3018: IF (x_api_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_api_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3019: IF l_debug_on THEN
3020: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in Init_Cursor');
3021: WSH_DEBUG_SV.pop(l_module_name);
3022: END IF;
3023: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3024: DBMS_SQL.Close_Cursor(v_CursorID);
3017: x_api_status => x_api_status);
3018: IF (x_api_status = WSH_UTIL_CORE.G_RET_STS_ERROR) OR (x_api_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3019: IF l_debug_on THEN
3020: WSH_DEBUG_SV.logmsg(l_module_name, 'Error occurred in Init_Cursor');
3021: WSH_DEBUG_SV.pop(l_module_name);
3022: END IF;
3023: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3024: DBMS_SQL.Close_Cursor(v_CursorID);
3025: END IF;
3032: v_total_rec_fetched := 0;
3033: ELSE
3034: -- Bind the new Item and execute the cursor again
3035: IF l_debug_on THEN
3036: WSH_DEBUG_SV.logmsg(l_module_name, 'Binding new Item '||v_pr_inv_item_id||' and Executing Cursor' );
3037: END IF;
3038: DBMS_SQL.BIND_VARIABLE(v_CursorID,':X_inventory_item_id',v_pr_inv_item_id);
3039: l_dummy := DBMS_SQL.Execute(v_CursorID);
3040: v_total_rec_fetched := 0;
3044: --}
3045: ELSE
3046: --{
3047: IF l_debug_on THEN
3048: WSH_DEBUG_SV.logmsg(l_module_name, 'MAP OUTPUT COLUMNS' );
3049: END IF;
3050:
3051: DBMS_SQL.Column_Value(v_CursorID, 1, v_line_id);
3052: DBMS_SQL.Column_Value(v_CursorID, 2, v_header_id);
3084: -- anxsharm, X-dock, customer_id
3085: DBMS_SQL.Column_Value(v_CursorID, 34, v_customer_id);
3086:
3087: IF l_debug_on THEN
3088: WSH_DEBUG_SV.log(l_module_name, 'CURRENT LINE IS', TO_CHAR(G_REL_CURRENT_LINE));
3089: WSH_DEBUG_SV.log(l_module_name, 'Delivery detail ID', v_delivery_detail_id);
3090: END IF;
3091:
3092: -- Save fetched record into release table
3085: DBMS_SQL.Column_Value(v_CursorID, 34, v_customer_id);
3086:
3087: IF l_debug_on THEN
3088: WSH_DEBUG_SV.log(l_module_name, 'CURRENT LINE IS', TO_CHAR(G_REL_CURRENT_LINE));
3089: WSH_DEBUG_SV.log(l_module_name, 'Delivery detail ID', v_delivery_detail_id);
3090: END IF;
3091:
3092: -- Save fetched record into release table
3093: Insert_RL_Row(p_enforce_ship_set_and_smc, l_skip_detail, g_return_status);
3094:
3095: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) OR (g_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3096: x_api_status := g_return_status;
3097: IF l_debug_on THEN
3098: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN INSERT_RL_ROW');
3099: --WSH_DEBUG_SV.pop(l_module_name);
3100: END IF;
3101: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3102: DBMS_SQL.Close_Cursor(v_CursorID);
3095: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) OR (g_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR) THEN
3096: x_api_status := g_return_status;
3097: IF l_debug_on THEN
3098: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN INSERT_RL_ROW');
3099: --WSH_DEBUG_SV.pop(l_module_name);
3100: END IF;
3101: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3102: DBMS_SQL.Close_Cursor(v_CursorID);
3103: END IF;
3107: --RETURN;
3108: raise e_return_excp; -- LPN CONV. rv
3109: ELSIF (g_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING) THEN
3110: IF l_debug_on THEN
3111: WSH_DEBUG_SV.logmsg(l_module_name, 'WARNING: SKIPPING THE ORDER LINE');
3112: END IF;
3113: x_api_status := g_return_status;
3114: ELSE
3115: IF l_skip_detail = 'N' THEN
3116: g_rel_current_line := g_rel_current_line + 1;
3117: v_total_rec_fetched := v_total_rec_fetched + 1;
3118: ELSE
3119: IF l_debug_on THEN
3120: WSH_DEBUG_SV.logmsg(l_module_name,'Skipping the Order Line');
3121: END IF;
3122: x_api_status := g_return_status;
3123: END IF;
3124: END IF;
3125: --}
3126: END IF;
3127:
3128: IF l_debug_on THEN
3129: WSH_DEBUG_SV.logmsg(l_module_name,'v_pr_mo_line_count : '||v_pr_mo_line_count||
3130: ' , v_total_rec_fetched : '||v_total_rec_fetched);
3131: END IF;
3132:
3133: IF (v_pr_mo_line_count is not null AND v_total_rec_fetched > v_pr_mo_line_count) THEN
3155: ((release_table(g_rel_current_line - 1).top_model_line_id > 0) AND
3156: (release_table(g_rel_current_line - 1).top_model_line_id =
3157: release_table(g_rel_current_line - 2).top_model_line_id))) THEN
3158: IF l_debug_on THEN
3159: WSH_DEBUG_SV.logmsg(l_module_name,'LARGE MODEL OR SS, IN MODEL FETCH MODE');
3160: END IF;
3161: ELSE
3162: first_line := release_table(g_rel_current_line - 1);
3163: release_table.delete(g_rel_current_line - 1);
3176: THEN
3177: --{
3178:
3179: IF l_debug_on THEN
3180: 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);
3181: END IF;
3182:
3183:
3184: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3188: x_out_rec => l_lpn_out_sync_comm_rec
3189: );
3190: --
3191: IF l_debug_on THEN
3192: 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);
3193: WSH_DEBUG_SV.log(l_module_name, 'current value of x_api_status is ', x_api_status);
3194: END IF;
3195: --
3196: IF g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
3189: );
3190: --
3191: IF l_debug_on THEN
3192: 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);
3193: WSH_DEBUG_SV.log(l_module_name, 'current value of x_api_status is ', x_api_status);
3194: END IF;
3195: --
3196: IF g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR
3197: THEN
3197: THEN
3198: --{
3199: x_api_status := g_return_status;
3200: IF l_debug_on THEN
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR OCCURRED IN WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS');
3202: END IF;
3203: --}
3204: ELSIF (g_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
3205: 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))
3206: THEN
3207: --{
3208: x_api_status := g_return_status;
3209: IF l_debug_on THEN
3210: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS');
3211: END IF;
3212: --}
3213: ELSIF (g_return_status = WSH_UTIL_CORE.G_RET_STS_WARNING
3214: 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))
3215: THEN
3216: --{
3217: x_api_status := g_return_status;
3218: IF l_debug_on THEN
3219: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS API returned warning');
3220: END IF;
3221: --}
3222: END IF;
3223: --}
3225: -- LPN CONV. rvishnuv
3226:
3227: --
3228: IF l_debug_on THEN
3229: WSH_DEBUG_SV.log(l_module_name, 'release_table.COUNT', release_table.COUNT);
3230: WSH_DEBUG_SV.pop(l_module_name);
3231: END IF;
3232: --
3233: EXCEPTION
3226:
3227: --
3228: IF l_debug_on THEN
3229: WSH_DEBUG_SV.log(l_module_name, 'release_table.COUNT', release_table.COUNT);
3230: WSH_DEBUG_SV.pop(l_module_name);
3231: END IF;
3232: --
3233: EXCEPTION
3234: --
3239: THEN
3240: --{
3241: --
3242: IF l_debug_on THEN
3243: 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);
3244: END IF;
3245: --
3246: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3247: (
3250: x_out_rec => l_lpn_out_sync_comm_rec
3251: );
3252: --
3253: IF l_debug_on THEN
3254: WSH_DEBUG_SV.log(l_module_name, 'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS', g_return_status);
3255: END IF;
3256: 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
3257: x_api_status := g_return_status;
3258: END IF;
3259: --}
3260: END IF;
3261: --
3262: IF l_debug_on THEN
3263: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:E_RETURN_EXCP');
3264: END IF;
3265: -- LPN CONV. rv
3266: --
3267:
3268:
3269: WHEN OTHERS THEN
3270: --
3271: IF l_debug_on THEN
3272: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3273: END IF;
3274: --
3275: IF DBMS_SQL.Is_Open(v_CursorID) THEN
3276: DBMS_SQL.Close_Cursor(v_CursorID);
3287: IF WSH_WMS_LPN_GRP.G_CALLBACK_REQUIRED = 'Y'
3288: THEN
3289: --{
3290: IF l_debug_on THEN
3291: 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);
3292: END IF;
3293:
3294: WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS
3295: (
3299: );
3300: --
3301: --
3302: IF l_debug_on THEN
3303: WSH_DEBUG_SV.log(l_module_name,'Return status after calling WSH_LPN_SYNC_COMM_PKG.SYNC_LPNS_TO_WMS',g_return_status);
3304: END IF;
3305: --
3306: --
3307: --}
3310: -- K LPN CONV. rv
3311: --
3312: --
3313: IF l_debug_on THEN
3314: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3315: END IF;
3316: --
3317: END Get_Lines;
3318:
3385: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3386: --
3387: IF l_debug_on IS NULL
3388: THEN
3389: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3390: END IF;
3391: --
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.push(l_module_name);
3389: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3390: END IF;
3391: --
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.push(l_module_name);
3394: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3390: END IF;
3391: --
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.push(l_module_name);
3394: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3398: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3391: --
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.push(l_module_name);
3394: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3398: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3399: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3392: IF l_debug_on THEN
3393: WSH_DEBUG_SV.push(l_module_name);
3394: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3398: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3399: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3400: END IF;
3393: WSH_DEBUG_SV.push(l_module_name);
3394: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3398: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3399: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3400: END IF;
3401:
3394: WSH_DEBUG_SV.log(l_module_name,'P_ENFORCE_SHIP_SET_AND_SMC',P_ENFORCE_SHIP_SET_AND_SMC);
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3398: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3399: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3400: END IF;
3401:
3402: x_skip_detail := 'N'; --Bug# 3248578
3395: WSH_DEBUG_SV.log(l_module_name, 'Delivery ID', v_delivery_id);
3396: WSH_DEBUG_SV.log(l_module_name, 'Released Status', v_released_status);
3397: WSH_DEBUG_SV.log(l_module_name, 'Quantity', v_requested_quantity);
3398: WSH_DEBUG_SV.log(l_module_name, 'Quantity UOM', v_requested_quantity_uom);
3399: WSH_DEBUG_SV.log(l_module_name, 'v_ship_model_complete_flag',v_ship_model_complete_flag);
3400: END IF;
3401:
3402: x_skip_detail := 'N'; --Bug# 3248578
3403:
3405: --{
3406: IF (v_released_status IN ('X')) THEN
3407: --None pick release eligible line, ignore
3408: IF l_debug_on THEN
3409: WSH_DEBUG_SV.logmsg(l_module_name, 'THIS IS NON-TRANSACTABLE LINE. IGNORING SS/SMC' );
3410: END IF;
3411: v_ship_set_id := NULL;
3412: v_top_model_line_id := NULL;
3413: v_ship_model_complete_flag := NULL;
3415:
3416: IF (v_ship_set_id IS NOT NULL) THEN
3417: -- Ignore SMC if SS is Specified
3418: IF l_debug_on THEN
3419: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING SMC AS SHIP SET IS SPECIFIED' );
3420: END IF;
3421: v_ship_model_complete_flag := NULL;
3422: v_top_model_line_id := NULL;
3423: ELSE
3436: g_last_source_code := NULL;
3437: END IF;
3438:
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3441: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3442: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3443: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3444: END IF;
3437: END IF;
3438:
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3441: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3442: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3443: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3444: END IF;
3445:
3438:
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3441: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3442: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3443: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3444: END IF;
3445:
3446: IF (((g_last_ship_set_id IS NOT NULL) AND (g_last_ship_set_id <> NVL(v_ship_set_id,-99))) OR
3439: IF l_debug_on THEN
3440: WSH_DEBUG_SV.log(l_module_name,'g_last_ship_set_id',g_last_ship_set_id);
3441: WSH_DEBUG_SV.log(l_module_name,'v_ship_set_id',v_ship_set_id);
3442: WSH_DEBUG_SV.log(l_module_name,'g_last_top_model_line_id',g_last_top_model_line_id);
3443: WSH_DEBUG_SV.log(l_module_name,'v_top_model_line_id',v_top_model_line_id);
3444: END IF;
3445:
3446: IF (((g_last_ship_set_id IS NOT NULL) AND (g_last_ship_set_id <> NVL(v_ship_set_id,-99))) OR
3447: ((g_last_top_model_line_id IS NOT NULL) AND (g_last_top_model_line_id <> NVL(v_top_model_line_id,-99)))) THEN
3453: g_last_source_code,
3454: l_return_status);
3455: IF (g_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR) THEN
3456: IF l_debug_on THEN
3457: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN VALIDATE_SS_SMC/5' );
3458: END IF;
3459: x_api_status := l_return_status;
3460: IF l_debug_on THEN
3461: WSH_DEBUG_SV.pop(l_module_name);
3457: WSH_DEBUG_SV.logmsg(l_module_name, 'ERROR OCCURRED IN VALIDATE_SS_SMC/5' );
3458: END IF;
3459: x_api_status := l_return_status;
3460: IF l_debug_on THEN
3461: WSH_DEBUG_SV.pop(l_module_name);
3462: END IF;
3463: RETURN;
3464: END IF;
3465:
3484:
3485: IF (v_source_code = 'OE') THEN --{
3486: -- Bug 1287776: Check for Credit Check and Holds
3487: IF l_debug_on THEN
3488: WSH_DEBUG_SV.logmsg(l_module_name,
3489: 'PROCESSING HEADER '
3490: ||TO_CHAR ( V_HEADER_ID )
3491: ||' LINE '
3492: ||TO_CHAR ( V_LINE_ID )
3504: (g_lock_or_hold_failed) AND
3505: ((g_failed_ship_set_id IS NOT NULL) OR (g_failed_top_model_line_id IS NOT NULL))) THEN
3506: --{
3507: IF l_debug_on THEN
3508: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THIS LINE SINCE ONE OF THE PREVIOUS LINES IN SHIP SET/SMC FAILED' );
3509: END IF;
3510: -- Ignore this line as previous line in ship set or model is faild.
3511: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3512: IF l_debug_on THEN
3509: END IF;
3510: -- Ignore this line as previous line in ship set or model is faild.
3511: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3512: IF l_debug_on THEN
3513: WSH_DEBUG_SV.pop(l_module_name);
3514: END IF;
3515: RETURN;
3516: --}
3517: END IF;
3520: IF (WSH_PR_CRITERIA.g_credit_check_option = 'A') OR
3521: (WSH_PR_CRITERIA.g_credit_check_option = 'R' AND v_released_status = 'R') OR
3522: (WSH_PR_CRITERIA.g_credit_check_option = 'B' AND v_released_status = 'B') THEN --{
3523: IF l_debug_on THEN
3524: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR CREDIT CHECK/HOLDS' );
3525: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
3526: END IF;
3527: WSH_DETAILS_VALIDATIONS.check_credit_holds(
3528: p_detail_id => v_delivery_detail_id,
3521: (WSH_PR_CRITERIA.g_credit_check_option = 'R' AND v_released_status = 'R') OR
3522: (WSH_PR_CRITERIA.g_credit_check_option = 'B' AND v_released_status = 'B') THEN --{
3523: IF l_debug_on THEN
3524: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR CREDIT CHECK/HOLDS' );
3525: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CREDIT_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
3526: END IF;
3527: WSH_DETAILS_VALIDATIONS.check_credit_holds(
3528: p_detail_id => v_delivery_detail_id,
3529: p_activity_type => 'PICK',
3537: /* Don't error out. Raise Warning only */
3538: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3539: Set_Globals(p_enforce_ship_set_and_smc, v_ship_set_id, v_top_model_line_id);
3540: IF l_debug_on THEN
3541: WSH_DEBUG_SV.pop(l_module_name);
3542: END IF;
3543: RETURN;
3544: END IF;
3545: END IF; --}
3560: x_return_status => x_api_status);
3561:
3562: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3563: IF l_debug_on THEN
3564: WSH_DEBUG_SV.logmsg(l_module_name, 'GET_DETAIL_LOCK RETURNED WITH WARNING' );
3565: WSH_DEBUG_SV.pop(l_module_name);
3566: END IF;
3567: --
3568: RETURN;
3561:
3562: IF (x_api_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
3563: IF l_debug_on THEN
3564: WSH_DEBUG_SV.logmsg(l_module_name, 'GET_DETAIL_LOCK RETURNED WITH WARNING' );
3565: WSH_DEBUG_SV.pop(l_module_name);
3566: END IF;
3567: --
3568: RETURN;
3569: -- Bug# 3248578 start of change
3568: RETURN;
3569: -- Bug# 3248578 start of change
3570: ELSIF (x_api_status = WSH_UTIL_CORE.G_RET_STS_SUCCESS) AND (x_skip_detail = 'Y') THEN
3571: IF l_debug_on THEN
3572: WSH_DEBUG_SV.logmsg(l_module_name,'No longer eligible to Pick Release, ignoring the line');
3573: END IF;
3574: RETURN;
3575: END IF;
3576:
3593: -- Bug 4775539
3594: IF (g_existing_rsvs_only_flag <> 'Y') THEN
3595: IF v_header_id <> NVL(g_cache_header_id, -99) THEN
3596: IF l_debug_on THEN
3597: WSH_DEBUG_SV.logmsg(l_module_name, 'Call API to get demand sales order number for '||v_header_id);
3598: END IF;
3599: v_demand_source_header_id := INV_SALESORDER.GET_SALESORDER_FOR_OEHEADER(v_header_id);
3600: g_cache_header_id := v_header_id;
3601: g_cache_demand_header_id := v_demand_source_header_id;
3600: g_cache_header_id := v_header_id;
3601: g_cache_demand_header_id := v_demand_source_header_id;
3602: ELSE
3603: IF l_debug_on THEN
3604: WSH_DEBUG_SV.logmsg(l_module_name, 'use cached value '||g_cache_demand_header_id);
3605: END IF;
3606: v_demand_source_header_id := g_cache_demand_header_id;
3607: END IF;
3608: END IF;
3607: END IF;
3608: END IF;
3609:
3610: IF l_debug_on THEN
3611: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR RESERVATIONS' );
3612: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.CALCULATE_RESERVATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3613: END IF;
3614: --Calculate Reservations
3615: -- HW OPMCONV - Pass and return qty2
3608: END IF;
3609:
3610: IF l_debug_on THEN
3611: WSH_DEBUG_SV.logmsg(l_module_name, 'CHECKING FOR RESERVATIONS' );
3612: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_PICK_LIST.CALCULATE_RESERVATIONS',WSH_DEBUG_SV.C_PROC_LEVEL);
3613: END IF;
3614: --Calculate Reservations
3615: -- HW OPMCONV - Pass and return qty2
3616: WSH_PICK_LIST.Calculate_Reservations(
3629: IF (l_result = 0) THEN -- No Fulfillment
3630: IF l_debug_on THEN
3631: -- Bug 4775539
3632: IF g_existing_rsvs_only_flag = 'Y' THEN
3633: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY IS 0' );
3634: ELSE
3635: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY IS 0' );
3636: END IF;
3637: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3631: -- Bug 4775539
3632: IF g_existing_rsvs_only_flag = 'Y' THEN
3633: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY IS 0' );
3634: ELSE
3635: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY IS 0' );
3636: END IF;
3637: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3638: END IF;
3639: --
3633: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND RESERVED QUANTITY IS 0' );
3634: ELSE
3635: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM SUB IS HONORED AND AVAILABLE QUANTITY IS 0' );
3636: END IF;
3637: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3638: END IF;
3639: --
3640: Set_Globals(p_enforce_ship_set_and_smc, v_ship_set_id, v_top_model_line_id);
3641:
3674: END IF;
3675: -- end bug 2164110
3676:
3677: IF l_debug_on THEN
3678: WSH_DEBUG_SV.pop(l_module_name);
3679: END IF;
3680: RETURN;
3681: ELSIF (l_result = l_requested_quantity) THEN -- Complete Fulfillment
3682: NULL;
3684: IF ((v_ship_set_id > 0) OR (v_top_model_line_id > 0)) THEN
3685: IF l_debug_on THEN
3686: IF l_debug_on THEN
3687: IF g_existing_rsvs_only_flag = 'Y' THEN
3688: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3689: ELSE
3690: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM HONOR IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3691: END IF;
3692: END IF;
3686: IF l_debug_on THEN
3687: IF g_existing_rsvs_only_flag = 'Y' THEN
3688: WSH_DEBUG_SV.logmsg(l_module_name, 'PRIOR RESERVATIONS IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3689: ELSE
3690: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM HONOR IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3691: END IF;
3692: END IF;
3693: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3694: END IF;
3689: ELSE
3690: WSH_DEBUG_SV.logmsg(l_module_name, 'PICK FROM HONOR IS SPECIFIED AND SS/SMC LINE IS PARTIALLY RESERVED' );
3691: END IF;
3692: END IF;
3693: WSH_DEBUG_SV.logmsg(l_module_name, 'IGNORING THE LINE' );
3694: END IF;
3695:
3696: Set_Globals(p_enforce_ship_set_and_smc, v_ship_set_id, v_top_model_line_id);
3697: x_api_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
3729: END IF;
3730: -- end bug 2164110
3731:
3732: IF l_debug_on THEN
3733: WSH_DEBUG_SV.pop(l_module_name);
3734: END IF;
3735: RETURN;
3736: ELSE
3737: l_requested_quantity := l_requested_quantity - l_result;
3738: -- HW OPMCONV - Added qty2
3739: l_requested_quantity2 := l_requested_quantity2 - l_result2;
3740:
3741: IF l_debug_on THEN
3742: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_ACTIONS.SPLIT_DELIVERY_DETAILS',WSH_DEBUG_SV.C_PROC_LEVEL);
3743: END IF;
3744:
3745: -- HW OPMCONV - Added l_requested_quantity2 and re-arranged parameters
3746:
3753: p_unassign_flag => 'N'
3754: );
3755:
3756: IF l_debug_on THEN
3757: WSH_DEBUG_SV.logmsg(l_module_name, 'CREATED NEW DELIVERY DETAIL '||L_NEW_DELIVERY_DETAIL_ID );
3758: END IF;
3759: END IF;
3760: END IF;
3761: --}
3769: G_NONRESERVABLE_ITEM := 'Y';
3770: END IF;
3771:
3772: IF l_debug_on THEN
3773: WSH_DEBUG_SV.logmsg(l_module_name, 'INSERT INTO TABLE' );
3774: END IF;
3775:
3776: --Store the detail line values to release table
3777: release_table(g_rel_current_line).source_line_id := v_line_id;
3813: FETCH c_order_line INTO l_ordered_quantity, l_order_quantity_uom;
3814: CLOSE c_order_line;
3815:
3816: IF l_debug_on THEN
3817: WSH_DEBUG_SV.log(l_module_name, 'l_ordered_quantity',l_ordered_quantity);
3818: WSH_DEBUG_SV.log(l_module_name, 'l_order_quantity_uom',l_order_quantity_uom);
3819: END IF;
3820:
3821: release_table(g_rel_current_line).top_model_quantity := l_ordered_quantity;
3814: CLOSE c_order_line;
3815:
3816: IF l_debug_on THEN
3817: WSH_DEBUG_SV.log(l_module_name, 'l_ordered_quantity',l_ordered_quantity);
3818: WSH_DEBUG_SV.log(l_module_name, 'l_order_quantity_uom',l_order_quantity_uom);
3819: END IF;
3820:
3821: release_table(g_rel_current_line).top_model_quantity := l_ordered_quantity;
3822: g_last_model_quantity := l_ordered_quantity;
3854: x_api_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3855:
3856: --
3857: IF l_debug_on THEN
3858: WSH_DEBUG_SV.pop(l_module_name);
3859: END IF;
3860: --
3861: EXCEPTION
3862: WHEN OTHERS THEN
3860: --
3861: EXCEPTION
3862: WHEN OTHERS THEN
3863: IF l_debug_on THEN
3864: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INSERT_RL_ROW' );
3865: END IF;
3866: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3867: IF l_debug_on THEN
3868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3864: WSH_DEBUG_SV.logmsg(l_module_name, 'UNEXPECTED ERROR IN INSERT_RL_ROW' );
3865: END IF;
3866: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3867: IF l_debug_on THEN
3868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3870: END IF;
3871:
3872: END Insert_RL_Row;
3865: END IF;
3866: x_api_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
3867: IF l_debug_on THEN
3868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3870: END IF;
3871:
3872: END Insert_RL_Row;
3873:
3904: --
3905: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3906: --
3907: IF l_debug_on IS NULL THEN
3908: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3909: END IF;
3910: --
3911: IF p_buffer_name = 'u' THEN
3912: g_Unreleased_SQL := g_Unreleased_SQL || p_buffer_text;