[Home] [Help]
393: IF g_debug = 1 THEN
394: debug('WMS_FROM_LPN_NO_DELIVERY : from lpn has no delivery : ' ,
395: 'wms_mdc_pvt.validate_to_lpn');
396: END IF;
397: fnd_message.set_name('WMS', 'WMS_FROM_LPN_NO_DELIVERY');
398: fnd_msg_pub.ADD;
399: -- Check the to_lpn before raising it
400: -- RAISE fnd_api.g_exc_error;
401: END IF;
419: IF g_debug = 1 THEN
420: debug('WMS_FROM_LPN_CONSOL : from lpn is a consol LPN: ' ,
421: 'wms_mdc_pvt.validate_to_lpns');
422: END IF;
423: fnd_message.set_name('WMS', 'WMS_FROM_LPN_CONSOL');
424: fnd_msg_pub.ADD;
425: --RAISE fnd_api.g_exc_error; No need to raise it ..check other conditions first
426: ELSE
427: IF g_debug = 1 THEN
429: 'a Consol LPN, No further nesting is allowed ' ,
430: 'wms_mdc_pvt.validate_to_lpns');
431: --{{- From LPNs is a Consol LPN, No further nesting is allowed }}
432: END IF;
433: fnd_message.set_name('WMS', 'WMS_CONSOL_NESTING_NOTALLOWED');
434: fnd_msg_pub.ADD;
435: x_allow_packing := 'N' ;
436: RAISE fnd_api.g_exc_error;
437: END IF;
492: ' Across Delivery is allowed in staging locator only: ' , 'wms_mdc_pvt.validate_to_lpn');
493: --{{- TO LPN must be in staging locator. Consolidation Across Delivery is allowed }}
494: --{{ in staging locator only }}
495: END IF;
496: fnd_message.set_name('WMS', 'WMS_MDC_IN_STAGING_ONLY');
497: fnd_msg_pub.ADD;
498: RAISE fnd_api.g_exc_error;
499: ELSE -- not a consol delivery of from LPN
500: x_allow_packing := 'Y' ;
542: IF g_debug = 1 THEN
543: debug('WMS_TO_LPN_NO_DELIVERY : TO lpn has no delivery : ' ,
544: 'wms_mdc_pvt.validate_to_lpn');
545: END IF;
546: fnd_message.set_name('WMS', 'WMS_TO_LPN_NO_DELIVERY');
547: fnd_msg_pub.ADD;
548: RAISE fnd_api.g_exc_error;
549: ELSE -- TODEL is not null and FROMDEL is null
550: RAISE fnd_api.g_exc_error;
578: debug('WMS_CANNOT_CONSOL_INNERLPN : TOLPN is an inner LPN. Cannot consolidate : '
579: , 'wms_mdc_pvt.validate_to_lpn');
580: --{{Cannot comingle AD/WD material in TO LPN }}
581: END IF;
582: fnd_message.set_name('WMS', 'WMS_CANNOT_CONSOL_INNERLPN');
583: fnd_msg_pub.ADD;
584: RAISE fnd_api.g_exc_error;
585: END IF;
586: BEGIN
713: debug('WMS_CANNOT_COMMINGLE_ADWD : cannto comingle AD/WD material: ' ,
714: 'wms_mdc_pvt.validate_to_lpn');
715: --{{Cannot comingle AD/WD material in TO LPN }}
716: END IF;
717: fnd_message.set_name('WMS', 'WMS_CANNOT_COMMINGLE_ADWD');
718: fnd_msg_pub.ADD;
719: RAISE fnd_api.g_exc_error;
720: END IF;
721: ELSE
726: IF g_debug = 1 THEN
727: debug('WMS_LOOSE_TO_LPN : Loose material exist in TO LPN' , 'wms_mdc_pvt.validate_to_lpn');
728: --{{Cannot Pack into TO LPN that has loose material }}
729: END IF;
730: fnd_message.set_name('WMS', 'WMS_LOOSE_TO_LPN');
731: fnd_msg_pub.ADD;
732: RAISE fnd_api.g_exc_error;
733: END IF ;
734: ELSE -- l_in_staging = 'N' THEN
738: ' Across Delivery is allowed in staging locator only: ' , 'wms_mdc_pvt.validate_to_lpn');
739: --{{TO LPN must be in staging locator. Consolidation Across Delivery is allowed
740: --in staging locator only }}
741: END IF;
742: fnd_message.set_name('WMS', 'WMS_MDC_IN_STAGING_ONLY');
743: fnd_msg_pub.ADD;
744: RAISE fnd_api.g_exc_error;
745: END IF;
746: END IF; -- l_to_lpn_context = 5 AND p_local_caller = 'N' THEN
1091: 'wms_mdc_pvt.can_ship_delivery');
1092: debug('WMS_PART_OF_CONSOL : This delivery is a prt of Consol Delivery..' ||
1093: 'cannot ship from here' , 'wms_mdc_pvt.can_ship_delivery');
1094: END IF;
1095: fnd_message.set_name('WMS', 'WMS_DEL_PART_OF_CONSOL');
1096: fnd_msg_pub.ADD;
1097: ELSE
1098: x_allow_shipping := 'Y';
1099: END IF;
1169: debug('WMS_CONSOL_LPN_NESTING_NOTALLOWED : One of the From LPNs is ' ||
1170: 'a Consol LPN, No further nesting is allowed ' , 'wms_mdc_pvt.validate_to_lpns');
1171: --{{- One of the From LPNs is a Consol LPN, No further nesting is allowed }}
1172: END IF;
1173: fnd_message.set_name('WMS', 'WMS_CONSOL_NESTING_NOTALLOWED');
1174: fnd_msg_pub.ADD;
1175: x_allow_packing := 'N' ;
1176: RAISE fnd_api.g_exc_error;
1177: --EXIT; -- No need to check the delivery ids of the remaining
1184: l_allow_packing := 'N' ; -- U gets used in WMSPKDPB.pls
1185: IF g_debug = 1 THEN
1186: debug('WMS_ONE_FROM_LPN_NO_DEL : from lpn has no delivery : ' , 'wms_mdc_pvt.validate_to_lpn');
1187: END IF;
1188: fnd_message.set_name('WMS', 'WMS_ONE_FROM_LPN_NO_DEL');
1189: fnd_msg_pub.ADD;
1190: -- Check the to_lpn before raising it
1191: --RAISE fnd_api.g_exc_error;
1192: END IF;
1233: x_allow_packing := 'N' ; -- U gets used in WMSPKDPB.pls
1234: IF g_debug = 1 THEN
1235: debug('WMS_TO_LPN_NO_DELIVERY : TO lpn has no delivery : ' , 'wms_mdc_pvt.validate_to_lpn');
1236: END IF;
1237: fnd_message.set_name('WMS', 'WMS_TO_LPN_NO_DELIVERY');
1238: fnd_msg_pub.ADD;
1239: RAISE fnd_api.g_exc_error;
1240: ELSE -- TODEL is not null and FROMDEL is null
1241: x_allow_packing := 'N' ; -- U gets used in WMSPKDPB.pls
1401: debug('WMS_CANNOT_COMMINGLE_ADWD : cannto comingle AD/WD material: ' ,
1402: 'wms_mdc_pvt.validate_to_lpn');
1403: --{{Cannot comingle AD/WD material in TO LPN }}
1404: END IF;
1405: fnd_message.set_name('WMS', 'WMS_CANNOT_COMMINGLE_ADWD');
1406: fnd_msg_pub.ADD;
1407: RAISE fnd_api.g_exc_error;
1408: END IF; -- Are all from LPNS AD?
1409: END IF; -- allow packing = 'V' , futher validations