[Home] [Help]
186: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
187: --
188: IF l_debug_on IS NULL
189: THEN
190: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
191: END IF;
192: --
193: IF l_debug_on THEN
194: WSH_DEBUG_SV.push(l_module_name);
190: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
191: END IF;
192: --
193: IF l_debug_on THEN
194: WSH_DEBUG_SV.push(l_module_name);
195: END IF;
196: --
197: SELECT *
198: INTO p_item
203: --
204: -- Debug Statements
205: --
206: IF l_debug_on THEN
207: WSH_DEBUG_SV.pop(l_module_name);
208: END IF;
209: --
210: RETURN INV_VALIDATE.T;
211:
224: --
225: -- Debug Statements
226: --
227: IF l_debug_on THEN
228: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
229: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
230: END IF;
231: --
232: RETURN INV_VALIDATE.F;
225: -- Debug Statements
226: --
227: IF l_debug_on THEN
228: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
229: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
230: END IF;
231: --
232: RETURN INV_VALIDATE.F;
233:
244: --
245: -- Debug Statements
246: --
247: IF l_debug_on THEN
248: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
249: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
250: END IF;
251: --
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
245: -- Debug Statements
246: --
247: IF l_debug_on THEN
248: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
249: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
250: END IF;
251: --
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
253:
287:
288: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
289: IF l_debug_on IS NULL
290: THEN
291: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
292: END IF;
293: IF l_debug_on THEN
294: WSH_DEBUG_SV.push(l_module_name);
295: END IF;
290: THEN
291: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
292: END IF;
293: IF l_debug_on THEN
294: WSH_DEBUG_SV.push(l_module_name);
295: END IF;
296:
297: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
298:
311: END IF;
312: CLOSE c_org_param_info;
313:
314: IF l_debug_on THEN
315: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.stock_locator_control_code',l_cache_rec.stock_locator_control_code);
316: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.negative_inv_receipt_code',l_cache_rec.negative_inv_receipt_code);
317: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.serial_number_type',l_cache_rec.serial_number_type);
318: END IF;
319: -- add record to cache
312: CLOSE c_org_param_info;
313:
314: IF l_debug_on THEN
315: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.stock_locator_control_code',l_cache_rec.stock_locator_control_code);
316: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.negative_inv_receipt_code',l_cache_rec.negative_inv_receipt_code);
317: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.serial_number_type',l_cache_rec.serial_number_type);
318: END IF;
319: -- add record to cache
320: g_param_tab(p_organization_id) := l_cache_rec;
313:
314: IF l_debug_on THEN
315: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.stock_locator_control_code',l_cache_rec.stock_locator_control_code);
316: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.negative_inv_receipt_code',l_cache_rec.negative_inv_receipt_code);
317: WSH_DEBUG_SV.log(l_module_name,'l_cache_rec.serial_number_type',l_cache_rec.serial_number_type);
318: END IF;
319: -- add record to cache
320: g_param_tab(p_organization_id) := l_cache_rec;
321: END IF;
326:
327: ELSE -- Org is is null
328: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
329: IF l_debug_on THEN
330: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
331: END IF;
332: --
333: RETURN;
334: END IF;
333: RETURN;
334: END IF;
335:
336: IF l_debug_on THEN
337: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
338: END IF;
339:
340: EXCEPTION
341:
343: wsh_util_core.default_handler ('WSH_DELIVERY_DETAILS_INV.Get_Org_Param_information');
344: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
345:
346: IF l_debug_on THEN
347: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
348: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
349: END IF;
350:
351: IF c_org_param_info%isopen THEN
344: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
345:
346: IF l_debug_on THEN
347: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
348: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
349: END IF;
350:
351: IF c_org_param_info%isopen THEN
352: close c_org_param_info;
390:
391: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
392: IF l_debug_on IS NULL
393: THEN
394: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
395: END IF;
396: IF l_debug_on THEN
397: WSH_DEBUG_SV.push(l_module_name);
398: END IF;
393: THEN
394: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
395: END IF;
396: IF l_debug_on THEN
397: WSH_DEBUG_SV.push(l_module_name);
398: END IF;
399:
400: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
401:
416:
417: -- add record to cache
418: g_sec_inv_tab(l_key) := l_cache_rec;
419: IF l_debug_on THEN
420: WSH_DEBUG_SV.log(l_module_name,'x_mtl_sec_inv_rec.locator_type',x_mtl_sec_inv_rec.locator_type);
421: END IF;
422:
423: END IF;
424:
426:
427: ELSE -- Org is is null
428: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
429: IF l_debug_on THEN
430: WSH_DEBUG_SV.pop(l_module_name, x_return_status);
431: END IF;
432: --
433: RETURN;
434: END IF;
433: RETURN;
434: END IF;
435:
436: IF l_debug_on THEN
437: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
438: END IF;
439:
440: EXCEPTION
441:
443: wsh_util_core.default_handler ('WSH_DELIVERY_DETAILS_INV.Get_Sec_Inv_information');
444: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
445:
446: IF l_debug_on THEN
447: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
449: END IF;
450:
451: IF c_sec_inv_info%isopen THEN
444: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
445:
446: IF l_debug_on THEN
447: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
448: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
449: END IF;
450:
451: IF c_sec_inv_info%isopen THEN
452: close c_sec_inv_info;
576: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
577: --
578: IF l_debug_on IS NULL
579: THEN
580: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
581: END IF;
582: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.push(l_module_name);
580: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
581: END IF;
582: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.push(l_module_name);
585: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
586: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
587: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
588: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
581: END IF;
582: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.push(l_module_name);
585: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
586: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
587: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
588: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
589: END IF;
582: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.push(l_module_name);
585: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
586: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
587: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
588: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
589: END IF;
590: --
583: IF l_debug_on THEN
584: WSH_DEBUG_SV.push(l_module_name);
585: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
586: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
587: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
588: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
589: END IF;
590: --
591: IF p_delivery_detail_id IS NULL THEN
584: WSH_DEBUG_SV.push(l_module_name);
585: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
586: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
587: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
588: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
589: END IF;
590: --
591: IF p_delivery_detail_id IS NULL THEN
592: --{
594: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
595: WSH_UTIL_CORE.Add_Message(x_return_status);
596: --
597: IF l_debug_on THEN
598: WSH_DEBUG_SV.pop(l_module_name);
599: END IF;
600: --
601: return;
602: --}
615: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
616: WSH_UTIL_CORE.Add_Message(x_return_status);
617: --
618: IF l_debug_on THEN
619: WSH_DEBUG_SV.pop(l_module_name);
620: END IF;
621: --
622: return;
623: --}
658: x_inv_controls_rec.serial_code := NULL;
659: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
660: --
661: IF l_debug_on THEN
662: WSH_DEBUG_SV.logmsg(l_module_name,'Case where l_inv_item_id IS NULL or line is Container');
663: WSH_DEBUG_SV.pop(l_module_name);
664: END IF;
665: --
666: return;
659: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
660: --
661: IF l_debug_on THEN
662: WSH_DEBUG_SV.logmsg(l_module_name,'Case where l_inv_item_id IS NULL or line is Container');
663: WSH_DEBUG_SV.pop(l_module_name);
664: END IF;
665: --
666: return;
667: --}
717: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
718: WSH_UTIL_CORE.Add_Message(x_return_status);
719: --
720: IF l_debug_on THEN
721: WSH_DEBUG_SV.pop(l_module_name);
722: END IF;
723: --
724: return;
725: --}
760: IF (l_subinv IS NULL AND
761: NVL(l_txn_enabled_flag, 'N') = 'Y') THEN
762: --{
763: IF l_debug_on THEN
764: wsh_debug_sv.log(l_module_name, 'Txn Enabled Flag', l_txn_enabled_flag);
765: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.DEFAULT_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
766: END IF;
767: --
768: WSH_DELIVERY_DETAILS_INV.Default_Subinventory (
761: NVL(l_txn_enabled_flag, 'N') = 'Y') THEN
762: --{
763: IF l_debug_on THEN
764: wsh_debug_sv.log(l_module_name, 'Txn Enabled Flag', l_txn_enabled_flag);
765: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.DEFAULT_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
766: END IF;
767: --
768: WSH_DELIVERY_DETAILS_INV.Default_Subinventory (
769: l_org_id,
777: --}
778: END IF;
779: --
780: IF l_debug_on THEN
781: wsh_debug_sv.log(l_module_name, 'Default Sub', l_dft_subinv);
782: wsh_debug_sv.log(l_module_name, 'Input Default Sub', l_subinv);
783: END IF;
784: --
785: IF (nvl(l_subinv, l_dft_subinv) IS NOT NULL) THEN
778: END IF;
779: --
780: IF l_debug_on THEN
781: wsh_debug_sv.log(l_module_name, 'Default Sub', l_dft_subinv);
782: wsh_debug_sv.log(l_module_name, 'Input Default Sub', l_subinv);
783: END IF;
784: --
785: IF (nvl(l_subinv, l_dft_subinv) IS NOT NULL) THEN
786: --{
784: --
785: IF (nvl(l_subinv, l_dft_subinv) IS NOT NULL) THEN
786: --{
787: IF l_debug_on THEN
788: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_ORG_LOC',WSH_DEBUG_SV.C_PROC_LEVEL);
789: END IF;
790: --
791: l_org_loc_code := WSH_DELIVERY_DETAILS_INV.Get_Org_Loc (l_org_id);
792: --
790: --
791: l_org_loc_code := WSH_DELIVERY_DETAILS_INV.Get_Org_Loc (l_org_id);
792: --
793: IF l_debug_on THEN
794: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.SUB_LOC_CTL',WSH_DEBUG_SV.C_PROC_LEVEL);
795: END IF;
796: --
797: l_sub_loc_code := WSH_DELIVERY_DETAILS_INV.Sub_Loc_Ctl (
798: nvl(l_subinv,l_dft_subinv),
799: l_org_id);
800:
801: --
802: IF l_debug_on THEN
803: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.LOCATOR_CTL_CODE',WSH_DEBUG_SV.C_PROC_LEVEL);
804: END IF;
805: --
806: l_loc_ctl_code := WSH_DELIVERY_DETAILS_INV.Locator_Ctl_Code(
807: l_org_id,
830: x_inv_controls_rec.location_control_code := l_loc_ctl_code;
831: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
832: --
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOC_FLAG',x_inv_controls_rec.loc_flag);
835: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SER_FLAG',x_inv_controls_rec.ser_flag);
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
831: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
832: --
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOC_FLAG',x_inv_controls_rec.loc_flag);
835: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SER_FLAG',x_inv_controls_rec.ser_flag);
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
832: --
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOC_FLAG',x_inv_controls_rec.loc_flag);
835: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SER_FLAG',x_inv_controls_rec.ser_flag);
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
840: WSH_DEBUG_SV.log(l_module_name, 'X_INV_CONTROLS_REC.TRANSACTABLE_FLAG',
833: IF l_debug_on THEN
834: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOC_FLAG',x_inv_controls_rec.loc_flag);
835: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SER_FLAG',x_inv_controls_rec.ser_flag);
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
840: WSH_DEBUG_SV.log(l_module_name, 'X_INV_CONTROLS_REC.TRANSACTABLE_FLAG',
841: x_inv_controls_rec.transactable_flag);
834: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOC_FLAG',x_inv_controls_rec.loc_flag);
835: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SER_FLAG',x_inv_controls_rec.ser_flag);
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
840: WSH_DEBUG_SV.log(l_module_name, 'X_INV_CONTROLS_REC.TRANSACTABLE_FLAG',
841: x_inv_controls_rec.transactable_flag);
842: WSH_DEBUG_SV.pop(l_module_name);
835: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SER_FLAG',x_inv_controls_rec.ser_flag);
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
840: WSH_DEBUG_SV.log(l_module_name, 'X_INV_CONTROLS_REC.TRANSACTABLE_FLAG',
841: x_inv_controls_rec.transactable_flag);
842: WSH_DEBUG_SV.pop(l_module_name);
843: END IF;
836: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_LOC',x_inv_controls_rec.restrict_loc);
837: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.RESTRICT_SUB',x_inv_controls_rec.restrict_sub);
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
840: WSH_DEBUG_SV.log(l_module_name, 'X_INV_CONTROLS_REC.TRANSACTABLE_FLAG',
841: x_inv_controls_rec.transactable_flag);
842: WSH_DEBUG_SV.pop(l_module_name);
843: END IF;
844: --
838: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.SERIAL_CODE',x_inv_controls_rec.serial_code);
839: WSH_DEBUG_SV.log(l_module_name,'X_INV_CONTROLS_REC.LOCATION_CONTROL_CODE',x_inv_controls_rec.location_control_code);
840: WSH_DEBUG_SV.log(l_module_name, 'X_INV_CONTROLS_REC.TRANSACTABLE_FLAG',
841: x_inv_controls_rec.transactable_flag);
842: WSH_DEBUG_SV.pop(l_module_name);
843: END IF;
844: --
845: EXCEPTION
846:
859: --
860: -- Debug Statements
861: --
862: IF l_debug_on THEN
863: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
864: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
865: END IF;
866: --
867: END Fetch_Inv_Controls;
860: -- Debug Statements
861: --
862: IF l_debug_on THEN
863: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
864: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
865: END IF;
866: --
867: END Fetch_Inv_Controls;
868:
940: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
941: --
942: IF l_debug_on IS NULL
943: THEN
944: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
945: END IF;
946: --
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.push(l_module_name);
944: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
945: END IF;
946: --
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.push(l_module_name);
949: WSH_DEBUG_SV.log(l_module_name,'P_SET_DEFAULT',P_SET_DEFAULT);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
945: END IF;
946: --
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.push(l_module_name);
949: WSH_DEBUG_SV.log(l_module_name,'P_SET_DEFAULT',P_SET_DEFAULT);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
946: --
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.push(l_module_name);
949: WSH_DEBUG_SV.log(l_module_name,'P_SET_DEFAULT',P_SET_DEFAULT);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
947: IF l_debug_on THEN
948: WSH_DEBUG_SV.push(l_module_name);
949: WSH_DEBUG_SV.log(l_module_name,'P_SET_DEFAULT',P_SET_DEFAULT);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
948: WSH_DEBUG_SV.push(l_module_name);
949: WSH_DEBUG_SV.log(l_module_name,'P_SET_DEFAULT',P_SET_DEFAULT);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
949: WSH_DEBUG_SV.log(l_module_name,'P_SET_DEFAULT',P_SET_DEFAULT);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
950: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.DELIVERY_DETAIL_ID',P_LINE_INV_REC.delivery_detail_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
951: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.INVENTTORY_ITEM_ID',P_LINE_INV_REC.inventory_item_id);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
952: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SHP_QTY',P_LINE_INV_REC.shp_qty);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
953: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REQ_QTY',P_LINE_INV_REC.req_qty);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
961: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.TRANSACTION_TEMP_ID',P_LINE_INV_REC.transaction_temp_id);
954: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SER_QTY',P_LINE_INV_REC.ser_qty);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
961: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.TRANSACTION_TEMP_ID',P_LINE_INV_REC.transaction_temp_id);
962: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.ORGANIZATION_ID',P_LINE_INV_REC.organization_id);
955: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.REVISION',P_LINE_INV_REC.revision);
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
961: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.TRANSACTION_TEMP_ID',P_LINE_INV_REC.transaction_temp_id);
962: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.ORGANIZATION_ID',P_LINE_INV_REC.organization_id);
963: END IF;
956: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SUBINVENTORY',P_LINE_INV_REC.subinventory);
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
961: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.TRANSACTION_TEMP_ID',P_LINE_INV_REC.transaction_temp_id);
962: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.ORGANIZATION_ID',P_LINE_INV_REC.organization_id);
963: END IF;
964: --
957: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOT_NUMBER',P_LINE_INV_REC.lot_number);
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
961: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.TRANSACTION_TEMP_ID',P_LINE_INV_REC.transaction_temp_id);
962: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.ORGANIZATION_ID',P_LINE_INV_REC.organization_id);
963: END IF;
964: --
965: --
958: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_ID',P_LINE_INV_REC.locator_id);
959: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.LOCATOR_CONTROL_CODE',P_LINE_INV_REC.locator_control_code);
960: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.SERIAL_NUMBER_CONTROL_CODE',P_LINE_INV_REC.serial_number_control_code);
961: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.TRANSACTION_TEMP_ID',P_LINE_INV_REC.transaction_temp_id);
962: WSH_DEBUG_SV.log(l_module_name,'P_LINE_INV_REC.ORGANIZATION_ID',P_LINE_INV_REC.organization_id);
963: END IF;
964: --
965: --
966: -- Debug Statements
965: --
966: -- Debug Statements
967: --
968: IF l_debug_on THEN
969: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.FETCH_INV_CONTROLS',WSH_DEBUG_SV.C_PROC_LEVEL);
970: END IF;
971: --
972: WSH_DELIVERY_DETAILS_INV.Fetch_Inv_Controls (
973: p_line_inv_rec.delivery_detail_id,
982: --
983: -- Debug Statements
984: --
985: IF l_debug_on THEN
986: WSH_DEBUG_SV.pop(l_module_name);
987: END IF;
988: --
989: return;
990: END IF;
1005: --
1006: -- Debug Statements
1007: --
1008: IF l_debug_on THEN
1009: WSH_DEBUG_SV.pop(l_module_name);
1010: END IF;
1011: --
1012: return;
1013: END IF;
1022: --
1023: -- Debug Statements
1024: --
1025: IF l_debug_on THEN
1026: WSH_DEBUG_SV.pop(l_module_name);
1027: END IF;
1028: --
1029: return;
1030: END IF;
1035: --
1036: -- Debug Statements
1037: --
1038: IF l_debug_on THEN
1039: WSH_DEBUG_SV.pop(l_module_name);
1040: END IF;
1041: --
1042: RETURN;
1043: END IF;
1048: --
1049: -- Debug Statements
1050: --
1051: IF l_debug_on THEN
1052: WSH_DEBUG_SV.pop(l_module_name);
1053: END IF;
1054: --
1055: RETURN;
1056: END IF;
1076: --
1077: -- Debug Statements
1078: --
1079: IF l_debug_on THEN
1080: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.DEFAULT_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
1081: END IF;
1082: --
1083: WSH_DELIVERY_DETAILS_INV.Default_Subinventory (
1084: p_line_inv_rec.organization_id,
1091: --
1092: -- Debug Statements
1093: --
1094: IF l_debug_on THEN
1095: WSH_DEBUG_SV.pop(l_module_name);
1096: END IF;
1097: --
1098: RETURN;
1099: END IF;
1104: --
1105: -- Debug Statements
1106: --
1107: IF l_debug_on THEN
1108: WSH_DEBUG_SV.pop(l_module_name);
1109: END IF;
1110: --
1111: RETURN;
1112: END IF;
1120: --
1121: -- Debug Statements
1122: --
1123: IF l_debug_on THEN
1124: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_ORG_LOC',WSH_DEBUG_SV.C_PROC_LEVEL);
1125: END IF;
1126: --
1127: org_loc_ctl := WSH_DELIVERY_DETAILS_INV.Get_Org_Loc (p_line_inv_rec.organization_id);
1128:
1129: --
1130: -- Debug Statements
1131: --
1132: IF l_debug_on THEN
1133: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.SUB_LOC_CTL',WSH_DEBUG_SV.C_PROC_LEVEL);
1134: END IF;
1135: --
1136: sub_loc_ctl := WSH_DELIVERY_DETAILS_INV.Sub_Loc_Ctl (
1137: nvl(subinv,dft_subinv),
1143: --
1144: -- Debug Statements
1145: --
1146: IF l_debug_on THEN
1147: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.LOCATOR_CTL_CODE',WSH_DEBUG_SV.C_PROC_LEVEL);
1148: END IF;
1149: --
1150: loc_ctl_code := WSH_DELIVERY_DETAILS_INV.Locator_Ctl_Code(
1151: p_line_inv_rec.organization_id,
1164: --
1165: -- Debug Statements
1166: --
1167: IF l_debug_on THEN
1168: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.DEFAULT_LOCATOR',WSH_DEBUG_SV.C_PROC_LEVEL);
1169: END IF;
1170: --
1171: dft_loc_id := WSH_DELIVERY_DETAILS_INV.Default_Locator (
1172: p_line_inv_rec.organization_id,
1180: --
1181: -- Debug Statements
1182: --
1183: IF l_debug_on THEN
1184: WSH_DEBUG_SV.pop(l_module_name);
1185: END IF;
1186: --
1187: RETURN;
1188: END IF;
1204: --
1205: -- Debug Statements
1206: --
1207: IF l_debug_on THEN
1208: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_SERIAL_QTY',WSH_DEBUG_SV.C_PROC_LEVEL);
1209: END IF;
1210: --
1211: l_ser_qty := WSH_DELIVERY_DETAILS_INV.Get_Serial_Qty (
1212: p_line_inv_rec.organization_id,
1218: --
1219: -- Debug Statements
1220: --
1221: IF l_debug_on THEN
1222: WSH_DEBUG_SV.pop(l_module_name);
1223: END IF;
1224: --
1225: return;
1226: END IF;
1234: --
1235: -- Debug Statements
1236: --
1237: IF l_debug_on THEN
1238: WSH_DEBUG_SV.pop(l_module_name);
1239: END IF;
1240: --
1241: RETURN;
1242: END IF;
1246: --
1247: -- Debug Statements
1248: --
1249: IF l_debug_on THEN
1250: WSH_DEBUG_SV.pop(l_module_name);
1251: END IF;
1252: --
1253: RETURN;
1254: END IF;
1260: --
1261: -- Debug Statements
1262: --
1263: IF l_debug_on THEN
1264: WSH_DEBUG_SV.pop(l_module_name);
1265: END IF;
1266: --
1267: EXCEPTION
1268:
1274: --
1275: -- Debug Statements
1276: --
1277: IF l_debug_on THEN
1278: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1279: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1280: END IF;
1281: --
1282: END details_required;
1275: -- Debug Statements
1276: --
1277: IF l_debug_on THEN
1278: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1279: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1280: END IF;
1281: --
1282: END details_required;
1283:
1316: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1317: --
1318: IF l_debug_on IS NULL
1319: THEN
1320: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1321: END IF;
1322: --
1323: IF l_debug_on THEN
1324: WSH_DEBUG_SV.push(l_module_name);
1320: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1321: END IF;
1322: --
1323: IF l_debug_on THEN
1324: WSH_DEBUG_SV.push(l_module_name);
1325: --
1326: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1327: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1328: END IF;
1322: --
1323: IF l_debug_on THEN
1324: WSH_DEBUG_SV.push(l_module_name);
1325: --
1326: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1327: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1328: END IF;
1329: --
1330:
1323: IF l_debug_on THEN
1324: WSH_DEBUG_SV.push(l_module_name);
1325: --
1326: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1327: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1328: END IF;
1329: --
1330:
1331: -- bug 5264874
1340:
1341: l_sub_loc_ctl := l_mtl_sec_inv_rec.locator_type;
1342:
1343: IF l_debug_on THEN
1344: WSH_DEBUG_SV.pop(l_module_name);
1345: END IF;
1346: --
1347: RETURN l_sub_loc_ctl;
1348: EXCEPTION
1349: WHEN FND_API.G_EXC_ERROR THEN
1350: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1351: WSH_UTIL_CORE.Add_Message(l_return_status);
1352: IF l_debug_on THEN
1353: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1354: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1355: END IF;
1356: END Sub_Loc_Ctl;
1357:
1350: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1351: WSH_UTIL_CORE.Add_Message(l_return_status);
1352: IF l_debug_on THEN
1353: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1354: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1355: END IF;
1356: END Sub_Loc_Ctl;
1357:
1358:
1387: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1388: --
1389: IF l_debug_on IS NULL
1390: THEN
1391: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1392: END IF;
1393: --
1394: IF l_debug_on THEN
1395: WSH_DEBUG_SV.push(l_module_name);
1391: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1392: END IF;
1393: --
1394: IF l_debug_on THEN
1395: WSH_DEBUG_SV.push(l_module_name);
1396: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1397: END IF;
1398: --
1399:
1392: END IF;
1393: --
1394: IF l_debug_on THEN
1395: WSH_DEBUG_SV.push(l_module_name);
1396: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1397: END IF;
1398: --
1399:
1400: -- bug 5264874
1410:
1411: l_org_loc_ctl := l_mtl_org_param_rec.stock_locator_control_code;
1412:
1413: IF l_debug_on THEN
1414: WSH_DEBUG_SV.log(l_module_name, 'l_org_loc_ctl',l_org_loc_ctl);
1415: WSH_DEBUG_SV.pop(l_module_name);
1416: END IF;
1417: --
1418: RETURN l_org_loc_ctl;
1411: l_org_loc_ctl := l_mtl_org_param_rec.stock_locator_control_code;
1412:
1413: IF l_debug_on THEN
1414: WSH_DEBUG_SV.log(l_module_name, 'l_org_loc_ctl',l_org_loc_ctl);
1415: WSH_DEBUG_SV.pop(l_module_name);
1416: END IF;
1417: --
1418: RETURN l_org_loc_ctl;
1419:
1421: WHEN FND_API.G_EXC_ERROR THEN
1422: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1423: WSH_UTIL_CORE.Add_Message(l_return_status);
1424: IF l_debug_on THEN
1425: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1426: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1427: END IF;
1428:
1429: END Get_Org_Loc;
1422: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1423: WSH_UTIL_CORE.Add_Message(l_return_status);
1424: IF l_debug_on THEN
1425: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1426: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1427: END IF;
1428:
1429: END Get_Org_Loc;
1430:
1475: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1476: --
1477: IF l_debug_on IS NULL
1478: THEN
1479: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1480: END IF;
1481: --
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.push(l_module_name);
1479: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1480: END IF;
1481: --
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.push(l_module_name);
1484: --
1485: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1486: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1487: END IF;
1481: --
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.push(l_module_name);
1484: --
1485: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1486: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1487: END IF;
1488: --
1489: OPEN Default_Sub;
1482: IF l_debug_on THEN
1483: WSH_DEBUG_SV.push(l_module_name);
1484: --
1485: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1486: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1487: END IF;
1488: --
1489: OPEN Default_Sub;
1490: FETCH Default_Sub into l_dflt_sub;
1496: --
1497: -- Debug Statements
1498: --
1499: IF l_debug_on THEN
1500: WSH_DEBUG_SV.pop(l_module_name);
1501: END IF;
1502: --
1503: return;
1504: END IF;
1513: --
1514: -- Debug Statements
1515: --
1516: IF l_debug_on THEN
1517: WSH_DEBUG_SV.pop(l_module_name);
1518: END IF;
1519: --
1520: EXCEPTION
1521:
1526: --
1527: -- Debug Statements
1528: --
1529: IF l_debug_on THEN
1530: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1531: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1532: END IF;
1533: --
1534: END Default_Subinventory;
1527: -- Debug Statements
1528: --
1529: IF l_debug_on THEN
1530: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1531: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1532: END IF;
1533: --
1534: END Default_Subinventory;
1535:
1588: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1589: --
1590: IF l_debug_on IS NULL
1591: THEN
1592: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1593: END IF;
1594: --
1595: IF l_debug_on THEN
1596: WSH_DEBUG_SV.push(l_module_name);
1592: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1593: END IF;
1594: --
1595: IF l_debug_on THEN
1596: WSH_DEBUG_SV.push(l_module_name);
1597: --
1598: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1599: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1600: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1594: --
1595: IF l_debug_on THEN
1596: WSH_DEBUG_SV.push(l_module_name);
1597: --
1598: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1599: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1600: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1601: WSH_DEBUG_SV.log(l_module_name,'P_LOC_RESTRICTED_FLAG',P_LOC_RESTRICTED_FLAG);
1602: END IF;
1595: IF l_debug_on THEN
1596: WSH_DEBUG_SV.push(l_module_name);
1597: --
1598: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1599: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1600: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1601: WSH_DEBUG_SV.log(l_module_name,'P_LOC_RESTRICTED_FLAG',P_LOC_RESTRICTED_FLAG);
1602: END IF;
1603: --
1596: WSH_DEBUG_SV.push(l_module_name);
1597: --
1598: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1599: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1600: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1601: WSH_DEBUG_SV.log(l_module_name,'P_LOC_RESTRICTED_FLAG',P_LOC_RESTRICTED_FLAG);
1602: END IF;
1603: --
1604: OPEN Default_Locator;
1597: --
1598: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
1599: WSH_DEBUG_SV.log(l_module_name,'P_INV_ITEM_ID',P_INV_ITEM_ID);
1600: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
1601: WSH_DEBUG_SV.log(l_module_name,'P_LOC_RESTRICTED_FLAG',P_LOC_RESTRICTED_FLAG);
1602: END IF;
1603: --
1604: OPEN Default_Locator;
1605: FETCH Default_Locator INTO dflt_locator_id;
1609: --
1610: -- Debug Statements
1611: --
1612: IF l_debug_on THEN
1613: WSH_DEBUG_SV.pop(l_module_name);
1614: END IF;
1615: --
1616: RETURN NULL;
1617: END IF;
1623: --
1624: -- Debug Statements
1625: --
1626: IF l_debug_on THEN
1627: WSH_DEBUG_SV.pop(l_module_name);
1628: END IF;
1629: --
1630: RETURN (dflt_locator_id);
1631:
1677: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1678: --
1679: IF l_debug_on IS NULL
1680: THEN
1681: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1682: END IF;
1683: --
1684: IF l_debug_on THEN
1685: WSH_DEBUG_SV.push(l_module_name);
1681: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1682: END IF;
1683: --
1684: IF l_debug_on THEN
1685: WSH_DEBUG_SV.push(l_module_name);
1686: --
1687: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1688: WSH_DEBUG_SV.log(l_module_name,'P_RESTRICT_LOC',P_RESTRICT_LOC);
1689: WSH_DEBUG_SV.log(l_module_name,'P_ORG_LOC_CODE',P_ORG_LOC_CODE);
1683: --
1684: IF l_debug_on THEN
1685: WSH_DEBUG_SV.push(l_module_name);
1686: --
1687: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1688: WSH_DEBUG_SV.log(l_module_name,'P_RESTRICT_LOC',P_RESTRICT_LOC);
1689: WSH_DEBUG_SV.log(l_module_name,'P_ORG_LOC_CODE',P_ORG_LOC_CODE);
1690: WSH_DEBUG_SV.log(l_module_name,'P_SUB_LOC_CODE',P_SUB_LOC_CODE);
1691: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_LOC_CODE',P_ITEM_LOC_CODE);
1684: IF l_debug_on THEN
1685: WSH_DEBUG_SV.push(l_module_name);
1686: --
1687: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1688: WSH_DEBUG_SV.log(l_module_name,'P_RESTRICT_LOC',P_RESTRICT_LOC);
1689: WSH_DEBUG_SV.log(l_module_name,'P_ORG_LOC_CODE',P_ORG_LOC_CODE);
1690: WSH_DEBUG_SV.log(l_module_name,'P_SUB_LOC_CODE',P_SUB_LOC_CODE);
1691: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_LOC_CODE',P_ITEM_LOC_CODE);
1692: END IF;
1685: WSH_DEBUG_SV.push(l_module_name);
1686: --
1687: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1688: WSH_DEBUG_SV.log(l_module_name,'P_RESTRICT_LOC',P_RESTRICT_LOC);
1689: WSH_DEBUG_SV.log(l_module_name,'P_ORG_LOC_CODE',P_ORG_LOC_CODE);
1690: WSH_DEBUG_SV.log(l_module_name,'P_SUB_LOC_CODE',P_SUB_LOC_CODE);
1691: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_LOC_CODE',P_ITEM_LOC_CODE);
1692: END IF;
1693: --
1686: --
1687: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1688: WSH_DEBUG_SV.log(l_module_name,'P_RESTRICT_LOC',P_RESTRICT_LOC);
1689: WSH_DEBUG_SV.log(l_module_name,'P_ORG_LOC_CODE',P_ORG_LOC_CODE);
1690: WSH_DEBUG_SV.log(l_module_name,'P_SUB_LOC_CODE',P_SUB_LOC_CODE);
1691: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_LOC_CODE',P_ITEM_LOC_CODE);
1692: END IF;
1693: --
1694: --
1687: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
1688: WSH_DEBUG_SV.log(l_module_name,'P_RESTRICT_LOC',P_RESTRICT_LOC);
1689: WSH_DEBUG_SV.log(l_module_name,'P_ORG_LOC_CODE',P_ORG_LOC_CODE);
1690: WSH_DEBUG_SV.log(l_module_name,'P_SUB_LOC_CODE',P_SUB_LOC_CODE);
1691: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_LOC_CODE',P_ITEM_LOC_CODE);
1692: END IF;
1693: --
1694: --
1695: -- Debug Statements
1714: --
1715: -- Debug Statements
1716: --
1717: IF l_debug_on THEN
1718: WSH_DEBUG_SV.pop(l_module_name);
1719: END IF;
1720: --
1721: RETURN p_org_loc_code;
1722: ELSE
1727: --
1728: -- Debug Statements
1729: --
1730: IF l_debug_on THEN
1731: WSH_DEBUG_SV.pop(l_module_name);
1732: END IF;
1733: --
1734: RETURN prespecified;
1735: ELSIF (l_neg_inv_code = 1) THEN
1736: --
1737: -- Debug Statements
1738: --
1739: IF l_debug_on THEN
1740: WSH_DEBUG_SV.pop(l_module_name);
1741: END IF;
1742: --
1743: RETURN dynamic;
1744: ELSE
1747: --
1748: -- Debug Statements
1749: --
1750: IF l_debug_on THEN
1751: WSH_DEBUG_SV.pop(l_module_name);
1752: END IF;
1753: --
1754: RETURN prespecified;
1755: END IF;
1761: --
1762: -- Debug Statements
1763: --
1764: IF l_debug_on THEN
1765: WSH_DEBUG_SV.pop(l_module_name);
1766: END IF;
1767: --
1768: RETURN p_sub_loc_code;
1769: ELSE
1773: --
1774: -- Debug Statements
1775: --
1776: IF l_debug_on THEN
1777: WSH_DEBUG_SV.pop(l_module_name);
1778: END IF;
1779: --
1780: RETURN prespecified;
1781: ELSIF (l_neg_inv_code = 1) THEN
1782: --
1783: -- Debug Statements
1784: --
1785: IF l_debug_on THEN
1786: WSH_DEBUG_SV.pop(l_module_name);
1787: END IF;
1788: --
1789: RETURN dynamic;
1790: ELSE
1793: --
1794: -- Debug Statements
1795: --
1796: IF l_debug_on THEN
1797: WSH_DEBUG_SV.pop(l_module_name);
1798: END IF;
1799: --
1800: RETURN prespecified;
1801: END IF;
1807: --
1808: -- Debug Statements
1809: --
1810: IF l_debug_on THEN
1811: WSH_DEBUG_SV.pop(l_module_name);
1812: END IF;
1813: --
1814: RETURN p_item_loc_code;
1815: ELSE
1819: --
1820: -- Debug Statements
1821: --
1822: IF l_debug_on THEN
1823: WSH_DEBUG_SV.pop(l_module_name);
1824: END IF;
1825: --
1826: RETURN prespecified;
1827: ELSIF (l_neg_inv_code = 1) THEN
1828: --
1829: -- Debug Statements
1830: --
1831: IF l_debug_on THEN
1832: WSH_DEBUG_SV.pop(l_module_name);
1833: END IF;
1834: --
1835: RETURN dynamic;
1836: ELSE
1839: --
1840: -- Debug Statements
1841: --
1842: IF l_debug_on THEN
1843: WSH_DEBUG_SV.pop(l_module_name);
1844: END IF;
1845: --
1846: RETURN prespecified;
1847: END IF;
1853: WHEN FND_API.G_EXC_ERROR THEN
1854: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1855: WSH_UTIL_CORE.Add_Message(l_return_status);
1856: IF l_debug_on THEN
1857: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1858: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1859: END IF;
1860:
1861: WHEN others THEN
1854: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
1855: WSH_UTIL_CORE.Add_Message(l_return_status);
1856: IF l_debug_on THEN
1857: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1858: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1859: END IF;
1860:
1861: WHEN others THEN
1862: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Locator_Ctl_Code');
1864: --
1865: -- Debug Statements
1866: --
1867: IF l_debug_on THEN
1868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1870: END IF;
1871: --
1872: END Locator_Ctl_Code;
1865: -- Debug Statements
1866: --
1867: IF l_debug_on THEN
1868: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1869: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1870: END IF;
1871: --
1872: END Locator_Ctl_Code;
1873:
1941: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1942: --
1943: IF l_debug_on IS NULL
1944: THEN
1945: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1946: END IF;
1947: --
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.push(l_module_name);
1945: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1946: END IF;
1947: --
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.push(l_module_name);
1950: --
1951: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1952: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
1953: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
1947: --
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.push(l_module_name);
1950: --
1951: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1952: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
1953: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
1954: END IF;
1955: --
1948: IF l_debug_on THEN
1949: WSH_DEBUG_SV.push(l_module_name);
1950: --
1951: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1952: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
1953: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
1954: END IF;
1955: --
1956: OPEN Fetch_Detail_Info;
1949: WSH_DEBUG_SV.push(l_module_name);
1950: --
1951: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
1952: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
1953: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
1954: END IF;
1955: --
1956: OPEN Fetch_Detail_Info;
1957:
1965: --
1966: -- Debug Statements
1967: --
1968: IF l_debug_on THEN
1969: WSH_DEBUG_SV.pop(l_module_name);
1970: END IF;
1971: --
1972: return;
1973: END IF;
1983: --
1984: -- Debug Statements
1985: --
1986: IF l_debug_on THEN
1987: WSH_DEBUG_SV.pop(l_module_name);
1988: END IF;
1989: --
1990: return;
1991: END IF;
2000: CLOSE c_temp_id;
2001: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2002: --
2003: IF l_debug_on THEN
2004: WSH_DEBUG_SV.log(l_module_name,'Return Status is error',x_return_status);
2005: WSH_DEBUG_SV.pop(l_module_name);
2006: END IF;
2007: --
2008: return;
2001: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
2002: --
2003: IF l_debug_on THEN
2004: WSH_DEBUG_SV.log(l_module_name,'Return Status is error',x_return_status);
2005: WSH_DEBUG_SV.pop(l_module_name);
2006: END IF;
2007: --
2008: return;
2009: --}
2015: --
2016: -- Debug Statements
2017: --
2018: IF l_debug_on THEN
2019: WSH_DEBUG_SV.log(l_module_name,'transaction_temp_id',l_transaction_temp_id);
2020: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_MARK_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
2021: END IF;
2022: --
2023: -- bug 5028993
2016: -- Debug Statements
2017: --
2018: IF l_debug_on THEN
2019: WSH_DEBUG_SV.log(l_module_name,'transaction_temp_id',l_transaction_temp_id);
2020: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_MARK_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
2021: END IF;
2022: --
2023: -- bug 5028993
2024: -- if serial_number is not null, while calling mark_serial,
2042: --
2043: -- Debug Statements
2044: --
2045: IF l_debug_on THEN
2046: WSH_DEBUG_SV.pop(l_module_name);
2047: END IF;
2048: --
2049: return;
2050: END IF;
2053: --
2054: -- Debug Statements
2055: --
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.pop(l_module_name);
2058: END IF;
2059: --
2060: return;
2061:
2069: --
2070: -- Debug Statements
2071: --
2072: IF l_debug_on THEN
2073: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_MARK_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
2074: END IF;
2075: --
2076: -- Fix for bug 2762219.
2077: -- if transaction_Temp_id is not null, while calling mark_serial,
2101: --
2102: -- Debug Statements
2103: --
2104: IF l_debug_on THEN
2105: WSH_DEBUG_SV.pop(l_module_name);
2106: END IF;
2107: --
2108: return;
2109: END IF;
2117: --
2118: -- Debug Statements
2119: --
2120: IF l_debug_on THEN
2121: WSH_DEBUG_SV.pop(l_module_name);
2122: END IF;
2123: --
2124: EXCEPTION
2125:
2130: --
2131: -- Debug Statements
2132: --
2133: IF l_debug_on THEN
2134: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2136: END IF;
2137: --
2138: END Mark_Serial_Number;
2131: -- Debug Statements
2132: --
2133: IF l_debug_on THEN
2134: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2135: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2136: END IF;
2137: --
2138: END Mark_Serial_Number;
2139:
2196: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2197: --
2198: IF l_debug_on IS NULL
2199: THEN
2200: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2201: END IF;
2202: --
2203: IF l_debug_on THEN
2204: WSH_DEBUG_SV.push(l_module_name);
2200: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2201: END IF;
2202: --
2203: IF l_debug_on THEN
2204: WSH_DEBUG_SV.push(l_module_name);
2205: --
2206: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2207: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER_CODE',P_SERIAL_NUMBER_CODE);
2208: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
2202: --
2203: IF l_debug_on THEN
2204: WSH_DEBUG_SV.push(l_module_name);
2205: --
2206: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2207: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER_CODE',P_SERIAL_NUMBER_CODE);
2208: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
2209: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
2210: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2203: IF l_debug_on THEN
2204: WSH_DEBUG_SV.push(l_module_name);
2205: --
2206: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2207: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER_CODE',P_SERIAL_NUMBER_CODE);
2208: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
2209: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
2210: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2211: END IF;
2204: WSH_DEBUG_SV.push(l_module_name);
2205: --
2206: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2207: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER_CODE',P_SERIAL_NUMBER_CODE);
2208: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
2209: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
2210: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2211: END IF;
2212: --
2205: --
2206: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2207: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER_CODE',P_SERIAL_NUMBER_CODE);
2208: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
2209: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
2210: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2211: END IF;
2212: --
2213: IF p_serial_number_code IS NULL OR p_serial_number_code = 1 THEN
2206: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2207: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER_CODE',P_SERIAL_NUMBER_CODE);
2208: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
2209: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',P_TRANSACTION_TEMP_ID);
2210: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2211: END IF;
2212: --
2213: IF p_serial_number_code IS NULL OR p_serial_number_code = 1 THEN
2214: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_SER_CODE_UNMARK');
2217: --
2218: -- Debug Statements
2219: --
2220: IF l_debug_on THEN
2221: WSH_DEBUG_SV.pop(l_module_name);
2222: END IF;
2223: --
2224: return;
2225: END IF;
2231: --
2232: -- Debug Statements
2233: --
2234: IF l_debug_on THEN
2235: WSH_DEBUG_SV.pop(l_module_name);
2236: END IF;
2237: --
2238: return;
2239: END IF;
2251: --
2252: -- Debug Statements
2253: --
2254: IF l_debug_on THEN
2255: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_UNMARK_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
2256: END IF;
2257: --
2258: Serial_Check.Inv_Unmark_Serial(
2259: p_serial_number,
2268: --
2269: -- Debug Statements
2270: --
2271: IF l_debug_on THEN
2272: WSH_DEBUG_SV.pop(l_module_name);
2273: END IF;
2274: --
2275: return;
2276:
2292: --
2293: -- Debug Statements
2294: --
2295: IF l_debug_on THEN
2296: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_UNMARK_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
2297: END IF;
2298: --
2299: Serial_Check.Inv_Unmark_Serial(
2300: c.fm_Serial_number ,
2317: --
2318: -- Debug Statements
2319: --
2320: IF l_debug_on THEN
2321: WSH_DEBUG_SV.pop(l_module_name);
2322: END IF;
2323: --
2324: return;
2325: END IF;
2328: --
2329: -- Debug Statements
2330: --
2331: IF l_debug_on THEN
2332: WSH_DEBUG_SV.pop(l_module_name);
2333: END IF;
2334: --
2335: return;
2336:
2341: --
2342: -- Debug Statements
2343: --
2344: IF l_debug_on THEN
2345: WSH_DEBUG_SV.pop(l_module_name);
2346: END IF;
2347: --
2348: EXCEPTION
2349:
2354: --
2355: -- Debug Statements
2356: --
2357: IF l_debug_on THEN
2358: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2359: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2360: END IF;
2361: --
2362: END Unmark_Serial_Number;
2355: -- Debug Statements
2356: --
2357: IF l_debug_on THEN
2358: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2359: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2360: END IF;
2361: --
2362: END Unmark_Serial_Number;
2363:
2406: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2407: --
2408: IF l_debug_on IS NULL
2409: THEN
2410: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2411: END IF;
2412: --
2413: IF l_debug_on THEN
2414: WSH_DEBUG_SV.push(l_module_name);
2410: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2411: END IF;
2412: --
2413: IF l_debug_on THEN
2414: WSH_DEBUG_SV.push(l_module_name);
2415: --
2416: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2412: --
2413: IF l_debug_on THEN
2414: WSH_DEBUG_SV.push(l_module_name);
2415: --
2416: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2419: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2420: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2413: IF l_debug_on THEN
2414: WSH_DEBUG_SV.push(l_module_name);
2415: --
2416: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2419: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2420: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2421: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2414: WSH_DEBUG_SV.push(l_module_name);
2415: --
2416: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2419: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2420: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2421: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2422: END IF;
2415: --
2416: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2419: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2420: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2421: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2422: END IF;
2423: --
2416: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2419: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2420: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2421: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2422: END IF;
2423: --
2424: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2417: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2418: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2419: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2420: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2421: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2422: END IF;
2423: --
2424: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2425:
2427: --
2428: -- Debug Statements
2429: --
2430: IF l_debug_on THEN
2431: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.ORGANIZATION',WSH_DEBUG_SV.C_PROC_LEVEL);
2432: END IF;
2433: --
2434: l_result := INV_VALIDATE.organization(g_org);
2435: IF (l_result <> INV_VALIDATE.T) THEN
2442: --
2443: -- Debug Statements
2444: --
2445: IF l_debug_on THEN
2446: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.INVENTORY_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
2447: END IF;
2448: --
2449: l_result := wsh_delivery_details_inv.inventory_item(
2450: p_item => g_item,
2460: --
2461: -- Debug Statements
2462: --
2463: IF l_debug_on THEN
2464: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.FROM_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
2465: END IF;
2466: --
2467: l_result := INV_VALIDATE.From_subinventory(
2468: p_sub => g_sub,
2482: --
2483: -- Debug Statements
2484: --
2485: IF l_debug_on THEN
2486: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.VALIDATELOCATOR',WSH_DEBUG_SV.C_PROC_LEVEL);
2487: END IF;
2488: --
2489: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
2490: l_result := INV_VALIDATE.ValidateLocator(
2510: --
2511: -- Debug Statements
2512: --
2513: IF l_debug_on THEN
2514: WSH_DEBUG_SV.pop(l_module_name);
2515: END IF;
2516: --
2517: EXCEPTION
2518:
2523: --
2524: -- Debug Statements
2525: --
2526: IF l_debug_on THEN
2527: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2529: END IF;
2530: --
2531: END Validate_Locator;
2524: -- Debug Statements
2525: --
2526: IF l_debug_on THEN
2527: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2528: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2529: END IF;
2530: --
2531: END Validate_Locator;
2532:
2568: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2569: --
2570: IF l_debug_on IS NULL
2571: THEN
2572: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2573: END IF;
2574: --
2575: IF l_debug_on THEN
2576: WSH_DEBUG_SV.push(l_module_name);
2572: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2573: END IF;
2574: --
2575: IF l_debug_on THEN
2576: WSH_DEBUG_SV.push(l_module_name);
2577: --
2578: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2579: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2580: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2574: --
2575: IF l_debug_on THEN
2576: WSH_DEBUG_SV.push(l_module_name);
2577: --
2578: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2579: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2580: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2581: END IF;
2582: --
2575: IF l_debug_on THEN
2576: WSH_DEBUG_SV.push(l_module_name);
2577: --
2578: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2579: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2580: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2581: END IF;
2582: --
2583: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2576: WSH_DEBUG_SV.push(l_module_name);
2577: --
2578: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2579: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2580: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2581: END IF;
2582: --
2583: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2584: g_org.organization_id := p_organization_id;
2585: --
2586: -- Debug Statements
2587: --
2588: IF l_debug_on THEN
2589: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.ORGANIZATION',WSH_DEBUG_SV.C_PROC_LEVEL);
2590: END IF;
2591: --
2592: l_result := INV_VALIDATE.organization(g_org);
2593: IF (l_result <> INV_VALIDATE.T) THEN
2600: --
2601: -- Debug Statements
2602: --
2603: IF l_debug_on THEN
2604: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.INVENTORY_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
2605: END IF;
2606: --
2607: l_result := wsh_delivery_details_inv.inventory_item(
2608: p_item => g_item,
2617: --
2618: -- Debug Statements
2619: --
2620: IF l_debug_on THEN
2621: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.REVISION',WSH_DEBUG_SV.C_PROC_LEVEL);
2622: END IF;
2623: --
2624: l_result := INV_VALIDATE.Revision(
2625: p_revision => p_revision,
2636: --
2637: -- Debug Statements
2638: --
2639: IF l_debug_on THEN
2640: WSH_DEBUG_SV.pop(l_module_name);
2641: END IF;
2642: --
2643: EXCEPTION
2644: WHEN others THEN
2648: --
2649: -- Debug Statements
2650: --
2651: IF l_debug_on THEN
2652: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2654: END IF;
2655: --
2656: END Validate_Revision;
2649: -- Debug Statements
2650: --
2651: IF l_debug_on THEN
2652: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2653: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2654: END IF;
2655: --
2656: END Validate_Revision;
2657:
2703: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2704: --
2705: IF l_debug_on IS NULL
2706: THEN
2707: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2708: END IF;
2709: --
2710: IF l_debug_on THEN
2711: WSH_DEBUG_SV.push(l_module_name);
2707: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2708: END IF;
2709: --
2710: IF l_debug_on THEN
2711: WSH_DEBUG_SV.push(l_module_name);
2712: --
2713: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2709: --
2710: IF l_debug_on THEN
2711: WSH_DEBUG_SV.push(l_module_name);
2712: --
2713: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2716: WSH_DEBUG_SV.log(l_module_name,'P_TO_SUBINVENTORY',P_TO_SUBINVENTORY);
2717: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2710: IF l_debug_on THEN
2711: WSH_DEBUG_SV.push(l_module_name);
2712: --
2713: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2716: WSH_DEBUG_SV.log(l_module_name,'P_TO_SUBINVENTORY',P_TO_SUBINVENTORY);
2717: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2718: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2711: WSH_DEBUG_SV.push(l_module_name);
2712: --
2713: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2716: WSH_DEBUG_SV.log(l_module_name,'P_TO_SUBINVENTORY',P_TO_SUBINVENTORY);
2717: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2718: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2719: END IF;
2712: --
2713: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2716: WSH_DEBUG_SV.log(l_module_name,'P_TO_SUBINVENTORY',P_TO_SUBINVENTORY);
2717: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2718: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2719: END IF;
2720: --
2713: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2716: WSH_DEBUG_SV.log(l_module_name,'P_TO_SUBINVENTORY',P_TO_SUBINVENTORY);
2717: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2718: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2719: END IF;
2720: --
2721: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2714: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2715: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2716: WSH_DEBUG_SV.log(l_module_name,'P_TO_SUBINVENTORY',P_TO_SUBINVENTORY);
2717: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2718: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2719: END IF;
2720: --
2721: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2722: g_org.organization_id := p_organization_id;
2723: --
2724: -- Debug Statements
2725: --
2726: IF l_debug_on THEN
2727: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.ORGANIZATION',WSH_DEBUG_SV.C_PROC_LEVEL);
2728: END IF;
2729: --
2730: l_result := INV_VALIDATE.organization(g_org);
2731: IF (l_result <> INV_VALIDATE.T) THEN
2738: --
2739: -- Debug Statements
2740: --
2741: IF l_debug_on THEN
2742: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.INVENTORY_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
2743: END IF;
2744: --
2745: l_result := wsh_delivery_details_inv.inventory_item(
2746: p_item => g_item,
2758: --
2759: -- Debug Statements
2760: --
2761: IF l_debug_on THEN
2762: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.FROM_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
2763: END IF;
2764: --
2765: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
2766: l_result := INV_VALIDATE.from_subinventory(
2790: --
2791: -- Debug Statements
2792: --
2793: IF l_debug_on THEN
2794: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.TO_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
2795: END IF;
2796: --
2797: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
2798: l_result := INV_VALIDATE.to_subinventory(
2825: --
2826: -- Debug Statements
2827: --
2828: IF l_debug_on THEN
2829: WSH_DEBUG_SV.pop(l_module_name);
2830: END IF;
2831: --
2832: EXCEPTION
2833:
2838: --
2839: -- Debug Statements
2840: --
2841: IF l_debug_on THEN
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2844: END IF;
2845: --
2846: END Validate_Subinventory;
2839: -- Debug Statements
2840: --
2841: IF l_debug_on THEN
2842: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2844: END IF;
2845: --
2846: END Validate_Subinventory;
2847:
2893: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2894: --
2895: IF l_debug_on IS NULL
2896: THEN
2897: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2898: END IF;
2899: --
2900: IF l_debug_on THEN
2901: WSH_DEBUG_SV.push(l_module_name);
2897: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2898: END IF;
2899: --
2900: IF l_debug_on THEN
2901: WSH_DEBUG_SV.push(l_module_name);
2902: --
2903: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2899: --
2900: IF l_debug_on THEN
2901: WSH_DEBUG_SV.push(l_module_name);
2902: --
2903: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2900: IF l_debug_on THEN
2901: WSH_DEBUG_SV.push(l_module_name);
2902: --
2903: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2901: WSH_DEBUG_SV.push(l_module_name);
2902: --
2903: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2909: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2902: --
2903: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2909: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2910: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2903: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2909: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2910: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2911: END IF;
2904: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2909: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2910: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2911: END IF;
2912: --
2905: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2909: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2910: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2911: END IF;
2912: --
2913: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2906: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
2907: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
2908: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
2909: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
2910: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
2911: END IF;
2912: --
2913: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2914: g_org.organization_id := p_organization_id;
2920: --
2921: -- Debug Statements
2922: --
2923: IF l_debug_on THEN
2924: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.ORGANIZATION',WSH_DEBUG_SV.C_PROC_LEVEL);
2925: END IF;
2926: --
2927: l_result := INV_VALIDATE.organization(g_org);
2928: IF (l_result <> INV_VALIDATE.T) THEN
2936: --
2937: -- Debug Statements
2938: --
2939: IF l_debug_on THEN
2940: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.INVENTORY_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
2941: END IF;
2942: --
2943: l_result := wsh_delivery_details_inv.inventory_item(
2944: p_item => g_item,
2954: --
2955: -- Debug Statements
2956: --
2957: IF l_debug_on THEN
2958: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.FROM_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
2959: END IF;
2960: --
2961: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
2962: l_result := INV_VALIDATE.From_Subinventory(
2981: --
2982: -- Debug Statements
2983: --
2984: IF l_debug_on THEN
2985: WSH_DEBUG_SV.pop(l_module_name);
2986: END IF;
2987: --
2988: RETURN;
2989: END IF;
2993: --
2994: -- Debug Statements
2995: --
2996: IF l_debug_on THEN
2997: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.VALIDATELOCATOR',WSH_DEBUG_SV.C_PROC_LEVEL);
2998: END IF;
2999: --
3000: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
3001: l_result := INV_VALIDATE.validateLocator(
3020: --
3021: -- Debug Statements
3022: --
3023: IF l_debug_on THEN
3024: WSH_DEBUG_SV.pop(l_module_name);
3025: END IF;
3026: --
3027: RETURN;
3028: END IF;
3031: --
3032: -- Debug Statements
3033: --
3034: IF l_debug_on THEN
3035: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.LOT_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
3036: END IF;
3037: --
3038: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
3039: l_result := INV_VALIDATE.lot_number(
3065: --
3066: -- Debug Statements
3067: --
3068: IF l_debug_on THEN
3069: WSH_DEBUG_SV.pop(l_module_name);
3070: END IF;
3071: --
3072: EXCEPTION
3073: WHEN others THEN
3077: --
3078: -- Debug Statements
3079: --
3080: IF l_debug_on THEN
3081: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3083: END IF;
3084: --
3085: END Validate_lot_number;
3078: -- Debug Statements
3079: --
3080: IF l_debug_on THEN
3081: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3082: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3083: END IF;
3084: --
3085: END Validate_lot_number;
3086:
3132: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3133: --
3134: IF l_debug_on IS NULL
3135: THEN
3136: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3137: END IF;
3138: --
3139: IF l_debug_on THEN
3140: WSH_DEBUG_SV.push(l_module_name);
3136: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3137: END IF;
3138: --
3139: IF l_debug_on THEN
3140: WSH_DEBUG_SV.push(l_module_name);
3141: --
3142: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3138: --
3139: IF l_debug_on THEN
3140: WSH_DEBUG_SV.push(l_module_name);
3141: --
3142: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3139: IF l_debug_on THEN
3140: WSH_DEBUG_SV.push(l_module_name);
3141: --
3142: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3140: WSH_DEBUG_SV.push(l_module_name);
3141: --
3142: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3141: --
3142: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3149: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
3142: WSH_DEBUG_SV.log(l_module_name,'P_SERIAL_NUMBER',P_SERIAL_NUMBER);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3149: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
3150: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
3143: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3149: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
3150: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
3151: END IF;
3144: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3149: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
3150: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
3151: END IF;
3152: --
3145: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3149: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
3150: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
3151: END IF;
3152: --
3153: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3146: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3147: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
3148: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3149: WSH_DEBUG_SV.log(l_module_name,'p_transaction_type_id',p_transaction_type_id);
3150: WSH_DEBUG_SV.log(l_module_name,'p_object_type',p_object_type);
3151: END IF;
3152: --
3153: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3154: g_org.organization_id := p_organization_id;
3155: --
3156: -- Debug Statements
3157: --
3158: IF l_debug_on THEN
3159: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.ORGANIZATION',WSH_DEBUG_SV.C_PROC_LEVEL);
3160: END IF;
3161: --
3162: l_result := INV_VALIDATE.organization(g_org);
3163: IF (l_result <> INV_VALIDATE.T) THEN
3168: --
3169: -- Debug Statements
3170: --
3171: IF l_debug_on THEN
3172: WSH_DEBUG_SV.pop(l_module_name);
3173: END IF;
3174: --
3175: RETURN;
3176: END IF;
3178: --
3179: -- Debug Statements
3180: --
3181: IF l_debug_on THEN
3182: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.INVENTORY_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
3183: END IF;
3184: --
3185: l_result := wsh_delivery_details_inv.inventory_item(
3186: p_item => g_item,
3193: --
3194: -- Debug Statements
3195: --
3196: IF l_debug_on THEN
3197: WSH_DEBUG_SV.pop(l_module_name);
3198: END IF;
3199: --
3200: RETURN;
3201: END IF;
3204: --
3205: -- Debug Statements
3206: --
3207: IF l_debug_on THEN
3208: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.FROM_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
3209: END IF;
3210: --
3211: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
3212: l_result := INV_VALIDATE.From_Subinventory(
3231: --
3232: -- Debug Statements
3233: --
3234: IF l_debug_on THEN
3235: WSH_DEBUG_SV.pop(l_module_name);
3236: END IF;
3237: --
3238: RETURN;
3239: END IF;
3245: --
3246: -- Debug Statements
3247: --
3248: IF l_debug_on THEN
3249: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.VALIDATELOCATOR',WSH_DEBUG_SV.C_PROC_LEVEL);
3250: END IF;
3251: --
3252: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
3253: l_result := INV_VALIDATE.validateLocator(
3272: --
3273: -- Debug Statements
3274: --
3275: IF l_debug_on THEN
3276: WSH_DEBUG_SV.pop(l_module_name);
3277: END IF;
3278: --
3279: RETURN;
3280: END IF;
3285: --
3286: -- Debug Statements
3287: --
3288: IF l_debug_on THEN
3289: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.LOT_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
3290: END IF;
3291: --
3292: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
3293: l_result := INV_VALIDATE.Lot_Number(
3316: --
3317: -- Debug Statements
3318: --
3319: IF l_debug_on THEN
3320: WSH_DEBUG_SV.pop(l_module_name);
3321: END IF;
3322: --
3323: RETURN;
3324: END IF;
3328: --
3329: -- Debug Statements
3330: --
3331: IF l_debug_on THEN
3332: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.VALIDATE_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
3333: END IF;
3334: --
3335: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
3336: l_result := INV_VALIDATE.Validate_serial(
3363: --
3364: -- Debug Statements
3365: --
3366: IF l_debug_on THEN
3367: WSH_DEBUG_SV.pop(l_module_name);
3368: END IF;
3369: --
3370: EXCEPTION
3371:
3376: --
3377: -- Debug Statements
3378: --
3379: IF l_debug_on THEN
3380: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3382: END IF;
3383: --
3384: END Validate_Serial;
3377: -- Debug Statements
3378: --
3379: IF l_debug_on THEN
3380: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3381: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3382: END IF;
3383: --
3384: END Validate_Serial;
3385:
3434: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3435: --
3436: IF l_debug_on IS NULL
3437: THEN
3438: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3439: END IF;
3440: --
3441: IF l_debug_on THEN
3442: WSH_DEBUG_SV.push(l_module_name);
3438: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3439: END IF;
3440: --
3441: IF l_debug_on THEN
3442: WSH_DEBUG_SV.push(l_module_name);
3443: --
3444: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3445: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3446: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3440: --
3441: IF l_debug_on THEN
3442: WSH_DEBUG_SV.push(l_module_name);
3443: --
3444: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3445: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3446: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3447: END IF;
3448: --
3441: IF l_debug_on THEN
3442: WSH_DEBUG_SV.push(l_module_name);
3443: --
3444: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3445: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3446: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3447: END IF;
3448: --
3449: OPEN Check_Dup_Loc;
3442: WSH_DEBUG_SV.push(l_module_name);
3443: --
3444: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3445: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
3446: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
3447: END IF;
3448: --
3449: OPEN Check_Dup_Loc;
3450: FETCH Check_Dup_Loc INTO l_temp;
3460: --
3461: -- Debug Statements
3462: --
3463: IF l_debug_on THEN
3464: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_CORE.GET_ORG_NAME',WSH_DEBUG_SV.C_PROC_LEVEL);
3465: END IF;
3466: --
3467: l_temp := WSH_UTIL_CORE.Get_Org_Name(p_organization_id);
3468: FND_MESSAGE.SET_TOKEN('ORG_NAME',l_temp);
3472: --
3473: -- Debug Statements
3474: --
3475: IF l_debug_on THEN
3476: WSH_DEBUG_SV.pop(l_module_name);
3477: END IF;
3478: --
3479: return;
3480:
3496: --
3497: -- Debug Statements
3498: --
3499: IF l_debug_on THEN
3500: WSH_DEBUG_SV.pop(l_module_name);
3501: END IF;
3502: --
3503: return;
3504: END IF;
3508: --
3509: -- Debug Statements
3510: --
3511: IF l_debug_on THEN
3512: WSH_DEBUG_SV.pop(l_module_name);
3513: END IF;
3514: --
3515: EXCEPTION
3516:
3521: --
3522: -- Debug Statements
3523: --
3524: IF l_debug_on THEN
3525: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3526: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3527: END IF;
3528: --
3529: END Update_Locator_Subinv;
3522: -- Debug Statements
3523: --
3524: IF l_debug_on THEN
3525: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3526: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3527: END IF;
3528: --
3529: END Update_Locator_Subinv;
3530:
3582: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3583: --
3584: IF l_debug_on IS NULL
3585: THEN
3586: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3587: END IF;
3588: --
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.push(l_module_name);
3586: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3587: END IF;
3588: --
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.push(l_module_name);
3591: --
3592: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3593: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3594: END IF;
3588: --
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.push(l_module_name);
3591: --
3592: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3593: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3594: END IF;
3595: --
3596: IF p_delivery_detail_id IS NULL THEN
3589: IF l_debug_on THEN
3590: WSH_DEBUG_SV.push(l_module_name);
3591: --
3592: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3593: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
3594: END IF;
3595: --
3596: IF p_delivery_detail_id IS NULL THEN
3597: FND_MESSAGE.SET_NAME('WSH','WSH_DET_INVALID_DETAIL');
3600: --
3601: -- Debug Statements
3602: --
3603: IF l_debug_on THEN
3604: WSH_DEBUG_SV.pop(l_module_name);
3605: END IF;
3606: --
3607: return l_ser_qty;
3608: END IF;
3624: --
3625: -- Debug Statements
3626: --
3627: IF l_debug_on THEN
3628: WSH_DEBUG_SV.pop(l_module_name);
3629: END IF;
3630: --
3631: return l_ser_qty;
3632: END IF;
3640: --
3641: -- Debug Statements
3642: --
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.pop(l_module_name);
3645: END IF;
3646: --
3647: return l_ser_qty;
3648: END IF;
3654: --
3655: -- Debug Statements
3656: --
3657: IF l_debug_on THEN
3658: WSH_DEBUG_SV.pop(l_module_name);
3659: END IF;
3660: --
3661: return l_ser_qty;
3662: END IF;
3668: --
3669: -- Debug Statements
3670: --
3671: IF l_debug_on THEN
3672: WSH_DEBUG_SV.pop(l_module_name);
3673: END IF;
3674: --
3675: return l_ser_qty;
3676: END IF;
3689: --
3690: -- Debug Statements
3691: --
3692: IF l_debug_on THEN
3693: WSH_DEBUG_SV.pop(l_module_name);
3694: END IF;
3695: --
3696: return l_ser_qty;
3697: END IF;
3703: --
3704: -- Debug Statements
3705: --
3706: IF l_debug_on THEN
3707: WSH_DEBUG_SV.pop(l_module_name);
3708: END IF;
3709: --
3710: return nvl(l_ser_qty,0);
3711:
3721: --
3722: -- Debug Statements
3723: --
3724: IF l_debug_on THEN
3725: WSH_DEBUG_SV.pop(l_module_name);
3726: END IF;
3727: --
3728: return l_ser_qty;
3729: END IF;
3731: --
3732: -- Debug Statements
3733: --
3734: IF l_debug_on THEN
3735: WSH_DEBUG_SV.pop(l_module_name);
3736: END IF;
3737: --
3738: return nvl(l_ser_qty,0);
3739:
3746: --
3747: -- Debug Statements
3748: --
3749: IF l_debug_on THEN
3750: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3751: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3752: END IF;
3753: --
3754: return l_ser_qty;
3747: -- Debug Statements
3748: --
3749: IF l_debug_on THEN
3750: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3751: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3752: END IF;
3753: --
3754: return l_ser_qty;
3755:
3784: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3785: --
3786: IF l_debug_on IS NULL
3787: THEN
3788: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3789: END IF;
3790: --
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.push(l_module_name);
3788: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3789: END IF;
3790: --
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.push(l_module_name);
3793: --
3794: WSH_DEBUG_SV.log(l_module_name,'X_ITEM_ID',X_ITEM_ID);
3795: WSH_DEBUG_SV.log(l_module_name,'X_ORGANIZATION_ID',X_ORGANIZATION_ID);
3796: WSH_DEBUG_SV.log(l_module_name,'X_PICKABLE_FLAG',X_PICKABLE_FLAG);
3790: --
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.push(l_module_name);
3793: --
3794: WSH_DEBUG_SV.log(l_module_name,'X_ITEM_ID',X_ITEM_ID);
3795: WSH_DEBUG_SV.log(l_module_name,'X_ORGANIZATION_ID',X_ORGANIZATION_ID);
3796: WSH_DEBUG_SV.log(l_module_name,'X_PICKABLE_FLAG',X_PICKABLE_FLAG);
3797: END IF;
3798: --
3791: IF l_debug_on THEN
3792: WSH_DEBUG_SV.push(l_module_name);
3793: --
3794: WSH_DEBUG_SV.log(l_module_name,'X_ITEM_ID',X_ITEM_ID);
3795: WSH_DEBUG_SV.log(l_module_name,'X_ORGANIZATION_ID',X_ORGANIZATION_ID);
3796: WSH_DEBUG_SV.log(l_module_name,'X_PICKABLE_FLAG',X_PICKABLE_FLAG);
3797: END IF;
3798: --
3799:
3792: WSH_DEBUG_SV.push(l_module_name);
3793: --
3794: WSH_DEBUG_SV.log(l_module_name,'X_ITEM_ID',X_ITEM_ID);
3795: WSH_DEBUG_SV.log(l_module_name,'X_ORGANIZATION_ID',X_ORGANIZATION_ID);
3796: WSH_DEBUG_SV.log(l_module_name,'X_PICKABLE_FLAG',X_PICKABLE_FLAG);
3797: END IF;
3798: --
3799:
3800: --Bug 5352779
3800: --Bug 5352779
3801: IF (x_item_id IS NULL) OR (x_organization_id IS NULL) THEN
3802: --
3803: IF l_debug_on THEN
3804: WSH_DEBUG_SV.pop(l_module_name);
3805: END IF;
3806: --
3807: return 'Y';
3808: END IF;
3837: --
3838: -- Debug Statements
3839: --
3840: IF l_debug_on THEN
3841: WSH_DEBUG_SV.pop(l_module_name);
3842: END IF;
3843: --
3844: return l_flag;
3845:
3848: WHEN FND_API.G_EXC_ERROR THEN
3849: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3850: WSH_UTIL_CORE.Add_Message(l_return_status);
3851: IF l_debug_on THEN
3852: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3853: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3854: END IF;
3855: --
3856: return 'Y';
3849: l_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3850: WSH_UTIL_CORE.Add_Message(l_return_status);
3851: IF l_debug_on THEN
3852: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
3853: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
3854: END IF;
3855: --
3856: return 'Y';
3857:
3860: --
3861: -- Debug Statements
3862: --
3863: IF l_debug_on THEN
3864: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3865: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3866: END IF;
3867: --
3868: RETURN 'Y';
3861: -- Debug Statements
3862: --
3863: IF l_debug_on THEN
3864: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3865: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3866: END IF;
3867: --
3868: RETURN 'Y';
3869:
3917: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3918: --
3919: IF l_debug_on IS NULL
3920: THEN
3921: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3922: END IF;
3923: --
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.push(l_module_name);
3921: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3922: END IF;
3923: --
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.push(l_module_name);
3926: --
3927: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3923: --
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.push(l_module_name);
3926: --
3927: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3930: WSH_DEBUG_SV.log(l_module_name,'P_PICKABLE_FLAG',P_PICKABLE_FLAG);
3931: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3924: IF l_debug_on THEN
3925: WSH_DEBUG_SV.push(l_module_name);
3926: --
3927: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3930: WSH_DEBUG_SV.log(l_module_name,'P_PICKABLE_FLAG',P_PICKABLE_FLAG);
3931: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3932: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3925: WSH_DEBUG_SV.push(l_module_name);
3926: --
3927: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3930: WSH_DEBUG_SV.log(l_module_name,'P_PICKABLE_FLAG',P_PICKABLE_FLAG);
3931: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3932: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3933: END IF;
3926: --
3927: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3930: WSH_DEBUG_SV.log(l_module_name,'P_PICKABLE_FLAG',P_PICKABLE_FLAG);
3931: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3932: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3933: END IF;
3934: --
3927: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3930: WSH_DEBUG_SV.log(l_module_name,'P_PICKABLE_FLAG',P_PICKABLE_FLAG);
3931: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3932: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3933: END IF;
3934: --
3935: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3928: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
3929: WSH_DEBUG_SV.log(l_module_name,'P_RELEASED_STATUS',P_RELEASED_STATUS);
3930: WSH_DEBUG_SV.log(l_module_name,'P_PICKABLE_FLAG',P_PICKABLE_FLAG);
3931: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
3932: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
3933: END IF;
3934: --
3935: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
3936:
3940: --
3941: -- Debug Statements
3942: --
3943: IF l_debug_on THEN
3944: WSH_DEBUG_SV.pop(l_module_name);
3945: END IF;
3946: --
3947: return 'N' ;
3948: END IF;
3953: --
3954: -- Debug Statements
3955: --
3956: IF l_debug_on THEN
3957: WSH_DEBUG_SV.pop(l_module_name);
3958: END IF;
3959: --
3960: RETURN g_cache_reservable_flag;
3961: END IF;
3984: --
3985: -- Debug Statements
3986: --
3987: IF l_debug_on THEN
3988: WSH_DEBUG_SV.pop(l_module_name);
3989: END IF;
3990: --
3991: RETURN g_cache_reservable_flag;
3992:
3995: WHEN FND_API.G_EXC_ERROR THEN
3996: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3997: WSH_UTIL_CORE.Add_Message(x_return_status);
3998: IF l_debug_on THEN
3999: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4001: END IF;
4002:
4003: WHEN OTHERS THEN
3996: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
3997: WSH_UTIL_CORE.Add_Message(x_return_status);
3998: IF l_debug_on THEN
3999: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4000: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4001: END IF;
4002:
4003: WHEN OTHERS THEN
4004: WSH_UTIL_CORE.Default_Handler('WSH_DELIVERY_DETAILS_INV.Line_Reserved');
4006: --
4007: -- Debug Statements
4008: --
4009: IF l_debug_on THEN
4010: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4011: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4012: END IF;
4013: --
4014: RETURN NULL;
4007: -- Debug Statements
4008: --
4009: IF l_debug_on THEN
4010: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4011: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4012: END IF;
4013: --
4014: RETURN NULL;
4015:
4064: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4065: --
4066: IF l_debug_on IS NULL
4067: THEN
4068: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4069: END IF;
4070: --
4071: IF l_debug_on THEN
4072: WSH_DEBUG_SV.push(l_module_name);
4068: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4069: END IF;
4070: --
4071: IF l_debug_on THEN
4072: WSH_DEBUG_SV.push(l_module_name);
4073: --
4074: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4070: --
4071: IF l_debug_on THEN
4072: WSH_DEBUG_SV.push(l_module_name);
4073: --
4074: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4071: IF l_debug_on THEN
4072: WSH_DEBUG_SV.push(l_module_name);
4073: --
4074: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4072: WSH_DEBUG_SV.push(l_module_name);
4073: --
4074: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4073: --
4074: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4074: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4075: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4076: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4084: WSH_DEBUG_SV.log(l_module_name,'p_serial_number_type_id',p_serial_number_type_id);
4077: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4084: WSH_DEBUG_SV.log(l_module_name,'p_serial_number_type_id',p_serial_number_type_id);
4085: WSH_DEBUG_SV.log(l_module_name,'p_source_document_type_id',p_source_document_type_id);
4078: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4084: WSH_DEBUG_SV.log(l_module_name,'p_serial_number_type_id',p_serial_number_type_id);
4085: WSH_DEBUG_SV.log(l_module_name,'p_source_document_type_id',p_source_document_type_id);
4086:
4079: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4084: WSH_DEBUG_SV.log(l_module_name,'p_serial_number_type_id',p_serial_number_type_id);
4085: WSH_DEBUG_SV.log(l_module_name,'p_source_document_type_id',p_source_document_type_id);
4086:
4087: END IF;
4080: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4084: WSH_DEBUG_SV.log(l_module_name,'p_serial_number_type_id',p_serial_number_type_id);
4085: WSH_DEBUG_SV.log(l_module_name,'p_source_document_type_id',p_source_document_type_id);
4086:
4087: END IF;
4088: --
4081: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4082: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4083: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4084: WSH_DEBUG_SV.log(l_module_name,'p_serial_number_type_id',p_serial_number_type_id);
4085: WSH_DEBUG_SV.log(l_module_name,'p_source_document_type_id',p_source_document_type_id);
4086:
4087: END IF;
4088: --
4089: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4132: --
4133: -- Debug Statements
4134: --
4135: IF l_debug_on THEN
4136: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.TRX_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
4137: END IF;
4138: --
4139: trx_action_id := WSH_DETAILS_VALIDATIONS.Trx_Id('TRX_ACTION_ID',
4140: p_source_line_id,
4151: --
4152: -- Debug Statements
4153: --
4154: IF l_debug_on THEN
4155: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_SERIAL_NUMBER_PUB.VALIDATE_SERIALS',WSH_DEBUG_SV.C_PROC_LEVEL);
4156: END IF;
4157: --
4158:
4159:
4187: --
4188: -- Debug Statements
4189: --
4190: IF l_debug_on THEN
4191: WSH_DEBUG_SV.pop(l_module_name);
4192: END IF;
4193: --
4194: EXCEPTION
4195:
4196: WHEN FND_API.G_EXC_ERROR THEN
4197: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4198: WSH_UTIL_CORE.Add_Message(x_return_status);
4199: IF l_debug_on THEN
4200: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4201: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4202: END IF;
4203:
4204: WHEN WSH_INVALID_SER_NUM THEN
4197: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4198: WSH_UTIL_CORE.Add_Message(x_return_status);
4199: IF l_debug_on THEN
4200: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4201: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4202: END IF;
4203:
4204: WHEN WSH_INVALID_SER_NUM THEN
4205: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4205: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4206: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_SER_NUM');
4207: WSH_UTIL_CORE.Add_Message(x_return_status);
4208: IF l_debug_on THEN
4209: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4210: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_SER_NUM');
4211: END IF;
4212:
4213: WHEN others THEN
4206: FND_MESSAGE.SET_NAME('WSH','WSH_INVALID_SER_NUM');
4207: WSH_UTIL_CORE.Add_Message(x_return_status);
4208: IF l_debug_on THEN
4209: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4210: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INVALID_SER_NUM');
4211: END IF;
4212:
4213: WHEN others THEN
4214: IF c_header_info%ISOPEN THEN
4220: --
4221: -- Debug Statements
4222: --
4223: IF l_debug_on THEN
4224: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4225: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4226: END IF;
4227:
4228: --
4221: -- Debug Statements
4222: --
4223: IF l_debug_on THEN
4224: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4225: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4226: END IF;
4227:
4228: --
4229: END Create_Dynamic_Serial;
4296: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4297: --
4298: IF l_debug_on IS NULL
4299: THEN
4300: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4301: END IF;
4302: --
4303: IF l_debug_on THEN
4304: WSH_DEBUG_SV.push(l_module_name);
4300: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4301: END IF;
4302: --
4303: IF l_debug_on THEN
4304: WSH_DEBUG_SV.push(l_module_name);
4305: WSH_DEBUG_SV.log(l_module_name, 'From Serial Num',p_from_serial_number);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4301: END IF;
4302: --
4303: IF l_debug_on THEN
4304: WSH_DEBUG_SV.push(l_module_name);
4305: WSH_DEBUG_SV.log(l_module_name, 'From Serial Num',p_from_serial_number);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4302: --
4303: IF l_debug_on THEN
4304: WSH_DEBUG_SV.push(l_module_name);
4305: WSH_DEBUG_SV.log(l_module_name, 'From Serial Num',p_from_serial_number);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4303: IF l_debug_on THEN
4304: WSH_DEBUG_SV.push(l_module_name);
4305: WSH_DEBUG_SV.log(l_module_name, 'From Serial Num',p_from_serial_number);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4304: WSH_DEBUG_SV.push(l_module_name);
4305: WSH_DEBUG_SV.log(l_module_name, 'From Serial Num',p_from_serial_number);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4305: WSH_DEBUG_SV.log(l_module_name, 'From Serial Num',p_from_serial_number);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4306: WSH_DEBUG_SV.log(l_module_name, 'To Serial Num', p_to_serial_number);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4314: WSH_DEBUG_SV.log(l_module_name, 'p_transaction_type_id', p_transaction_type_id);
4307: WSH_DEBUG_SV.log(l_module_name, 'Lot Number', p_lot_number);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4314: WSH_DEBUG_SV.log(l_module_name, 'p_transaction_type_id', p_transaction_type_id);
4315: WSH_DEBUG_SV.log(l_module_name, 'p_object_type', p_object_type);
4308: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', p_organization_id);
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4314: WSH_DEBUG_SV.log(l_module_name, 'p_transaction_type_id', p_transaction_type_id);
4315: WSH_DEBUG_SV.log(l_module_name, 'p_object_type', p_object_type);
4316: END IF;
4309: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item id', p_inventory_item_id);
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4314: WSH_DEBUG_SV.log(l_module_name, 'p_transaction_type_id', p_transaction_type_id);
4315: WSH_DEBUG_SV.log(l_module_name, 'p_object_type', p_object_type);
4316: END IF;
4317: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4310: WSH_DEBUG_SV.log(l_module_name, 'Subinventory', p_subinventory);
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4314: WSH_DEBUG_SV.log(l_module_name, 'p_transaction_type_id', p_transaction_type_id);
4315: WSH_DEBUG_SV.log(l_module_name, 'p_object_type', p_object_type);
4316: END IF;
4317: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4318: g_org.organization_id := p_organization_id;
4311: WSH_DEBUG_SV.log(l_module_name, 'Revision', p_revision);
4312: WSH_DEBUG_SV.log(l_module_name, 'Locator Id', p_locator_id);
4313: WSH_DEBUG_SV.log(l_module_name, 'Quantity', p_quantity);
4314: WSH_DEBUG_SV.log(l_module_name, 'p_transaction_type_id', p_transaction_type_id);
4315: WSH_DEBUG_SV.log(l_module_name, 'p_object_type', p_object_type);
4316: END IF;
4317: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4318: g_org.organization_id := p_organization_id;
4319:
4317: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4318: g_org.organization_id := p_organization_id;
4319:
4320: IF l_debug_on THEN
4321: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.ORGANIZATION',WSH_DEBUG_SV.C_PROC_LEVEL);
4322: END IF;
4323:
4324: l_result := INV_VALIDATE.organization(g_org);
4325:
4323:
4324: l_result := INV_VALIDATE.organization(g_org);
4325:
4326: IF(l_debug_on) THEN
4327: wsh_debug_sv.log(l_module_name, 'Org Result', l_result);
4328: END IF;
4329:
4330: IF (l_result <> INV_VALIDATE.T) THEN
4331: FND_MESSAGE.SET_NAME('WSH','WSH_INV_INVALID');
4334: END IF;
4335: g_item.inventory_item_id := p_inventory_item_id;
4336:
4337: IF l_debug_on THEN
4338: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.INVENTORY_ITEM',WSH_DEBUG_SV.C_PROC_LEVEL);
4339: END IF;
4340: l_result := wsh_delivery_details_inv.inventory_item(
4341: p_item => g_item,
4342: p_org => g_org);
4341: p_item => g_item,
4342: p_org => g_org);
4343:
4344: IF(l_debug_on) THEN
4345: wsh_debug_sv.log(l_module_name, 'Inv Item Result', l_result);
4346: END IF;
4347:
4348: IF (l_result <> INV_VALIDATE.T) THEN
4349: FND_MESSAGE.SET_NAME('WSH','WSH_INV_INVALID');
4353:
4354: g_sub.secondary_inventory_name := p_subinventory;
4355:
4356: IF l_debug_on THEN
4357: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.FROM_SUBINVENTORY',WSH_DEBUG_SV.C_PROC_LEVEL);
4358: END IF;
4359: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
4360: l_result := INV_VALIDATE.From_Subinventory(
4361: p_org => g_org,
4371: p_item => g_item,
4372: p_acct_txn => 1);
4373: END IF;
4374: IF(l_debug_on) THEN
4375: wsh_debug_sv.log(l_module_name, 'Subinv Result', l_result);
4376: END IF;
4377:
4378: IF (l_result <> INV_VALIDATE.T) THEN
4379: FND_MESSAGE.SET_NAME('WSH','WSH_INV_INVALID');
4385: -- Need to check if locator is NULL cause inventory validation API will
4386: -- validate on flex field and return false when locator is NULL
4387: IF (p_locator_id IS NOT NULL) THEN
4388: IF l_debug_on THEN
4389: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.VALIDATELOCATOR',WSH_DEBUG_SV.C_PROC_LEVEL);
4390: END IF;
4391: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
4392: l_result := INV_VALIDATE.validateLocator(
4393: p_locator => g_loc,
4403: p_sub => g_sub,
4404: p_item => g_item);
4405: END IF;
4406: IF(l_debug_on) THEN
4407: wsh_debug_sv.log(l_module_name, 'Locator Result', l_result);
4408: END IF;
4409:
4410: IF (l_result = INV_VALIDATE.F) THEN
4411: FND_MESSAGE.SET_NAME('WSH','WSH_INV_INVALID');
4416:
4417: g_lot.lot_number := p_lot_number;
4418: IF (p_lot_number IS NOT NULL) THEN
4419: IF l_debug_on THEN
4420: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.LOT_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
4421: END IF;
4422: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
4423: l_result := INV_VALIDATE.Lot_Number(
4424: p_lot => g_lot,
4438: p_loc => g_loc,
4439: p_revision => p_revision);
4440: END IF;
4441: IF(l_debug_on) THEN
4442: wsh_debug_sv.log(l_module_name, 'Lot Number Result', l_result);
4443: END IF;
4444:
4445: IF (l_result <> INV_VALIDATE.T) THEN
4446: FND_MESSAGE.SET_NAME('WSH','WSH_INV_INVALID');
4449: END IF;
4450: END IF;
4451:
4452: IF l_debug_on THEN
4453: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit MTL_SERIAL_CHECK.INV_SERIAL_INFO',WSH_DEBUG_SV.C_PROC_LEVEL);
4454: END IF;
4455:
4456: IF NOT MTL_SERIAL_CHECK.INV_SERIAL_INFO(p_from_serial_number => p_from_serial_number ,
4457: p_to_serial_number => p_to_serial_number ,
4462: x_errorcode => x_errorcode)
4463: THEN
4464: x_result := FALSE;
4465: IF l_debug_on THEN
4466: WSH_DEBUG_SV.pop(l_module_name);
4467: END IF;
4468: RETURN;
4469: END IF;
4470: IF (x_quantity <> p_quantity) THEN
4469: END IF;
4470: IF (x_quantity <> p_quantity) THEN
4471: x_result := false;
4472: IF l_debug_on THEN
4473: WSH_DEBUG_SV.pop(l_module_name);
4474: END IF;
4475: RETURN;
4476: END IF;
4477: l_number_part := TO_NUMBER(l_FROM_NUMBER);
4479: -- Get the length of the serial number
4480: l_length := length(p_from_serial_number);
4481:
4482: IF(l_debug_on) THEN
4483: wsh_debug_sv.log(l_module_name, 'Length ', l_length);
4484: END IF;
4485:
4486: IF p_transaction_type_id IS NOT NULL AND p_object_type IS NOT NULL THEN
4487: l_fm_serial(1) := p_from_serial_number;
4503: ELSE
4504: x_result := FALSE;
4505: FOR i in 1..x_errored_serials.count LOOP
4506: IF l_debug_on THEN
4507: wsh_debug_sv.log(l_module_name, 'errored serial_number'||to_char(i), x_errored_serials(i));
4508: END IF;
4509: END LOOP;
4510: END IF;
4511: ELSE
4517: l_padded_length := l_length - length(l_number_part);
4518: g_serial.serial_number := RPAD(nvl(x_Prefix,'0'), l_padded_length, '0') ||l_number_part;
4519:
4520: IF l_debug_on THEN
4521: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_VALIDATE.VALIDATE_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
4522: END IF;
4523: l_result := INV_VALIDATE.Validate_serial(
4524: p_serial => g_serial,
4525: p_lot => g_lot,
4529: p_loc => g_loc,
4530: p_revision => p_revision);
4531:
4532: IF l_debug_on THEN
4533: wsh_debug_sv.log(l_module_name, 'Serial Result', l_result);
4534: END IF;
4535:
4536: IF (l_result = INV_VALIDATE.T) THEN
4537: x_result := TRUE;
4548: x_result := FALSE;
4549: END IF;
4550: END IF;
4551: IF l_debug_on THEN
4552: WSH_DEBUG_SV.pop(l_module_name);
4553: END IF;
4554:
4555: EXCEPTION
4556: WHEN FND_API.G_EXC_ERROR THEN
4556: WHEN FND_API.G_EXC_ERROR THEN
4557: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4558: WSH_UTIL_CORE.Add_Message(x_return_status);
4559: IF l_debug_on THEN
4560: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4561: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4562: END IF;
4563:
4564: WHEN others THEN
4557: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4558: WSH_UTIL_CORE.Add_Message(x_return_status);
4559: IF l_debug_on THEN
4560: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4561: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4562: END IF;
4563:
4564: WHEN others THEN
4565: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4564: WHEN others THEN
4565: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4566: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Validate_Serial_Range');
4567: IF l_debug_on THEN
4568: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4569: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4570: END IF;
4571:
4572: END Validate_Serial_Range;
4565: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4566: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Validate_Serial_Range');
4567: IF l_debug_on THEN
4568: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4569: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4570: END IF;
4571:
4572: END Validate_Serial_Range;
4573:
4616: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4617: --
4618: IF l_debug_on IS NULL
4619: THEN
4620: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4621: END IF;
4622: --
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.push(l_module_name);
4620: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4621: END IF;
4622: --
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.push(l_module_name);
4625: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4621: END IF;
4622: --
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.push(l_module_name);
4625: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4622: --
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.push(l_module_name);
4625: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4623: IF l_debug_on THEN
4624: WSH_DEBUG_SV.push(l_module_name);
4625: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4624: WSH_DEBUG_SV.push(l_module_name);
4625: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4625: WSH_DEBUG_SV.log(l_module_name,'P_FROM_NUMBER',P_FROM_NUMBER);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4626: WSH_DEBUG_SV.log(l_module_name,'P_TO_NUMBER',P_TO_NUMBER);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4634: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4627: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4634: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4635: WSH_DEBUG_SV.log(l_module_name, 'P_QUANTITY',p_quantity);
4628: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4634: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4635: WSH_DEBUG_SV.log(l_module_name, 'P_QUANTITY',p_quantity);
4636: END IF;
4629: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4634: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4635: WSH_DEBUG_SV.log(l_module_name, 'P_QUANTITY',p_quantity);
4636: END IF;
4637:
4630: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4634: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4635: WSH_DEBUG_SV.log(l_module_name, 'P_QUANTITY',p_quantity);
4636: END IF;
4637:
4638: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4631: WSH_DEBUG_SV.log(l_module_name,'P_REVISION',P_REVISION);
4632: WSH_DEBUG_SV.log(l_module_name,'P_LOT_NUMBER',P_LOT_NUMBER);
4633: WSH_DEBUG_SV.log(l_module_name,'P_SUBINVENTORY',P_SUBINVENTORY);
4634: WSH_DEBUG_SV.log(l_module_name,'P_LOCATOR_ID',P_LOCATOR_ID);
4635: WSH_DEBUG_SV.log(l_module_name, 'P_QUANTITY',p_quantity);
4636: END IF;
4637:
4638: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4639:
4659: end if;
4660: close c_header_info;
4661:
4662: IF l_debug_on THEN
4663: WSH_DEBUG_SV.log(l_module_name, 'Serial Number Type', l_serial_number_type);
4664: END IF;
4665:
4666: l_to_number := p_to_number;
4667:
4665:
4666: l_to_number := p_to_number;
4667:
4668: IF l_debug_on THEN
4669: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.TRX_ID',WSH_DEBUG_SV.C_PROC_LEVEL);
4670: END IF;
4671: l_trx_action_id := WSH_DETAILS_VALIDATIONS.Trx_Id('TRX_ACTION_ID',
4672: p_source_line_id,
4673: l_header_info.source_document_type_id);
4678: l_trx_source_type := '2';
4679: END IF;
4680:
4681: IF l_debug_on THEN
4682: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_SERIAL_NUMBER_PUB.VALIDATE_SERIALS',WSH_DEBUG_SV.C_PROC_LEVEL);
4683: END IF;
4684:
4685: l_return := INV_SERIAL_NUMBER_PUB.VALIDATE_SERIALS(
4686: p_org_id => p_organization_id,
4706:
4707:
4708:
4709: IF l_debug_on THEN
4710: wsh_debug_sv.log(l_module_name, 'Quantity', l_quantity);
4711: wsh_debug_sv.log(l_module_name, 'Prefix', l_prefix);
4712: END IF;
4713: IF (l_quantity <> p_quantity) THEN
4714: fnd_message.set_name('WSH', 'WSH_SERIAL_NUM_WRG_RANGE');
4707:
4708:
4709: IF l_debug_on THEN
4710: wsh_debug_sv.log(l_module_name, 'Quantity', l_quantity);
4711: wsh_debug_sv.log(l_module_name, 'Prefix', l_prefix);
4712: END IF;
4713: IF (l_quantity <> p_quantity) THEN
4714: fnd_message.set_name('WSH', 'WSH_SERIAL_NUM_WRG_RANGE');
4715: RAISE FND_API.G_EXC_ERROR;
4717:
4718: x_prefix := l_prefix;
4719:
4720: IF l_debug_on THEN
4721: WSH_DEBUG_SV.pop(l_module_name);
4722: END IF;
4723:
4724: EXCEPTION
4725: WHEN FND_API.G_EXC_ERROR THEN
4725: WHEN FND_API.G_EXC_ERROR THEN
4726: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4727: WSH_UTIL_CORE.Add_Message(x_return_status);
4728: IF l_debug_on THEN
4729: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4731: END IF;
4732: WHEN others THEN
4733: /*IF c_serial_type%ISOPEN THEN
4726: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4727: WSH_UTIL_CORE.Add_Message(x_return_status);
4728: IF l_debug_on THEN
4729: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4730: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
4731: END IF;
4732: WHEN others THEN
4733: /*IF c_serial_type%ISOPEN THEN
4734: close c_serial_type;
4739: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4740: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Create_Dynamic_Serial_Range');
4741:
4742: IF l_debug_on THEN
4743: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4745: END IF;
4746:
4747: END Create_Dynamic_Serial_Range;
4740: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Create_Dynamic_Serial_Range');
4741:
4742: IF l_debug_on THEN
4743: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4744: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4745: END IF;
4746:
4747: END Create_Dynamic_Serial_Range;
4748:
4770:
4771: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4772: --
4773: IF l_debug_on IS NULL THEN
4774: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4775: END IF;
4776:
4777: IF l_debug_on THEN
4778: WSH_DEBUG_SV.push(l_module_name);
4774: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4775: END IF;
4776:
4777: IF l_debug_on THEN
4778: WSH_DEBUG_SV.push(l_module_name);
4779: WSH_DEBUG_SV.log(l_module_name,'p_line_inv_rec.delivery_detail_id', p_line_inv_rec.delivery_detail_id);
4780: END IF;
4781:
4782: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4775: END IF;
4776:
4777: IF l_debug_on THEN
4778: WSH_DEBUG_SV.push(l_module_name);
4779: WSH_DEBUG_SV.log(l_module_name,'p_line_inv_rec.delivery_detail_id', p_line_inv_rec.delivery_detail_id);
4780: END IF;
4781:
4782: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4783:
4781:
4782: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4783:
4784: IF l_debug_on THEN
4785: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WMS_SHIPPING_INTERFACE_GRP.process_delivery_details',WSH_DEBUG_SV.C_PROC_LEVEL);
4786: END IF;
4787:
4788: -- Call to WMS API to check/default catch weights
4789:
4806: x_msg_count => l_msg_count,
4807: x_msg_data => l_msg_data);
4808:
4809: IF l_debug_on THEN
4810: WSH_DEBUG_SV.log(l_module_name,'return status after calling WMS_SHIPPING_INTERFACE_GRP.process_delivery_details', x_return_status);
4811: WSH_DEBUG_SV.log(l_module_name,'status of dd after calling WMS_SHIPPING_INTERFACE_GRP.process_delivery_details', l_wms_table(1).return_status);
4812: END IF;
4813:
4814: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) OR
4807: x_msg_data => l_msg_data);
4808:
4809: IF l_debug_on THEN
4810: WSH_DEBUG_SV.log(l_module_name,'return status after calling WMS_SHIPPING_INTERFACE_GRP.process_delivery_details', x_return_status);
4811: WSH_DEBUG_SV.log(l_module_name,'status of dd after calling WMS_SHIPPING_INTERFACE_GRP.process_delivery_details', l_wms_table(1).return_status);
4812: END IF;
4813:
4814: IF (x_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR, WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)) OR
4815: (l_wms_table(1).return_status = 'E')
4820: WSH_UTIL_CORE.Add_Message(x_return_status);
4821: END IF;
4822:
4823: IF l_debug_on THEN
4824: WSH_DEBUG_SV.pop(l_module_name);
4825: END IF;
4826:
4827: EXCEPTION
4828:
4830: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4831: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Check_Default_Catch_Weights');
4832:
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4836: END IF;
4837:
4838: END Check_Default_Catch_Weights;
4831: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Check_Default_Catch_Weights');
4832:
4833: IF l_debug_on THEN
4834: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4835: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4836: END IF;
4837:
4838: END Check_Default_Catch_Weights;
4839:
4880:
4881: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
4882: IF l_debug_on IS NULL
4883: THEN
4884: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4885: END IF;
4886: IF l_debug_on THEN
4887: WSH_DEBUG_SV.push(l_module_name);
4888: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
4883: THEN
4884: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4885: END IF;
4886: IF l_debug_on THEN
4887: WSH_DEBUG_SV.push(l_module_name);
4888: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
4889: WSH_DEBUG_SV.log(l_module_name,'p_inventory_item_id',p_inventory_item_id);
4890: END IF;
4891:
4884: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
4885: END IF;
4886: IF l_debug_on THEN
4887: WSH_DEBUG_SV.push(l_module_name);
4888: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
4889: WSH_DEBUG_SV.log(l_module_name,'p_inventory_item_id',p_inventory_item_id);
4890: END IF;
4891:
4892: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4885: END IF;
4886: IF l_debug_on THEN
4887: WSH_DEBUG_SV.push(l_module_name);
4888: WSH_DEBUG_SV.log(l_module_name,'p_organization_id',p_organization_id);
4889: WSH_DEBUG_SV.log(l_module_name,'p_inventory_item_id',p_inventory_item_id);
4890: END IF;
4891:
4892: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4893:
4905: );
4906:
4907: IF l_flag = 'U' AND l_index IS NOT NULL THEN
4908: IF l_debug_on THEN
4909: WSH_DEBUG_SV.log(l_module_name,'Org is not cached yet: ',p_organization_id);
4910: WSH_DEBUG_SV.log(l_module_name,'Item_id is not cached yet: ',p_inventory_item_id);
4911: END IF ;
4912: OPEN c_item_info (p_organization_id,p_inventory_item_id);
4913:
4906:
4907: IF l_flag = 'U' AND l_index IS NOT NULL THEN
4908: IF l_debug_on THEN
4909: WSH_DEBUG_SV.log(l_module_name,'Org is not cached yet: ',p_organization_id);
4910: WSH_DEBUG_SV.log(l_module_name,'Item_id is not cached yet: ',p_inventory_item_id);
4911: END IF ;
4912: OPEN c_item_info (p_organization_id,p_inventory_item_id);
4913:
4914: FETCH c_item_info INTO l_cache_rec;
4922: -- add record to cache
4923: g_item_tab(l_index) := l_cache_rec;
4924: ELSE
4925: IF l_debug_on THEN
4926: WSH_DEBUG_SV.log(l_module_name,'Org is already chached: ',p_organization_id);
4927: WSH_DEBUG_SV.log(l_module_name,'Inv_item_id is already chached',p_inventory_item_id);
4928: END IF;
4929: -- retrieve record from cache
4930: l_cache_rec := g_item_tab(l_index);
4923: g_item_tab(l_index) := l_cache_rec;
4924: ELSE
4925: IF l_debug_on THEN
4926: WSH_DEBUG_SV.log(l_module_name,'Org is already chached: ',p_organization_id);
4927: WSH_DEBUG_SV.log(l_module_name,'Inv_item_id is already chached',p_inventory_item_id);
4928: END IF;
4929: -- retrieve record from cache
4930: l_cache_rec := g_item_tab(l_index);
4931: END IF;
4938: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4939: wsh_util_core.add_message(x_return_status,l_module_name);
4940:
4941: IF l_debug_on THEN
4942: WSH_DEBUG_SV.pop(l_module_name);
4943: END IF;
4944:
4945: RETURN;
4946: END IF;
4972:
4973: ELSE -- Both or one is NULL (Org and Inv_item)
4974: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4975: IF l_debug_on THEN
4976: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
4977: END IF;
4978: --
4979: RETURN;
4980: END IF;
4979: RETURN;
4980: END IF;
4981:
4982: IF l_debug_on THEN
4983: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.primary_uom_code',x_mtl_system_items_rec.primary_uom_code);
4984: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_uom_code',x_mtl_system_items_rec.secondary_uom_code);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4980: END IF;
4981:
4982: IF l_debug_on THEN
4983: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.primary_uom_code',x_mtl_system_items_rec.primary_uom_code);
4984: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_uom_code',x_mtl_system_items_rec.secondary_uom_code);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4981:
4982: IF l_debug_on THEN
4983: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.primary_uom_code',x_mtl_system_items_rec.primary_uom_code);
4984: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_uom_code',x_mtl_system_items_rec.secondary_uom_code);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4982: IF l_debug_on THEN
4983: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.primary_uom_code',x_mtl_system_items_rec.primary_uom_code);
4984: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_uom_code',x_mtl_system_items_rec.secondary_uom_code);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4983: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.primary_uom_code',x_mtl_system_items_rec.primary_uom_code);
4984: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_uom_code',x_mtl_system_items_rec.secondary_uom_code);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4984: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_uom_code',x_mtl_system_items_rec.secondary_uom_code);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4985: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.secondary_default_ind',x_mtl_system_items_rec.secondary_default_ind);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4986: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_control_code',x_mtl_system_items_rec.lot_control_code);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4987: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.tracking_quantity_ind',x_mtl_system_items_rec.tracking_quantity_ind);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4988: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_low',x_mtl_system_items_rec.dual_uom_deviation_low);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4996: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.mtl_transactions_enabled_flag',x_mtl_system_items_rec.mtl_transactions_enabled_flag);
4989: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.dual_uom_deviation_high',x_mtl_system_items_rec.dual_uom_deviation_high);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4996: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.mtl_transactions_enabled_flag',x_mtl_system_items_rec.mtl_transactions_enabled_flag);
4997: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
4990: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.enabled_flag',x_mtl_system_items_rec.enabled_flag);
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4996: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.mtl_transactions_enabled_flag',x_mtl_system_items_rec.mtl_transactions_enabled_flag);
4997: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
4998: END IF;
4991: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.shippable_item_flag',x_mtl_system_items_rec.shippable_item_flag);
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4996: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.mtl_transactions_enabled_flag',x_mtl_system_items_rec.mtl_transactions_enabled_flag);
4997: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
4998: END IF;
4999:
4992: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.inventory_item_flag',x_mtl_system_items_rec.inventory_item_flag);
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4996: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.mtl_transactions_enabled_flag',x_mtl_system_items_rec.mtl_transactions_enabled_flag);
4997: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
4998: END IF;
4999:
5000: EXCEPTION
4993: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.lot_divisible_flag',x_mtl_system_items_rec.lot_divisible_flag);
4994: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.container_item_flag',x_mtl_system_items_rec.container_item_flag);
4995: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.reservable_type',x_mtl_system_items_rec.reservable_type);
4996: WSH_DEBUG_SV.log(l_module_name,'x_mtl_system_items_rec.mtl_transactions_enabled_flag',x_mtl_system_items_rec.mtl_transactions_enabled_flag);
4997: WSH_DEBUG_SV.pop(l_module_name,x_return_status);
4998: END IF;
4999:
5000: EXCEPTION
5001:
5003: wsh_util_core.default_handler ('WSH_DELIVERY_DETAILS_INV .Get_item_information');
5004: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5005:
5006: IF l_debug_on THEN
5007: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5008: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5009: END IF;
5010:
5011: IF c_item_info%isopen THEN
5004: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5005:
5006: IF l_debug_on THEN
5007: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5008: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5009: END IF;
5010:
5011: IF c_item_info%isopen THEN
5012: close c_item_info;
5048: --
5049: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5050: --
5051: IF l_debug_on IS NULL THEN
5052: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5053: END IF;
5054: --
5055: IF l_debug_on THEN
5056: WSH_DEBUG_SV.push(l_module_name);
5052: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5053: END IF;
5054: --
5055: IF l_debug_on THEN
5056: WSH_DEBUG_SV.push(l_module_name);
5057: WSH_DEBUG_SV.log(l_module_name,'P_FROM_SERIAL_NUMBER',P_FROM_SERIAL_NUMBER);
5058: WSH_DEBUG_SV.log(l_module_name,'P_TO_SERIAL_NUMBER',P_TO_SERIAL_NUMBER);
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5053: END IF;
5054: --
5055: IF l_debug_on THEN
5056: WSH_DEBUG_SV.push(l_module_name);
5057: WSH_DEBUG_SV.log(l_module_name,'P_FROM_SERIAL_NUMBER',P_FROM_SERIAL_NUMBER);
5058: WSH_DEBUG_SV.log(l_module_name,'P_TO_SERIAL_NUMBER',P_TO_SERIAL_NUMBER);
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5061: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',
5054: --
5055: IF l_debug_on THEN
5056: WSH_DEBUG_SV.push(l_module_name);
5057: WSH_DEBUG_SV.log(l_module_name,'P_FROM_SERIAL_NUMBER',P_FROM_SERIAL_NUMBER);
5058: WSH_DEBUG_SV.log(l_module_name,'P_TO_SERIAL_NUMBER',P_TO_SERIAL_NUMBER);
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5061: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',
5062: P_TRANSACTION_TEMP_ID);
5055: IF l_debug_on THEN
5056: WSH_DEBUG_SV.push(l_module_name);
5057: WSH_DEBUG_SV.log(l_module_name,'P_FROM_SERIAL_NUMBER',P_FROM_SERIAL_NUMBER);
5058: WSH_DEBUG_SV.log(l_module_name,'P_TO_SERIAL_NUMBER',P_TO_SERIAL_NUMBER);
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5061: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',
5062: P_TRANSACTION_TEMP_ID);
5063: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
5056: WSH_DEBUG_SV.push(l_module_name);
5057: WSH_DEBUG_SV.log(l_module_name,'P_FROM_SERIAL_NUMBER',P_FROM_SERIAL_NUMBER);
5058: WSH_DEBUG_SV.log(l_module_name,'P_TO_SERIAL_NUMBER',P_TO_SERIAL_NUMBER);
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5061: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',
5062: P_TRANSACTION_TEMP_ID);
5063: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
5064: END IF;
5057: WSH_DEBUG_SV.log(l_module_name,'P_FROM_SERIAL_NUMBER',P_FROM_SERIAL_NUMBER);
5058: WSH_DEBUG_SV.log(l_module_name,'P_TO_SERIAL_NUMBER',P_TO_SERIAL_NUMBER);
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5061: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',
5062: P_TRANSACTION_TEMP_ID);
5063: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
5064: END IF;
5065: --
5059: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
5060: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
5061: WSH_DEBUG_SV.log(l_module_name,'P_TRANSACTION_TEMP_ID',
5062: P_TRANSACTION_TEMP_ID);
5063: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit SERIAL_CHECK.INV_UPDATE_MARKED_SERIAL',WSH_DEBUG_SV.C_PROC_LEVEL);
5064: END IF;
5065: --
5066: Serial_Check.Inv_Update_Marked_Serial (
5067: from_serial_number => p_from_serial_number,
5080: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5081: WSH_UTIL_CORE.Add_Message(x_return_status);
5082: --
5083: IF l_debug_on THEN
5084: WSH_DEBUG_SV.log(l_module_name, 'Return status after INV API',
5085: x_return_status);
5086: WSH_DEBUG_SV.pop(l_module_name);
5087: END IF;
5088: --
5082: --
5083: IF l_debug_on THEN
5084: WSH_DEBUG_SV.log(l_module_name, 'Return status after INV API',
5085: x_return_status);
5086: WSH_DEBUG_SV.pop(l_module_name);
5087: END IF;
5088: --
5089: RETURN;
5090: --
5092: --
5093: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5094: --
5095: IF l_debug_on THEN
5096: WSH_DEBUG_SV.pop(l_module_name);
5097: END IF;
5098: --
5099: EXCEPTION
5100: --
5103: WSH_UTIL_CORE.default_handler('WSH_DELIVERY_DETAILS_INV.Update_Marked_Serial');
5104: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5105: --
5106: IF l_debug_on THEN
5107: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5108: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5109: END IF;
5110: --
5111: END Update_Marked_Serial;
5104: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5105: --
5106: IF l_debug_on THEN
5107: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5108: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5109: END IF;
5110: --
5111: END Update_Marked_Serial;
5112:
5158: --
5159: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5160: --
5161: IF l_debug_on IS NULL THEN
5162: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5163: END IF;
5164: --
5165: IF l_debug_on THEN
5166: WSH_DEBUG_SV.push(l_module_name);
5162: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5163: END IF;
5164: --
5165: IF l_debug_on THEN
5166: WSH_DEBUG_SV.push(l_module_name);
5167: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5168: WSH_DEBUG_SV.log(l_module_name,'p_source_code',p_source_code);
5169: END IF;
5170:
5163: END IF;
5164: --
5165: IF l_debug_on THEN
5166: WSH_DEBUG_SV.push(l_module_name);
5167: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5168: WSH_DEBUG_SV.log(l_module_name,'p_source_code',p_source_code);
5169: END IF;
5170:
5171: IF p_source_code ='OE' THEN --{
5164: --
5165: IF l_debug_on THEN
5166: WSH_DEBUG_SV.push(l_module_name);
5167: WSH_DEBUG_SV.log(l_module_name,'p_source_line_id',p_source_line_id);
5168: WSH_DEBUG_SV.log(l_module_name,'p_source_code',p_source_code);
5169: END IF;
5170:
5171: IF p_source_code ='OE' THEN --{
5172:
5175: IF c_order_line_info%NOTFOUND THEN
5176: CLOSE c_order_line_info;
5177: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5178: IF l_debug_on THEN
5179: WSH_DEBUG_SV.log(l_module_name, 'No data found for order line',p_source_line_id);
5180: WSH_DEBUG_SV.pop(l_module_name);
5181: END IF;
5182: return;
5183: END IF;
5176: CLOSE c_order_line_info;
5177: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5178: IF l_debug_on THEN
5179: WSH_DEBUG_SV.log(l_module_name, 'No data found for order line',p_source_line_id);
5180: WSH_DEBUG_SV.pop(l_module_name);
5181: END IF;
5182: return;
5183: END IF;
5184: CLOSE c_order_line_info;
5190: IF c_po_info%NOTFOUND THEN
5191: CLOSE c_po_info;
5192: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5193: IF l_debug_on THEN
5194: WSH_DEBUG_SV.logmsg(l_module_name, 'No data found for PO '||l_order_line_info.source_document_line_id||' ,'||l_order_line_info.source_document_id);
5195: WSH_DEBUG_SV.pop(l_module_name);
5196: END IF;
5197: return;
5198: END IF;
5191: CLOSE c_po_info;
5192: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5193: IF l_debug_on THEN
5194: WSH_DEBUG_SV.logmsg(l_module_name, 'No data found for PO '||l_order_line_info.source_document_line_id||' ,'||l_order_line_info.source_document_id);
5195: WSH_DEBUG_SV.pop(l_module_name);
5196: END IF;
5197: return;
5198: END IF;
5199: CLOSE c_po_info;
5230: x_transaction_type_id := 32; -- miscellaneous issue
5231: END IF;
5232:
5233: IF l_debug_on THEN
5234: WSH_DEBUG_SV.log(l_module_name, 'x_transaction_type_id',x_transaction_type_id);
5235: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
5236: WSH_DEBUG_SV.pop(l_module_name);
5237: END IF;
5238:
5231: END IF;
5232:
5233: IF l_debug_on THEN
5234: WSH_DEBUG_SV.log(l_module_name, 'x_transaction_type_id',x_transaction_type_id);
5235: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
5236: WSH_DEBUG_SV.pop(l_module_name);
5237: END IF;
5238:
5239: EXCEPTION
5232:
5233: IF l_debug_on THEN
5234: WSH_DEBUG_SV.log(l_module_name, 'x_transaction_type_id',x_transaction_type_id);
5235: WSH_DEBUG_SV.log(l_module_name, 'x_return_status',x_return_status);
5236: WSH_DEBUG_SV.pop(l_module_name);
5237: END IF;
5238:
5239: EXCEPTION
5240:
5252: IF c_mtl_interorg_parameters%isopen THEN
5253: CLOSE c_mtl_interorg_parameters;
5254: END IF;
5255: IF l_debug_on THEN
5256: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5257: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5258: END IF;
5259:
5260: END get_trx_type_id;
5253: CLOSE c_mtl_interorg_parameters;
5254: END IF;
5255: IF l_debug_on THEN
5256: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
5257: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5258: END IF;
5259:
5260: END get_trx_type_id;
5261: