[Home] [Help]
430: IF g_debug = 1 THEN
431: debug('WMS_FROM_LPN_NO_DELIVERY : from lpn has no delivery : ' ,
432: 'wms_mdc_pvt.validate_to_lpn');
433: END IF;
434: fnd_message.set_name('WMS', 'WMS_FROM_LPN_NO_DELIVERY');
435: fnd_msg_pub.ADD;
436: -- Check the to_lpn before raising it
437: -- RAISE fnd_api.g_exc_error;
438: END IF;
456: IF g_debug = 1 THEN
457: debug('WMS_FROM_LPN_CONSOL : from lpn is a consol LPN: ' ,
458: 'wms_mdc_pvt.validate_to_lpns');
459: END IF;
460: fnd_message.set_name('WMS', 'WMS_FROM_LPN_CONSOL');
461: fnd_msg_pub.ADD;
462: --RAISE fnd_api.g_exc_error; No need to raise it ..check other conditions first
463: ELSE
464: IF g_debug = 1 THEN
466: 'a Consol LPN, No further nesting is allowed ' ,
467: 'wms_mdc_pvt.validate_to_lpns');
468: --{{- From LPNs is a Consol LPN, No further nesting is allowed }}
469: END IF;
470: fnd_message.set_name('WMS', 'WMS_CONSOL_NESTING_NOTALLOWED');
471: fnd_msg_pub.ADD;
472: x_allow_packing := 'N' ;
473: RAISE fnd_api.g_exc_error;
474: END IF;
529: ' Across Delivery is allowed in staging locator only: ' , 'wms_mdc_pvt.validate_to_lpn');
530: --{{- TO LPN must be in staging locator. Consolidation Across Delivery is allowed }}
531: --{{ in staging locator only }}
532: END IF;
533: fnd_message.set_name('WMS', 'WMS_MDC_IN_STAGING_ONLY');
534: fnd_msg_pub.ADD;
535: RAISE fnd_api.g_exc_error;
536: ELSE -- not a consol delivery of from LPN
537: x_allow_packing := 'Y' ;
579: IF g_debug = 1 THEN
580: debug('WMS_TO_LPN_NO_DELIVERY : TO lpn has no delivery : ' ,
581: 'wms_mdc_pvt.validate_to_lpn');
582: END IF;
583: fnd_message.set_name('WMS', 'WMS_TO_LPN_NO_DELIVERY');
584: fnd_msg_pub.ADD;
585: RAISE fnd_api.g_exc_error;
586: ELSE -- TODEL is not null and FROMDEL is null
587: RAISE fnd_api.g_exc_error;
615: debug('WMS_CANNOT_CONSOL_INNERLPN : TOLPN is an inner LPN. Cannot consolidate : '
616: , 'wms_mdc_pvt.validate_to_lpn');
617: --{{Cannot comingle AD/WD material in TO LPN }}
618: END IF;
619: fnd_message.set_name('WMS', 'WMS_CANNOT_CONSOL_INNERLPN');
620: fnd_msg_pub.ADD;
621: RAISE fnd_api.g_exc_error;
622: END IF;
623: BEGIN
750: debug('WMS_CANNOT_COMMINGLE_ADWD : cannto comingle AD/WD material: ' ,
751: 'wms_mdc_pvt.validate_to_lpn');
752: --{{Cannot comingle AD/WD material in TO LPN }}
753: END IF;
754: fnd_message.set_name('WMS', 'WMS_CANNOT_COMMINGLE_ADWD');
755: fnd_msg_pub.ADD;
756: RAISE fnd_api.g_exc_error;
757: END IF;
758: ELSE
763: IF g_debug = 1 THEN
764: debug('WMS_LOOSE_TO_LPN : Loose material exist in TO LPN' , 'wms_mdc_pvt.validate_to_lpn');
765: --{{Cannot Pack into TO LPN that has loose material }}
766: END IF;
767: fnd_message.set_name('WMS', 'WMS_LOOSE_TO_LPN');
768: fnd_msg_pub.ADD;
769: RAISE fnd_api.g_exc_error;
770: END IF ;
771: ELSE -- l_in_staging = 'N' THEN
775: ' Across Delivery is allowed in staging locator only: ' , 'wms_mdc_pvt.validate_to_lpn');
776: --{{TO LPN must be in staging locator. Consolidation Across Delivery is allowed
777: --in staging locator only }}
778: END IF;
779: fnd_message.set_name('WMS', 'WMS_MDC_IN_STAGING_ONLY');
780: fnd_msg_pub.ADD;
781: RAISE fnd_api.g_exc_error;
782: END IF;
783: END IF; -- l_to_lpn_context = 5 AND p_local_caller = 'N' THEN
1128: 'wms_mdc_pvt.can_ship_delivery');
1129: debug('WMS_PART_OF_CONSOL : This delivery is a prt of Consol Delivery..' ||
1130: 'cannot ship from here' , 'wms_mdc_pvt.can_ship_delivery');
1131: END IF;
1132: fnd_message.set_name('WMS', 'WMS_DEL_PART_OF_CONSOL');
1133: fnd_msg_pub.ADD;
1134: ELSE
1135: x_allow_shipping := 'Y';
1136: END IF;
1206: debug('WMS_CONSOL_LPN_NESTING_NOTALLOWED : One of the From LPNs is ' ||
1207: 'a Consol LPN, No further nesting is allowed ' , 'wms_mdc_pvt.validate_to_lpns');
1208: --{{- One of the From LPNs is a Consol LPN, No further nesting is allowed }}
1209: END IF;
1210: fnd_message.set_name('WMS', 'WMS_CONSOL_NESTING_NOTALLOWED');
1211: fnd_msg_pub.ADD;
1212: x_allow_packing := 'N' ;
1213: RAISE fnd_api.g_exc_error;
1214: --EXIT; -- No need to check the delivery ids of the remaining
1221: l_allow_packing := 'N' ; -- U gets used in WMSPKDPB.pls
1222: IF g_debug = 1 THEN
1223: debug('WMS_ONE_FROM_LPN_NO_DEL : from lpn has no delivery : ' , 'wms_mdc_pvt.validate_to_lpn');
1224: END IF;
1225: fnd_message.set_name('WMS', 'WMS_ONE_FROM_LPN_NO_DEL');
1226: fnd_msg_pub.ADD;
1227: -- Check the to_lpn before raising it
1228: --RAISE fnd_api.g_exc_error;
1229: END IF;
1270: x_allow_packing := 'N' ; -- U gets used in WMSPKDPB.pls
1271: IF g_debug = 1 THEN
1272: debug('WMS_TO_LPN_NO_DELIVERY : TO lpn has no delivery : ' , 'wms_mdc_pvt.validate_to_lpn');
1273: END IF;
1274: fnd_message.set_name('WMS', 'WMS_TO_LPN_NO_DELIVERY');
1275: fnd_msg_pub.ADD;
1276: RAISE fnd_api.g_exc_error;
1277: ELSE -- TODEL is not null and FROMDEL is null
1278: x_allow_packing := 'N' ; -- U gets used in WMSPKDPB.pls
1438: debug('WMS_CANNOT_COMMINGLE_ADWD : cannto comingle AD/WD material: ' ,
1439: 'wms_mdc_pvt.validate_to_lpn');
1440: --{{Cannot comingle AD/WD material in TO LPN }}
1441: END IF;
1442: fnd_message.set_name('WMS', 'WMS_CANNOT_COMMINGLE_ADWD');
1443: fnd_msg_pub.ADD;
1444: RAISE fnd_api.g_exc_error;
1445: END IF; -- Are all from LPNS AD?
1446: END IF; -- allow packing = 'V' , futher validations