[Home] [Help]
160: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
161: --
162: IF l_debug_on IS NULL
163: THEN
164: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
165: END IF;
166: --
167: IF l_debug_on THEN
168: WSH_DEBUG_SV.push(l_module_name);
164: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
165: END IF;
166: --
167: IF l_debug_on THEN
168: WSH_DEBUG_SV.push(l_module_name);
169: --
170: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
171: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
172: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
166: --
167: IF l_debug_on THEN
168: WSH_DEBUG_SV.push(l_module_name);
169: --
170: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
171: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
172: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
173: END IF;
174: --
167: IF l_debug_on THEN
168: WSH_DEBUG_SV.push(l_module_name);
169: --
170: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
171: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
172: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
173: END IF;
174: --
175: if (p_source_document_type_id <> 10) then /* regular order */
168: WSH_DEBUG_SV.push(l_module_name);
169: --
170: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
171: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
172: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
173: END IF;
174: --
175: if (p_source_document_type_id <> 10) then /* regular order */
176: if (p_mode = 'TRX_ACTION_ID') then
177: --
178: -- Debug Statements
179: --
180: IF l_debug_on THEN
181: WSH_DEBUG_SV.pop(l_module_name);
182: END IF;
183: --
184: return(1); /* 1 = Issue */
185: elsif (p_mode = 'TRX_TYPE_ID') then
186: --
187: -- Debug Statements
188: --
189: IF l_debug_on THEN
190: WSH_DEBUG_SV.pop(l_module_name);
191: END IF;
192: --
193: return(33); /* 33 = Sales Order Issue */
194: end if;
208: --
209: -- Debug Statements
210: --
211: IF l_debug_on THEN
212: WSH_DEBUG_SV.pop(l_module_name);
213: END IF;
214: --
215: Return(34); /* 34 = Stores Issue */
216: Elsif (l_From_Org = l_To_Org) then
217: --
218: -- Debug Statements
219: --
220: IF l_debug_on THEN
221: WSH_DEBUG_SV.pop(l_module_name);
222: END IF;
223: --
224: Return(50); /* 50 = */
225: Elsif (l_From_Org <> l_To_Org) then
226: --
227: -- Debug Statements
228: --
229: IF l_debug_on THEN
230: WSH_DEBUG_SV.pop(l_module_name);
231: END IF;
232: --
233: Return(62); /* 62 = Transit Shipment */
234: End If;
237: --
238: -- Debug Statements
239: --
240: IF l_debug_on THEN
241: WSH_DEBUG_SV.pop(l_module_name);
242: END IF;
243: --
244: Return(1); /* 1 = Issue */
245: Elsif (l_From_Org = l_To_Org) then
246: --
247: -- Debug Statements
248: --
249: IF l_debug_on THEN
250: WSH_DEBUG_SV.pop(l_module_name);
251: END IF;
252: --
253: Return(2); /* 2 = Subinv transfer*/
254: Elsif (l_From_Org <> l_To_Org) then
255: --
256: -- Debug Statements
257: --
258: IF l_debug_on THEN
259: WSH_DEBUG_SV.pop(l_module_name);
260: END IF;
261: --
262: Return(21); /* 62 = Interorg Transfer */
263: End If;
267: WHEN NO_DATA_FOUND THEN
268: -- Debug Statements
269: --
270: IF l_debug_on THEN
271: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
272: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
273: END IF;
274: --
275: Return(0);
268: -- Debug Statements
269: --
270: IF l_debug_on THEN
271: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
272: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
273: END IF;
274: --
275: Return(0);
276: WHEN OTHERS THEN
277: --
278: -- Debug Statements
279: --
280: IF l_debug_on THEN
281: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
282: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
283: END IF;
284: --
285: Return(0);
278: -- Debug Statements
279: --
280: IF l_debug_on THEN
281: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
282: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
283: END IF;
284: --
285: Return(0);
286: END;
317: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
318: --
319: IF l_debug_on IS NULL
320: THEN
321: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
322: END IF;
323: --
324: IF l_debug_on THEN
325: WSH_DEBUG_SV.push(l_module_name);
321: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
322: END IF;
323: --
324: IF l_debug_on THEN
325: WSH_DEBUG_SV.push(l_module_name);
326: --
327: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
328: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
329: END IF;
323: --
324: IF l_debug_on THEN
325: WSH_DEBUG_SV.push(l_module_name);
326: --
327: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
328: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
329: END IF;
330: --
331: serial_num_ctl_code := l_serial_ctl_info.serial_number_control_code;
324: IF l_debug_on THEN
325: WSH_DEBUG_SV.push(l_module_name);
326: --
327: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
328: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
329: END IF;
330: --
331: serial_num_ctl_code := l_serial_ctl_info.serial_number_control_code;
332: IF ( serial_num_ctl_code = 2 OR serial_num_ctl_code = 5 OR
337: --
338: -- Debug Statements
339: --
340: IF l_debug_on THEN
341: WSH_DEBUG_SV.pop(l_module_name);
342: END IF;
343: --
344: RETURN TRUE;
345: ELSE -- serial_num_ctl_code = 1
347: --
348: -- Debug Statements
349: --
350: IF l_debug_on THEN
351: WSH_DEBUG_SV.pop(l_module_name);
352: END IF;
353: --
354: RETURN FALSE;
355: END IF;
375: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
376: --
377: IF l_debug_on IS NULL
378: THEN
379: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
380: END IF;
381: --
382: IF l_debug_on THEN
383: WSH_DEBUG_SV.push(l_module_name);
379: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
380: END IF;
381: --
382: IF l_debug_on THEN
383: WSH_DEBUG_SV.push(l_module_name);
384: END IF;
385: --
386: g_bad_header_ids.delete;
387: g_good_header_ids.delete;
392: --
393: -- Debug Statements
394: --
395: IF l_debug_on THEN
396: WSH_DEBUG_SV.pop(l_module_name);
397: END IF;
398: --
399: end purge_crd_chk_tab;
400:
431: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
432: --
433: IF l_debug_on IS NULL
434: THEN
435: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
436: END IF;
437: --
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.push(l_module_name);
435: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
436: END IF;
437: --
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.push(l_module_name);
440: --
441: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
442: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
443: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
437: --
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.push(l_module_name);
440: --
441: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
442: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
443: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
444: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
445: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
438: IF l_debug_on THEN
439: WSH_DEBUG_SV.push(l_module_name);
440: --
441: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
442: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
443: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
444: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
445: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
446: END IF;
439: WSH_DEBUG_SV.push(l_module_name);
440: --
441: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
442: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
443: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
444: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
445: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
446: END IF;
447: --
440: --
441: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
442: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
443: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
444: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
445: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
446: END IF;
447: --
448: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
441: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
442: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
443: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
444: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
445: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
446: END IF;
447: --
448: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
449:
475: --
476: -- Debug Statements
477: --
478: IF l_debug_on THEN
479: WSH_DEBUG_SV.pop(l_module_name);
480: END IF;
481: --
482: exception
483: when others then
486: --
487: -- Debug Statements
488: --
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
491: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
492: END IF;
493: --
494: END check_shipped_quantity;
487: -- Debug Statements
488: --
489: IF l_debug_on THEN
490: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
491: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
492: END IF;
493: --
494: END check_shipped_quantity;
495:
527: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
528: --
529: IF l_debug_on IS NULL
530: THEN
531: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
532: END IF;
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.push(l_module_name);
531: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
532: END IF;
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.push(l_module_name);
536: --
537: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
538: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
539: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
533: --
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.push(l_module_name);
536: --
537: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
538: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
539: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
540: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
541: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
534: IF l_debug_on THEN
535: WSH_DEBUG_SV.push(l_module_name);
536: --
537: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
538: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
539: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
540: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
541: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
542: END IF;
535: WSH_DEBUG_SV.push(l_module_name);
536: --
537: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
538: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
539: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
540: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
541: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
542: END IF;
543: --
536: --
537: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
538: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
539: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
540: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
541: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
542: END IF;
543: --
544: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
537: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
538: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
539: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
540: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
541: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
542: END IF;
543: --
544: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
545:
557: --
558: -- Debug Statements
559: --
560: IF l_debug_on THEN
561: WSH_DEBUG_SV.pop(l_module_name);
562: END IF;
563: --
564: EXCEPTION
565: WHEN OTHERS THEN
568: --
569: -- Debug Statements
570: --
571: IF l_debug_on THEN
572: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
573: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
574: END IF;
575: --
576: END check_cycle_count_quantity;
569: -- Debug Statements
570: --
571: IF l_debug_on THEN
572: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
573: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
574: END IF;
575: --
576: END check_cycle_count_quantity;
577:
630: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
631: --
632: IF l_debug_on IS NULL
633: THEN
634: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
635: END IF;
636: --
637: IF l_debug_on THEN
638: WSH_DEBUG_SV.push(l_module_name);
634: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
635: END IF;
636: --
637: IF l_debug_on THEN
638: WSH_DEBUG_SV.push(l_module_name);
639: --
640: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
641: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
642: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
636: --
637: IF l_debug_on THEN
638: WSH_DEBUG_SV.push(l_module_name);
639: --
640: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
641: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
642: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
643: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
644: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
637: IF l_debug_on THEN
638: WSH_DEBUG_SV.push(l_module_name);
639: --
640: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
641: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
642: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
643: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
644: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
645: END IF;
638: WSH_DEBUG_SV.push(l_module_name);
639: --
640: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
641: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
642: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
643: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
644: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
645: END IF;
646: --
639: --
640: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
641: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
642: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
643: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
644: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
645: END IF;
646: --
647: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
640: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
641: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
642: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
643: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
644: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
645: END IF;
646: --
647: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
648: /* Bug 2177410, skip validate quantity to avoid error for non-item delivery details */
672: --
673: -- Debug Statements
674: --
675: IF l_debug_on THEN
676: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_DECIMALS_PUB.VALIDATE_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
677: END IF;
678: --
679: inv_decimals_pub.validate_quantity(
680: p_item_id,
686: x_return_status);
687:
688: -- RV DEC_QTY
689: IF l_debug_on THEN
690: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
691: END IF;
692: -- HW OPMCONV - No need to fork the code
693:
694:
719: else --} {
720:
721: if ( p_input_quantity <> ROUND(p_input_quantity, l_max_decimal_digits)) then
722: IF l_debug_on THEN
723: WSH_DEBUG_SV.logmsg(l_module_name,'decimal digits exceed ');
724: END IF;
725: x_output_quantity := ROUND(p_input_quantity, l_max_decimal_digits);
726: else
727: if (x_output_quantity IS NULL) then
731:
732:
733: if ( trunc(abs(p_input_quantity)) > (POWER(10,l_max_real_digits) - 1) ) then
734: IF l_debug_on THEN
735: WSH_DEBUG_SV.logmsg(l_module_name,'real part of number fail');
736: END IF;
737:
738: raise others;
739: end if;
742: --
743: -- Debug Statements
744: --
745: IF l_debug_on THEN
746: WSH_DEBUG_SV.log(l_module_name,'x_output_quantity',x_output_quantity);
747: WSH_DEBUG_SV.pop(l_module_name);
748: END IF;
749: --
750: exception
743: -- Debug Statements
744: --
745: IF l_debug_on THEN
746: WSH_DEBUG_SV.log(l_module_name,'x_output_quantity',x_output_quantity);
747: WSH_DEBUG_SV.pop(l_module_name);
748: END IF;
749: --
750: exception
751: when others then
754: --
755: -- Debug Statements
756: --
757: IF l_debug_on THEN
758: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
759: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
760: END IF;
761: --
762: end check_decimal_quantity;
755: -- Debug Statements
756: --
757: IF l_debug_on THEN
758: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
759: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
760: END IF;
761: --
762: end check_decimal_quantity;
763:
796: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
797: --
798: IF l_debug_on IS NULL
799: THEN
800: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
801: END IF;
802: --
803: IF l_debug_on THEN
804: WSH_DEBUG_SV.push(l_module_name);
800: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
801: END IF;
802: --
803: IF l_debug_on THEN
804: WSH_DEBUG_SV.push(l_module_name);
805: END IF;
806: --
807: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
808:
832: --
833: -- Debug Statements
834: --
835: IF l_debug_on THEN
836: WSH_DEBUG_SV.pop(l_module_name);
837: END IF;
838: --
839: RETURN;
840: else
852: --
853: -- Debug Statements
854: --
855: IF l_debug_on THEN
856: WSH_DEBUG_SV.pop(l_module_name);
857: END IF;
858: --
859: EXCEPTION
860: WHEN others THEN
867: --
868: -- Debug Statements
869: --
870: IF l_debug_on THEN
871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
873: END IF;
874: --
875: END check_unassign_from_delivery ;
868: -- Debug Statements
869: --
870: IF l_debug_on THEN
871: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
872: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
873: END IF;
874: --
875: END check_unassign_from_delivery ;
876:
919: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
920: --
921: IF l_debug_on IS NULL
922: THEN
923: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
924: END IF;
925: --
926: IF l_debug_on THEN
927: WSH_DEBUG_SV.push(l_module_name);
923: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
924: END IF;
925: --
926: IF l_debug_on THEN
927: WSH_DEBUG_SV.push(l_module_name);
928: END IF;
929: --
930: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
931:
951: --
952: -- Debug Statements
953: --
954: IF l_debug_on THEN
955: WSH_DEBUG_SV.pop(l_module_name);
956: END IF;
957: --
958: RETURN;
959:
979: --
980: -- Debug Statements
981: --
982: IF l_debug_on THEN
983: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
984: END IF;
985: --
986: FOR i in 1..p_detail_rows.count LOOP
987:
1003: x_return_status => x_return_status);
1004: --
1005: IF l_debug_on THEN
1006: --
1007: WSH_DEBUG_SV.log(l_module_name, 'Return status from autocreate_deliveries: '|| x_return_status);
1008: --
1009: END IF;
1010: --
1011: -- Bug 2734531 (handle return status correctly)
1021:
1022: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1023: IF l_debug_on THEN
1024: --
1025: WSH_DEBUG_SV.log(l_module_name, 'Done check_assign_del_multi '|| x_return_status);
1026: --
1027: END IF;
1028: --
1029: -- Debug Statements
1028: --
1029: -- Debug Statements
1030: --
1031: IF l_debug_on THEN
1032: WSH_DEBUG_SV.pop(l_module_name);
1033: END IF;
1034: --
1035: EXCEPTION
1036: WHEN assign_error THEN
1040: --
1041: -- Debug Statements
1042: --
1043: IF l_debug_on THEN
1044: WSH_DEBUG_SV.logmsg(l_module_name,'ASSIGN_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1045: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ASSIGN_ERROR');
1046: END IF;
1047: --
1048: WHEN others THEN
1041: -- Debug Statements
1042: --
1043: IF l_debug_on THEN
1044: WSH_DEBUG_SV.logmsg(l_module_name,'ASSIGN_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1045: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ASSIGN_ERROR');
1046: END IF;
1047: --
1048: WHEN others THEN
1049: IF check_assign%ISOPEN THEN
1055: --
1056: -- Debug Statements
1057: --
1058: IF l_debug_on THEN
1059: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1060: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1061: END IF;
1062: --
1063: END check_assign_del_multi;
1056: -- Debug Statements
1057: --
1058: IF l_debug_on THEN
1059: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1060: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1061: END IF;
1062: --
1063: END check_assign_del_multi;
1064:
1165: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1166: --
1167: IF l_debug_on IS NULL
1168: THEN
1169: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1170: END IF;
1171: --
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.push(l_module_name);
1169: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1170: END IF;
1171: --
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.push(l_module_name);
1174: --
1175: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1171: --
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.push(l_module_name);
1174: --
1175: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1179: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1172: IF l_debug_on THEN
1173: WSH_DEBUG_SV.push(l_module_name);
1174: --
1175: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1179: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1180: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1173: WSH_DEBUG_SV.push(l_module_name);
1174: --
1175: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1179: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1180: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1181: END IF;
1174: --
1175: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1179: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1180: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1181: END IF;
1182: --
1175: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1179: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1180: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1181: END IF;
1182: --
1183: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1176: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1179: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1180: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1181: END IF;
1182: --
1183: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1184:
1186: --
1187: -- Debug Statements
1188: --
1189: IF l_debug_on THEN
1190: WSH_DEBUG_SV.pop(l_module_name);
1191: END IF;
1192: --
1193: return;
1194: END IF;
1225: --
1226: -- Debug Statements
1227: --
1228: IF l_debug_on THEN
1229: WSH_DEBUG_SV.pop(l_module_name);
1230: END IF;
1231: --
1232: return;
1233: END IF;
1237: --
1238: -- Debug Statements
1239: --
1240: IF l_debug_on THEN
1241: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID ) ||' FAILED CREDIT CHECK OR IS ON HOLD' );
1242: END IF;
1243: --
1244: raise credit_hold_error;
1245: END IF;
1260: CLOSE get_pr_credit_cache;
1261: IF l_cache_status = 'F' THEN
1262: g_bad_header_ids(l_bad_index) := l_header_id;
1263: IF l_debug_on THEN
1264: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID )
1265: ||' FAILED CREDIT CHECK OR IS ON HOLD' );
1266: END IF;
1267: RAISE credit_hold_error;
1268: ELSIF l_cache_status = 'P' THEN
1283: WHERE HEADER_ID = l_header_id;
1284: END IF;
1285:
1286: IF l_debug_on THEN
1287: WSH_DEBUG_SV.logmsg(l_module_name, 'SETTING THE POLICY CONTEXT FOR ORG_ID:' || TO_CHAR ( L_ORG_ID ) );
1288: END IF;
1289: --
1290: MO_GLOBAL.set_policy_context('S', l_org_id);
1291:
1305: --
1306: -- Debug Statements
1307: --
1308: IF l_debug_on THEN
1309: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_VERIFY_PAYMENT_PUB.VERIFY_PAYMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1310: END IF;
1311: --
1312: oe_verify_payment_pub.verify_payment(
1313: p_header_id => l_header_id,
1325: --
1326: -- Debug Statements
1327: --
1328: IF l_debug_on THEN
1329: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID ) ||' FAILED CREDIT CHECK' );
1330: END IF;
1331: --
1332: raise credit_hold_error;
1333: END IF;
1338: --
1339: -- Debug Statements
1340: --
1341: IF l_debug_on THEN
1342: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_HOLDS_PUB.CHECK_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
1343: END IF;
1344: --
1345: oe_holds_pub.check_holds(
1346: p_api_version => 1.0,
1363: --
1364: -- Debug Statements
1365: --
1366: IF l_debug_on THEN
1367: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID ) ||' IS ON HOLD' );
1368: END IF;
1369: --
1370: --BUG#:1549665 hwahdani - check if process was run from conc. request and get id
1371: -- and log exception if order is on hold
1371: -- and log exception if order is on hold
1372: l_request_id := fnd_global.conc_request_id;
1373: -- 1729516
1374: IF l_debug_on THEN
1375: WSH_DEBUG_SV.log(l_module_name,'l_request_id', l_request_id );
1376: WSH_DEBUG_SV.log(l_module_name,'WSH_PICK_LIST.G_BATCH_ID', WSH_PICK_LIST.G_BATCH_ID );
1377: END IF;
1378:
1379: IF ( l_request_id = -1 AND WSH_PICK_LIST.G_BATCH_ID IS NULL ) THEN
1372: l_request_id := fnd_global.conc_request_id;
1373: -- 1729516
1374: IF l_debug_on THEN
1375: WSH_DEBUG_SV.log(l_module_name,'l_request_id', l_request_id );
1376: WSH_DEBUG_SV.log(l_module_name,'WSH_PICK_LIST.G_BATCH_ID', WSH_PICK_LIST.G_BATCH_ID );
1377: END IF;
1378:
1379: IF ( l_request_id = -1 AND WSH_PICK_LIST.G_BATCH_ID IS NULL ) THEN
1380: raise header_hold_error;
1385: --
1386: -- Debug Statements
1387: --
1388: IF l_debug_on THEN
1389: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
1390: END IF;
1391: --
1392:
1393: l_dummy_exception_id :=null;
1394: --
1395: -- Debug Statements
1396: --
1397: IF l_debug_on THEN
1398: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
1399: END IF;
1400: --
1401: wsh_xc_util.log_exception(
1402: p_api_version => 1.0,
1419: --
1420: -- Debug Statements
1421: --
1422: IF l_debug_on THEN
1423: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION DID NOT RETURN SUCCESS' );
1424: END IF;
1425: --
1426: END IF;
1427: --Bug: 1573703 Return status needs to be set to 'E'
1467: --
1468: -- Debug Statements
1469: --
1470: IF l_debug_on THEN
1471: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_HOLDS_PUB.CHECK_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
1472: END IF;
1473: --
1474: oe_holds_pub.check_holds(
1475: p_api_version => 1.0,
1485: --
1486: -- Debug Statements
1487: --
1488: IF l_debug_on THEN
1489: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE '||TO_CHAR ( L_LINE_ID ) ||' IS ON HOLD' );
1490: END IF;
1491: --
1492:
1493: -- BUG#: 1549665 hwahdani - check if process was run from conc. request and
1509: --
1510: -- Debug Statements
1511: --
1512: IF l_debug_on THEN
1513: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
1514: END IF;
1515: --
1516:
1517: l_dummy_exception_id :=null;
1518: --
1519: -- Debug Statements
1520: --
1521: IF l_debug_on THEN
1522: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
1523: END IF;
1524: --
1525: wsh_xc_util.log_exception(
1526: p_api_version => 1.0,
1543: --
1544: -- Debug Statements
1545: --
1546: IF l_debug_on THEN
1547: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION DID NOT RETURN SUCCESS' );
1548: END IF;
1549: --
1550: END IF;
1551: --Bug: 1573703 Return status needs to be set to 'E'
1577: --
1578: -- Debug Statements
1579: --
1580: IF l_debug_on THEN
1581: WSH_DEBUG_SV.pop(l_module_name);
1582: END IF;
1583: --
1584: EXCEPTION
1585: WHEN header_hold_error THEN
1590: --
1591: -- Debug Statements
1592: --
1593: IF l_debug_on THEN
1594: WSH_DEBUG_SV.logmsg(l_module_name,'HEADER_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1595: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:HEADER_HOLD_ERROR');
1596: END IF;
1597:
1598: WHEN line_hold_error THEN
1591: -- Debug Statements
1592: --
1593: IF l_debug_on THEN
1594: WSH_DEBUG_SV.logmsg(l_module_name,'HEADER_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1595: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:HEADER_HOLD_ERROR');
1596: END IF;
1597:
1598: WHEN line_hold_error THEN
1599: IF p_activity_type = 'PICK' THEN
1611: --
1612: -- Debug Statements
1613: --
1614: IF l_debug_on THEN
1615: WSH_DEBUG_SV.logmsg(l_module_name, p_activity_type ||'_LINE_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1616: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:LINE_HOLD_ERROR');
1617: END IF;
1618:
1619: WHEN credit_hold_error THEN
1612: -- Debug Statements
1613: --
1614: IF l_debug_on THEN
1615: WSH_DEBUG_SV.logmsg(l_module_name, p_activity_type ||'_LINE_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1616: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:LINE_HOLD_ERROR');
1617: END IF;
1618:
1619: WHEN credit_hold_error THEN
1620: FND_MESSAGE.SET_NAME('WSH','WSH_DET_CREDIT_HOLD_ERROR');
1624: --
1625: -- Debug Statements
1626: --
1627: IF l_debug_on THEN
1628: WSH_DEBUG_SV.logmsg(l_module_name,'CREDIT_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1629: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CREDIT_HOLD_ERROR');
1630: END IF;
1631: --
1632: WHEN others THEN
1625: -- Debug Statements
1626: --
1627: IF l_debug_on THEN
1628: WSH_DEBUG_SV.logmsg(l_module_name,'CREDIT_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1629: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CREDIT_HOLD_ERROR');
1630: END IF;
1631: --
1632: WHEN others THEN
1633: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.Check_Credit_Holds');
1636: --
1637: -- Debug Statements
1638: --
1639: IF l_debug_on THEN
1640: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1641: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1642: END IF;
1643: --
1644: END check_credit_holds;
1637: -- Debug Statements
1638: --
1639: IF l_debug_on THEN
1640: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1641: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1642: END IF;
1643: --
1644: END check_credit_holds;
1645:
1776: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1777: --
1778: IF l_debug_on IS NULL
1779: THEN
1780: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1781: END IF;
1782: --
1783: IF l_debug_on THEN
1784: WSH_DEBUG_SV.push(l_module_name);
1780: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1781: END IF;
1782: --
1783: IF l_debug_on THEN
1784: WSH_DEBUG_SV.push(l_module_name);
1785: --
1786: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1787: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1788: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1782: --
1783: IF l_debug_on THEN
1784: WSH_DEBUG_SV.push(l_module_name);
1785: --
1786: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1787: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1788: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1789: END IF;
1790: --
1783: IF l_debug_on THEN
1784: WSH_DEBUG_SV.push(l_module_name);
1785: --
1786: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1787: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1788: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1789: END IF;
1790: --
1791: OPEN c_detail_info(p_order_line_id);
1784: WSH_DEBUG_SV.push(l_module_name);
1785: --
1786: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1787: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1788: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1789: END IF;
1790: --
1791: OPEN c_detail_info(p_order_line_id);
1792: FETCH c_detail_info INTO l_detail_info;
1806: --
1807: -- Debug Statements
1808: --
1809: IF l_debug_on THEN
1810: WSH_DEBUG_SV.pop(l_module_name);
1811: END IF;
1812: --
1813: RETURN;
1814: END IF;
1836: --
1837: -- Debug Statements
1838: --
1839: IF l_debug_on THEN
1840: WSH_DEBUG_SV.pop(l_module_name);
1841: END IF;
1842: --
1843: RETURN;
1844: END IF;
1866: --
1867: -- Debug Statements
1868: --
1869: IF l_debug_on THEN
1870: WSH_DEBUG_SV.pop(l_module_name);
1871: END IF;
1872: --
1873: RETURN;
1874: END IF;
1875:
1876: -- Debug Statements
1877: --
1878: IF l_debug_on THEN
1879: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.GET_MIN_MAX_TOLERANCE_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1880: END IF;
1881: --
1882: -- Bug 2181132
1883:
1911: l_max_quantity2 := l_minmaxoutrectype.max_remaining_quantity2;
1912:
1913:
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1916: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1917: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1918: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1919: END IF;
1912:
1913:
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1916: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1917: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1918: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1919: END IF;
1920:
1913:
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1916: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1917: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1918: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1919: END IF;
1920:
1921: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1914: IF l_debug_on THEN
1915: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1916: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1917: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1918: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1919: END IF;
1920:
1921: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1922: raise others ;
1929: --
1930: -- Debug Statements
1931: --
1932: IF l_debug_on THEN
1933: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
1934: END IF;
1935: --
1936: l_max_quantity := l_max_quantity
1937: - l_staged_info.net_staged_qty;
1981: --
1982: -- Debug Statements
1983: --
1984: IF l_debug_on THEN
1985: WSH_DEBUG_SV.pop(l_module_name);
1986: END IF;
1987: --
1988: EXCEPTION
1989: WHEN others THEN
2010: --
2011: -- Debug Statements
2012: --
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2015: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2016: END IF;
2017: --
2018: END check_quantity_to_pick;
2011: -- Debug Statements
2012: --
2013: IF l_debug_on THEN
2014: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2015: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2016: END IF;
2017: --
2018: END check_quantity_to_pick;
2019:
2049: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2050: --
2051: IF l_debug_on IS NULL
2052: THEN
2053: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2054: END IF;
2055: --
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.push(l_module_name);
2053: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2054: END IF;
2055: --
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.push(l_module_name);
2058: --
2059: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
2060: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
2061: END IF;
2055: --
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.push(l_module_name);
2058: --
2059: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
2060: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
2061: END IF;
2062: --
2063: --
2056: IF l_debug_on THEN
2057: WSH_DEBUG_SV.push(l_module_name);
2058: --
2059: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
2060: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
2061: END IF;
2062: --
2063: --
2064: -- Debug Statements
2063: --
2064: -- Debug Statements
2065: --
2066: IF l_debug_on THEN
2067: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_QUANTITY_TO_PICK',WSH_DEBUG_SV.C_PROC_LEVEL);
2068: END IF;
2069: --
2070: wsh_details_validations.check_quantity_to_pick(
2071: p_order_line_id => p_order_line_id,
2081: --
2082: -- Debug Statements
2083: --
2084: IF l_debug_on THEN
2085: WSH_DEBUG_SV.pop(l_module_name);
2086: END IF;
2087: --
2088: EXCEPTION
2089: WHEN OTHERS THEN
2093: --
2094: -- Debug Statements
2095: --
2096: IF l_debug_on THEN
2097: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2098: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2099: END IF;
2100: --
2101: END check_quantity_to_pick;
2094: -- Debug Statements
2095: --
2096: IF l_debug_on THEN
2097: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2098: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2099: END IF;
2100: --
2101: END check_quantity_to_pick;
2102:
2153: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2154: --
2155: IF l_debug_on IS NULL
2156: THEN
2157: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2158: END IF;
2159: --
2160: IF l_debug_on THEN
2161: WSH_DEBUG_SV.push(l_module_name);
2157: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2158: END IF;
2159: --
2160: IF l_debug_on THEN
2161: WSH_DEBUG_SV.push(l_module_name);
2162: --
2163: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2164: END IF;
2165: --
2159: --
2160: IF l_debug_on THEN
2161: WSH_DEBUG_SV.push(l_module_name);
2162: --
2163: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2164: END IF;
2165: --
2166: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2167:
2203: --
2204: -- Debug Statements
2205: --
2206: IF l_debug_on THEN
2207: WSH_DEBUG_SV.pop(l_module_name);
2208: END IF;
2209: --
2210: EXCEPTION
2211:
2219: --
2220: -- Debug Statements
2221: --
2222: IF l_debug_on THEN
2223: WSH_DEBUG_SV.logmsg(l_module_name,'REQ_QTY_ZERO exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REQ_QTY_ZERO');
2225: END IF;
2226: --
2227: WHEN others THEN
2220: -- Debug Statements
2221: --
2222: IF l_debug_on THEN
2223: WSH_DEBUG_SV.logmsg(l_module_name,'REQ_QTY_ZERO exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2224: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REQ_QTY_ZERO');
2225: END IF;
2226: --
2227: WHEN others THEN
2228: IF c_check_qty_inside_del%ISOPEN THEN
2234: --
2235: -- Debug Statements
2236: --
2237: IF l_debug_on THEN
2238: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2239: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2240: END IF;
2241: --
2242: END check_zero_req_confirm;
2235: -- Debug Statements
2236: --
2237: IF l_debug_on THEN
2238: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2239: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2240: END IF;
2241: --
2242: END check_zero_req_confirm;
2243:
2333: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2334: --
2335: IF l_debug_on IS NULL
2336: THEN
2337: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2338: END IF;
2339: --
2340: IF l_debug_on THEN
2341: WSH_DEBUG_SV.push(l_module_name);
2337: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2338: END IF;
2339: --
2340: IF l_debug_on THEN
2341: WSH_DEBUG_SV.push(l_module_name);
2342: --
2343: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2344: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2345: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2339: --
2340: IF l_debug_on THEN
2341: WSH_DEBUG_SV.push(l_module_name);
2342: --
2343: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2344: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2345: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2346: END IF;
2347: --
2340: IF l_debug_on THEN
2341: WSH_DEBUG_SV.push(l_module_name);
2342: --
2343: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2344: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2345: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2346: END IF;
2347: --
2348: x_return_status := FND_API.G_RET_STS_SUCCESS;
2341: WSH_DEBUG_SV.push(l_module_name);
2342: --
2343: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2344: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2345: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2346: END IF;
2347: --
2348: x_return_status := FND_API.G_RET_STS_SUCCESS;
2349: -- clear the disabled list first
2403: --}
2404: END IF;
2405: --
2406: IF l_debug_on THEN
2407: WSH_DEBUG_SV.pop(l_module_name);
2408: END IF;
2409: --
2410: RETURN;
2411: --}
2414: -- J-IB-NPARIKH-}
2415: --
2416:
2417: IF l_debug_on THEN
2418: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_RESERVABLE_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
2419: END IF;
2420:
2421: l_reservable_flag := WSH_DELIVERY_DETAILS_INV.get_reservable_flag(
2422: x_item_id => l_inventory_item_id,
2422: x_item_id => l_inventory_item_id,
2423: x_organization_id => l_organization_id,
2424: x_pickable_flag => l_pickable_flag);
2425: if l_debug_on then
2426: wsh_debug_sv.log(l_module_name, 'l_reservable_flag', l_reservable_flag);
2427: wsh_debug_sv.log(l_module_name, 'l_pickable_flag', l_pickable_flag);
2428: wsh_debug_sv.log(l_module_name, 'l_source_code', l_source_code);
2429: end if;
2430:
2423: x_organization_id => l_organization_id,
2424: x_pickable_flag => l_pickable_flag);
2425: if l_debug_on then
2426: wsh_debug_sv.log(l_module_name, 'l_reservable_flag', l_reservable_flag);
2427: wsh_debug_sv.log(l_module_name, 'l_pickable_flag', l_pickable_flag);
2428: wsh_debug_sv.log(l_module_name, 'l_source_code', l_source_code);
2429: end if;
2430:
2431: -- If delivery line is released to warehouse, shipped, or deleted,
2424: x_pickable_flag => l_pickable_flag);
2425: if l_debug_on then
2426: wsh_debug_sv.log(l_module_name, 'l_reservable_flag', l_reservable_flag);
2427: wsh_debug_sv.log(l_module_name, 'l_pickable_flag', l_pickable_flag);
2428: wsh_debug_sv.log(l_module_name, 'l_source_code', l_source_code);
2429: end if;
2430:
2431: -- If delivery line is released to warehouse, shipped, or deleted,
2432: -- disable its fields.
2434: IF (l_released_status IN ('S', 'C', 'D')) THEN
2435: i:=i+1; x_disabled_list(i) := 'FULL';
2436: i:=i+1; x_disabled_list(i) := 'DESC_FLEX';
2437: if l_debug_on then
2438: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
2439: wsh_debug_sv.log(l_module_name, 'l_picked_quantity', l_picked_quantity);
2440: end if;
2441: IF ( l_released_status = 'S'
2442: AND l_picked_quantity IS NULL) THEN
2435: i:=i+1; x_disabled_list(i) := 'FULL';
2436: i:=i+1; x_disabled_list(i) := 'DESC_FLEX';
2437: if l_debug_on then
2438: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
2439: wsh_debug_sv.log(l_module_name, 'l_picked_quantity', l_picked_quantity);
2440: end if;
2441: IF ( l_released_status = 'S'
2442: AND l_picked_quantity IS NULL) THEN
2443: -- can update some fields if the delivery line
2456: --
2457: -- Debug Statements
2458: --
2459: IF l_debug_on THEN
2460: WSH_DEBUG_SV.pop(l_module_name);
2461: END IF;
2462: --
2463: RETURN;
2464:
2601: --
2602: -- Debug Statements
2603: --
2604: IF l_debug_on THEN
2605: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.CHECK_WMS_ORG',WSH_DEBUG_SV.C_PROC_LEVEL);
2606: END IF;
2607: --
2608: IF (wsh_util_validate.Check_Wms_Org(l_organization_id)='Y') THEN
2609: -- Bug fix 2887330
2693: --
2694: -- J-IB-NPARIKH-}
2695:
2696: IF l_debug_on THEN
2697: WSH_DEBUG_SV.log(l_module_name,'count of x_disabled_list', x_disabled_list.COUNT);
2698: END IF;
2699: -- public api changes
2700: IF (x_disabled_list.COUNT = 0) or (x_disabled_list(1) <> 'FULL') THEN
2701: i := x_disabled_list.COUNT;
2762: --
2763: -- Debug Statements
2764: --
2765: IF l_debug_on THEN
2766: WSH_DEBUG_SV.pop(l_module_name);
2767: END IF;
2768: --
2769: EXCEPTION
2770: WHEN e_all_disabled THEN --public api changes
2773: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_detail_id);
2774: wsh_util_core.add_message(x_return_status,l_module_name);
2775: IF l_debug_on THEN
2776: -- Nothing is updateable
2777: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
2778: END IF;
2779:
2780: WHEN wsh_dp_no_entity THEN
2781: x_return_status := FND_API.G_RET_STS_ERROR;
2799: --
2800: -- Debug Statements
2801: --
2802: IF l_debug_on THEN
2803: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2804: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2805: END IF;
2806: --
2807: WHEN wsh_del_not_exist THEN -- Bug fix 2650464
2800: -- Debug Statements
2801: --
2802: IF l_debug_on THEN
2803: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2804: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2805: END IF;
2806: --
2807: WHEN wsh_del_not_exist THEN -- Bug fix 2650464
2808: x_return_status := FND_API.G_RET_STS_ERROR;
2821: x_msg_data := l_msg_summary;
2822: END IF;
2823: --
2824: IF l_debug_on THEN
2825: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DEL_NOT_EXIST exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2826: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2827: END IF;
2828:
2829: WHEN wsh_inv_list_type THEN
2822: END IF;
2823: --
2824: IF l_debug_on THEN
2825: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DEL_NOT_EXIST exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2826: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2827: END IF;
2828:
2829: WHEN wsh_inv_list_type THEN
2830: x_return_status := FND_API.G_RET_STS_ERROR;
2840: --
2841: -- Debug Statements
2842: --
2843: IF l_debug_on THEN
2844: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2845: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
2846: END IF;
2847: --
2848: WHEN others THEN
2841: -- Debug Statements
2842: --
2843: IF l_debug_on THEN
2844: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2845: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
2846: END IF;
2847: --
2848: WHEN others THEN
2849: IF (get_delivery_status%ISOPEN) THEN
2856: --
2857: -- Debug Statements
2858: --
2859: IF l_debug_on THEN
2860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2862: END IF;
2863: --
2864: END Get_Disabled_list;
2857: -- Debug Statements
2858: --
2859: IF l_debug_on THEN
2860: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2861: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2862: END IF;
2863: --
2864: END Get_Disabled_list;
2865:
3063: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3064: --
3065: IF l_debug_on IS NULL
3066: THEN
3067: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3068: END IF;
3069: --
3070: x_return_status := FND_API.G_RET_STS_SUCCESS;
3071:
3072: l_del_shipping_quantity := 0;
3073: l_del_shipping_quantity2 := 0;
3074:
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.push(l_module_name);
3077: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3073: l_del_shipping_quantity2 := 0;
3074:
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.push(l_module_name);
3077: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3081: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3074:
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.push(l_module_name);
3077: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3081: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3082: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3075: IF l_debug_on THEN
3076: WSH_DEBUG_SV.push(l_module_name);
3077: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3081: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3082: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3083: END IF;
3076: WSH_DEBUG_SV.push(l_module_name);
3077: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3081: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3082: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3083: END IF;
3084:
3077: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3081: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3082: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3083: END IF;
3084:
3085: IF ( p_in_attributes.source_code IS NULL ) THEN
3078: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3079: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3080: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3081: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3082: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3083: END IF;
3084:
3085: IF ( p_in_attributes.source_code IS NULL ) THEN
3086: x_msg_count := 1;
3091: IF p_in_attributes.ship_tolerance_above IS NULL OR
3092: p_in_attributes.action_flag IN ('C', 'I') THEN
3093:
3094: IF l_debug_on THEN
3095: WSH_DEBUG_SV.logmsg(l_module_name, 'Looking up details');
3096: END IF;
3097:
3098: -- fetch the values for CTO and OM Interface
3099: OPEN c_get_details_CTO;
3119:
3120: END IF;
3121:
3122: IF l_debug_on THEN
3123: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3124: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3125: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3126: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3127: END IF;
3120: END IF;
3121:
3122: IF l_debug_on THEN
3123: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3124: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3125: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3126: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3127: END IF;
3128:
3121:
3122: IF l_debug_on THEN
3123: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3124: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3125: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3126: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3127: END IF;
3128:
3129:
3122: IF l_debug_on THEN
3123: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3124: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3125: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3126: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3127: END IF;
3128:
3129:
3130: -- bug 3511424
3153: l_total_ordered_quantity2;
3154: CLOSE c_sum_ordered_qty;
3155:
3156: IF l_debug_on THEN
3157: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty-'||l_total_ordered_quantity);
3158: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty2-'||l_total_ordered_quantity2);
3159: END IF;
3160:
3161: IF p_in_attributes.ship_tolerance_above IS NOT NULL THEN -- Pick Confirm
3154: CLOSE c_sum_ordered_qty;
3155:
3156: IF l_debug_on THEN
3157: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty-'||l_total_ordered_quantity);
3158: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty2-'||l_total_ordered_quantity2);
3159: END IF;
3160:
3161: IF p_in_attributes.ship_tolerance_above IS NOT NULL THEN -- Pick Confirm
3162: x_out_attributes.min_remaining_quantity := 0;
3167: l_del_shipping_quantity2;
3168: CLOSE c_sum_picked_qty;
3169:
3170: IF l_debug_on THEN
3171: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty-'||l_del_shipping_quantity);
3172: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty2-'||l_del_shipping_quantity2);
3173: END IF;
3174:
3175: END IF;
3168: CLOSE c_sum_picked_qty;
3169:
3170: IF l_debug_on THEN
3171: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty-'||l_del_shipping_quantity);
3172: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty2-'||l_del_shipping_quantity2);
3173: END IF;
3174:
3175: END IF;
3176:
3207: CLOSE c_sum_line_shp_qty;
3208: END IF;
3209:
3210: IF l_debug_on THEN
3211: WSH_DEBUG_SV.log(l_module_name, 'CTO/Interface: l_del_shipping_quantity',
3212: l_del_shipping_quantity);
3213: END IF;
3214:
3215: END IF;
3246:
3247: --{
3248: --
3249: IF l_debug_on THEN
3250: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity before the modification',l_max_remaining_quantity);
3251: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity before the modification',l_min_remaining_quantity);
3252: END IF;
3253: --
3254: l_max_remaining_quantity := trunc(l_max_remaining_quantity, wsh_util_core.c_max_decimal_digits_inv);
3247: --{
3248: --
3249: IF l_debug_on THEN
3250: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity before the modification',l_max_remaining_quantity);
3251: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity before the modification',l_min_remaining_quantity);
3252: END IF;
3253: --
3254: l_max_remaining_quantity := trunc(l_max_remaining_quantity, wsh_util_core.c_max_decimal_digits_inv);
3255: IF (round(l_min_remaining_quantity,wsh_util_core.c_max_decimal_digits_inv) < l_min_remaining_quantity) THEN
3262: --}
3263: END IF;
3264: --
3265: IF l_debug_on THEN
3266: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity after the modification',l_max_remaining_quantity);
3267: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity after the modification',l_min_remaining_quantity);
3268: END IF;
3269: --
3270: --}
3263: END IF;
3264: --
3265: IF l_debug_on THEN
3266: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity after the modification',l_max_remaining_quantity);
3267: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity after the modification',l_min_remaining_quantity);
3268: END IF;
3269: --
3270: --}
3271:
3278:
3279: -- HW OPMCONV - Let's treat Qtys similar to Qty1
3280:
3281: IF l_debug_on THEN
3282: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 before the modification',l_max_remaining_quantity2);
3283: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 before the modification',l_min_remaining_quantity2);
3284: END IF;
3285: --
3286: l_max_remaining_quantity2 := trunc(l_max_remaining_quantity2, wsh_util_core.c_max_decimal_digits_inv);
3279: -- HW OPMCONV - Let's treat Qtys similar to Qty1
3280:
3281: IF l_debug_on THEN
3282: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 before the modification',l_max_remaining_quantity2);
3283: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 before the modification',l_min_remaining_quantity2);
3284: END IF;
3285: --
3286: l_max_remaining_quantity2 := trunc(l_max_remaining_quantity2, wsh_util_core.c_max_decimal_digits_inv);
3287: IF (round(l_min_remaining_quantity2,wsh_util_core.c_max_decimal_digits_inv) < l_min_remaining_quantity2) THEN
3294: --}
3295: END IF;
3296: --
3297: IF l_debug_on THEN
3298: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 after the modification',l_max_remaining_quantity2);
3299: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 after the modification',l_min_remaining_quantity2);
3300: END IF;
3301:
3302:
3295: END IF;
3296: --
3297: IF l_debug_on THEN
3298: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 after the modification',l_max_remaining_quantity2);
3299: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 after the modification',l_min_remaining_quantity2);
3300: END IF;
3301:
3302:
3303:
3339: END IF;
3340:
3341:
3342: IF l_debug_on THEN
3343: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3344: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3340:
3341:
3342: IF l_debug_on THEN
3343: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3344: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3348: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3341:
3342: IF l_debug_on THEN
3343: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3344: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3348: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3349: WSH_DEBUG_SV.pop(l_module_name);
3342: IF l_debug_on THEN
3343: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3344: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3348: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3349: WSH_DEBUG_SV.pop(l_module_name);
3350: END IF;
3343: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3344: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3348: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3349: WSH_DEBUG_SV.pop(l_module_name);
3350: END IF;
3351:
3344: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3348: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3349: WSH_DEBUG_SV.pop(l_module_name);
3350: END IF;
3351:
3352: EXCEPTION
3345: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3346: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3347: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3348: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3349: WSH_DEBUG_SV.pop(l_module_name);
3350: END IF;
3351:
3352: EXCEPTION
3353: WHEN OTHERS THEN
3384: CLOSE c_get_details_CTO;
3385: END IF;
3386:
3387: IF l_debug_on THEN
3388: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.Oracle error Message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3390: END IF;
3391:
3392: END Get_Min_Max_Tolerance_Quantity;
3385: END IF;
3386:
3387: IF l_debug_on THEN
3388: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.Oracle error Message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3389: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3390: END IF;
3391:
3392: END Get_Min_Max_Tolerance_Quantity;
3393:
3504: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3505: --
3506: IF l_debug_on IS NULL
3507: THEN
3508: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3509: END IF;
3510: --
3511: IF l_debug_on THEN
3512: WSH_DEBUG_SV.push(l_module_name);
3508: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3509: END IF;
3510: --
3511: IF l_debug_on THEN
3512: WSH_DEBUG_SV.push(l_module_name);
3513: --
3514: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
3515: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
3516: END IF;
3510: --
3511: IF l_debug_on THEN
3512: WSH_DEBUG_SV.push(l_module_name);
3513: --
3514: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
3515: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
3516: END IF;
3517:
3518: Init_Detail_Actions_Tbl(
3511: IF l_debug_on THEN
3512: WSH_DEBUG_SV.push(l_module_name);
3513: --
3514: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
3515: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
3516: END IF;
3517:
3518: Init_Detail_Actions_Tbl(
3519: p_action => p_action,
3520: x_detail_actions_tab => l_detail_actions_tab,
3521: x_return_status => x_return_status);
3522:
3523: IF l_debug_on THEN
3524: WSH_DEBUG_SV.log(l_module_name,'Init_Detail_Actions_Tbl x_return_status',x_return_status);
3525: END IF;
3526:
3527: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3528: raise error_in_init_actions;
3539: --
3540: IF (p_caller NOT LIKE 'WMS%') THEN
3541:
3542: if l_debug_on then
3543: wsh_debug_sv.log(l_module_name, 'Organization Id', p_del_detail_rec_tab(j).organization_id);
3544: wsh_debug_sv.log(l_module_name, 'WMS Organization Id', l_wms_org_id);
3545: wsh_debug_sv.log(l_module_name, 'Non WMS Organization Id', l_non_wms_org_id);
3546: end if;
3547:
3540: IF (p_caller NOT LIKE 'WMS%') THEN
3541:
3542: if l_debug_on then
3543: wsh_debug_sv.log(l_module_name, 'Organization Id', p_del_detail_rec_tab(j).organization_id);
3544: wsh_debug_sv.log(l_module_name, 'WMS Organization Id', l_wms_org_id);
3545: wsh_debug_sv.log(l_module_name, 'Non WMS Organization Id', l_non_wms_org_id);
3546: end if;
3547:
3548: IF p_del_detail_rec_tab(j).organization_id = l_wms_org_id THEN
3541:
3542: if l_debug_on then
3543: wsh_debug_sv.log(l_module_name, 'Organization Id', p_del_detail_rec_tab(j).organization_id);
3544: wsh_debug_sv.log(l_module_name, 'WMS Organization Id', l_wms_org_id);
3545: wsh_debug_sv.log(l_module_name, 'Non WMS Organization Id', l_non_wms_org_id);
3546: end if;
3547:
3548: IF p_del_detail_rec_tab(j).organization_id = l_wms_org_id THEN
3549: l_wms_org_type := 'WMS';
3550: ELSIF p_del_detail_rec_tab(j).organization_id = l_non_wms_org_id THEN
3551: l_wms_org_type := NULL;
3552: ELSE
3553: IF l_debug_on THEN
3554: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.GET_ORG_TYPE',WSH_DEBUG_SV.C_PROC_LEVEL);
3555: END IF;
3556:
3557: l_org_type := wsh_util_validate.get_org_type(
3558: p_organization_id => p_del_detail_rec_tab(j).organization_id,
3559: p_delivery_detail_id => p_del_detail_rec_tab(j).delivery_detail_id,
3560: p_msg_display => 'N', -- Bug# 3332656
3561: x_return_status => l_return_status );
3562: IF l_debug_on THEN
3563: wsh_debug_sv.log(l_module_name, 'Return status after wsh_util_validate.get_org_type', l_return_status);
3564: END IF;
3565: IF l_return_status = wsh_util_core.g_ret_sts_unexp_error THEN
3566: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3567: ELSIF l_return_status = wsh_util_core.g_ret_sts_error THEN
3582:
3583: END IF;
3584: --
3585: IF l_debug_on THEN
3586: wsh_debug_sv.log(l_module_name, 'l_wms_org_type', l_wms_org_type);
3587: wsh_debug_sv.log(l_module_name, 'l_detail_actions_tab.Count', l_detail_actions_tab.count);
3588: END IF;
3589: -- OTM R12 - Bug 5399341: Get shipping params to figure if the org is OTM enabled.
3590:
3583: END IF;
3584: --
3585: IF l_debug_on THEN
3586: wsh_debug_sv.log(l_module_name, 'l_wms_org_type', l_wms_org_type);
3587: wsh_debug_sv.log(l_module_name, 'l_detail_actions_tab.Count', l_detail_actions_tab.count);
3588: END IF;
3589: -- OTM R12 - Bug 5399341: Get shipping params to figure if the org is OTM enabled.
3590:
3591: WSH_SHIPPING_PARAMS_PVT.Get(
3607: IF p_action = 'SPLIT-LINE' AND
3608: p_del_detail_rec_tab(j).released_status = WSH_DELIVERY_DETAILS_PKG.C_RELEASED_TO_WAREHOUSE THEN
3609:
3610: IF l_debug_on THEN
3611: wsh_debug_sv.log(l_module_name, 'Released_status', p_del_detail_rec_tab(j).released_status);
3612: wsh_debug_sv.log(l_module_name, 'Caller',p_caller );
3613: END IF;
3614: IF p_caller like 'WMS_XDOCK%' THEN
3615: null; -- allow action
3608: p_del_detail_rec_tab(j).released_status = WSH_DELIVERY_DETAILS_PKG.C_RELEASED_TO_WAREHOUSE THEN
3609:
3610: IF l_debug_on THEN
3611: wsh_debug_sv.log(l_module_name, 'Released_status', p_del_detail_rec_tab(j).released_status);
3612: wsh_debug_sv.log(l_module_name, 'Caller',p_caller );
3613: END IF;
3614: IF p_caller like 'WMS_XDOCK%' THEN
3615: null; -- allow action
3616: ELSE
3634: --
3635: --
3636: --
3637: IF l_debug_on THEN
3638: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3639: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3640: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3641: END IF;
3642: --
3635: --
3636: --
3637: IF l_debug_on THEN
3638: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3639: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3640: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3641: END IF;
3642: --
3643: --
3636: --
3637: IF l_debug_on THEN
3638: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3639: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3640: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3641: END IF;
3642: --
3643: --
3644: -- Actions on inbound/drop-ship lines are allowed only if caller
3693: --
3694: --
3695: --
3696: IF l_debug_on THEN
3697: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3698: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3699: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3700: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3701: END IF;
3694: --
3695: --
3696: IF l_debug_on THEN
3697: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3698: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3699: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3700: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3701: END IF;
3702: --
3695: --
3696: IF l_debug_on THEN
3697: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3698: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3699: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3700: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3701: END IF;
3702: --
3703: --}
3696: IF l_debug_on THEN
3697: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3698: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3699: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3700: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3701: END IF;
3702: --
3703: --}
3704: END IF;
3725: ) THEN
3726: l_pass_section_a :='N';
3727: IF l_detail_actions_tab(k).message_name IS NOT NULL THEN
3728: IF l_debug_on THEN
3729: wsh_debug_sv.log(l_module_name, 'Message Name is', l_detail_actions_tab(k).message_name);
3730: END IF;
3731: FND_MESSAGE.SET_NAME('WSH',l_detail_actions_tab(k).message_name);
3732: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
3733: END IF;
3737: END LOOP;
3738: END IF;
3739:
3740: IF l_debug_on THEN
3741: WSH_DEBUG_SV.log(l_module_name,'l_pass_section_a ',l_pass_section_a);
3742: END IF;
3743: -- Section B
3744: IF (l_pass_section_a = 'Y' ) THEN
3745: open det_to_del_cur(p_del_detail_rec_tab(j).delivery_detail_id);
3759: p_delivery_detail_id => p_del_detail_rec_tab(j).delivery_detail_id,
3760: p_msg_display => 'N');
3761:
3762: IF l_debug_on THEN
3763: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
3764: END IF;
3765:
3766: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TPW' ) THEN
3767: IF ( p_del_detail_rec_tab(j).source_code = 'WSH' and p_del_detail_rec_tab(j).container_flag = 'N' ) THEN
3795: x_error_ids => l_error_ids,
3796: x_valid_index_tab => l_valid_index_tab);
3797:
3798: IF l_debug_on THEN
3799: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',
3800: l_return_status);
3801: END IF;
3802:
3803: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
3834: x_error_ids => l_error_ids,
3835: x_valid_index_tab => l_valid_index_tab);
3836:
3837: IF l_debug_on THEN
3838: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',
3839: l_return_status);
3840: END IF;
3841:
3842: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
3895: x_msg_data => l_msg_data);
3896:
3897:
3898: IF l_debug_on THEN
3899: WSH_DEBUG_SV.log(l_module_name,'WMS_SHIPPING_INTERFACE_GRP.process_delivery_details l_wms_table(1).return_status',
3900: l_wms_table(1).return_status);
3901: END IF;
3902:
3903: IF l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS OR l_wms_table(1).return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS THEN
3915: x_error_ids => l_error_ids,
3916: x_valid_index_tab => l_valid_index_tab);
3917:
3918: IF l_debug_on THEN
3919: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',
3920: l_return_status);
3921: END IF;
3922:
3923: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
3964: p_delivery_detail_id => p_del_detail_rec_tab(j).delivery_detail_id,
3965: p_msg_display => 'N');
3966:
3967: IF l_debug_on THEN
3968: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
3969: END IF;
3970:
3971: IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) in ('CMS','TPW')) THEN
3972: IF (p_del_detail_rec_tab(j).source_code = 'WSH' and p_del_detail_rec_tab(j).container_flag = 'N' ) THEN
4000: CLOSE det_to_del_cur;
4001: END IF;
4002:
4003: IF l_debug_on THEN
4004: wsh_debug_sv.log(l_module_name, 'Error Id', p_del_detail_rec_tab(j).delivery_detail_id);
4005: END IF;
4006: x_error_ids(x_error_ids.COUNT + 1) := p_del_detail_rec_tab(j).delivery_detail_id;
4007: IF nvl(p_caller, FND_API.G_MISS_CHAR) = 'WSH_PUB'
4008: OR p_caller like 'FTE%' THEN
4016: IF det_to_del_cur%ISOPEN THEN
4017: CLOSE det_to_del_cur;
4018: END IF;
4019: IF l_debug_on THEN
4020: wsh_debug_sv.log(l_module_name, 'Error Id', p_del_detail_rec_tab(j).delivery_detail_id);
4021: END IF;
4022: x_error_ids(x_error_ids.COUNT + 1) := p_del_detail_rec_tab(j).delivery_detail_id;
4023: IF nvl(p_caller, FND_API.G_MISS_CHAR) = 'WSH_PUB'
4024: OR p_caller like 'FTE%' THEN
4032: IF det_to_del_cur%ISOPEN THEN
4033: CLOSE det_to_del_cur;
4034: END IF;
4035: IF l_debug_on THEN
4036: wsh_debug_sv.log(l_module_name, 'Error Id', p_del_detail_rec_tab(j).delivery_detail_id);
4037: END IF;
4038: x_error_ids(x_error_ids.COUNT + 1) := p_del_detail_rec_tab(j).delivery_detail_id;
4039: IF nvl(p_caller, FND_API.G_MISS_CHAR) = 'WSH_PUB'
4040: OR p_caller like 'FTE%' THEN
4081: --
4082: END IF;
4083:
4084: IF l_debug_on THEN
4085: WSH_DEBUG_SV.pop(l_module_name);
4086: END IF;
4087:
4088: EXCEPTION
4089: WHEN error_in_init_actions THEN
4087:
4088: EXCEPTION
4089: WHEN error_in_init_actions THEN
4090: IF l_debug_on THEN
4091: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
4093: END IF;
4094:
4095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4088: EXCEPTION
4089: WHEN error_in_init_actions THEN
4090: IF l_debug_on THEN
4091: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
4093: END IF;
4094:
4095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4095: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4097: wsh_util_core.add_message(x_return_status, l_module_name);
4098: IF l_debug_on THEN
4099: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4101: END IF;
4102: IF c_staged_content%ISOPEN THEN
4103: CLOSE c_staged_content;
4096: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4097: wsh_util_core.add_message(x_return_status, l_module_name);
4098: IF l_debug_on THEN
4099: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4101: END IF;
4102: IF c_staged_content%ISOPEN THEN
4103: CLOSE c_staged_content;
4104: END IF;
4105:
4106: WHEN OTHERS THEN
4107: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4108: IF l_debug_on THEN
4109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
4110: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4111: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4112: END IF;
4113: IF c_staged_content%ISOPEN THEN
4106: WHEN OTHERS THEN
4107: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4108: IF l_debug_on THEN
4109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
4110: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4111: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4112: END IF;
4113: IF c_staged_content%ISOPEN THEN
4114: CLOSE c_staged_content;
4107: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4108: IF l_debug_on THEN
4109: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
4110: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4111: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4112: END IF;
4113: IF c_staged_content%ISOPEN THEN
4114: CLOSE c_staged_content;
4115: END IF;
5439: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5440: --
5441: IF l_debug_on IS NULL
5442: THEN
5443: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5444: END IF;
5445: --
5446: IF l_debug_on THEN
5447: WSH_DEBUG_SV.push(l_module_name);
5443: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5444: END IF;
5445: --
5446: IF l_debug_on THEN
5447: WSH_DEBUG_SV.push(l_module_name);
5448: --
5449: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5450: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5451: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5445: --
5446: IF l_debug_on THEN
5447: WSH_DEBUG_SV.push(l_module_name);
5448: --
5449: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5450: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5451: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5452: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5453: END IF;
5446: IF l_debug_on THEN
5447: WSH_DEBUG_SV.push(l_module_name);
5448: --
5449: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5450: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5451: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5452: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5453: END IF;
5454: --
5447: WSH_DEBUG_SV.push(l_module_name);
5448: --
5449: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5450: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5451: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5452: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5453: END IF;
5454: --
5455: x_return_status := FND_API.G_RET_STS_SUCCESS;
5448: --
5449: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5450: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5451: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5452: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5453: END IF;
5454: --
5455: x_return_status := FND_API.G_RET_STS_SUCCESS;
5456: --
5455: x_return_status := FND_API.G_RET_STS_SUCCESS;
5456: --
5457: IF p_in_rec.action_code = 'CREATE' THEN
5458: IF l_debug_on THEN
5459: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5460: END IF;
5461: --
5462: -- nothing else need to be disabled
5463: --
5462: -- nothing else need to be disabled
5463: --
5464: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5465: IF l_debug_on THEN
5466: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5467: WSH_DEBUG_SV.pop(l_module_name);
5468: END IF;
5469: -- RETURN; --public api changes
5470: --
5463: --
5464: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5465: IF l_debug_on THEN
5466: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5467: WSH_DEBUG_SV.pop(l_module_name);
5468: END IF;
5469: -- RETURN; --public api changes
5470: --
5471: ELSIF p_in_rec.action_code = 'UPDATE' THEN
5496: x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
5497: THEN
5498: --
5499: IF l_debug_on THEN
5500: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5501: WSH_DEBUG_SV.pop(l_module_name);
5502: END IF;
5503: RETURN;
5504: --
5497: THEN
5498: --
5499: IF l_debug_on THEN
5500: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5501: WSH_DEBUG_SV.pop(l_module_name);
5502: END IF;
5503: RETURN;
5504: --
5505: END IF;
5576:
5577: l_lpn_id := x_delivery_detail_rec.lpn_id;
5578:
5579: IF l_debug_on THEN
5580: WSH_DEBUG_SV.log(l_module_name,'list.COUNT',l_disabled_list.COUNT);
5581: END IF;
5582:
5583: IF l_disabled_list.COUNT = 0 THEN
5584:
5583: IF l_disabled_list.COUNT = 0 THEN
5584:
5585: --
5586: IF l_debug_on THEN
5587: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5588: END IF;
5589: --
5590: -- nothing else need to be disabled
5591: --
5596:
5597: IF l_debug_on THEN
5598: FOR i in 1..l_disabled_list.COUNT
5599: LOOP
5600: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
5601: END LOOP;
5602: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
5603: END IF;
5604: --enable the columns matching the l_disabled_list
5598: FOR i in 1..l_disabled_list.COUNT
5599: LOOP
5600: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
5601: END LOOP;
5602: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
5603: END IF;
5604: --enable the columns matching the l_disabled_list
5605: enable_from_list(l_disabled_list,
5606: p_delivery_detail_rec,
5616: --
5617: FOR i in 1..l_disabled_list.COUNT
5618: LOOP
5619: IF l_debug_on THEN
5620: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
5621: END IF;
5622: -- Added for bug 4399278, 4418754
5623: IF ( p_in_rec.caller = 'WSH_PUB' and
5624: l_disabled_list(i) = 'LOCATOR_NAME' and
5634: END IF;
5635: END LOOP;
5636:
5637: IF l_debug_on THEN
5638: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
5639: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5640: END IF;
5641: --
5642: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5635: END LOOP;
5636:
5637: IF l_debug_on THEN
5638: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
5639: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5640: END IF;
5641: --
5642: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5643: --
5641: --
5642: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5643: --
5644: IF l_debug_on THEN
5645: WSH_DEBUG_SV.log(l_module_name,'calling disable_from_list');
5646: END IF;
5647: -- The fileds in the list are getting disabled
5648: disable_from_list(l_disabled_list,
5649: l_db_col_rec,
5678: l_organization_id := x_delivery_detail_rec.organization_id;
5679: END IF;
5680:
5681: IF l_debug_on THEN
5682: WSH_DEBUG_SV.log(l_module_name,'organization_id is ', l_organization_id);
5683: END IF;
5684: l_wms_org := wsh_util_validate.Check_Wms_Org(l_organization_id);
5685: -- lpn conv.
5686: --
5700: WSH_DELIVERY_DETAILS_PKG.C_BACKORDERED,
5701: WSH_DELIVERY_DETAILS_PKG.C_RELEASED_TO_WAREHOUSE)
5702: AND p_in_rec.caller like 'WMS_XDOCK%') THEN
5703: if l_debug_on then
5704: wsh_debug_sv.log(l_module_name, 'WMS Caller to update Released status and MOL', p_in_rec.caller);
5705: end if;
5706: j:=j+1; l_disabled_list(j) := 'RELEASED_STATUS';
5707: j:=j+1; l_disabled_list(j) := 'MOVE_ORDER_LINE_ID';
5708: j:=j+1; l_disabled_list(j) := 'BATCH_ID';
5756:
5757:
5758: ELSIF p_in_rec.caller = 'WSH_INBOUND' THEN
5759: if l_debug_on then
5760: wsh_debug_sv.logmsg(l_module_name, 'WSH_INBOUND: Enabling subinventory', WSH_DEBUG_SV.C_STMT_LEVEL);
5761: wsh_debug_sv.log(l_module_name, 'Input subinventory', p_delivery_detail_rec.subinventory);
5762: wsh_debug_sv.log(l_module_name, 'Input LOT_NUMBER', p_delivery_detail_rec.lot_number);
5763: end if;
5764: -- Subinventory should be updateable during inbound processing
5757:
5758: ELSIF p_in_rec.caller = 'WSH_INBOUND' THEN
5759: if l_debug_on then
5760: wsh_debug_sv.logmsg(l_module_name, 'WSH_INBOUND: Enabling subinventory', WSH_DEBUG_SV.C_STMT_LEVEL);
5761: wsh_debug_sv.log(l_module_name, 'Input subinventory', p_delivery_detail_rec.subinventory);
5762: wsh_debug_sv.log(l_module_name, 'Input LOT_NUMBER', p_delivery_detail_rec.lot_number);
5763: end if;
5764: -- Subinventory should be updateable during inbound processing
5765: j:=j+1; l_disabled_list(j) := 'FULL';
5758: ELSIF p_in_rec.caller = 'WSH_INBOUND' THEN
5759: if l_debug_on then
5760: wsh_debug_sv.logmsg(l_module_name, 'WSH_INBOUND: Enabling subinventory', WSH_DEBUG_SV.C_STMT_LEVEL);
5761: wsh_debug_sv.log(l_module_name, 'Input subinventory', p_delivery_detail_rec.subinventory);
5762: wsh_debug_sv.log(l_module_name, 'Input LOT_NUMBER', p_delivery_detail_rec.lot_number);
5763: end if;
5764: -- Subinventory should be updateable during inbound processing
5765: j:=j+1; l_disabled_list(j) := 'FULL';
5766: j:=j+1; l_disabled_list(j) := 'SUBINVENTORY';
5783: -- Bug 3292364
5784: -- Enable Ship Method Components to be updated for container during OM changes.
5785:
5786: IF l_debug_on THEN
5787: WSH_DEBUG_SV.logmsg(l_module_name, 'Enable SM Components for CMS changes, caller = WSH_USA' );
5788: END IF;
5789: j:=j+1; l_disabled_list(j) := 'FULL';
5790: j:=j+1; l_disabled_list(j) := 'SERVICE_LEVEL';
5791: j:=j+1; l_disabled_list(j) := 'MODE_OF_TRANSPORT';
5796: IF l_disabled_list.count > 1 and l_disabled_list(1) = 'FULL' THEN
5797:
5798: l_all_disabled :='N';
5799: IF l_debug_on THEN
5800: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
5801: END IF;
5802:
5803: enable_from_list(l_disabled_list,
5804: p_delivery_detail_rec,
5837: --
5838: END IF;
5839: --
5840: IF l_debug_on THEN
5841: WSH_DEBUG_SV.pop(l_module_name);
5842: END IF;
5843:
5844: EXCEPTION
5845: WHEN e_all_disabled THEN
5848: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_detail_rec.delivery_detail_id);
5849: wsh_util_core.add_message(x_return_status,l_module_name);
5850: IF l_debug_on THEN
5851: -- Nothing is updateable
5852: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
5853: END IF;
5854: WHEN e_dp_no_entity THEN
5855: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5856: -- the message for this is set in original get_disabled_list
5854: WHEN e_dp_no_entity THEN
5855: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5856: -- the message for this is set in original get_disabled_list
5857: IF l_debug_on THEN
5858: WSH_DEBUG_SV.pop(l_module_name,'e_dp_no_entity');
5859: END IF;
5860: WHEN e_bad_field THEN
5861: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
5862: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
5862: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
5863: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
5864: wsh_util_core.add_message(x_return_status,l_module_name);
5865: IF l_debug_on THEN
5866: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
5867: ,l_field_name);
5868: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
5869: END IF;
5870:
5864: wsh_util_core.add_message(x_return_status,l_module_name);
5865: IF l_debug_on THEN
5866: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
5867: ,l_field_name);
5868: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
5869: END IF;
5870:
5871: WHEN OTHERS THEN
5872: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5872: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
5873: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.get_disabled_list',
5874: l_module_name);
5875: IF l_debug_on THEN
5876: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
5877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5878: END IF;
5879: END Get_Disabled_List;
5880:
5873: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.get_disabled_list',
5874: l_module_name);
5875: IF l_debug_on THEN
5876: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
5877: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
5878: END IF;
5879: END Get_Disabled_List;
5880:
5881:
5896: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5897: --
5898: IF l_debug_on IS NULL
5899: THEN
5900: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5901: END IF;
5902: --
5903: IF l_debug_on THEN
5904: WSH_DEBUG_SV.push(l_module_name);
5900: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5901: END IF;
5902: --
5903: IF l_debug_on THEN
5904: WSH_DEBUG_SV.push(l_module_name);
5905: --
5906: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
5907: END IF;
5908: --
5902: --
5903: IF l_debug_on THEN
5904: WSH_DEBUG_SV.push(l_module_name);
5905: --
5906: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
5907: END IF;
5908: --
5909: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
5910:
6201: END IF;
6202:
6203:
6204: IF l_debug_on THEN
6205: WSH_DEBUG_SV.pop(l_module_name);
6206: END IF;
6207: EXCEPTION
6208: WHEN OTHERS THEN
6209: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6208: WHEN OTHERS THEN
6209: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6210: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.Init_Detail_Actions_Tbl', l_module_name);
6211: IF l_debug_on THEN
6212: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
6213: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6214: END IF;
6215:
6216: END Init_Detail_Actions_Tbl;
6209: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6210: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.Init_Detail_Actions_Tbl', l_module_name);
6211: IF l_debug_on THEN
6212: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
6213: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6214: END IF;
6215:
6216: END Init_Detail_Actions_Tbl;
6217:
6262: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6263: --
6264: IF l_debug_on IS NULL
6265: THEN
6266: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6267: END IF;
6268: --
6269: IF l_debug_on THEN
6270: WSH_DEBUG_SV.push(l_module_name);
6266: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6267: END IF;
6268: --
6269: IF l_debug_on THEN
6270: WSH_DEBUG_SV.push(l_module_name);
6271: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6267: END IF;
6268: --
6269: IF l_debug_on THEN
6270: WSH_DEBUG_SV.push(l_module_name);
6271: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6268: --
6269: IF l_debug_on THEN
6270: WSH_DEBUG_SV.push(l_module_name);
6271: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6269: IF l_debug_on THEN
6270: WSH_DEBUG_SV.push(l_module_name);
6271: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6270: WSH_DEBUG_SV.push(l_module_name);
6271: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6271: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6272: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6273: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6274: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6275: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6276: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6284: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6277: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6284: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6285: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6278: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6284: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6285: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6286: END IF;
6279: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6284: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6285: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6286: END IF;
6287:
6280: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6284: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6285: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6286: END IF;
6287:
6288: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6281: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6282: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6283: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6284: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6285: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6286: END IF;
6287:
6288: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6289:
6315:
6316: -- 2) Check for negative
6317:
6318: IF l_debug_on THEN
6319: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
6320: END IF;
6321: --Bug # 3266333
6322: WSH_UTIL_VALIDATE.validate_negative(
6323: p_value => l_input_quantity,
6336:
6337: -- HW OPMCONV - No need to branch
6338:
6339: IF l_debug_on THEN
6340: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6341: END IF;
6342:
6343: wsh_details_validations.check_decimal_quantity(
6344: p_item_id => x_det_rec.inventory_item_id,
6371: -- 4) If SQ, check shipped qty
6372: -- If CCQ, check cc qty
6373: IF (p_flag = 'SQ') THEN
6374: IF l_debug_on THEN
6375: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_SHIPPED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6376: END IF;
6377: wsh_details_validations.check_shipped_quantity(
6378: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
6379: p_requested_quantity => x_det_rec.requested_quantity,
6389:
6390: ELSIF(p_flag = 'CCQ') THEN
6391:
6392: IF l_debug_on THEN
6393: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CYCLE_COUNT_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6394: END IF;
6395:
6396: wsh_details_validations.check_cycle_count_quantity(
6397: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
6431:
6432: IF x_det_rec.serial_quantity > 0 AND x_det_rec.unmark_serial_server = 'Y' THEN
6433:
6434: IF l_debug_on THEN
6435: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
6436: END IF;
6437: wsh_delivery_details_inv.unmark_serial_number(
6438: p_delivery_detail_id => x_det_rec.delivery_detail_id,
6439: p_serial_number_code => x_det_rec.inv_ser_control_code,
6442: x_return_status => l_return_status,
6443: p_inventory_item_id => x_det_rec.inventory_item_id
6444: );
6445: IF l_debug_on THEN
6446: wsh_debug_sv.log(l_module_name, 'Return status after Unmark serial', l_return_status);
6447: END IF;
6448:
6449: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6450: RAISE FND_API.G_EXC_ERROR;
6473: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning);
6474: l_number_of_warnings := l_number_of_warnings + 1;
6475:
6476: IF l_debug_on THEN
6477: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
6478: END IF;
6479:
6480: IF x_det_rec.unmark_serial_server = 'Y' THEN
6481: wsh_delivery_details_inv.unmark_serial_number(
6486: x_return_status => l_return_status,
6487: p_inventory_item_id => x_det_rec.inventory_item_id);
6488:
6489: IF l_debug_on THEN
6490: wsh_debug_sv.log(l_module_name, 'Return status after Unmark serial', l_return_status);
6491: END IF;
6492:
6493: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6494: RAISE FND_API.G_EXC_ERROR;
6512: x_det_rec.cycle_count_quantity := l_quantity;
6513: END IF;
6514:
6515: IF l_debug_on THEN
6516: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity', x_det_rec.shipped_quantity);
6517: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity', x_det_rec.cycle_count_quantity);
6518: END IF;
6519:
6520: IF l_number_of_warnings > 0 THEN
6513: END IF;
6514:
6515: IF l_debug_on THEN
6516: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity', x_det_rec.shipped_quantity);
6517: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity', x_det_rec.cycle_count_quantity);
6518: END IF;
6519:
6520: IF l_number_of_warnings > 0 THEN
6521: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6521: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6522: END IF;
6523:
6524: IF l_debug_on THEN
6525: WSH_DEBUG_SV.log(l_module_name, 'Return status from api ', x_return_status);
6526: WSH_DEBUG_SV.pop(l_module_name);
6527: END IF;
6528:
6529: EXCEPTION
6522: END IF;
6523:
6524: IF l_debug_on THEN
6525: WSH_DEBUG_SV.log(l_module_name, 'Return status from api ', x_return_status);
6526: WSH_DEBUG_SV.pop(l_module_name);
6527: END IF;
6528:
6529: EXCEPTION
6530: WHEN FND_API.G_EXC_ERROR THEN
6537: p_encoded => FND_API.G_FALSE
6538: );
6539:
6540: IF l_debug_on THEN
6541: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6542: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6543: END IF;
6544: --
6545: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6538: );
6539:
6540: IF l_debug_on THEN
6541: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6542: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6543: END IF;
6544: --
6545: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6546: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6552: p_encoded => FND_API.G_FALSE
6553: );
6554: --
6555: IF l_debug_on THEN
6556: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6557: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6558: END IF;
6559:
6560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6553: );
6554: --
6555: IF l_debug_on THEN
6556: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6557: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6558: END IF;
6559:
6560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6566: p_encoded => FND_API.G_FALSE
6567: );
6568:
6569: IF l_debug_on THEN
6570: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6571: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6572: END IF;
6573: --
6574: WHEN OTHERS THEN
6567: );
6568:
6569: IF l_debug_on THEN
6570: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6571: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6572: END IF;
6573: --
6574: WHEN OTHERS THEN
6575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6575: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6576: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY');
6577: --
6578: IF l_debug_on THEN
6579: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6580: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6581: END IF;
6582:
6583:
6576: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY');
6577: --
6578: IF l_debug_on THEN
6579: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6580: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6581: END IF;
6582:
6583:
6584: END Validate_Shipped_CC_Quantity;
6633: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6634: --
6635: IF l_debug_on IS NULL
6636: THEN
6637: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6638: END IF;
6639: --
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.push(l_module_name);
6637: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6638: END IF;
6639: --
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.push(l_module_name);
6642: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6638: END IF;
6639: --
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.push(l_module_name);
6642: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6639: --
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.push(l_module_name);
6642: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6647: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6640: IF l_debug_on THEN
6641: WSH_DEBUG_SV.push(l_module_name);
6642: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6647: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6648: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6641: WSH_DEBUG_SV.push(l_module_name);
6642: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6647: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6648: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6649: END IF;
6642: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6647: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6648: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6649: END IF;
6650:
6643: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6647: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6648: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6649: END IF;
6650:
6651: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6644: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6645: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6646: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6647: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6648: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6649: END IF;
6650:
6651: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6652: IF(p_flag = 'SQ') THEN
6683:
6684: END IF;
6685:
6686: IF l_debug_on THEN
6687: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
6688: END IF;
6689: -- 2) Check for negative
6690: --Bug # 3266333
6691: WSH_UTIL_VALIDATE.validate_negative(
6714: /*
6715: IF (p_flag = 'SQ') THEN
6716:
6717: IF l_debug_on THEN
6718: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_SHIPPED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6719: END IF;
6720: wsh_details_validations.check_shipped_quantity(
6721: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
6722: p_requested_quantity => x_det_rec.requested_quantity2,
6730: END IF;
6731: ELSIF(p_flag = 'CCQ') THEN
6732:
6733: IF l_debug_on THEN
6734: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CYCLE_COUNT_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6735: END IF;
6736: wsh_details_validations.check_cycle_count_quantity(
6737: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
6738: p_requested_quantity => x_det_rec.requested_quantity2,
6753: x_det_rec.cycle_count_quantity2 := l_quantity;
6754: END IF;
6755:
6756: IF l_debug_on THEN
6757: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity2', x_det_rec.shipped_quantity2);
6758: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity2', x_det_rec.cycle_count_quantity2);
6759: END IF;
6760:
6761: IF l_debug_on THEN
6754: END IF;
6755:
6756: IF l_debug_on THEN
6757: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity2', x_det_rec.shipped_quantity2);
6758: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity2', x_det_rec.cycle_count_quantity2);
6759: END IF;
6760:
6761: IF l_debug_on THEN
6762: WSH_DEBUG_SV.pop(l_module_name);
6758: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity2', x_det_rec.cycle_count_quantity2);
6759: END IF;
6760:
6761: IF l_debug_on THEN
6762: WSH_DEBUG_SV.pop(l_module_name);
6763: END IF;
6764:
6765: EXCEPTION
6766: WHEN FND_API.G_EXC_ERROR THEN
6772: p_encoded => FND_API.G_FALSE
6773: );
6774:
6775: IF l_debug_on THEN
6776: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6777: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6778: END IF;
6779: --
6780: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6773: );
6774:
6775: IF l_debug_on THEN
6776: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6777: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6778: END IF;
6779: --
6780: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6786: p_encoded => FND_API.G_FALSE
6787: );
6788:
6789: IF l_debug_on THEN
6790: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6791: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6792: END IF;
6793: --
6794: WHEN OTHERS THEN
6787: );
6788:
6789: IF l_debug_on THEN
6790: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6791: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6792: END IF;
6793: --
6794: WHEN OTHERS THEN
6795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6796: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2');
6797: --
6798: IF l_debug_on THEN
6799: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6801: END IF;
6802:
6803:
6796: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2');
6797: --
6798: IF l_debug_on THEN
6799: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6800: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6801: END IF;
6802:
6803:
6804: END Validate_Shipped_CC_Quantity2;
6845: --
6846: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6847: --
6848: IF l_debug_on IS NULL THEN
6849: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6850: END IF;
6851: --
6852:
6853: IF l_debug_on THEN
6850: END IF;
6851: --
6852:
6853: IF l_debug_on THEN
6854: WSH_DEBUG_SV.push(l_module_name);
6855: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
6856: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
6857: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
6858: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
6851: --
6852:
6853: IF l_debug_on THEN
6854: WSH_DEBUG_SV.push(l_module_name);
6855: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
6856: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
6857: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
6858: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
6859: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
6852:
6853: IF l_debug_on THEN
6854: WSH_DEBUG_SV.push(l_module_name);
6855: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
6856: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
6857: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
6858: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
6859: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
6860: END IF;
6853: IF l_debug_on THEN
6854: WSH_DEBUG_SV.push(l_module_name);
6855: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
6856: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
6857: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
6858: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
6859: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
6860: END IF;
6861:
6854: WSH_DEBUG_SV.push(l_module_name);
6855: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
6856: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
6857: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
6858: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
6859: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
6860: END IF;
6861:
6862: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6855: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
6856: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
6857: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
6858: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
6859: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
6860: END IF;
6861:
6862: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6863: l_id_tab.DELETE;
6906: x_changed_id_tab := l_id_tab;
6907: END IF;
6908:
6909: IF l_debug_on THEN
6910: WSH_DEBUG_SV.pop(l_module_name);
6911: END IF;
6912:
6913: EXCEPTION
6914: WHEN others THEN
6914: WHEN others THEN
6915: wsh_util_core.default_handler('WSH_TRIP_UTILITIES.compare_detail_attributes');
6916: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6917: IF l_debug_on THEN
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6919: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6920: END IF;
6921:
6922: END compare_detail_attributes;
6915: wsh_util_core.default_handler('WSH_TRIP_UTILITIES.compare_detail_attributes');
6916: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6917: IF l_debug_on THEN
6918: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6919: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6920: END IF;
6921:
6922: END compare_detail_attributes;
6923:
7020: --
7021: l_debug_on := wsh_debug_interface.g_debug;
7022: --
7023: IF l_debug_on IS NULL THEN
7024: l_debug_on := wsh_debug_sv.is_debug_enabled;
7025: END IF;
7026: --
7027: IF l_debug_on THEN
7028: wsh_debug_sv.push(l_module_name);
7024: l_debug_on := wsh_debug_sv.is_debug_enabled;
7025: END IF;
7026: --
7027: IF l_debug_on THEN
7028: wsh_debug_sv.push(l_module_name);
7029: --
7030: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7031: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7032: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7026: --
7027: IF l_debug_on THEN
7028: wsh_debug_sv.push(l_module_name);
7029: --
7030: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7031: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7032: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7033: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7034: END IF;
7027: IF l_debug_on THEN
7028: wsh_debug_sv.push(l_module_name);
7029: --
7030: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7031: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7032: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7033: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7034: END IF;
7035: --
7028: wsh_debug_sv.push(l_module_name);
7029: --
7030: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7031: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7032: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7033: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7034: END IF;
7035: --
7036: x_return_status := wsh_util_core.g_ret_sts_success;
7029: --
7030: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7031: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7032: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7033: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7034: END IF;
7035: --
7036: x_return_status := wsh_util_core.g_ret_sts_success;
7037: --
7086: CLOSE line_csr;
7087: --
7088: --
7089: IF l_debug_on THEN
7090: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7091: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7092: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7093: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7094: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7087: --
7088: --
7089: IF l_debug_on THEN
7090: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7091: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7092: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7093: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7094: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7095:
7088: --
7089: IF l_debug_on THEN
7090: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7091: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7092: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7093: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7094: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7095:
7096: END IF;
7089: IF l_debug_on THEN
7090: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7091: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7092: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7093: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7094: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7095:
7096: END IF;
7097: --
7090: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7091: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7092: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7093: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7094: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7095:
7096: END IF;
7097: --
7098: --
7106: -- HW OPMCONV - No need to call OPM APIS
7107:
7108: -- HW OPMCONV - Call API to get item info
7109: IF l_debug_on THEN
7110: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.Get_item_information',WSH_DEBUG_SV.C_PROC_LEVEL);
7111: END IF;
7112:
7113: WSH_DELIVERY_DETAILS_INV.Get_item_information
7114: (
7128: --
7129: --
7130: -- HW OPMCONV -Print debugging statements
7131: IF l_debug_on THEN
7132: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
7133: wsh_debug_sv.LOG(l_module_name, 'l_item_info.tracking_quantity_ind', l_item_info.tracking_quantity_ind);
7134: END IF;
7135: --
7136: --
7129: --
7130: -- HW OPMCONV -Print debugging statements
7131: IF l_debug_on THEN
7132: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
7133: wsh_debug_sv.LOG(l_module_name, 'l_item_info.tracking_quantity_ind', l_item_info.tracking_quantity_ind);
7134: END IF;
7135: --
7136: --
7137: -- HW OPMCONV - Changed condition to check for secondary_default_ind
7208: THEN
7209: --{
7210: --
7211: IF l_debug_on THEN
7212: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit
7213: WSH_WV_UTILS.within_deviation', wsh_debug_sv.c_proc_level);
7214: END IF;
7215: --
7216: -- HW OPMCONV - Call new API to check deviation
7209: --{
7210: --
7211: IF l_debug_on THEN
7212: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit
7213: WSH_WV_UTILS.within_deviation', wsh_debug_sv.c_proc_level);
7214: END IF;
7215: --
7216: -- HW OPMCONV - Call new API to check deviation
7217: l_return := WSH_WV_UTILS.within_deviation
7246: THEN
7247: --{
7248: --
7249: IF l_debug_on THEN
7250: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_WV_UTILS.convert_uom', wsh_debug_sv.c_proc_level);
7251: END IF;
7252: --
7253: -- HW OPMCONV - Call UOM routine passing lot_num
7254: l_qty2 := WSH_WV_UTILS.convert_uom
7285: END IF;
7286: --
7287: IF l_number_of_warnings > 0 THEN
7288: IF l_debug_on THEN
7289: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
7290: END IF;
7291:
7292: RAISE wsh_util_core.g_exc_warning;
7293: END IF;
7297: p_data => x_msg_data,
7298: p_encoded => fnd_api.g_false);
7299:
7300: IF l_debug_on THEN
7301: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7302: wsh_debug_sv.pop(l_module_name);
7303: END IF;
7304: --
7305: --}
7298: p_encoded => fnd_api.g_false);
7299:
7300: IF l_debug_on THEN
7301: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7302: wsh_debug_sv.pop(l_module_name);
7303: END IF;
7304: --
7305: --}
7306: EXCEPTION
7311: p_data => x_msg_data,
7312: p_encoded => fnd_api.g_false);
7313: --
7314: IF l_debug_on THEN
7315: wsh_debug_sv.pop(l_module_name);
7316: END IF;
7317: --
7318:
7319: WHEN INVALID_LOT THEN
7318:
7319: WHEN INVALID_LOT THEN
7320: x_return_status := fnd_api.g_ret_sts_error;
7321: IF l_debug_on THEN
7322: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7323: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
7324: END IF;
7325:
7326: WHEN OUT_OF_DEVIATION THEN
7319: WHEN INVALID_LOT THEN
7320: x_return_status := fnd_api.g_ret_sts_error;
7321: IF l_debug_on THEN
7322: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7323: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
7324: END IF;
7325:
7326: WHEN OUT_OF_DEVIATION THEN
7327: x_return_status := fnd_api.g_ret_sts_error;
7325:
7326: WHEN OUT_OF_DEVIATION THEN
7327: x_return_status := fnd_api.g_ret_sts_error;
7328: IF l_debug_on THEN
7329: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7330: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7331: END IF;
7332:
7333: WHEN fnd_api.g_exc_error THEN
7326: WHEN OUT_OF_DEVIATION THEN
7327: x_return_status := fnd_api.g_ret_sts_error;
7328: IF l_debug_on THEN
7329: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7330: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7331: END IF;
7332:
7333: WHEN fnd_api.g_exc_error THEN
7334: x_return_status := fnd_api.g_ret_sts_error;
7337: p_data => x_msg_data,
7338: p_encoded => fnd_api.g_false);
7339: --
7340: IF l_debug_on THEN
7341: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7342: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7343: END IF;
7344: --
7345: WHEN fnd_api.g_exc_unexpected_error THEN
7338: p_encoded => fnd_api.g_false);
7339: --
7340: IF l_debug_on THEN
7341: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7342: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7343: END IF;
7344: --
7345: WHEN fnd_api.g_exc_unexpected_error THEN
7346: x_return_status := fnd_api.g_ret_sts_unexp_error;
7349: p_data => x_msg_data,
7350: p_encoded => fnd_api.g_false);
7351: --
7352: IF l_debug_on THEN
7353: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7354: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7355: END IF;
7356: --
7357: WHEN wsh_util_core.g_exc_warning THEN
7350: p_encoded => fnd_api.g_false);
7351: --
7352: IF l_debug_on THEN
7353: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7354: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7355: END IF;
7356: --
7357: WHEN wsh_util_core.g_exc_warning THEN
7358: x_return_status := wsh_util_core.g_ret_sts_warning;
7361: p_data => x_msg_data,
7362: p_encoded => fnd_api.g_false);
7363: --
7364: IF l_debug_on THEN
7365: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
7366: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7367: END IF;
7368: WHEN OTHERS THEN
7369: x_return_status := fnd_api.g_ret_sts_unexp_error;
7362: p_encoded => fnd_api.g_false);
7363: --
7364: IF l_debug_on THEN
7365: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
7366: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7367: END IF;
7368: WHEN OTHERS THEN
7369: x_return_status := fnd_api.g_ret_sts_unexp_error;
7370: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.validate_secondary_quantity',l_module_name);
7374: p_data => x_msg_data,
7375: p_encoded => fnd_api.g_false);
7376: --
7377: IF l_debug_on THEN
7378: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
7379: END IF;
7380: --
7381: END validate_secondary_quantity;
7382:
7399: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7400: --
7401: IF l_debug_on IS NULL
7402: THEN
7403: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7404: END IF;
7405: --
7406: IF l_debug_on THEN
7407: --
7404: END IF;
7405: --
7406: IF l_debug_on THEN
7407: --
7408: WSH_DEBUG_SV.push(l_module_name);
7409: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
7410: --
7411: END IF;
7412: --
7405: --
7406: IF l_debug_on THEN
7407: --
7408: WSH_DEBUG_SV.push(l_module_name);
7409: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
7410: --
7411: END IF;
7412: --
7413: x_return_status := FND_API.G_RET_STS_SUCCESS;
8606:
8607:
8608:
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
8611: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
8612: END IF;
8613:
8614:
8607:
8608:
8609: IF l_debug_on THEN
8610: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
8611: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
8612: END IF;
8613:
8614:
8615: IF l_attributes IS NULL THEN
8614:
8615: IF l_attributes IS NULL THEN
8616: --no message to be shown to the user
8617: IF l_debug_on THEN
8618: WSH_DEBUG_SV.pop(l_module_name);
8619: END IF;
8620: RETURN;
8621: ELSE
8622: Wsh_Utilities.process_message(
8629: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
8630: THEN
8631: x_return_status := l_return_status;
8632: IF l_debug_on THEN
8633: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
8634: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8635: wsh_debug_sv.pop(l_module_name);
8636: END IF;
8637: return;
8630: THEN
8631: x_return_status := l_return_status;
8632: IF l_debug_on THEN
8633: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
8634: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8635: wsh_debug_sv.pop(l_module_name);
8636: END IF;
8637: return;
8638: ELSE
8631: x_return_status := l_return_status;
8632: IF l_debug_on THEN
8633: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
8634: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8635: wsh_debug_sv.pop(l_module_name);
8636: END IF;
8637: return;
8638: ELSE
8639: x_return_status := wsh_util_core.G_RET_STS_WARNING;
8640: END IF;
8641: END IF;
8642: --
8643: IF l_debug_on THEN
8644: WSH_DEBUG_SV.pop(l_module_name);
8645: END IF;
8646: --
8647: EXCEPTION
8648: WHEN OTHERS THEN
8648: WHEN OTHERS THEN
8649: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8650: --
8651: IF l_debug_on THEN
8652: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8653: END IF;
8654: --
8655: END user_non_updatable_columns;
8656:
8706: l_number_of_warnings := 0;
8707: l_released_status := p_released_status ;
8708: --
8709: IF l_debug_on IS NULL THEN
8710: l_debug_on := wsh_debug_sv.is_debug_enabled;
8711: END IF;
8712: --
8713: IF l_debug_on THEN
8714: wsh_debug_sv.push(l_module_name);
8710: l_debug_on := wsh_debug_sv.is_debug_enabled;
8711: END IF;
8712: --
8713: IF l_debug_on THEN
8714: wsh_debug_sv.push(l_module_name);
8715: --
8716: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8717: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8718: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8712: --
8713: IF l_debug_on THEN
8714: wsh_debug_sv.push(l_module_name);
8715: --
8716: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8717: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8718: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8719: END IF;
8720: --
8713: IF l_debug_on THEN
8714: wsh_debug_sv.push(l_module_name);
8715: --
8716: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8717: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8718: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8719: END IF;
8720: --
8721:
8714: wsh_debug_sv.push(l_module_name);
8715: --
8716: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8717: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8718: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8719: END IF;
8720: --
8721:
8722: WSH_DELIVERY_DETAILS_INV.Get_item_information
8736:
8737: IF ( l_item_info.lot_divisible_flag = 'N' AND
8738: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
8739: IF l_debug_on THEN
8740: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8741: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8742: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8743: WSH_DEBUG_SV.pop(l_module_name);
8744: END IF;
8737: IF ( l_item_info.lot_divisible_flag = 'N' AND
8738: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
8739: IF l_debug_on THEN
8740: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8741: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8742: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8743: WSH_DEBUG_SV.pop(l_module_name);
8744: END IF;
8745: return(FALSE);
8738: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
8739: IF l_debug_on THEN
8740: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8741: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8742: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8743: WSH_DEBUG_SV.pop(l_module_name);
8744: END IF;
8745: return(FALSE);
8746:
8739: IF l_debug_on THEN
8740: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8741: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8742: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8743: WSH_DEBUG_SV.pop(l_module_name);
8744: END IF;
8745: return(FALSE);
8746:
8747: ELSE
8751: Fetch get_indiv_reservation into l_exist;
8752: Close get_indiv_reservation;
8753: If l_exist = 1 Then
8754: IF l_debug_on THEN
8755: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8756: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
8757: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
8758: WSH_DEBUG_SV.pop(l_module_name);
8759: End if;
8752: Close get_indiv_reservation;
8753: If l_exist = 1 Then
8754: IF l_debug_on THEN
8755: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8756: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
8757: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
8758: WSH_DEBUG_SV.pop(l_module_name);
8759: End if;
8760: return(FALSE);
8753: If l_exist = 1 Then
8754: IF l_debug_on THEN
8755: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8756: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
8757: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
8758: WSH_DEBUG_SV.pop(l_module_name);
8759: End if;
8760: return(FALSE);
8761: End if;
8754: IF l_debug_on THEN
8755: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8756: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
8757: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
8758: WSH_DEBUG_SV.pop(l_module_name);
8759: End if;
8760: return(FALSE);
8761: End if;
8762: End if;
8760: return(FALSE);
8761: End if;
8762: End if;
8763: IF l_debug_on THEN
8764: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8765: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8766: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8767:
8768: WSH_DEBUG_SV.pop(l_module_name);
8761: End if;
8762: End if;
8763: IF l_debug_on THEN
8764: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8765: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8766: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8767:
8768: WSH_DEBUG_SV.pop(l_module_name);
8769: END IF;
8762: End if;
8763: IF l_debug_on THEN
8764: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8765: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8766: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8767:
8768: WSH_DEBUG_SV.pop(l_module_name);
8769: END IF;
8770:
8764: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8765: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8766: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8767:
8768: WSH_DEBUG_SV.pop(l_module_name);
8769: END IF;
8770:
8771: return(TRUE);
8772: END IF;
8771: return(TRUE);
8772: END IF;
8773:
8774: IF l_debug_on THEN
8775: WSH_DEBUG_SV.pop(l_module_name);
8776: END IF;
8777:
8778: return(TRUE);
8779:
8782: -- Debug Statements
8783: --
8784: -- CLOSE line_status;
8785: IF l_debug_on THEN
8786: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8787: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
8788: END IF;
8789: --
8790: return(FALSE);
8783: --
8784: -- CLOSE line_status;
8785: IF l_debug_on THEN
8786: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8787: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
8788: END IF;
8789: --
8790: return(FALSE);
8791:
8794: Close get_indiv_reservation;
8795: END IF;
8796: --
8797: IF l_debug_on THEN
8798: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8799: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8800: END IF;
8801: --
8802: return(FALSE);
8795: END IF;
8796: --
8797: IF l_debug_on THEN
8798: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8799: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8800: END IF;
8801: --
8802: return(FALSE);
8803:
8834: l_released_status := p_released_status;
8835: l_picked_qty := p_picked_qty;
8836: --
8837: IF l_debug_on IS NULL THEN
8838: l_debug_on := wsh_debug_sv.is_debug_enabled;
8839: END IF;
8840: --
8841: IF l_debug_on THEN
8842: wsh_debug_sv.push(l_module_name);
8838: l_debug_on := wsh_debug_sv.is_debug_enabled;
8839: END IF;
8840: --
8841: IF l_debug_on THEN
8842: wsh_debug_sv.push(l_module_name);
8843: --
8844: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8845: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8846: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8840: --
8841: IF l_debug_on THEN
8842: wsh_debug_sv.push(l_module_name);
8843: --
8844: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8845: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8846: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8847: END IF;
8848: --
8841: IF l_debug_on THEN
8842: wsh_debug_sv.push(l_module_name);
8843: --
8844: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8845: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8846: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8847: END IF;
8848: --
8849:
8842: wsh_debug_sv.push(l_module_name);
8843: --
8844: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
8845: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
8846: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
8847: END IF;
8848: --
8849:
8850: WSH_DELIVERY_DETAILS_INV.Get_item_information
8864:
8865: IF ( l_item_info.lot_divisible_flag = 'N' AND p_cycle_qty <> l_picked_qty AND
8866: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
8867: IF l_debug_on THEN
8868: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8869: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8870: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8871: WSH_DEBUG_SV.pop(l_module_name);
8872: END IF;
8865: IF ( l_item_info.lot_divisible_flag = 'N' AND p_cycle_qty <> l_picked_qty AND
8866: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
8867: IF l_debug_on THEN
8868: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8869: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8870: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8871: WSH_DEBUG_SV.pop(l_module_name);
8872: END IF;
8873: return(FALSE);
8866: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
8867: IF l_debug_on THEN
8868: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8869: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8870: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8871: WSH_DEBUG_SV.pop(l_module_name);
8872: END IF;
8873: return(FALSE);
8874:
8867: IF l_debug_on THEN
8868: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
8869: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8870: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8871: WSH_DEBUG_SV.pop(l_module_name);
8872: END IF;
8873: return(FALSE);
8874:
8875: ELSE
8873: return(FALSE);
8874:
8875: ELSE
8876: IF l_debug_on THEN
8877: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8878: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8879: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8880:
8881: WSH_DEBUG_SV.pop(l_module_name);
8874:
8875: ELSE
8876: IF l_debug_on THEN
8877: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8878: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8879: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8880:
8881: WSH_DEBUG_SV.pop(l_module_name);
8882: END IF;
8875: ELSE
8876: IF l_debug_on THEN
8877: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8878: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8879: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8880:
8881: WSH_DEBUG_SV.pop(l_module_name);
8882: END IF;
8883:
8877: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
8878: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
8879: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
8880:
8881: WSH_DEBUG_SV.pop(l_module_name);
8882: END IF;
8883:
8884: return(TRUE);
8885: END IF;
8884: return(TRUE);
8885: END IF;
8886:
8887: IF l_debug_on THEN
8888: WSH_DEBUG_SV.pop(l_module_name);
8889: END IF;
8890:
8891: return(TRUE);
8892:
8895: -- Debug Statements
8896: --
8897: -- CLOSE line_status;
8898: IF l_debug_on THEN
8899: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8900: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
8901: END IF;
8902: --
8903: return(FALSE);
8896: --
8897: -- CLOSE line_status;
8898: IF l_debug_on THEN
8899: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
8900: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
8901: END IF;
8902: --
8903: return(FALSE);
8904:
8908: END IF;
8909: */
8910: --
8911: IF l_debug_on THEN
8912: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8913: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8914: END IF;
8915: --
8916: return(FALSE);
8909: */
8910: --
8911: IF l_debug_on THEN
8912: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8913: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8914: END IF;
8915: --
8916: return(FALSE);
8917: