[Home] [Help]
166: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
167: --
168: IF l_debug_on IS NULL
169: THEN
170: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
171: END IF;
172: --
173: IF l_debug_on THEN
174: WSH_DEBUG_SV.push(l_module_name);
170: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
171: END IF;
172: --
173: IF l_debug_on THEN
174: WSH_DEBUG_SV.push(l_module_name);
175: --
176: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
172: --
173: IF l_debug_on THEN
174: WSH_DEBUG_SV.push(l_module_name);
175: --
176: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
179: END IF;
180: --
173: IF l_debug_on THEN
174: WSH_DEBUG_SV.push(l_module_name);
175: --
176: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
179: END IF;
180: --
181: if (p_source_document_type_id <> 10) then /* regular order */
174: WSH_DEBUG_SV.push(l_module_name);
175: --
176: WSH_DEBUG_SV.log(l_module_name,'P_MODE',P_MODE);
177: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
178: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_DOCUMENT_TYPE_ID',P_SOURCE_DOCUMENT_TYPE_ID);
179: END IF;
180: --
181: if (p_source_document_type_id <> 10) then /* regular order */
182: if (p_mode = 'TRX_ACTION_ID') then
183: --
184: -- Debug Statements
185: --
186: IF l_debug_on THEN
187: WSH_DEBUG_SV.pop(l_module_name);
188: END IF;
189: --
190: return(1); /* 1 = Issue */
191: elsif (p_mode = 'TRX_TYPE_ID') then
192: --
193: -- Debug Statements
194: --
195: IF l_debug_on THEN
196: WSH_DEBUG_SV.pop(l_module_name);
197: END IF;
198: --
199: return(33); /* 33 = Sales Order Issue */
200: end if;
214: --
215: -- Debug Statements
216: --
217: IF l_debug_on THEN
218: WSH_DEBUG_SV.pop(l_module_name);
219: END IF;
220: --
221: Return(34); /* 34 = Stores Issue */
222: Elsif (l_From_Org = l_To_Org) then
223: --
224: -- Debug Statements
225: --
226: IF l_debug_on THEN
227: WSH_DEBUG_SV.pop(l_module_name);
228: END IF;
229: --
230: Return(50); /* 50 = */
231: Elsif (l_From_Org <> l_To_Org) then
232: --
233: -- Debug Statements
234: --
235: IF l_debug_on THEN
236: WSH_DEBUG_SV.pop(l_module_name);
237: END IF;
238: --
239: Return(62); /* 62 = Transit Shipment */
240: End If;
243: --
244: -- Debug Statements
245: --
246: IF l_debug_on THEN
247: WSH_DEBUG_SV.pop(l_module_name);
248: END IF;
249: --
250: Return(1); /* 1 = Issue */
251: Elsif (l_From_Org = l_To_Org) then
252: --
253: -- Debug Statements
254: --
255: IF l_debug_on THEN
256: WSH_DEBUG_SV.pop(l_module_name);
257: END IF;
258: --
259: Return(2); /* 2 = Subinv transfer*/
260: Elsif (l_From_Org <> l_To_Org) then
261: --
262: -- Debug Statements
263: --
264: IF l_debug_on THEN
265: WSH_DEBUG_SV.pop(l_module_name);
266: END IF;
267: --
268: Return(21); /* 62 = Interorg Transfer */
269: End If;
273: WHEN NO_DATA_FOUND THEN
274: -- Debug Statements
275: --
276: IF l_debug_on THEN
277: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
278: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
279: END IF;
280: --
281: Return(0);
274: -- Debug Statements
275: --
276: IF l_debug_on THEN
277: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
278: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
279: END IF;
280: --
281: Return(0);
282: WHEN OTHERS THEN
283: --
284: -- Debug Statements
285: --
286: IF l_debug_on THEN
287: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
288: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
289: END IF;
290: --
291: Return(0);
284: -- Debug Statements
285: --
286: IF l_debug_on THEN
287: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
288: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
289: END IF;
290: --
291: Return(0);
292: END;
323: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
324: --
325: IF l_debug_on IS NULL
326: THEN
327: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
328: END IF;
329: --
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
327: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
328: END IF;
329: --
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
334: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
335: END IF;
329: --
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
334: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
335: END IF;
336: --
337: serial_num_ctl_code := l_serial_ctl_info.serial_number_control_code;
330: IF l_debug_on THEN
331: WSH_DEBUG_SV.push(l_module_name);
332: --
333: WSH_DEBUG_SV.log(l_module_name,'P_INVENTORY_ITEM_ID',P_INVENTORY_ITEM_ID);
334: WSH_DEBUG_SV.log(l_module_name,'P_ORG_ID',P_ORG_ID);
335: END IF;
336: --
337: serial_num_ctl_code := l_serial_ctl_info.serial_number_control_code;
338: IF ( serial_num_ctl_code = 2 OR serial_num_ctl_code = 5 OR
343: --
344: -- Debug Statements
345: --
346: IF l_debug_on THEN
347: WSH_DEBUG_SV.pop(l_module_name);
348: END IF;
349: --
350: RETURN TRUE;
351: ELSE -- serial_num_ctl_code = 1
353: --
354: -- Debug Statements
355: --
356: IF l_debug_on THEN
357: WSH_DEBUG_SV.pop(l_module_name);
358: END IF;
359: --
360: RETURN FALSE;
361: END IF;
381: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
382: --
383: IF l_debug_on IS NULL
384: THEN
385: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
386: END IF;
387: --
388: IF l_debug_on THEN
389: WSH_DEBUG_SV.push(l_module_name);
385: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
386: END IF;
387: --
388: IF l_debug_on THEN
389: WSH_DEBUG_SV.push(l_module_name);
390: END IF;
391: --
392: g_bad_header_ids.delete;
393: g_good_header_ids.delete;
398: --
399: -- Debug Statements
400: --
401: IF l_debug_on THEN
402: WSH_DEBUG_SV.pop(l_module_name);
403: END IF;
404: --
405: end purge_crd_chk_tab;
406:
440: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
441: --
442: IF l_debug_on IS NULL
443: THEN
444: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
445: END IF;
446: --
447: IF l_debug_on THEN
448: WSH_DEBUG_SV.push(l_module_name);
444: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
445: END IF;
446: --
447: IF l_debug_on THEN
448: WSH_DEBUG_SV.push(l_module_name);
449: --
450: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
451: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
446: --
447: IF l_debug_on THEN
448: WSH_DEBUG_SV.push(l_module_name);
449: --
450: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
451: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
453: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
454: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
447: IF l_debug_on THEN
448: WSH_DEBUG_SV.push(l_module_name);
449: --
450: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
451: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
453: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
454: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
455: -- muom
448: WSH_DEBUG_SV.push(l_module_name);
449: --
450: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
451: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
453: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
454: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
455: -- muom
456: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
449: --
450: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
451: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
453: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
454: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
455: -- muom
456: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
457: END IF;
450: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
451: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
453: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
454: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
455: -- muom
456: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
457: END IF;
458: --
452: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
453: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
454: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
455: -- muom
456: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
457: END IF;
458: --
459: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
460:
501: --
502: -- Debug Statements
503: --
504: IF l_debug_on THEN
505: WSH_DEBUG_SV.pop(l_module_name);
506: END IF;
507: --
508: exception
509: when others then
512: --
513: -- Debug Statements
514: --
515: IF l_debug_on THEN
516: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
518: END IF;
519: --
520: END check_shipped_quantity;
513: -- Debug Statements
514: --
515: IF l_debug_on THEN
516: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
517: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
518: END IF;
519: --
520: END check_shipped_quantity;
521:
556: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
557: --
558: IF l_debug_on IS NULL
559: THEN
560: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
561: END IF;
562: --
563: IF l_debug_on THEN
564: WSH_DEBUG_SV.push(l_module_name);
560: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
561: END IF;
562: --
563: IF l_debug_on THEN
564: WSH_DEBUG_SV.push(l_module_name);
565: --
566: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
567: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
562: --
563: IF l_debug_on THEN
564: WSH_DEBUG_SV.push(l_module_name);
565: --
566: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
567: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
569: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
570: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
563: IF l_debug_on THEN
564: WSH_DEBUG_SV.push(l_module_name);
565: --
566: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
567: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
569: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
570: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
571: -- muom
564: WSH_DEBUG_SV.push(l_module_name);
565: --
566: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
567: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
569: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
570: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
571: -- muom
572: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
565: --
566: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
567: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
569: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
570: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
571: -- muom
572: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
573: END IF;
566: WSH_DEBUG_SV.log(l_module_name,'P_SHIP_ABOVE_TOLERANCE',P_SHIP_ABOVE_TOLERANCE);
567: WSH_DEBUG_SV.log(l_module_name,'P_REQUESTED_QUANTITY',P_REQUESTED_QUANTITY);
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
569: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
570: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
571: -- muom
572: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
573: END IF;
574: --
568: WSH_DEBUG_SV.log(l_module_name,'P_PICKED_QUANTITY',P_PICKED_QUANTITY);
569: WSH_DEBUG_SV.log(l_module_name,'P_SHIPPED_QUANTITY',P_SHIPPED_QUANTITY);
570: WSH_DEBUG_SV.log(l_module_name,'P_CYCLE_COUNT_QUANTITY',P_CYCLE_COUNT_QUANTITY);
571: -- muom
572: WSH_DEBUG_SV.log(l_module_name,'P_FULFILL_BASE',P_FULFILL_BASE);
573: END IF;
574: --
575: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
576:
593: --
594: -- Debug Statements
595: --
596: IF l_debug_on THEN
597: WSH_DEBUG_SV.pop(l_module_name);
598: END IF;
599: --
600: EXCEPTION
601: WHEN OTHERS THEN
604: --
605: -- Debug Statements
606: --
607: IF l_debug_on THEN
608: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
609: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
610: END IF;
611: --
612: END check_cycle_count_quantity;
605: -- Debug Statements
606: --
607: IF l_debug_on THEN
608: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
609: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
610: END IF;
611: --
612: END check_cycle_count_quantity;
613:
667: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
668: --
669: IF l_debug_on IS NULL
670: THEN
671: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
672: END IF;
673: --
674: --
675: --
674: --
675: --
676:
677: IF l_debug_on THEN
678: WSH_DEBUG_SV.push(l_module_name);
679: --
680: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
681: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
682: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
676:
677: IF l_debug_on THEN
678: WSH_DEBUG_SV.push(l_module_name);
679: --
680: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
681: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
682: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
683: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
684: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
677: IF l_debug_on THEN
678: WSH_DEBUG_SV.push(l_module_name);
679: --
680: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
681: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
682: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
683: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
684: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
685: END IF;
678: WSH_DEBUG_SV.push(l_module_name);
679: --
680: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
681: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
682: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
683: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
684: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
685: END IF;
686: --
679: --
680: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
681: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
682: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
683: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
684: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
685: END IF;
686: --
687: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
680: WSH_DEBUG_SV.log(l_module_name,'P_ITEM_ID',P_ITEM_ID);
681: WSH_DEBUG_SV.log(l_module_name,'P_ORGANIZATION_ID',P_ORGANIZATION_ID);
682: WSH_DEBUG_SV.log(l_module_name,'P_INPUT_QUANTITY',P_INPUT_QUANTITY);
683: WSH_DEBUG_SV.log(l_module_name,'P_UOM_CODE',P_UOM_CODE);
684: WSH_DEBUG_SV.log(l_module_name,'P_TOP_MODEL_LINE_ID',P_TOP_MODEL_LINE_ID);
685: END IF;
686: --
687: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
688: /* Bug 2177410, skip validate quantity to avoid error for non-item delivery details */
712: --
713: -- Debug Statements
714: --
715: IF l_debug_on THEN
716: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit INV_DECIMALS_PUB.VALIDATE_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
717: END IF;
718: --
719: inv_decimals_pub.validate_quantity(
720: p_item_id,
726: x_return_status);
727:
728: -- RV DEC_QTY
729: IF l_debug_on THEN
730: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
731: END IF;
732: -- HW OPMCONV - No need to fork the code
733:
734:
759: else --} {
760:
761: if ( p_input_quantity <> ROUND(p_input_quantity, l_max_decimal_digits)) then
762: IF l_debug_on THEN
763: WSH_DEBUG_SV.logmsg(l_module_name,'decimal digits exceed ');
764: END IF;
765: x_output_quantity := ROUND(p_input_quantity, l_max_decimal_digits);
766: else
767: if (x_output_quantity IS NULL) then
771:
772:
773: if ( trunc(abs(p_input_quantity)) > (POWER(10,l_max_real_digits) - 1) ) then
774: IF l_debug_on THEN
775: WSH_DEBUG_SV.logmsg(l_module_name,'real part of number fail');
776: END IF;
777:
778: raise others;
779: end if;
782: --
783: -- Debug Statements
784: --
785: IF l_debug_on THEN
786: WSH_DEBUG_SV.log(l_module_name,'x_output_quantity',x_output_quantity);
787: WSH_DEBUG_SV.pop(l_module_name);
788: END IF;
789: --
790: exception
783: -- Debug Statements
784: --
785: IF l_debug_on THEN
786: WSH_DEBUG_SV.log(l_module_name,'x_output_quantity',x_output_quantity);
787: WSH_DEBUG_SV.pop(l_module_name);
788: END IF;
789: --
790: exception
791: when others then
794: --
795: -- Debug Statements
796: --
797: IF l_debug_on THEN
798: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
799: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
800: END IF;
801: --
802: end check_decimal_quantity;
795: -- Debug Statements
796: --
797: IF l_debug_on THEN
798: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
799: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
800: END IF;
801: --
802: end check_decimal_quantity;
803:
836: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
837: --
838: IF l_debug_on IS NULL
839: THEN
840: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
841: END IF;
842: --
843: IF l_debug_on THEN
844: WSH_DEBUG_SV.push(l_module_name);
840: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
841: END IF;
842: --
843: IF l_debug_on THEN
844: WSH_DEBUG_SV.push(l_module_name);
845: END IF;
846: --
847: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
848:
872: --
873: -- Debug Statements
874: --
875: IF l_debug_on THEN
876: WSH_DEBUG_SV.pop(l_module_name);
877: END IF;
878: --
879: RETURN;
880: else
892: --
893: -- Debug Statements
894: --
895: IF l_debug_on THEN
896: WSH_DEBUG_SV.pop(l_module_name);
897: END IF;
898: --
899: EXCEPTION
900: WHEN others THEN
907: --
908: -- Debug Statements
909: --
910: IF l_debug_on THEN
911: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
913: END IF;
914: --
915: END check_unassign_from_delivery ;
908: -- Debug Statements
909: --
910: IF l_debug_on THEN
911: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
912: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
913: END IF;
914: --
915: END check_unassign_from_delivery ;
916:
959: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
960: --
961: IF l_debug_on IS NULL
962: THEN
963: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
964: END IF;
965: --
966: IF l_debug_on THEN
967: WSH_DEBUG_SV.push(l_module_name);
963: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
964: END IF;
965: --
966: IF l_debug_on THEN
967: WSH_DEBUG_SV.push(l_module_name);
968: END IF;
969: --
970: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
971:
991: --
992: -- Debug Statements
993: --
994: IF l_debug_on THEN
995: WSH_DEBUG_SV.pop(l_module_name);
996: END IF;
997: --
998: RETURN;
999:
1019: --
1020: -- Debug Statements
1021: --
1022: IF l_debug_on THEN
1023: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_AUTOCREATE.AUTOCREATE_DELIVERIES',WSH_DEBUG_SV.C_PROC_LEVEL);
1024: END IF;
1025: --
1026: FOR i in 1..p_detail_rows.count LOOP
1027:
1043: x_return_status => x_return_status);
1044: --
1045: IF l_debug_on THEN
1046: --
1047: WSH_DEBUG_SV.log(l_module_name, 'Return status from autocreate_deliveries: '|| x_return_status);
1048: --
1049: END IF;
1050: --
1051: -- Bug 2734531 (handle return status correctly)
1061:
1062: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1063: IF l_debug_on THEN
1064: --
1065: WSH_DEBUG_SV.log(l_module_name, 'Done check_assign_del_multi '|| x_return_status);
1066: --
1067: END IF;
1068: --
1069: -- Debug Statements
1068: --
1069: -- Debug Statements
1070: --
1071: IF l_debug_on THEN
1072: WSH_DEBUG_SV.pop(l_module_name);
1073: END IF;
1074: --
1075: EXCEPTION
1076: WHEN assign_error THEN
1080: --
1081: -- Debug Statements
1082: --
1083: IF l_debug_on THEN
1084: WSH_DEBUG_SV.logmsg(l_module_name,'ASSIGN_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1085: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ASSIGN_ERROR');
1086: END IF;
1087: --
1088: WHEN others THEN
1081: -- Debug Statements
1082: --
1083: IF l_debug_on THEN
1084: WSH_DEBUG_SV.logmsg(l_module_name,'ASSIGN_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1085: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:ASSIGN_ERROR');
1086: END IF;
1087: --
1088: WHEN others THEN
1089: IF check_assign%ISOPEN THEN
1095: --
1096: -- Debug Statements
1097: --
1098: IF l_debug_on THEN
1099: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1101: END IF;
1102: --
1103: END check_assign_del_multi;
1096: -- Debug Statements
1097: --
1098: IF l_debug_on THEN
1099: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1100: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1101: END IF;
1102: --
1103: END check_assign_del_multi;
1104:
1209: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1210: --
1211: IF l_debug_on IS NULL
1212: THEN
1213: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1214: END IF;
1215: --
1216: IF l_debug_on THEN
1217: WSH_DEBUG_SV.push(l_module_name);
1213: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1214: END IF;
1215: --
1216: IF l_debug_on THEN
1217: WSH_DEBUG_SV.push(l_module_name);
1218: --
1219: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1215: --
1216: IF l_debug_on THEN
1217: WSH_DEBUG_SV.push(l_module_name);
1218: --
1219: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1222: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1223: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1216: IF l_debug_on THEN
1217: WSH_DEBUG_SV.push(l_module_name);
1218: --
1219: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1222: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1223: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1224: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1217: WSH_DEBUG_SV.push(l_module_name);
1218: --
1219: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1222: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1223: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1224: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1225: END IF;
1218: --
1219: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1222: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1223: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1224: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1225: END IF;
1226: --
1219: WSH_DEBUG_SV.log(l_module_name,'P_DETAIL_ID',P_DETAIL_ID);
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1222: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1223: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1224: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1225: END IF;
1226: --
1227: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1220: WSH_DEBUG_SV.log(l_module_name,'P_ACTIVITY_TYPE',P_ACTIVITY_TYPE);
1221: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_LINE_ID',P_SOURCE_LINE_ID);
1222: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_HEADER_ID',P_SOURCE_HEADER_ID);
1223: WSH_DEBUG_SV.log(l_module_name,'P_SOURCE_CODE',P_SOURCE_CODE);
1224: WSH_DEBUG_SV.log(l_module_name,'P_INIT_FLAG',P_INIT_FLAG);
1225: END IF;
1226: --
1227: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
1228:
1230: --
1231: -- Debug Statements
1232: --
1233: IF l_debug_on THEN
1234: WSH_DEBUG_SV.pop(l_module_name);
1235: END IF;
1236: --
1237: return;
1238: END IF;
1258:
1259: -- RTV Changes
1260: IF l_source_code <> 'OE' THEN
1261: IF l_debug_on THEN
1262: WSH_DEBUG_SV.pop(l_module_name);
1263: END IF;
1264: return;
1265: END IF;
1266:
1277: --
1278: -- Debug Statements
1279: --
1280: IF l_debug_on THEN
1281: WSH_DEBUG_SV.pop(l_module_name);
1282: END IF;
1283: --
1284: return;
1285: END IF;
1289: --
1290: -- Debug Statements
1291: --
1292: IF l_debug_on THEN
1293: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID ) ||' FAILED CREDIT CHECK OR IS ON HOLD' );
1294: END IF;
1295: --
1296: raise credit_hold_error;
1297: END IF;
1312: CLOSE get_pr_credit_cache;
1313: IF l_cache_status = 'F' THEN
1314: g_bad_header_ids(l_bad_index) := l_header_id;
1315: IF l_debug_on THEN
1316: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID )
1317: ||' FAILED CREDIT CHECK OR IS ON HOLD' );
1318: END IF;
1319: RAISE credit_hold_error;
1320: ELSIF l_cache_status = 'P' THEN
1335: WHERE HEADER_ID = l_header_id;
1336: END IF;
1337:
1338: IF l_debug_on THEN
1339: WSH_DEBUG_SV.logmsg(l_module_name, 'SETTING THE POLICY CONTEXT FOR ORG_ID:' || TO_CHAR ( L_ORG_ID ) );
1340: END IF;
1341: --
1342: MO_GLOBAL.set_policy_context('S', l_org_id);
1343:
1358: --
1359: -- Debug Statements
1360: --
1361: IF l_debug_on THEN
1362: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_VERIFY_PAYMENT_PUB.VERIFY_PAYMENT',WSH_DEBUG_SV.C_PROC_LEVEL);
1363: END IF;
1364: --
1365: oe_verify_payment_pub.verify_payment(
1366: p_header_id => l_header_id,
1378: --
1379: -- Debug Statements
1380: --
1381: IF l_debug_on THEN
1382: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID ) ||' FAILED CREDIT CHECK' );
1383: END IF;
1384: --
1385: raise credit_hold_error;
1386: END IF;
1391: --
1392: -- Debug Statements
1393: --
1394: IF l_debug_on THEN
1395: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_HOLDS_PUB.CHECK_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
1396: END IF;
1397: --
1398: oe_holds_pub.check_holds(
1399: p_api_version => 1.0,
1416: --
1417: -- Debug Statements
1418: --
1419: IF l_debug_on THEN
1420: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER HEADER '||TO_CHAR ( L_HEADER_ID ) ||' IS ON HOLD' );
1421: END IF;
1422: --
1423: --BUG#:1549665 hwahdani - check if process was run from conc. request and get id
1424: -- and log exception if order is on hold
1424: -- and log exception if order is on hold
1425: l_request_id := fnd_global.conc_request_id;
1426: -- 1729516
1427: IF l_debug_on THEN
1428: WSH_DEBUG_SV.log(l_module_name,'l_request_id', l_request_id );
1429: WSH_DEBUG_SV.log(l_module_name,'WSH_PICK_LIST.G_BATCH_ID', WSH_PICK_LIST.G_BATCH_ID );
1430: END IF;
1431:
1432: --Bug 14620571: Exception needs to be logged only for PickRelease process
1425: l_request_id := fnd_global.conc_request_id;
1426: -- 1729516
1427: IF l_debug_on THEN
1428: WSH_DEBUG_SV.log(l_module_name,'l_request_id', l_request_id );
1429: WSH_DEBUG_SV.log(l_module_name,'WSH_PICK_LIST.G_BATCH_ID', WSH_PICK_LIST.G_BATCH_ID );
1430: END IF;
1431:
1432: --Bug 14620571: Exception needs to be logged only for PickRelease process
1433: IF ( p_activity_type <> 'PICK' ) THEN
1439: --
1440: -- Debug Statements
1441: --
1442: IF l_debug_on THEN
1443: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
1444: END IF;
1445: --
1446:
1447: l_dummy_exception_id :=null;
1448: --
1449: -- Debug Statements
1450: --
1451: IF l_debug_on THEN
1452: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
1453: END IF;
1454: --
1455: wsh_xc_util.log_exception(
1456: p_api_version => 1.0,
1473: --
1474: -- Debug Statements
1475: --
1476: IF l_debug_on THEN
1477: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION DID NOT RETURN SUCCESS' );
1478: END IF;
1479: --
1480: END IF;
1481: --Bug: 1573703 Return status needs to be set to 'E'
1526: --
1527: -- Debug Statements
1528: --
1529: IF l_debug_on THEN
1530: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit OE_HOLDS_PUB.CHECK_HOLDS',WSH_DEBUG_SV.C_PROC_LEVEL);
1531: END IF;
1532: --
1533: oe_holds_pub.check_holds(
1534: p_api_version => 1.0,
1544: --
1545: -- Debug Statements
1546: --
1547: IF l_debug_on THEN
1548: WSH_DEBUG_SV.logmsg(l_module_name, 'ORDER LINE '||TO_CHAR ( L_LINE_ID ) ||' IS ON HOLD' );
1549: END IF;
1550: --
1551:
1552: -- BUG#: 1549665 hwahdani - check if process was run from conc. request and
1570: --
1571: -- Debug Statements
1572: --
1573: IF l_debug_on THEN
1574: WSH_DEBUG_SV.logmsg(l_module_name, L_MSG );
1575: END IF;
1576: --
1577:
1578: l_dummy_exception_id :=null;
1579: --
1580: -- Debug Statements
1581: --
1582: IF l_debug_on THEN
1583: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_XC_UTIL.LOG_EXCEPTION',WSH_DEBUG_SV.C_PROC_LEVEL);
1584: END IF;
1585: --
1586: wsh_xc_util.log_exception(
1587: p_api_version => 1.0,
1604: --
1605: -- Debug Statements
1606: --
1607: IF l_debug_on THEN
1608: WSH_DEBUG_SV.logmsg(l_module_name, 'WSH_XC_UTIL.LOG_EXCEPTION DID NOT RETURN SUCCESS' );
1609: END IF;
1610: --
1611: END IF;
1612: --Bug: 1573703 Return status needs to be set to 'E'
1642: --
1643: -- Debug Statements
1644: --
1645: IF l_debug_on THEN
1646: WSH_DEBUG_SV.pop(l_module_name);
1647: END IF;
1648: --
1649: EXCEPTION
1650: WHEN header_hold_error THEN
1655: --
1656: -- Debug Statements
1657: --
1658: IF l_debug_on THEN
1659: WSH_DEBUG_SV.logmsg(l_module_name,'HEADER_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1660: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:HEADER_HOLD_ERROR');
1661: END IF;
1662:
1663: WHEN line_hold_error THEN
1656: -- Debug Statements
1657: --
1658: IF l_debug_on THEN
1659: WSH_DEBUG_SV.logmsg(l_module_name,'HEADER_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1660: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:HEADER_HOLD_ERROR');
1661: END IF;
1662:
1663: WHEN line_hold_error THEN
1664: IF p_activity_type = 'PICK' THEN
1680: --
1681: -- Debug Statements
1682: --
1683: IF l_debug_on THEN
1684: WSH_DEBUG_SV.logmsg(l_module_name, p_activity_type ||'_LINE_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:LINE_HOLD_ERROR');
1686: END IF;
1687:
1688: WHEN credit_hold_error THEN
1681: -- Debug Statements
1682: --
1683: IF l_debug_on THEN
1684: WSH_DEBUG_SV.logmsg(l_module_name, p_activity_type ||'_LINE_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1685: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:LINE_HOLD_ERROR');
1686: END IF;
1687:
1688: WHEN credit_hold_error THEN
1689: FND_MESSAGE.SET_NAME('WSH','WSH_DET_CREDIT_HOLD_ERROR');
1693: --
1694: -- Debug Statements
1695: --
1696: IF l_debug_on THEN
1697: WSH_DEBUG_SV.logmsg(l_module_name,'CREDIT_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CREDIT_HOLD_ERROR');
1699: END IF;
1700: --
1701: WHEN others THEN
1694: -- Debug Statements
1695: --
1696: IF l_debug_on THEN
1697: WSH_DEBUG_SV.logmsg(l_module_name,'CREDIT_HOLD_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1698: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:CREDIT_HOLD_ERROR');
1699: END IF;
1700: --
1701: WHEN others THEN
1702: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.Check_Credit_Holds');
1705: --
1706: -- Debug Statements
1707: --
1708: IF l_debug_on THEN
1709: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1711: END IF;
1712: --
1713: END check_credit_holds;
1706: -- Debug Statements
1707: --
1708: IF l_debug_on THEN
1709: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
1710: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
1711: END IF;
1712: --
1713: END check_credit_holds;
1714:
1845: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
1846: --
1847: IF l_debug_on IS NULL
1848: THEN
1849: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1850: END IF;
1851: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1849: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
1850: END IF;
1851: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1857: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1851: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1857: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1858: END IF;
1859: --
1852: IF l_debug_on THEN
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1857: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1858: END IF;
1859: --
1860: OPEN c_detail_info(p_order_line_id);
1853: WSH_DEBUG_SV.push(l_module_name);
1854: --
1855: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
1856: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
1857: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY2_TO_PICK',P_QUANTITY2_TO_PICK);
1858: END IF;
1859: --
1860: OPEN c_detail_info(p_order_line_id);
1861: FETCH c_detail_info INTO l_detail_info;
1875: --
1876: -- Debug Statements
1877: --
1878: IF l_debug_on THEN
1879: WSH_DEBUG_SV.pop(l_module_name);
1880: END IF;
1881: --
1882: RETURN;
1883: END IF;
1905: --
1906: -- Debug Statements
1907: --
1908: IF l_debug_on THEN
1909: WSH_DEBUG_SV.pop(l_module_name);
1910: END IF;
1911: --
1912: RETURN;
1913: END IF;
1935: --
1936: -- Debug Statements
1937: --
1938: IF l_debug_on THEN
1939: WSH_DEBUG_SV.pop(l_module_name);
1940: END IF;
1941: --
1942: RETURN;
1943: END IF;
1944:
1945: -- Debug Statements
1946: --
1947: IF l_debug_on THEN
1948: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_INTEGRATION.GET_MIN_MAX_TOLERANCE_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
1949: END IF;
1950: --
1951: -- Bug 2181132
1952:
1980: l_max_quantity2 := l_minmaxoutrectype.max_remaining_quantity2;
1981:
1982:
1983: IF l_debug_on THEN
1984: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1985: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1986: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1987: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1988: END IF;
1981:
1982:
1983: IF l_debug_on THEN
1984: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1985: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1986: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1987: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1988: END IF;
1989:
1982:
1983: IF l_debug_on THEN
1984: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1985: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1986: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1987: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1988: END IF;
1989:
1990: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1983: IF l_debug_on THEN
1984: WSH_DEBUG_SV.log(l_module_name,'Return Status'||l_return_status);
1985: WSH_DEBUG_SV.log(l_module_name,'Max Qty'||l_max_quantity);
1986: WSH_DEBUG_SV.log(l_module_name,'Min Qty'||l_min_quantity);
1987: WSH_DEBUG_SV.log(l_module_name,'Qty UOM'||l_quantity_uom);
1988: END IF;
1989:
1990: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1991: raise others ;
1998: --
1999: -- Debug Statements
2000: --
2001: IF l_debug_on THEN
2002: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_WV_UTILS.CONVERT_UOM',WSH_DEBUG_SV.C_PROC_LEVEL);
2003: END IF;
2004: --
2005: l_max_quantity := l_max_quantity
2006: - l_staged_info.net_staged_qty;
2051: --
2052: -- Debug Statements
2053: --
2054: IF l_debug_on THEN
2055: WSH_DEBUG_SV.pop(l_module_name);
2056: END IF;
2057: --
2058: EXCEPTION
2059: WHEN others THEN
2080: --
2081: -- Debug Statements
2082: --
2083: IF l_debug_on THEN
2084: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2085: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2086: END IF;
2087: --
2088: END check_quantity_to_pick;
2081: -- Debug Statements
2082: --
2083: IF l_debug_on THEN
2084: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2085: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2086: END IF;
2087: --
2088: END check_quantity_to_pick;
2089:
2119: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2120: --
2121: IF l_debug_on IS NULL
2122: THEN
2123: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2124: END IF;
2125: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2123: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2124: END IF;
2125: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2128: --
2129: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
2130: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
2131: END IF;
2125: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2128: --
2129: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
2130: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
2131: END IF;
2132: --
2133: --
2126: IF l_debug_on THEN
2127: WSH_DEBUG_SV.push(l_module_name);
2128: --
2129: WSH_DEBUG_SV.log(l_module_name,'P_ORDER_LINE_ID',P_ORDER_LINE_ID);
2130: WSH_DEBUG_SV.log(l_module_name,'P_QUANTITY_TO_PICK',P_QUANTITY_TO_PICK);
2131: END IF;
2132: --
2133: --
2134: -- Debug Statements
2133: --
2134: -- Debug Statements
2135: --
2136: IF l_debug_on THEN
2137: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_QUANTITY_TO_PICK',WSH_DEBUG_SV.C_PROC_LEVEL);
2138: END IF;
2139: --
2140: wsh_details_validations.check_quantity_to_pick(
2141: p_order_line_id => p_order_line_id,
2151: --
2152: -- Debug Statements
2153: --
2154: IF l_debug_on THEN
2155: WSH_DEBUG_SV.pop(l_module_name);
2156: END IF;
2157: --
2158: EXCEPTION
2159: WHEN OTHERS THEN
2163: --
2164: -- Debug Statements
2165: --
2166: IF l_debug_on THEN
2167: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2168: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2169: END IF;
2170: --
2171: END check_quantity_to_pick;
2164: -- Debug Statements
2165: --
2166: IF l_debug_on THEN
2167: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2168: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2169: END IF;
2170: --
2171: END check_quantity_to_pick;
2172:
2230: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2231: --
2232: IF l_debug_on IS NULL
2233: THEN
2234: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2235: END IF;
2236: --
2237: IF l_debug_on THEN
2238: WSH_DEBUG_SV.push(l_module_name);
2234: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2235: END IF;
2236: --
2237: IF l_debug_on THEN
2238: WSH_DEBUG_SV.push(l_module_name);
2239: --
2240: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2241: END IF;
2242: --
2236: --
2237: IF l_debug_on THEN
2238: WSH_DEBUG_SV.push(l_module_name);
2239: --
2240: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2241: END IF;
2242: --
2243: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
2244:
2313: --
2314: -- Debug Statements
2315: --
2316: IF l_debug_on THEN
2317: WSH_DEBUG_SV.pop(l_module_name);
2318: END IF;
2319: --
2320: EXCEPTION
2321:
2329: --
2330: -- Debug Statements
2331: --
2332: IF l_debug_on THEN
2333: WSH_DEBUG_SV.logmsg(l_module_name,'REQ_QTY_ZERO exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2334: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REQ_QTY_ZERO');
2335: END IF;
2336: --
2337: WHEN others THEN
2330: -- Debug Statements
2331: --
2332: IF l_debug_on THEN
2333: WSH_DEBUG_SV.logmsg(l_module_name,'REQ_QTY_ZERO exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2334: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:REQ_QTY_ZERO');
2335: END IF;
2336: --
2337: WHEN others THEN
2338: IF c_check_qty_inside_del%ISOPEN THEN
2344: --
2345: -- Debug Statements
2346: --
2347: IF l_debug_on THEN
2348: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2349: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2350: END IF;
2351: --
2352: END check_zero_req_confirm;
2345: -- Debug Statements
2346: --
2347: IF l_debug_on THEN
2348: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2349: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2350: END IF;
2351: --
2352: END check_zero_req_confirm;
2353:
2442: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
2443: --
2444: IF l_debug_on IS NULL
2445: THEN
2446: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2447: END IF;
2448: --
2449: IF l_debug_on THEN
2450: WSH_DEBUG_SV.push(l_module_name);
2446: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
2447: END IF;
2448: --
2449: IF l_debug_on THEN
2450: WSH_DEBUG_SV.push(l_module_name);
2451: --
2452: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2454: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2448: --
2449: IF l_debug_on THEN
2450: WSH_DEBUG_SV.push(l_module_name);
2451: --
2452: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2454: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2455: END IF;
2456: --
2449: IF l_debug_on THEN
2450: WSH_DEBUG_SV.push(l_module_name);
2451: --
2452: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2454: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2455: END IF;
2456: --
2457: x_return_status := FND_API.G_RET_STS_SUCCESS;
2450: WSH_DEBUG_SV.push(l_module_name);
2451: --
2452: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_DETAIL_ID',P_DELIVERY_DETAIL_ID);
2453: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
2454: WSH_DEBUG_SV.log(l_module_name,'P_LIST_TYPE',P_LIST_TYPE);
2455: END IF;
2456: --
2457: x_return_status := FND_API.G_RET_STS_SUCCESS;
2458: -- clear the disabled list first
2512: --}
2513: END IF;
2514: --
2515: IF l_debug_on THEN
2516: WSH_DEBUG_SV.pop(l_module_name);
2517: END IF;
2518: --
2519: RETURN;
2520: --}
2523: -- J-IB-NPARIKH-}
2524: --
2525:
2526: IF l_debug_on THEN
2527: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.GET_RESERVABLE_FLAG',WSH_DEBUG_SV.C_PROC_LEVEL);
2528: END IF;
2529:
2530: l_reservable_flag := WSH_DELIVERY_DETAILS_INV.get_reservable_flag(
2531: x_item_id => l_inventory_item_id,
2531: x_item_id => l_inventory_item_id,
2532: x_organization_id => l_organization_id,
2533: x_pickable_flag => l_pickable_flag);
2534: if l_debug_on then
2535: wsh_debug_sv.log(l_module_name, 'l_reservable_flag', l_reservable_flag);
2536: wsh_debug_sv.log(l_module_name, 'l_pickable_flag', l_pickable_flag);
2537: wsh_debug_sv.log(l_module_name, 'l_source_code', l_source_code);
2538: end if;
2539:
2532: x_organization_id => l_organization_id,
2533: x_pickable_flag => l_pickable_flag);
2534: if l_debug_on then
2535: wsh_debug_sv.log(l_module_name, 'l_reservable_flag', l_reservable_flag);
2536: wsh_debug_sv.log(l_module_name, 'l_pickable_flag', l_pickable_flag);
2537: wsh_debug_sv.log(l_module_name, 'l_source_code', l_source_code);
2538: end if;
2539:
2540: -- If delivery line is released to warehouse, shipped, or deleted,
2533: x_pickable_flag => l_pickable_flag);
2534: if l_debug_on then
2535: wsh_debug_sv.log(l_module_name, 'l_reservable_flag', l_reservable_flag);
2536: wsh_debug_sv.log(l_module_name, 'l_pickable_flag', l_pickable_flag);
2537: wsh_debug_sv.log(l_module_name, 'l_source_code', l_source_code);
2538: end if;
2539:
2540: -- If delivery line is released to warehouse, shipped, or deleted,
2541: -- disable its fields.
2543: IF (l_released_status IN ('S', 'C', 'D')) THEN
2544: i:=i+1; x_disabled_list(i) := 'FULL';
2545: i:=i+1; x_disabled_list(i) := 'DESC_FLEX';
2546: if l_debug_on then
2547: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
2548: wsh_debug_sv.log(l_module_name, 'l_picked_quantity', l_picked_quantity);
2549: end if;
2550: IF ( l_released_status = 'S'
2551: AND l_picked_quantity IS NULL) THEN
2544: i:=i+1; x_disabled_list(i) := 'FULL';
2545: i:=i+1; x_disabled_list(i) := 'DESC_FLEX';
2546: if l_debug_on then
2547: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
2548: wsh_debug_sv.log(l_module_name, 'l_picked_quantity', l_picked_quantity);
2549: end if;
2550: IF ( l_released_status = 'S'
2551: AND l_picked_quantity IS NULL) THEN
2552: -- can update some fields if the delivery line
2565: --
2566: -- Debug Statements
2567: --
2568: IF l_debug_on THEN
2569: WSH_DEBUG_SV.pop(l_module_name);
2570: END IF;
2571: --
2572: RETURN;
2573:
2717: --
2718: -- Debug Statements
2719: --
2720: IF l_debug_on THEN
2721: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.CHECK_WMS_ORG',WSH_DEBUG_SV.C_PROC_LEVEL);
2722: END IF;
2723: --
2724: IF (wsh_util_validate.Check_Wms_Org(l_organization_id)='Y') THEN
2725: -- Bug fix 2887330
2810: --
2811: -- J-IB-NPARIKH-}
2812:
2813: IF l_debug_on THEN
2814: WSH_DEBUG_SV.log(l_module_name,'count of x_disabled_list', x_disabled_list.COUNT);
2815: END IF;
2816: -- public api changes
2817: IF (x_disabled_list.COUNT = 0) or (x_disabled_list(1) <> 'FULL') THEN
2818: i := x_disabled_list.COUNT;
2879: --
2880: -- Debug Statements
2881: --
2882: IF l_debug_on THEN
2883: WSH_DEBUG_SV.pop(l_module_name);
2884: END IF;
2885: --
2886: EXCEPTION
2887: WHEN e_all_disabled THEN --public api changes
2890: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_detail_id);
2891: wsh_util_core.add_message(x_return_status,l_module_name);
2892: IF l_debug_on THEN
2893: -- Nothing is updateable
2894: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
2895: END IF;
2896:
2897: WHEN wsh_dp_no_entity THEN
2898: x_return_status := FND_API.G_RET_STS_ERROR;
2916: --
2917: -- Debug Statements
2918: --
2919: IF l_debug_on THEN
2920: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2921: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2922: END IF;
2923: --
2924: WHEN wsh_del_not_exist THEN -- Bug fix 2650464
2917: -- Debug Statements
2918: --
2919: IF l_debug_on THEN
2920: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DP_NO_ENTITY exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2921: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2922: END IF;
2923: --
2924: WHEN wsh_del_not_exist THEN -- Bug fix 2650464
2925: x_return_status := FND_API.G_RET_STS_ERROR;
2938: x_msg_data := l_msg_summary;
2939: END IF;
2940: --
2941: IF l_debug_on THEN
2942: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DEL_NOT_EXIST exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2944: END IF;
2945:
2946: WHEN wsh_inv_list_type THEN
2939: END IF;
2940: --
2941: IF l_debug_on THEN
2942: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_DEL_NOT_EXIST exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2943: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_DP_NO_ENTITY');
2944: END IF;
2945:
2946: WHEN wsh_inv_list_type THEN
2947: x_return_status := FND_API.G_RET_STS_ERROR;
2957: --
2958: -- Debug Statements
2959: --
2960: IF l_debug_on THEN
2961: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2962: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
2963: END IF;
2964: --
2965: WHEN others THEN
2958: -- Debug Statements
2959: --
2960: IF l_debug_on THEN
2961: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_INV_LIST_TYPE exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
2962: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_INV_LIST_TYPE');
2963: END IF;
2964: --
2965: WHEN others THEN
2966: IF (get_delivery_status%ISOPEN) THEN
2973: --
2974: -- Debug Statements
2975: --
2976: IF l_debug_on THEN
2977: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2978: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2979: END IF;
2980: --
2981: END Get_Disabled_list;
2974: -- Debug Statements
2975: --
2976: IF l_debug_on THEN
2977: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
2978: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
2979: END IF;
2980: --
2981: END Get_Disabled_list;
2982:
3183: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3184: --
3185: IF l_debug_on IS NULL
3186: THEN
3187: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3188: END IF;
3189: --
3190: x_return_status := FND_API.G_RET_STS_SUCCESS;
3191:
3192: l_del_shipping_quantity := 0;
3193: l_del_shipping_quantity2 := 0;
3194:
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3193: l_del_shipping_quantity2 := 0;
3194:
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3194:
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3202: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3195: IF l_debug_on THEN
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3202: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3203: END IF;
3196: WSH_DEBUG_SV.push(l_module_name);
3197: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3202: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3203: END IF;
3204:
3197: WSH_DEBUG_SV.log(l_module_name,'api_version_number',p_in_attributes.api_version_number);
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3202: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3203: END IF;
3204:
3205: IF ( p_in_attributes.source_code IS NULL ) THEN
3198: WSH_DEBUG_SV.log(l_module_name,'source_code',p_in_attributes.source_code);
3199: WSH_DEBUG_SV.log(l_module_name,'line_id',p_in_attributes.line_id);
3200: WSH_DEBUG_SV.log(l_module_name,'dummy_quantity',p_inout_attributes.dummy_quantity);
3201: WSH_DEBUG_SV.logmsg(l_module_name, 'Action flag-'||p_in_attributes.action_flag);
3202: WSH_DEBUG_SV.logmsg(l_module_name, 'SHP TOL ABOVE-'||p_in_attributes.ship_tolerance_above);
3203: END IF;
3204:
3205: IF ( p_in_attributes.source_code IS NULL ) THEN
3206: x_msg_count := 1;
3211: IF p_in_attributes.ship_tolerance_above IS NULL OR
3212: p_in_attributes.action_flag IN ('C', 'I') THEN
3213:
3214: IF l_debug_on THEN
3215: WSH_DEBUG_SV.logmsg(l_module_name, 'Looking up details');
3216: END IF;
3217:
3218: -- fetch the values for CTO and OM Interface
3219: OPEN c_get_details_CTO;
3239:
3240: END IF;
3241:
3242: IF l_debug_on THEN
3243: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3244: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3245: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3246: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3247: END IF;
3240: END IF;
3241:
3242: IF l_debug_on THEN
3243: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3244: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3245: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3246: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3247: END IF;
3248:
3241:
3242: IF l_debug_on THEN
3243: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3244: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3245: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3246: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3247: END IF;
3248:
3249:
3242: IF l_debug_on THEN
3243: WSH_DEBUG_SV.log(l_module_name, 'l_source_header_id', l_source_header_id);
3244: WSH_DEBUG_SV.log(l_module_name, 'l_source_line_set_id', l_source_line_set_id);
3245: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL ABOVE',l_ship_tolerance_above);
3246: WSH_DEBUG_SV.log(l_module_name, 'SHP TOL BELOW',l_ship_tolerance_below);
3247: END IF;
3248:
3249:
3250: -- bug 3511424
3273: l_total_ordered_quantity2;
3274: CLOSE c_sum_ordered_qty;
3275:
3276: IF l_debug_on THEN
3277: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty-'||l_total_ordered_quantity);
3278: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty2-'||l_total_ordered_quantity2);
3279: END IF;
3280:
3281: IF p_in_attributes.ship_tolerance_above IS NOT NULL THEN -- Pick Confirm
3274: CLOSE c_sum_ordered_qty;
3275:
3276: IF l_debug_on THEN
3277: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty-'||l_total_ordered_quantity);
3278: WSH_DEBUG_SV.logmsg(l_module_name, 'Ordered_qty2-'||l_total_ordered_quantity2);
3279: END IF;
3280:
3281: IF p_in_attributes.ship_tolerance_above IS NOT NULL THEN -- Pick Confirm
3282: x_out_attributes.min_remaining_quantity := 0;
3287: l_del_shipping_quantity2;
3288: CLOSE c_sum_picked_qty;
3289:
3290: IF l_debug_on THEN
3291: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty-'||l_del_shipping_quantity);
3292: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty2-'||l_del_shipping_quantity2);
3293: END IF;
3294:
3295: END IF;
3288: CLOSE c_sum_picked_qty;
3289:
3290: IF l_debug_on THEN
3291: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty-'||l_del_shipping_quantity);
3292: WSH_DEBUG_SV.logmsg(l_module_name, 'l_del_shipping_qty2-'||l_del_shipping_quantity2);
3293: END IF;
3294:
3295: END IF;
3296:
3330: CLOSE c_sum_line_shp_qty;
3331: END IF;
3332:
3333: IF l_debug_on THEN
3334: WSH_DEBUG_SV.log(l_module_name, 'CTO/Interface: l_del_shipping_quantity',
3335: l_del_shipping_quantity);
3336: END IF;
3337:
3338: END IF;
3369:
3370: --{
3371: --
3372: IF l_debug_on THEN
3373: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity before the modification',l_max_remaining_quantity);
3374: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity before the modification',l_min_remaining_quantity);
3375: END IF;
3376: --
3377: l_max_remaining_quantity := trunc(l_max_remaining_quantity, wsh_util_core.c_max_decimal_digits_inv);
3370: --{
3371: --
3372: IF l_debug_on THEN
3373: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity before the modification',l_max_remaining_quantity);
3374: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity before the modification',l_min_remaining_quantity);
3375: END IF;
3376: --
3377: l_max_remaining_quantity := trunc(l_max_remaining_quantity, wsh_util_core.c_max_decimal_digits_inv);
3378: IF (round(l_min_remaining_quantity,wsh_util_core.c_max_decimal_digits_inv) < l_min_remaining_quantity) THEN
3385: --}
3386: END IF;
3387: --
3388: IF l_debug_on THEN
3389: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity after the modification',l_max_remaining_quantity);
3390: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity after the modification',l_min_remaining_quantity);
3391: END IF;
3392: --
3393: --}
3386: END IF;
3387: --
3388: IF l_debug_on THEN
3389: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity after the modification',l_max_remaining_quantity);
3390: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity after the modification',l_min_remaining_quantity);
3391: END IF;
3392: --
3393: --}
3394:
3401:
3402: -- HW OPMCONV - Let's treat Qtys similar to Qty1
3403:
3404: IF l_debug_on THEN
3405: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 before the modification',l_max_remaining_quantity2);
3406: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 before the modification',l_min_remaining_quantity2);
3407: END IF;
3408: --
3409: l_max_remaining_quantity2 := trunc(l_max_remaining_quantity2, wsh_util_core.c_max_decimal_digits_inv);
3402: -- HW OPMCONV - Let's treat Qtys similar to Qty1
3403:
3404: IF l_debug_on THEN
3405: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 before the modification',l_max_remaining_quantity2);
3406: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 before the modification',l_min_remaining_quantity2);
3407: END IF;
3408: --
3409: l_max_remaining_quantity2 := trunc(l_max_remaining_quantity2, wsh_util_core.c_max_decimal_digits_inv);
3410: IF (round(l_min_remaining_quantity2,wsh_util_core.c_max_decimal_digits_inv) < l_min_remaining_quantity2) THEN
3417: --}
3418: END IF;
3419: --
3420: IF l_debug_on THEN
3421: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 after the modification',l_max_remaining_quantity2);
3422: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 after the modification',l_min_remaining_quantity2);
3423: END IF;
3424:
3425:
3418: END IF;
3419: --
3420: IF l_debug_on THEN
3421: WSH_DEBUG_SV.log(l_module_name, 'l_max_remaining_quantity2 after the modification',l_max_remaining_quantity2);
3422: WSH_DEBUG_SV.log(l_module_name, 'l_min_remaining_quantity2 after the modification',l_min_remaining_quantity2);
3423: END IF;
3424:
3425:
3426:
3462: END IF;
3463:
3464:
3465: IF l_debug_on THEN
3466: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3467: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3463:
3464:
3465: IF l_debug_on THEN
3466: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3467: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3471: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3464:
3465: IF l_debug_on THEN
3466: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3467: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3471: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3472: WSH_DEBUG_SV.pop(l_module_name);
3465: IF l_debug_on THEN
3466: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3467: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3471: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3472: WSH_DEBUG_SV.pop(l_module_name);
3473: END IF;
3466: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity_uom', x_out_attributes.quantity_uom);
3467: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3471: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3472: WSH_DEBUG_SV.pop(l_module_name);
3473: END IF;
3474:
3467: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity',x_out_attributes.min_remaining_quantity);
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3471: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3472: WSH_DEBUG_SV.pop(l_module_name);
3473: END IF;
3474:
3475: EXCEPTION
3468: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity',x_out_attributes.max_remaining_quantity);
3469: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.quantity2_uom', x_out_attributes.quantity2_uom);
3470: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.min_remaining_quantity2',x_out_attributes.min_remaining_quantity2);
3471: WSH_DEBUG_SV.log(l_module_name,'x_out_attributes.max_remaining_quantity2',x_out_attributes.max_remaining_quantity2);
3472: WSH_DEBUG_SV.pop(l_module_name);
3473: END IF;
3474:
3475: EXCEPTION
3476: WHEN OTHERS THEN
3507: CLOSE c_get_details_CTO;
3508: END IF;
3509:
3510: IF l_debug_on THEN
3511: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.Oracle error Message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3513: END IF;
3514:
3515: END Get_Min_Max_Tolerance_Quantity;
3508: END IF;
3509:
3510: IF l_debug_on THEN
3511: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured.Oracle error Message is '||SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
3512: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
3513: END IF;
3514:
3515: END Get_Min_Max_Tolerance_Quantity;
3516:
3636: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
3637: --
3638: IF l_debug_on IS NULL
3639: THEN
3640: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3641: END IF;
3642: --
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.push(l_module_name);
3640: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
3641: END IF;
3642: --
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.push(l_module_name);
3645: --
3646: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
3647: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
3648: END IF;
3642: --
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.push(l_module_name);
3645: --
3646: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
3647: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
3648: END IF;
3649:
3650: Init_Detail_Actions_Tbl(
3643: IF l_debug_on THEN
3644: WSH_DEBUG_SV.push(l_module_name);
3645: --
3646: WSH_DEBUG_SV.log(l_module_name,'p_action',p_action);
3647: WSH_DEBUG_SV.log(l_module_name,'p_caller',p_caller);
3648: END IF;
3649:
3650: Init_Detail_Actions_Tbl(
3651: p_action => p_action,
3652: x_detail_actions_tab => l_detail_actions_tab,
3653: x_return_status => x_return_status);
3654:
3655: IF l_debug_on THEN
3656: WSH_DEBUG_SV.log(l_module_name,'Init_Detail_Actions_Tbl x_return_status',x_return_status);
3657: END IF;
3658:
3659: IF (x_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS ) THEN
3660: raise error_in_init_actions;
3671: --
3672: IF (p_caller NOT LIKE 'WMS%') THEN
3673:
3674: if l_debug_on then
3675: wsh_debug_sv.log(l_module_name, 'Organization Id', p_del_detail_rec_tab(j).organization_id);
3676: wsh_debug_sv.log(l_module_name, 'WMS Organization Id', l_wms_org_id);
3677: wsh_debug_sv.log(l_module_name, 'Non WMS Organization Id', l_non_wms_org_id);
3678: end if;
3679:
3672: IF (p_caller NOT LIKE 'WMS%') THEN
3673:
3674: if l_debug_on then
3675: wsh_debug_sv.log(l_module_name, 'Organization Id', p_del_detail_rec_tab(j).organization_id);
3676: wsh_debug_sv.log(l_module_name, 'WMS Organization Id', l_wms_org_id);
3677: wsh_debug_sv.log(l_module_name, 'Non WMS Organization Id', l_non_wms_org_id);
3678: end if;
3679:
3680: IF p_del_detail_rec_tab(j).organization_id = l_wms_org_id THEN
3673:
3674: if l_debug_on then
3675: wsh_debug_sv.log(l_module_name, 'Organization Id', p_del_detail_rec_tab(j).organization_id);
3676: wsh_debug_sv.log(l_module_name, 'WMS Organization Id', l_wms_org_id);
3677: wsh_debug_sv.log(l_module_name, 'Non WMS Organization Id', l_non_wms_org_id);
3678: end if;
3679:
3680: IF p_del_detail_rec_tab(j).organization_id = l_wms_org_id THEN
3681: l_wms_org_type := 'WMS';
3682: ELSIF p_del_detail_rec_tab(j).organization_id = l_non_wms_org_id THEN
3683: l_wms_org_type := NULL;
3684: ELSE
3685: IF l_debug_on THEN
3686: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.GET_ORG_TYPE',WSH_DEBUG_SV.C_PROC_LEVEL);
3687: END IF;
3688:
3689: l_org_type := wsh_util_validate.get_org_type(
3690: p_organization_id => p_del_detail_rec_tab(j).organization_id,
3691: p_delivery_detail_id => p_del_detail_rec_tab(j).delivery_detail_id,
3692: p_msg_display => 'N', -- Bug# 3332656
3693: x_return_status => l_return_status );
3694: IF l_debug_on THEN
3695: wsh_debug_sv.log(l_module_name, 'Return status after wsh_util_validate.get_org_type', l_return_status);
3696: END IF;
3697: IF l_return_status = wsh_util_core.g_ret_sts_unexp_error THEN
3698: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3699: ELSIF l_return_status = wsh_util_core.g_ret_sts_error THEN
3714:
3715: END IF;
3716: --
3717: IF l_debug_on THEN
3718: wsh_debug_sv.log(l_module_name, 'l_wms_org_type', l_wms_org_type);
3719: wsh_debug_sv.log(l_module_name, 'l_detail_actions_tab.Count', l_detail_actions_tab.count);
3720: END IF;
3721: -- OTM R12 - Bug 5399341: Get shipping params to figure if the org is OTM enabled.
3722:
3715: END IF;
3716: --
3717: IF l_debug_on THEN
3718: wsh_debug_sv.log(l_module_name, 'l_wms_org_type', l_wms_org_type);
3719: wsh_debug_sv.log(l_module_name, 'l_detail_actions_tab.Count', l_detail_actions_tab.count);
3720: END IF;
3721: -- OTM R12 - Bug 5399341: Get shipping params to figure if the org is OTM enabled.
3722:
3723: WSH_SHIPPING_PARAMS_PVT.Get(
3740: IF p_action = 'SPLIT-LINE' AND
3741: p_del_detail_rec_tab(j).released_status = WSH_DELIVERY_DETAILS_PKG.C_RELEASED_TO_WAREHOUSE THEN
3742:
3743: IF l_debug_on THEN
3744: wsh_debug_sv.log(l_module_name, 'Released_status', p_del_detail_rec_tab(j).released_status);
3745: wsh_debug_sv.log(l_module_name, 'Caller',p_caller );
3746: END IF;
3747: IF p_caller like 'WMS_XDOCK%' THEN
3748: null; -- allow action
3741: p_del_detail_rec_tab(j).released_status = WSH_DELIVERY_DETAILS_PKG.C_RELEASED_TO_WAREHOUSE THEN
3742:
3743: IF l_debug_on THEN
3744: wsh_debug_sv.log(l_module_name, 'Released_status', p_del_detail_rec_tab(j).released_status);
3745: wsh_debug_sv.log(l_module_name, 'Caller',p_caller );
3746: END IF;
3747: IF p_caller like 'WMS_XDOCK%' THEN
3748: null; -- allow action
3749: ELSE
3767: --
3768: --
3769: --
3770: IF l_debug_on THEN
3771: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3772: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3773: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3774: END IF;
3775: --
3768: --
3769: --
3770: IF l_debug_on THEN
3771: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3772: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3773: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3774: END IF;
3775: --
3776: --
3769: --
3770: IF l_debug_on THEN
3771: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3772: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3773: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3774: END IF;
3775: --
3776: --
3777: -- Actions on inbound/drop-ship lines are allowed only if caller
3826: --
3827: --
3828: --
3829: IF l_debug_on THEN
3830: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3831: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3832: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3833: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3834: END IF;
3827: --
3828: --
3829: IF l_debug_on THEN
3830: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3831: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3832: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3833: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3834: END IF;
3835: --
3828: --
3829: IF l_debug_on THEN
3830: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3831: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3832: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3833: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3834: END IF;
3835: --
3836: --}
3829: IF l_debug_on THEN
3830: wsh_debug_sv.logmsg(l_module_name, 'After Inbound Checks');
3831: wsh_debug_sv.log(l_module_name, 'l_released_status', l_released_status);
3832: wsh_debug_sv.log(l_module_name, 'l_ship_from_location_id', l_ship_from_location_id);
3833: wsh_debug_sv.log(l_module_name, 'l_caller', l_caller);
3834: END IF;
3835: --
3836: --}
3837: END IF;
3858: ) THEN
3859: l_pass_section_a :='N';
3860: IF l_detail_actions_tab(k).message_name IS NOT NULL THEN
3861: IF l_debug_on THEN
3862: wsh_debug_sv.log(l_module_name, 'Message Name is', l_detail_actions_tab(k).message_name);
3863: END IF;
3864: FND_MESSAGE.SET_NAME('WSH',l_detail_actions_tab(k).message_name);
3865: wsh_util_core.add_message(wsh_util_core.g_ret_sts_error);
3866: END IF;
3870: END LOOP;
3871: END IF;
3872:
3873: IF l_debug_on THEN
3874: WSH_DEBUG_SV.log(l_module_name,'l_pass_section_a ',l_pass_section_a);
3875: END IF;
3876: -- Section B
3877: IF (l_pass_section_a = 'Y' ) THEN
3878: -- TPW - Distributed Organization Changes - Start
3878: -- TPW - Distributed Organization Changes - Start
3879: IF ( p_action IN ( 'AUTOCREATE-DEL', 'ASSIGN' ) ) THEN
3880: --
3881: IF l_debug_on THEN
3882: WSH_DEBUG_SV.logmsg(l_module_name, 'Calling WSH_EXTERNAL_INTERFACE_SV.Get_Warehouse_Type', WSH_DEBUG_SV.C_PROC_LEVEL);
3883: END IF;
3884: --
3885: l_wh_type := WSH_EXTERNAL_INTERFACE_SV.Get_Warehouse_Type(
3886: p_organization_id => p_del_detail_rec_tab(j).organization_id,
3886: p_organization_id => p_del_detail_rec_tab(j).organization_id,
3887: x_return_status => l_return_status );
3888: --
3889: IF l_debug_on THEN
3890: WSH_DEBUG_SV.log(l_module_name, 'l_wh_type,l_return_status',l_wh_type||','||l_return_status);
3891: END IF;
3892: --
3893:
3894: IF nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TW2' THEN
3893:
3894: IF nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TW2' THEN
3895: --
3896: IF l_debug_on THEN
3897: WSH_DEBUG_SV.logmsg(l_module_name, 'Error: Cannot perform action Auto-create Deliveries/Assign to Delivery in Distributed Enabled Organization');
3898: END IF;
3899: --
3900: RAISE e_record_ineligible;
3901: END IF;
3919: p_delivery_detail_id => p_del_detail_rec_tab(j).delivery_detail_id,
3920: p_msg_display => 'N');
3921:
3922: IF l_debug_on THEN
3923: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
3924: END IF;
3925:
3926: -- TPW - Distributed Organization Changes
3927: --IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) = 'TPW' ) THEN
3957: x_error_ids => l_error_ids,
3958: x_valid_index_tab => l_valid_index_tab);
3959:
3960: IF l_debug_on THEN
3961: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',
3962: l_return_status);
3963: END IF;
3964:
3965: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
4007: x_error_ids => l_error_ids,
4008: x_valid_index_tab => l_valid_index_tab);
4009:
4010: IF l_debug_on THEN
4011: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',
4012: l_return_status);
4013: END IF;
4014:
4015: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
4068: x_msg_data => l_msg_data);
4069:
4070:
4071: IF l_debug_on THEN
4072: WSH_DEBUG_SV.log(l_module_name,'WMS_SHIPPING_INTERFACE_GRP.process_delivery_details l_wms_table(1).return_status',
4073: l_wms_table(1).return_status);
4074: END IF;
4075:
4076: 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
4088: x_error_ids => l_error_ids,
4089: x_valid_index_tab => l_valid_index_tab);
4090:
4091: IF l_debug_on THEN
4092: WSH_DEBUG_SV.log(l_module_name,'WSH_DELIVERY_VALIDATIONS.Is_Action_Enabled l_return_status',
4093: l_return_status);
4094: END IF;
4095:
4096: IF (l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS)
4137: p_delivery_detail_id => p_del_detail_rec_tab(j).delivery_detail_id,
4138: p_msg_display => 'N');
4139:
4140: IF l_debug_on THEN
4141: WSH_DEBUG_SV.log(l_module_name,'Get_Warehouse_Type l_wh_type,l_return_status',l_wh_type||l_return_status);
4142: END IF;
4143:
4144: -- TPW - Distributed Organization Changes
4145: --IF ( nvl(l_wh_type, FND_API.G_MISS_CHAR) in ('CMS','TPW')) THEN
4175: CLOSE det_to_del_cur;
4176: END IF;
4177:
4178: IF l_debug_on THEN
4179: wsh_debug_sv.log(l_module_name, 'Error Id', p_del_detail_rec_tab(j).delivery_detail_id);
4180: END IF;
4181: x_error_ids(x_error_ids.COUNT + 1) := p_del_detail_rec_tab(j).delivery_detail_id;
4182: IF nvl(p_caller, FND_API.G_MISS_CHAR) = 'WSH_PUB'
4183: OR p_caller like 'FTE%' THEN
4191: IF det_to_del_cur%ISOPEN THEN
4192: CLOSE det_to_del_cur;
4193: END IF;
4194: IF l_debug_on THEN
4195: wsh_debug_sv.log(l_module_name, 'Error Id', p_del_detail_rec_tab(j).delivery_detail_id);
4196: END IF;
4197: x_error_ids(x_error_ids.COUNT + 1) := p_del_detail_rec_tab(j).delivery_detail_id;
4198: IF nvl(p_caller, FND_API.G_MISS_CHAR) = 'WSH_PUB'
4199: OR p_caller like 'FTE%' THEN
4207: IF det_to_del_cur%ISOPEN THEN
4208: CLOSE det_to_del_cur;
4209: END IF;
4210: IF l_debug_on THEN
4211: wsh_debug_sv.log(l_module_name, 'Error Id', p_del_detail_rec_tab(j).delivery_detail_id);
4212: END IF;
4213: x_error_ids(x_error_ids.COUNT + 1) := p_del_detail_rec_tab(j).delivery_detail_id;
4214: IF nvl(p_caller, FND_API.G_MISS_CHAR) = 'WSH_PUB'
4215: OR p_caller like 'FTE%' THEN
4256: --
4257: END IF;
4258:
4259: IF l_debug_on THEN
4260: WSH_DEBUG_SV.pop(l_module_name);
4261: END IF;
4262:
4263: EXCEPTION
4264: WHEN error_in_init_actions THEN
4262:
4263: EXCEPTION
4264: WHEN error_in_init_actions THEN
4265: IF l_debug_on THEN
4266: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4267: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
4268: END IF;
4269:
4270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4263: EXCEPTION
4264: WHEN error_in_init_actions THEN
4265: IF l_debug_on THEN
4266: WSH_DEBUG_SV.logmsg(l_module_name,'error_in_init_actions exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4267: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:error_in_init_actions');
4268: END IF;
4269:
4270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4271: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4271: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4272: wsh_util_core.add_message(x_return_status, l_module_name);
4273: IF l_debug_on THEN
4274: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4275: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4276: END IF;
4277: IF c_staged_content%ISOPEN THEN
4278: CLOSE c_staged_content;
4271: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4272: wsh_util_core.add_message(x_return_status, l_module_name);
4273: IF l_debug_on THEN
4274: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
4275: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
4276: END IF;
4277: IF c_staged_content%ISOPEN THEN
4278: CLOSE c_staged_content;
4279: END IF;
4280:
4281: WHEN OTHERS THEN
4282: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4283: IF l_debug_on THEN
4284: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
4285: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4286: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4287: END IF;
4288: IF c_staged_content%ISOPEN THEN
4281: WHEN OTHERS THEN
4282: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4283: IF l_debug_on THEN
4284: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
4285: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4286: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4287: END IF;
4288: IF c_staged_content%ISOPEN THEN
4289: CLOSE c_staged_content;
4282: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
4283: IF l_debug_on THEN
4284: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '||
4285: SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
4286: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
4287: END IF;
4288: IF c_staged_content%ISOPEN THEN
4289: CLOSE c_staged_content;
4290: END IF;
5643: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
5644: --
5645: IF l_debug_on IS NULL
5646: THEN
5647: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5648: END IF;
5649: --
5650: IF l_debug_on THEN
5651: WSH_DEBUG_SV.push(l_module_name);
5647: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
5648: END IF;
5649: --
5650: IF l_debug_on THEN
5651: WSH_DEBUG_SV.push(l_module_name);
5652: --
5653: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5654: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5655: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5649: --
5650: IF l_debug_on THEN
5651: WSH_DEBUG_SV.push(l_module_name);
5652: --
5653: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5654: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5655: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5656: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5657: END IF;
5650: IF l_debug_on THEN
5651: WSH_DEBUG_SV.push(l_module_name);
5652: --
5653: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5654: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5655: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5656: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5657: END IF;
5658: --
5651: WSH_DEBUG_SV.push(l_module_name);
5652: --
5653: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5654: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5655: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5656: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5657: END IF;
5658: --
5659: x_return_status := FND_API.G_RET_STS_SUCCESS;
5652: --
5653: WSH_DEBUG_SV.log(l_module_name,'DELIVERY_DETAIL_ID',p_delivery_detail_rec.DELIVERY_DETAIL_ID);
5654: WSH_DEBUG_SV.log(l_module_name,'P_DELIVERY_ID',P_DELIVERY_ID);
5655: WSH_DEBUG_SV.log(l_module_name,'p_action',p_in_rec.action_code);
5656: wsh_debug_sv.log(l_module_name, 'Caller', p_in_rec.caller);
5657: END IF;
5658: --
5659: x_return_status := FND_API.G_RET_STS_SUCCESS;
5660: --
5659: x_return_status := FND_API.G_RET_STS_SUCCESS;
5660: --
5661: IF p_in_rec.action_code = 'CREATE' THEN
5662: IF l_debug_on THEN
5663: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5664: END IF;
5665: --
5666: -- nothing else need to be disabled
5667: --
5666: -- nothing else need to be disabled
5667: --
5668: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5669: IF l_debug_on THEN
5670: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5671: WSH_DEBUG_SV.pop(l_module_name);
5672: END IF;
5673: -- RETURN; --public api changes
5674: --
5667: --
5668: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5669: IF l_debug_on THEN
5670: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5671: WSH_DEBUG_SV.pop(l_module_name);
5672: END IF;
5673: -- RETURN; --public api changes
5674: --
5675: ELSIF p_in_rec.action_code = 'UPDATE' THEN
5700: x_return_status = WSH_UTIL_CORE.G_RET_STS_ERROR
5701: THEN
5702: --
5703: IF l_debug_on THEN
5704: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5705: WSH_DEBUG_SV.pop(l_module_name);
5706: END IF;
5707: RETURN;
5708: --
5701: THEN
5702: --
5703: IF l_debug_on THEN
5704: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5705: WSH_DEBUG_SV.pop(l_module_name);
5706: END IF;
5707: RETURN;
5708: --
5709: END IF;
5780:
5781: l_lpn_id := x_delivery_detail_rec.lpn_id;
5782:
5783: IF l_debug_on THEN
5784: WSH_DEBUG_SV.log(l_module_name,'list.COUNT',l_disabled_list.COUNT);
5785: END IF;
5786:
5787: IF l_disabled_list.COUNT = 0 THEN
5788:
5787: IF l_disabled_list.COUNT = 0 THEN
5788:
5789: --
5790: IF l_debug_on THEN
5791: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5792: END IF;
5793: --
5794: -- nothing else need to be disabled
5795: --
5800:
5801: IF l_debug_on THEN
5802: FOR i in 1..l_disabled_list.COUNT
5803: LOOP
5804: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
5805: END LOOP;
5806: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
5807: END IF;
5808: --enable the columns matching the l_disabled_list
5802: FOR i in 1..l_disabled_list.COUNT
5803: LOOP
5804: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
5805: END LOOP;
5806: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
5807: END IF;
5808: --enable the columns matching the l_disabled_list
5809: enable_from_list(l_disabled_list,
5810: p_delivery_detail_rec,
5820: --
5821: FOR i in 1..l_disabled_list.COUNT
5822: LOOP
5823: IF l_debug_on THEN
5824: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(i));
5825: END IF;
5826: -- Added for bug 4399278, 4418754
5827: IF ( p_in_rec.caller = 'WSH_PUB' and
5828: l_disabled_list(i) = 'LOCATOR_NAME' and
5838: END IF;
5839: END LOOP;
5840:
5841: IF l_debug_on THEN
5842: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
5843: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5844: END IF;
5845: --
5846: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5839: END LOOP;
5840:
5841: IF l_debug_on THEN
5842: WSH_DEBUG_SV.log(l_module_name,'First element is not FULL');
5843: WSH_DEBUG_SV.log(l_module_name,'calling eliminate_displayonly_fields');
5844: END IF;
5845: --
5846: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5847: --
5845: --
5846: eliminate_displayonly_fields (p_delivery_detail_rec, p_in_rec, x_delivery_detail_rec);
5847: --
5848: IF l_debug_on THEN
5849: WSH_DEBUG_SV.log(l_module_name,'calling disable_from_list');
5850: END IF;
5851: -- The fileds in the list are getting disabled
5852: disable_from_list(l_disabled_list,
5853: l_db_col_rec,
5882: l_organization_id := x_delivery_detail_rec.organization_id;
5883: END IF;
5884:
5885: IF l_debug_on THEN
5886: WSH_DEBUG_SV.log(l_module_name,'organization_id is ', l_organization_id);
5887: END IF;
5888: l_wms_org := wsh_util_validate.Check_Wms_Org(l_organization_id);
5889: -- lpn conv.
5890: --
5916: WSH_DELIVERY_DETAILS_PKG.C_BACKORDERED,
5917: WSH_DELIVERY_DETAILS_PKG.C_RELEASED_TO_WAREHOUSE)
5918: AND p_in_rec.caller like 'WMS_XDOCK%') THEN
5919: if l_debug_on then
5920: wsh_debug_sv.log(l_module_name, 'WMS Caller to update Released status and MOL', p_in_rec.caller);
5921: end if;
5922: j:=j+1; l_disabled_list(j) := 'RELEASED_STATUS';
5923: j:=j+1; l_disabled_list(j) := 'MOVE_ORDER_LINE_ID';
5924: j:=j+1; l_disabled_list(j) := 'BATCH_ID';
5972:
5973:
5974: ELSIF p_in_rec.caller = 'WSH_INBOUND' THEN
5975: if l_debug_on then
5976: wsh_debug_sv.logmsg(l_module_name, 'WSH_INBOUND: Enabling subinventory', WSH_DEBUG_SV.C_STMT_LEVEL);
5977: wsh_debug_sv.log(l_module_name, 'Input subinventory', p_delivery_detail_rec.subinventory);
5978: wsh_debug_sv.log(l_module_name, 'Input LOT_NUMBER', p_delivery_detail_rec.lot_number);
5979: end if;
5980: -- Subinventory should be updateable during inbound processing
5973:
5974: ELSIF p_in_rec.caller = 'WSH_INBOUND' THEN
5975: if l_debug_on then
5976: wsh_debug_sv.logmsg(l_module_name, 'WSH_INBOUND: Enabling subinventory', WSH_DEBUG_SV.C_STMT_LEVEL);
5977: wsh_debug_sv.log(l_module_name, 'Input subinventory', p_delivery_detail_rec.subinventory);
5978: wsh_debug_sv.log(l_module_name, 'Input LOT_NUMBER', p_delivery_detail_rec.lot_number);
5979: end if;
5980: -- Subinventory should be updateable during inbound processing
5981: j:=j+1; l_disabled_list(j) := 'FULL';
5974: ELSIF p_in_rec.caller = 'WSH_INBOUND' THEN
5975: if l_debug_on then
5976: wsh_debug_sv.logmsg(l_module_name, 'WSH_INBOUND: Enabling subinventory', WSH_DEBUG_SV.C_STMT_LEVEL);
5977: wsh_debug_sv.log(l_module_name, 'Input subinventory', p_delivery_detail_rec.subinventory);
5978: wsh_debug_sv.log(l_module_name, 'Input LOT_NUMBER', p_delivery_detail_rec.lot_number);
5979: end if;
5980: -- Subinventory should be updateable during inbound processing
5981: j:=j+1; l_disabled_list(j) := 'FULL';
5982: j:=j+1; l_disabled_list(j) := 'SUBINVENTORY';
5981: j:=j+1; l_disabled_list(j) := 'FULL';
5982: j:=j+1; l_disabled_list(j) := 'SUBINVENTORY';
5983: --Bugfix 6939348 start
5984: IF l_debug_on THEN
5985: WSH_DEBUG_SV.log(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.Fetch_Inv_Controls',WSH_DEBUG_SV.C_PROC_LEVEL);
5986: END IF;
5987:
5988: WSH_DELIVERY_DETAILS_INV.Fetch_Inv_Controls(p_delivery_detail_id => x_delivery_detail_rec.delivery_detail_id,
5989: p_inventory_item_id => x_delivery_detail_rec.inventory_item_id,
5992: x_inv_controls_rec => l_inv_controls,
5993: x_return_status => x_return_status);
5994: --{Bug 8303281
5995: IF l_debug_on THEN
5996: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5997: END IF;
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.log(l_module_name,'Lot Control Flag',l_inv_controls.lot_flag);
5996: WSH_DEBUG_SV.log(l_module_name,'x_return_status',x_return_status);
5997: END IF;
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.log(l_module_name,'Lot Control Flag',l_inv_controls.lot_flag);
6001: WSH_DEBUG_SV.log(l_module_name,'Locator Control Flag',l_inv_controls.loc_flag);
6002: END IF;
6003: --}Bug 8303281
6004: -- TPW - Distributed changes
5997: END IF;
5998:
5999: IF l_debug_on THEN
6000: WSH_DEBUG_SV.log(l_module_name,'Lot Control Flag',l_inv_controls.lot_flag);
6001: WSH_DEBUG_SV.log(l_module_name,'Locator Control Flag',l_inv_controls.loc_flag);
6002: END IF;
6003: --}Bug 8303281
6004: -- TPW - Distributed changes
6005: IF l_inv_controls.rev_flag = 'Y' THEN
6024: -- Bug 3292364
6025: -- Enable Ship Method Components to be updated for container during OM changes.
6026:
6027: IF l_debug_on THEN
6028: WSH_DEBUG_SV.logmsg(l_module_name, 'Enable SM Components for CMS changes, caller = WSH_USA' );
6029: END IF;
6030: j:=j+1; l_disabled_list(j) := 'FULL';
6031: j:=j+1; l_disabled_list(j) := 'SERVICE_LEVEL';
6032: j:=j+1; l_disabled_list(j) := 'MODE_OF_TRANSPORT';
6037: --{Bug 8303281
6038: IF l_debug_on THEN
6039: FOR j in 1..l_disabled_list.COUNT
6040: LOOP
6041: WSH_DEBUG_SV.log(l_module_name,'list values',l_disabled_list(j));
6042: END LOOP;
6043: END IF;
6044: --}Bug 8303281
6045:
6046: IF l_disabled_list.count > 1 and l_disabled_list(1) = 'FULL' THEN
6047:
6048: l_all_disabled :='N';
6049: IF l_debug_on THEN
6050: WSH_DEBUG_SV.log(l_module_name,'calling enable_from_list');
6051: END IF;
6052:
6053: enable_from_list(l_disabled_list,
6054: p_delivery_detail_rec,
6087: --
6088: END IF;
6089: --
6090: IF l_debug_on THEN
6091: WSH_DEBUG_SV.pop(l_module_name);
6092: END IF;
6093:
6094: EXCEPTION
6095: WHEN e_all_disabled THEN
6098: FND_MESSAGE.Set_Token('ENTITY_ID',p_delivery_detail_rec.delivery_detail_id);
6099: wsh_util_core.add_message(x_return_status,l_module_name);
6100: IF l_debug_on THEN
6101: -- Nothing is updateable
6102: WSH_DEBUG_SV.pop(l_module_name,'e_all_disabled');
6103: END IF;
6104: WHEN e_dp_no_entity THEN
6105: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6106: -- the message for this is set in original get_disabled_list
6104: WHEN e_dp_no_entity THEN
6105: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6106: -- the message for this is set in original get_disabled_list
6107: IF l_debug_on THEN
6108: WSH_DEBUG_SV.pop(l_module_name,'e_dp_no_entity');
6109: END IF;
6110: WHEN e_bad_field THEN
6111: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
6112: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
6112: FND_MESSAGE.SET_NAME('WSH','WSH_BAD_FIELD_NAME');
6113: FND_MESSAGE.Set_Token('FIELD_NAME',l_field_name);
6114: wsh_util_core.add_message(x_return_status,l_module_name);
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
6117: ,l_field_name);
6118: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
6119: END IF;
6120:
6114: wsh_util_core.add_message(x_return_status,l_module_name);
6115: IF l_debug_on THEN
6116: WSH_DEBUG_SV.log(l_module_name,'Bad field name passed to the list:'
6117: ,l_field_name);
6118: WSH_DEBUG_SV.pop(l_module_name,'e_bad_field');
6119: END IF;
6120:
6121: WHEN OTHERS THEN
6122: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6122: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6123: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.get_disabled_list',
6124: l_module_name);
6125: IF l_debug_on THEN
6126: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
6127: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6128: END IF;
6129: END Get_Disabled_List;
6130:
6123: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.get_disabled_list',
6124: l_module_name);
6125: IF l_debug_on THEN
6126: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
6127: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6128: END IF;
6129: END Get_Disabled_List;
6130:
6131:
6146: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6147: --
6148: IF l_debug_on IS NULL
6149: THEN
6150: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6151: END IF;
6152: --
6153: IF l_debug_on THEN
6154: WSH_DEBUG_SV.push(l_module_name);
6150: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6151: END IF;
6152: --
6153: IF l_debug_on THEN
6154: WSH_DEBUG_SV.push(l_module_name);
6155: --
6156: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
6157: END IF;
6158: --
6152: --
6153: IF l_debug_on THEN
6154: WSH_DEBUG_SV.push(l_module_name);
6155: --
6156: WSH_DEBUG_SV.log(l_module_name,'p_action', p_action);
6157: END IF;
6158: --
6159: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6160:
6451: END IF;
6452:
6453:
6454: IF l_debug_on THEN
6455: WSH_DEBUG_SV.pop(l_module_name);
6456: END IF;
6457: EXCEPTION
6458: WHEN OTHERS THEN
6459: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6458: WHEN OTHERS THEN
6459: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6460: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.Init_Detail_Actions_Tbl', l_module_name);
6461: IF l_debug_on THEN
6462: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
6463: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6464: END IF;
6465:
6466: END Init_Detail_Actions_Tbl;
6459: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
6460: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.Init_Detail_Actions_Tbl', l_module_name);
6461: IF l_debug_on THEN
6462: WSH_DEBUG_SV.log(l_module_name,'Error:',SUBSTR(SQLERRM,1,200));
6463: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6464: END IF;
6465:
6466: END Init_Detail_Actions_Tbl;
6467:
6520: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6521: --
6522: IF l_debug_on IS NULL
6523: THEN
6524: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6525: END IF;
6526: --
6527: IF l_debug_on THEN
6528: WSH_DEBUG_SV.push(l_module_name);
6524: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6525: END IF;
6526: --
6527: IF l_debug_on THEN
6528: WSH_DEBUG_SV.push(l_module_name);
6529: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6525: END IF;
6526: --
6527: IF l_debug_on THEN
6528: WSH_DEBUG_SV.push(l_module_name);
6529: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6526: --
6527: IF l_debug_on THEN
6528: WSH_DEBUG_SV.push(l_module_name);
6529: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6527: IF l_debug_on THEN
6528: WSH_DEBUG_SV.push(l_module_name);
6529: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6528: WSH_DEBUG_SV.push(l_module_name);
6529: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6529: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6530: WSH_DEBUG_SV.log(l_module_name, 'Del detail id', x_det_rec.delivery_detail_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6531: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity', x_det_rec.shipped_quantity);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6532: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity', x_det_rec.cycle_count_quantity);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6533: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity', x_det_rec.requested_quantity);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6534: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity', x_det_rec.picked_quantity);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6542: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6535: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6542: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6543: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6536: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6542: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6543: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6544: END IF;
6537: WSH_DEBUG_SV.log(l_module_name, 'Serial Qty', x_det_rec.serial_quantity);
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6542: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6543: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6544: END IF;
6545:
6538: WSH_DEBUG_SV.log(l_module_name, 'Transaction Temp Id', x_det_rec.transaction_temp_id);
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6542: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6543: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6544: END IF;
6545:
6546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6539: WSH_DEBUG_SV.log(l_module_name, 'Top Model Line Id', x_det_rec.top_model_line_id);
6540: WSH_DEBUG_SV.log(l_module_name, 'Ship Tolerance Above', x_det_rec.ship_tolerance_above);
6541: WSH_DEBUG_SV.log(l_module_name, 'requested qty uom', x_det_rec.requested_quantity_uom);
6542: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_server ', x_det_rec.unmark_serial_server);
6543: WSH_DEBUG_SV.log(l_module_name, 'unmark_serial_form ', x_det_rec.unmark_serial_form);
6544: END IF;
6545:
6546: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6547:
6581:
6582: -- 2) Check for negative
6583:
6584: IF l_debug_on THEN
6585: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
6586: END IF;
6587: --Bug # 3266333
6588: WSH_UTIL_VALIDATE.validate_negative(
6589: p_value => l_input_quantity,
6602:
6603: -- HW OPMCONV - No need to branch
6604:
6605: IF l_debug_on THEN
6606: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_DECIMAL_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6607: END IF;
6608: wsh_details_validations.check_decimal_quantity(
6609: p_item_id => x_det_rec.inventory_item_id,
6610: p_organization_id => x_det_rec.organization_id,
6638: -- 4) If SQ, check shipped qty
6639: -- If CCQ, check cc qty
6640: IF (p_flag = 'SQ') THEN
6641: IF l_debug_on THEN
6642: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_SHIPPED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6643: END IF;
6644: wsh_details_validations.check_shipped_quantity(
6645: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
6646: p_requested_quantity => x_det_rec.requested_quantity,
6658:
6659: ELSIF(p_flag = 'CCQ') THEN
6660:
6661: IF l_debug_on THEN
6662: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CYCLE_COUNT_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
6663: END IF;
6664:
6665: wsh_details_validations.check_cycle_count_quantity(
6666: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
6703:
6704: IF x_det_rec.serial_quantity > 0 AND x_det_rec.unmark_serial_server = 'Y' THEN
6705:
6706: IF l_debug_on THEN
6707: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
6708: END IF;
6709: wsh_delivery_details_inv.unmark_serial_number(
6710: p_delivery_detail_id => x_det_rec.delivery_detail_id,
6711: p_serial_number_code => x_det_rec.inv_ser_control_code,
6714: x_return_status => l_return_status,
6715: p_inventory_item_id => x_det_rec.inventory_item_id
6716: );
6717: IF l_debug_on THEN
6718: wsh_debug_sv.log(l_module_name, 'Return status after Unmark serial', l_return_status);
6719: END IF;
6720:
6721: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6722: RAISE FND_API.G_EXC_ERROR;
6745: wsh_util_core.add_message(wsh_util_core.g_ret_sts_warning);
6746: l_number_of_warnings := l_number_of_warnings + 1;
6747:
6748: IF l_debug_on THEN
6749: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.UNMARK_SERIAL_NUMBER',WSH_DEBUG_SV.C_PROC_LEVEL);
6750: END IF;
6751:
6752: IF x_det_rec.unmark_serial_server = 'Y' THEN
6753: wsh_delivery_details_inv.unmark_serial_number(
6758: x_return_status => l_return_status,
6759: p_inventory_item_id => x_det_rec.inventory_item_id);
6760:
6761: IF l_debug_on THEN
6762: wsh_debug_sv.log(l_module_name, 'Return status after Unmark serial', l_return_status);
6763: END IF;
6764:
6765: IF(l_return_status <> WSH_UTIL_CORE.G_RET_STS_SUCCESS) THEN
6766: RAISE FND_API.G_EXC_ERROR;
6784: x_det_rec.cycle_count_quantity := l_quantity;
6785: END IF;
6786:
6787: IF l_debug_on THEN
6788: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity', x_det_rec.shipped_quantity);
6789: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity', x_det_rec.cycle_count_quantity);
6790: END IF;
6791:
6792: IF l_number_of_warnings > 0 THEN
6785: END IF;
6786:
6787: IF l_debug_on THEN
6788: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity', x_det_rec.shipped_quantity);
6789: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity', x_det_rec.cycle_count_quantity);
6790: END IF;
6791:
6792: IF l_number_of_warnings > 0 THEN
6793: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6793: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6794: END IF;
6795:
6796: IF l_debug_on THEN
6797: WSH_DEBUG_SV.log(l_module_name, 'Return status from api ', x_return_status);
6798: WSH_DEBUG_SV.pop(l_module_name);
6799: END IF;
6800:
6801: EXCEPTION
6794: END IF;
6795:
6796: IF l_debug_on THEN
6797: WSH_DEBUG_SV.log(l_module_name, 'Return status from api ', x_return_status);
6798: WSH_DEBUG_SV.pop(l_module_name);
6799: END IF;
6800:
6801: EXCEPTION
6802: WHEN FND_API.G_EXC_ERROR THEN
6809: p_encoded => FND_API.G_FALSE
6810: );
6811:
6812: IF l_debug_on THEN
6813: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6814: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6815: END IF;
6816: --
6817: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6810: );
6811:
6812: IF l_debug_on THEN
6813: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6814: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
6815: END IF;
6816: --
6817: WHEN WSH_UTIL_CORE.G_EXC_WARNING THEN
6818: x_return_status := WSH_UTIL_CORE.G_RET_STS_WARNING;
6824: p_encoded => FND_API.G_FALSE
6825: );
6826: --
6827: IF l_debug_on THEN
6828: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6829: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6830: END IF;
6831:
6832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6825: );
6826: --
6827: IF l_debug_on THEN
6828: WSH_DEBUG_SV.logmsg(l_module_name,'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6829: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
6830: END IF;
6831:
6832: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6833: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6838: p_encoded => FND_API.G_FALSE
6839: );
6840:
6841: IF l_debug_on THEN
6842: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6844: END IF;
6845: --
6846: WHEN OTHERS THEN
6839: );
6840:
6841: IF l_debug_on THEN
6842: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
6843: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
6844: END IF;
6845: --
6846: WHEN OTHERS THEN
6847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6848: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY');
6849: --
6850: IF l_debug_on THEN
6851: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6852: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6853: END IF;
6854:
6855:
6848: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY');
6849: --
6850: IF l_debug_on THEN
6851: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
6852: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
6853: END IF;
6854:
6855:
6856: END Validate_Shipped_CC_Quantity;
6909: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
6910: --
6911: IF l_debug_on IS NULL
6912: THEN
6913: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6914: END IF;
6915: --
6916: IF l_debug_on THEN
6917: WSH_DEBUG_SV.push(l_module_name);
6913: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
6914: END IF;
6915: --
6916: IF l_debug_on THEN
6917: WSH_DEBUG_SV.push(l_module_name);
6918: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6914: END IF;
6915: --
6916: IF l_debug_on THEN
6917: WSH_DEBUG_SV.push(l_module_name);
6918: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6915: --
6916: IF l_debug_on THEN
6917: WSH_DEBUG_SV.push(l_module_name);
6918: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6923: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6916: IF l_debug_on THEN
6917: WSH_DEBUG_SV.push(l_module_name);
6918: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6923: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6924: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6917: WSH_DEBUG_SV.push(l_module_name);
6918: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6923: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6924: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6925: END IF;
6918: WSH_DEBUG_SV.log(l_module_name,'P_FLAG',P_FLAG);
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6923: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6924: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6925: END IF;
6926:
6919: WSH_DEBUG_SV.log(l_module_name, 'Shipped_Quantity2', x_det_rec.shipped_quantity2);
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6923: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6924: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6925: END IF;
6926:
6927: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6920: WSH_DEBUG_SV.log(l_module_name, 'Cycle_Count_Quantity2', x_det_rec.cycle_count_quantity2);
6921: WSH_DEBUG_SV.log(l_module_name, 'Requested Quantity2', x_det_rec.requested_quantity2);
6922: WSH_DEBUG_SV.log(l_module_name, 'Picked Quantity2', x_det_rec.picked_quantity2);
6923: WSH_DEBUG_SV.log(l_module_name, 'Organization Id', x_det_rec.organization_id);
6924: WSH_DEBUG_SV.log(l_module_name, 'Inventory Item Id', x_det_rec.inventory_item_id);
6925: END IF;
6926:
6927: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
6928: IF(p_flag = 'SQ') THEN
6948: open c_detail_info(x_det_rec.delivery_detail_id);
6949: fetch c_detail_info INTO l_det_source_code, l_det_source_line_id;
6950: close c_detail_info;
6951: IF l_debug_on THEN
6952: WSH_DEBUG_SV.logmsg(l_module_name,'Calculate CC2 only in FB=P case',WSH_DEBUG_SV.C_STMT_LEVEL);
6953: END IF;
6954:
6955: IF WSH_UTIL_CORE.Get_Line_Fulfillment_Base(l_det_source_code,
6956: l_det_source_line_id) <>'S' THEN
6968:
6969: END IF;
6970:
6971: IF l_debug_on THEN
6972: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_UTIL_VALIDATE.VALIDATE_NEGATIVE',WSH_DEBUG_SV.C_PROC_LEVEL);
6973: END IF;
6974: -- 2) Check for negative
6975: --Bug # 3266333
6976: WSH_UTIL_VALIDATE.validate_negative(
7000:
7001: IF (p_flag = 'SQ') THEN
7002:
7003: IF l_debug_on THEN
7004: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_SHIPPED_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
7005: END IF;
7006: wsh_details_validations.check_shipped_quantity(
7007: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
7008: p_requested_quantity => x_det_rec.requested_quantity2,
7018: END IF;
7019: ELSIF(p_flag = 'CCQ') THEN
7020:
7021: IF l_debug_on THEN
7022: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DETAILS_VALIDATIONS.CHECK_CYCLE_COUNT_QUANTITY',WSH_DEBUG_SV.C_PROC_LEVEL);
7023: END IF;
7024: wsh_details_validations.check_cycle_count_quantity(
7025: p_ship_above_tolerance => x_det_rec.ship_tolerance_above,
7026: p_requested_quantity => x_det_rec.requested_quantity2,
7043: x_det_rec.cycle_count_quantity2 := l_quantity;
7044: END IF;
7045:
7046: IF l_debug_on THEN
7047: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity2', x_det_rec.shipped_quantity2);
7048: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity2', x_det_rec.cycle_count_quantity2);
7049: END IF;
7050:
7051: IF l_debug_on THEN
7044: END IF;
7045:
7046: IF l_debug_on THEN
7047: WSH_DEBUG_SV.log(l_module_name,'Output shipped quantity2', x_det_rec.shipped_quantity2);
7048: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity2', x_det_rec.cycle_count_quantity2);
7049: END IF;
7050:
7051: IF l_debug_on THEN
7052: WSH_DEBUG_SV.pop(l_module_name);
7048: WSH_DEBUG_SV.log(l_module_name, 'Output Cycle_Count quantity2', x_det_rec.cycle_count_quantity2);
7049: END IF;
7050:
7051: IF l_debug_on THEN
7052: WSH_DEBUG_SV.pop(l_module_name);
7053: END IF;
7054:
7055: EXCEPTION
7056: WHEN FND_API.G_EXC_ERROR THEN
7062: p_encoded => FND_API.G_FALSE
7063: );
7064:
7065: IF l_debug_on THEN
7066: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7067: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7068: END IF;
7069: --
7070: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7063: );
7064:
7065: IF l_debug_on THEN
7066: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7067: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
7068: END IF;
7069: --
7070: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7071: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7076: p_encoded => FND_API.G_FALSE
7077: );
7078:
7079: IF l_debug_on THEN
7080: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7082: END IF;
7083: --
7084: WHEN OTHERS THEN
7077: );
7078:
7079: IF l_debug_on THEN
7080: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
7081: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7082: END IF;
7083: --
7084: WHEN OTHERS THEN
7085: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7085: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
7086: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2');
7087: --
7088: IF l_debug_on THEN
7089: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7090: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7091: END IF;
7092:
7093:
7086: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.VALIDATE_SHIPPED_CC_QUANTITY2');
7087: --
7088: IF l_debug_on THEN
7089: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7090: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7091: END IF;
7092:
7093:
7094: END Validate_Shipped_CC_Quantity2;
7135: --
7136: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7137: --
7138: IF l_debug_on IS NULL THEN
7139: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7140: END IF;
7141: --
7142:
7143: IF l_debug_on THEN
7140: END IF;
7141: --
7142:
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.push(l_module_name);
7145: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
7146: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
7147: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
7148: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
7141: --
7142:
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.push(l_module_name);
7145: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
7146: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
7147: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
7148: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
7149: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
7142:
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.push(l_module_name);
7145: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
7146: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
7147: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
7148: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
7149: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
7150: END IF;
7143: IF l_debug_on THEN
7144: WSH_DEBUG_SV.push(l_module_name);
7145: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
7146: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
7147: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
7148: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
7149: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
7150: END IF;
7151:
7144: WSH_DEBUG_SV.push(l_module_name);
7145: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
7146: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
7147: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
7148: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
7149: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
7150: END IF;
7151:
7152: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7145: WSH_DEBUG_SV.log(l_module_name,'P_Old_table.count',P_OLD_TABLE.COUNT);
7146: WSH_DEBUG_SV.log(l_module_name,'P_new_table.count',P_NEW_TABLE.COUNT);
7147: WSH_DEBUG_SV.log(l_module_name,'P_action_code',P_ACTION_CODE);
7148: WSH_DEBUG_SV.log(l_module_name,'P_phase',P_PHASE);
7149: WSH_DEBUG_SV.log(l_module_name,'P_caller',P_CALLER);
7150: END IF;
7151:
7152: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
7153: l_id_tab.DELETE;
7196: x_changed_id_tab := l_id_tab;
7197: END IF;
7198:
7199: IF l_debug_on THEN
7200: WSH_DEBUG_SV.pop(l_module_name);
7201: END IF;
7202:
7203: EXCEPTION
7204: WHEN others THEN
7204: WHEN others THEN
7205: wsh_util_core.default_handler('WSH_TRIP_UTILITIES.compare_detail_attributes');
7206: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7207: IF l_debug_on THEN
7208: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7210: END IF;
7211:
7212: END compare_detail_attributes;
7205: wsh_util_core.default_handler('WSH_TRIP_UTILITIES.compare_detail_attributes');
7206: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
7207: IF l_debug_on THEN
7208: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
7209: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
7210: END IF;
7211:
7212: END compare_detail_attributes;
7213:
7310: --
7311: l_debug_on := wsh_debug_interface.g_debug;
7312: --
7313: IF l_debug_on IS NULL THEN
7314: l_debug_on := wsh_debug_sv.is_debug_enabled;
7315: END IF;
7316: --
7317: IF l_debug_on THEN
7318: wsh_debug_sv.push(l_module_name);
7314: l_debug_on := wsh_debug_sv.is_debug_enabled;
7315: END IF;
7316: --
7317: IF l_debug_on THEN
7318: wsh_debug_sv.push(l_module_name);
7319: --
7320: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7321: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7322: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7316: --
7317: IF l_debug_on THEN
7318: wsh_debug_sv.push(l_module_name);
7319: --
7320: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7321: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7322: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7323: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7324: END IF;
7317: IF l_debug_on THEN
7318: wsh_debug_sv.push(l_module_name);
7319: --
7320: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7321: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7322: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7323: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7324: END IF;
7325: --
7318: wsh_debug_sv.push(l_module_name);
7319: --
7320: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7321: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7322: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7323: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7324: END IF;
7325: --
7326: x_return_status := wsh_util_core.g_ret_sts_success;
7319: --
7320: wsh_debug_sv.LOG(l_module_name, 'p_caller', p_caller);
7321: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
7322: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY', x_quantity);
7323: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7324: END IF;
7325: --
7326: x_return_status := wsh_util_core.g_ret_sts_success;
7327: --
7376: CLOSE line_csr;
7377: --
7378: --
7379: IF l_debug_on THEN
7380: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7381: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7382: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7383: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7384: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7377: --
7378: --
7379: IF l_debug_on THEN
7380: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7381: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7382: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7383: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7384: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7385:
7378: --
7379: IF l_debug_on THEN
7380: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7381: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7382: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7383: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7384: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7385:
7386: END IF;
7379: IF l_debug_on THEN
7380: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7381: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7382: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7383: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7384: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7385:
7386: END IF;
7387: --
7380: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.organization_id', l_line_rec.organization_id);
7381: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.inventory_item_id', l_line_rec.inventory_item_id);
7382: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.lot_number', l_line_rec.lot_number);
7383: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom', l_line_rec.requested_quantity_uom);
7384: wsh_debug_sv.LOG(l_module_name, 'l_line_rec.requested_quantity_uom2', l_line_rec.requested_quantity_uom2);
7385:
7386: END IF;
7387: --
7388: --
7396: -- HW OPMCONV - No need to call OPM APIS
7397:
7398: -- HW OPMCONV - Call API to get item info
7399: IF l_debug_on THEN
7400: WSH_DEBUG_SV.logmsg(l_module_name,'Calling program unit WSH_DELIVERY_DETAILS_INV.Get_item_information',WSH_DEBUG_SV.C_PROC_LEVEL);
7401: END IF;
7402:
7403: WSH_DELIVERY_DETAILS_INV.Get_item_information
7404: (
7418: --
7419: --
7420: -- HW OPMCONV -Print debugging statements
7421: IF l_debug_on THEN
7422: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
7423: wsh_debug_sv.LOG(l_module_name, 'l_item_info.tracking_quantity_ind', l_item_info.tracking_quantity_ind);
7424: END IF;
7425: --
7426: --
7419: --
7420: -- HW OPMCONV -Print debugging statements
7421: IF l_debug_on THEN
7422: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
7423: wsh_debug_sv.LOG(l_module_name, 'l_item_info.tracking_quantity_ind', l_item_info.tracking_quantity_ind);
7424: END IF;
7425: --
7426: --
7427: -- HW OPMCONV - Changed condition to check for secondary_default_ind
7498: THEN
7499: --{
7500: --
7501: IF l_debug_on THEN
7502: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit
7503: WSH_WV_UTILS.within_deviation', wsh_debug_sv.c_proc_level);
7504: END IF;
7505: --
7506: -- HW OPMCONV - Call new API to check deviation
7499: --{
7500: --
7501: IF l_debug_on THEN
7502: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit
7503: WSH_WV_UTILS.within_deviation', wsh_debug_sv.c_proc_level);
7504: END IF;
7505: --
7506: -- HW OPMCONV - Call new API to check deviation
7507: l_return := WSH_WV_UTILS.within_deviation
7536: THEN
7537: --{
7538: --
7539: IF l_debug_on THEN
7540: wsh_debug_sv.logmsg(l_module_name, 'Calling program unit WSH_WV_UTILS.convert_uom', wsh_debug_sv.c_proc_level);
7541: END IF;
7542: --
7543: -- HW OPMCONV - Call UOM routine passing lot_num
7544: l_qty2 := WSH_WV_UTILS.convert_uom
7575: END IF;
7576: --
7577: IF l_number_of_warnings > 0 THEN
7578: IF l_debug_on THEN
7579: wsh_debug_sv.log(l_module_name, 'Number of warnings', l_number_of_warnings);
7580: END IF;
7581:
7582: RAISE wsh_util_core.g_exc_warning;
7583: END IF;
7587: p_data => x_msg_data,
7588: p_encoded => fnd_api.g_false);
7589:
7590: IF l_debug_on THEN
7591: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7592: wsh_debug_sv.pop(l_module_name);
7593: END IF;
7594: --
7595: --}
7588: p_encoded => fnd_api.g_false);
7589:
7590: IF l_debug_on THEN
7591: wsh_debug_sv.LOG(l_module_name, 'X_QUANTITY2', x_quantity2);
7592: wsh_debug_sv.pop(l_module_name);
7593: END IF;
7594: --
7595: --}
7596: EXCEPTION
7601: p_data => x_msg_data,
7602: p_encoded => fnd_api.g_false);
7603: --
7604: IF l_debug_on THEN
7605: wsh_debug_sv.pop(l_module_name);
7606: END IF;
7607: --
7608:
7609: WHEN INVALID_LOT THEN
7608:
7609: WHEN INVALID_LOT THEN
7610: x_return_status := fnd_api.g_ret_sts_error;
7611: IF l_debug_on THEN
7612: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7613: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
7614: END IF;
7615:
7616: WHEN OUT_OF_DEVIATION THEN
7609: WHEN INVALID_LOT THEN
7610: x_return_status := fnd_api.g_ret_sts_error;
7611: IF l_debug_on THEN
7612: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7613: WSH_DEBUG_SV.logmsg(l_module_name, 'Invalid Lot Number');
7614: END IF;
7615:
7616: WHEN OUT_OF_DEVIATION THEN
7617: x_return_status := fnd_api.g_ret_sts_error;
7615:
7616: WHEN OUT_OF_DEVIATION THEN
7617: x_return_status := fnd_api.g_ret_sts_error;
7618: IF l_debug_on THEN
7619: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7620: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7621: END IF;
7622:
7623: WHEN fnd_api.g_exc_error THEN
7616: WHEN OUT_OF_DEVIATION THEN
7617: x_return_status := fnd_api.g_ret_sts_error;
7618: IF l_debug_on THEN
7619: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7620: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7621: END IF;
7622:
7623: WHEN fnd_api.g_exc_error THEN
7624: x_return_status := fnd_api.g_ret_sts_error;
7627: p_data => x_msg_data,
7628: p_encoded => fnd_api.g_false);
7629: --
7630: IF l_debug_on THEN
7631: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7632: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7633: END IF;
7634: --
7635: WHEN fnd_api.g_exc_unexpected_error THEN
7628: p_encoded => fnd_api.g_false);
7629: --
7630: IF l_debug_on THEN
7631: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7632: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_ERROR');
7633: END IF;
7634: --
7635: WHEN fnd_api.g_exc_unexpected_error THEN
7636: x_return_status := fnd_api.g_ret_sts_unexp_error;
7639: p_data => x_msg_data,
7640: p_encoded => fnd_api.g_false);
7641: --
7642: IF l_debug_on THEN
7643: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7644: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7645: END IF;
7646: --
7647: WHEN wsh_util_core.g_exc_warning THEN
7640: p_encoded => fnd_api.g_false);
7641: --
7642: IF l_debug_on THEN
7643: wsh_debug_sv.logmsg(l_module_name, 'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.', wsh_debug_sv.c_excep_level);
7644: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
7645: END IF;
7646: --
7647: WHEN wsh_util_core.g_exc_warning THEN
7648: x_return_status := wsh_util_core.g_ret_sts_warning;
7651: p_data => x_msg_data,
7652: p_encoded => fnd_api.g_false);
7653: --
7654: IF l_debug_on THEN
7655: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
7656: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7657: END IF;
7658: WHEN OTHERS THEN
7659: x_return_status := fnd_api.g_ret_sts_unexp_error;
7652: p_encoded => fnd_api.g_false);
7653: --
7654: IF l_debug_on THEN
7655: wsh_debug_sv.logmsg(l_module_name, 'WSH_UTIL_CORE.G_EXC_WARNING exception has occured ', wsh_debug_sv.c_excep_level);
7656: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:WSH_UTIL_CORE.G_EXC_WARNING');
7657: END IF;
7658: WHEN OTHERS THEN
7659: x_return_status := fnd_api.g_ret_sts_unexp_error;
7660: wsh_util_core.default_handler('WSH_DETAILS_VALIDATIONS.validate_secondary_quantity',l_module_name);
7664: p_data => x_msg_data,
7665: p_encoded => fnd_api.g_false);
7666: --
7667: IF l_debug_on THEN
7668: wsh_debug_sv.pop(l_module_name, 'EXCEPTION:OTHERS');
7669: END IF;
7670: --
7671: END validate_secondary_quantity;
7672:
7689: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
7690: --
7691: IF l_debug_on IS NULL
7692: THEN
7693: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
7694: END IF;
7695: --
7696: IF l_debug_on THEN
7697: --
7694: END IF;
7695: --
7696: IF l_debug_on THEN
7697: --
7698: WSH_DEBUG_SV.push(l_module_name);
7699: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
7700: --
7701: END IF;
7702: --
7695: --
7696: IF l_debug_on THEN
7697: --
7698: WSH_DEBUG_SV.push(l_module_name);
7699: WSH_DEBUG_SV.log(l_module_name,'p_in_rec.caller',p_in_rec.caller);
7700: --
7701: END IF;
7702: --
7703: x_return_status := FND_API.G_RET_STS_SUCCESS;
8896:
8897:
8898:
8899: IF l_debug_on THEN
8900: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
8901: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
8902: END IF;
8903:
8904:
8897:
8898:
8899: IF l_debug_on THEN
8900: WSH_DEBUG_SV.log(l_module_name,'l_attributes',l_attributes);
8901: WSH_DEBUG_SV.log(l_module_name,'length(l_attributes)',length(l_attributes));
8902: END IF;
8903:
8904:
8905: IF l_attributes IS NULL THEN
8904:
8905: IF l_attributes IS NULL THEN
8906: --no message to be shown to the user
8907: IF l_debug_on THEN
8908: WSH_DEBUG_SV.pop(l_module_name);
8909: END IF;
8910: RETURN;
8911: ELSE
8912: Wsh_Utilities.process_message(
8919: IF l_return_status IN (WSH_UTIL_CORE.G_RET_STS_ERROR,WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR)
8920: THEN
8921: x_return_status := l_return_status;
8922: IF l_debug_on THEN
8923: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
8924: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8925: wsh_debug_sv.pop(l_module_name);
8926: END IF;
8927: return;
8920: THEN
8921: x_return_status := l_return_status;
8922: IF l_debug_on THEN
8923: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
8924: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8925: wsh_debug_sv.pop(l_module_name);
8926: END IF;
8927: return;
8928: ELSE
8921: x_return_status := l_return_status;
8922: IF l_debug_on THEN
8923: wsh_debug_sv.logmsg(l_module_name,'Error returned by wsh_utilities.process_message',WSH_DEBUG_SV.C_PROC_LEVEL);
8924: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
8925: wsh_debug_sv.pop(l_module_name);
8926: END IF;
8927: return;
8928: ELSE
8929: x_return_status := wsh_util_core.G_RET_STS_WARNING;
8930: END IF;
8931: END IF;
8932: --
8933: IF l_debug_on THEN
8934: WSH_DEBUG_SV.pop(l_module_name);
8935: END IF;
8936: --
8937: EXCEPTION
8938: WHEN OTHERS THEN
8938: WHEN OTHERS THEN
8939: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR ;
8940: --
8941: IF l_debug_on THEN
8942: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
8943: END IF;
8944: --
8945: END user_non_updatable_columns;
8946:
9003: l_number_of_warnings := 0;
9004: l_released_status := p_released_status ;
9005: --
9006: IF l_debug_on IS NULL THEN
9007: l_debug_on := wsh_debug_sv.is_debug_enabled;
9008: END IF;
9009: --
9010: IF l_debug_on THEN
9011: wsh_debug_sv.push(l_module_name);
9007: l_debug_on := wsh_debug_sv.is_debug_enabled;
9008: END IF;
9009: --
9010: IF l_debug_on THEN
9011: wsh_debug_sv.push(l_module_name);
9012: --
9013: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9014: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9015: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9009: --
9010: IF l_debug_on THEN
9011: wsh_debug_sv.push(l_module_name);
9012: --
9013: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9014: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9015: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9016: END IF;
9017: --
9010: IF l_debug_on THEN
9011: wsh_debug_sv.push(l_module_name);
9012: --
9013: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9014: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9015: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9016: END IF;
9017: --
9018:
9011: wsh_debug_sv.push(l_module_name);
9012: --
9013: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9014: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9015: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9016: END IF;
9017: --
9018:
9019: WSH_DELIVERY_DETAILS_INV.Get_item_information
9035:
9036: IF ( l_item_info.lot_divisible_flag = 'N' AND
9037: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
9038: IF l_debug_on THEN
9039: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9040: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9041: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9042: WSH_DEBUG_SV.pop(l_module_name);
9043: END IF;
9036: IF ( l_item_info.lot_divisible_flag = 'N' AND
9037: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
9038: IF l_debug_on THEN
9039: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9040: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9041: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9042: WSH_DEBUG_SV.pop(l_module_name);
9043: END IF;
9044: return(FALSE);
9037: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
9038: IF l_debug_on THEN
9039: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9040: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9041: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9042: WSH_DEBUG_SV.pop(l_module_name);
9043: END IF;
9044: return(FALSE);
9045:
9038: IF l_debug_on THEN
9039: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9040: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9041: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9042: WSH_DEBUG_SV.pop(l_module_name);
9043: END IF;
9044: return(FALSE);
9045:
9046: ELSE
9056: Fetch get_indiv_reservation into l_exist;
9057: Close get_indiv_reservation;
9058: If l_exist = 1 Then
9059: IF l_debug_on THEN
9060: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9061: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
9062: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
9063: WSH_DEBUG_SV.pop(l_module_name);
9064: End if;
9057: Close get_indiv_reservation;
9058: If l_exist = 1 Then
9059: IF l_debug_on THEN
9060: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9061: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
9062: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
9063: WSH_DEBUG_SV.pop(l_module_name);
9064: End if;
9065: return(FALSE);
9058: If l_exist = 1 Then
9059: IF l_debug_on THEN
9060: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9061: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
9062: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
9063: WSH_DEBUG_SV.pop(l_module_name);
9064: End if;
9065: return(FALSE);
9066: End if;
9059: IF l_debug_on THEN
9060: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9061: wsh_debug_sv.LOG(l_module_name, 'Reservation Exists' );
9062: wsh_debug_sv.LOG(l_module_name, 'Split Not Allowed' );
9063: WSH_DEBUG_SV.pop(l_module_name);
9064: End if;
9065: return(FALSE);
9066: End if;
9067: End if;
9065: return(FALSE);
9066: End if;
9067: End if;
9068: IF l_debug_on THEN
9069: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9070: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9071: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9072:
9073: WSH_DEBUG_SV.pop(l_module_name);
9066: End if;
9067: End if;
9068: IF l_debug_on THEN
9069: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9070: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9071: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9072:
9073: WSH_DEBUG_SV.pop(l_module_name);
9074: END IF;
9067: End if;
9068: IF l_debug_on THEN
9069: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9070: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9071: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9072:
9073: WSH_DEBUG_SV.pop(l_module_name);
9074: END IF;
9075:
9069: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9070: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9071: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9072:
9073: WSH_DEBUG_SV.pop(l_module_name);
9074: END IF;
9075:
9076: return(TRUE);
9077: END IF;
9076: return(TRUE);
9077: END IF;
9078:
9079: IF l_debug_on THEN
9080: WSH_DEBUG_SV.pop(l_module_name);
9081: END IF;
9082:
9083: return(TRUE);
9084:
9087: -- Debug Statements
9088: --
9089: -- CLOSE line_status;
9090: IF l_debug_on THEN
9091: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
9093: END IF;
9094: --
9095: return(FALSE);
9088: --
9089: -- CLOSE line_status;
9090: IF l_debug_on THEN
9091: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9092: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
9093: END IF;
9094: --
9095: return(FALSE);
9096:
9099: Close get_indiv_reservation;
9100: END IF;
9101: --
9102: IF l_debug_on THEN
9103: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9104: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9105: END IF;
9106: --
9107: return(FALSE);
9100: END IF;
9101: --
9102: IF l_debug_on THEN
9103: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9104: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9105: END IF;
9106: --
9107: return(FALSE);
9108:
9139: l_released_status := p_released_status;
9140: l_picked_qty := p_picked_qty;
9141: --
9142: IF l_debug_on IS NULL THEN
9143: l_debug_on := wsh_debug_sv.is_debug_enabled;
9144: END IF;
9145: --
9146: IF l_debug_on THEN
9147: wsh_debug_sv.push(l_module_name);
9143: l_debug_on := wsh_debug_sv.is_debug_enabled;
9144: END IF;
9145: --
9146: IF l_debug_on THEN
9147: wsh_debug_sv.push(l_module_name);
9148: --
9149: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9150: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9151: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9145: --
9146: IF l_debug_on THEN
9147: wsh_debug_sv.push(l_module_name);
9148: --
9149: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9150: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9151: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9152: END IF;
9153: --
9146: IF l_debug_on THEN
9147: wsh_debug_sv.push(l_module_name);
9148: --
9149: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9150: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9151: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9152: END IF;
9153: --
9154:
9147: wsh_debug_sv.push(l_module_name);
9148: --
9149: wsh_debug_sv.LOG(l_module_name, 'P_DELIVERY_DETAIL_ID', p_delivery_detail_id);
9150: wsh_debug_sv.LOG(l_module_name, 'p_organization_id', p_organization_id);
9151: wsh_debug_sv.LOG(l_module_name, 'p_inventory_item_id', p_inventory_item_id);
9152: END IF;
9153: --
9154:
9155: WSH_DELIVERY_DETAILS_INV.Get_item_information
9169:
9170: IF ( l_item_info.lot_divisible_flag = 'N' AND p_cycle_qty <> l_picked_qty AND
9171: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
9172: IF l_debug_on THEN
9173: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9174: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9175: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9176: WSH_DEBUG_SV.pop(l_module_name);
9177: END IF;
9170: IF ( l_item_info.lot_divisible_flag = 'N' AND p_cycle_qty <> l_picked_qty AND
9171: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
9172: IF l_debug_on THEN
9173: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9174: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9175: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9176: WSH_DEBUG_SV.pop(l_module_name);
9177: END IF;
9178: return(FALSE);
9171: l_item_info.lot_control_code = 2 AND l_released_status ='Y') THEN
9172: IF l_debug_on THEN
9173: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9174: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9175: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9176: WSH_DEBUG_SV.pop(l_module_name);
9177: END IF;
9178: return(FALSE);
9179:
9172: IF l_debug_on THEN
9173: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_divisible_flag', l_item_info.lot_divisible_flag);
9174: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9175: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9176: WSH_DEBUG_SV.pop(l_module_name);
9177: END IF;
9178: return(FALSE);
9179:
9180: ELSE
9178: return(FALSE);
9179:
9180: ELSE
9181: IF l_debug_on THEN
9182: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9183: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9184: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9185:
9186: WSH_DEBUG_SV.pop(l_module_name);
9179:
9180: ELSE
9181: IF l_debug_on THEN
9182: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9183: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9184: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9185:
9186: WSH_DEBUG_SV.pop(l_module_name);
9187: END IF;
9180: ELSE
9181: IF l_debug_on THEN
9182: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9183: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9184: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9185:
9186: WSH_DEBUG_SV.pop(l_module_name);
9187: END IF;
9188:
9182: wsh_debug_sv.LOG(l_module_name, 'lot_divisible_flag', l_item_info.lot_divisible_flag);
9183: wsh_debug_sv.LOG(l_module_name, 'l_item_info.lot_control_code', l_item_info.lot_control_code);
9184: wsh_debug_sv.LOG(l_module_name, 'l_released_status', l_released_status);
9185:
9186: WSH_DEBUG_SV.pop(l_module_name);
9187: END IF;
9188:
9189: return(TRUE);
9190: END IF;
9189: return(TRUE);
9190: END IF;
9191:
9192: IF l_debug_on THEN
9193: WSH_DEBUG_SV.pop(l_module_name);
9194: END IF;
9195:
9196: return(TRUE);
9197:
9200: -- Debug Statements
9201: --
9202: -- CLOSE line_status;
9203: IF l_debug_on THEN
9204: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
9206: END IF;
9207: --
9208: return(FALSE);
9201: --
9202: -- CLOSE line_status;
9203: IF l_debug_on THEN
9204: WSH_DEBUG_SV.logmsg(l_module_name,'NO_DATA_FOUND exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
9205: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:NO_DATA_FOUND');
9206: END IF;
9207: --
9208: return(FALSE);
9209:
9213: END IF;
9214: */
9215: --
9216: IF l_debug_on THEN
9217: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9218: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9219: END IF;
9220: --
9221: return(FALSE);
9214: */
9215: --
9216: IF l_debug_on THEN
9217: WSH_DEBUG_SV.logmsg(l_module_name,'Unexpected error has occured. Oracle error message is '|| SQLERRM,WSH_DEBUG_SV.C_UNEXPEC_ERR_LEVEL);
9218: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:OTHERS');
9219: END IF;
9220: --
9221: return(FALSE);
9222: