[Home] [Help]
677: WHEN NO_DATA_FOUND THEN
678: IF (l_debug = 1) THEN
679: print_debug('No WLC records found for given item/rev/lot/LPN combination!');
680: END IF;
681: FND_MESSAGE.SET_NAME('INV', 'INV_NO_RESULT_FOUND');
682: FND_MSG_PUB.ADD;
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
684: WHEN RECORD_LOCKED THEN
685: IF (l_debug = 1) THEN
684: WHEN RECORD_LOCKED THEN
685: IF (l_debug = 1) THEN
686: print_debug('WLC record not available because it is locked by someone');
687: END IF;
688: FND_MESSAGE.SET_NAME('WMS', 'WMS_LPN_UNAVAIL');
689: FND_MSG_PUB.ADD;
690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
691: END;
692: IF (l_debug = 1) THEN
804: print_debug('No valid move order lines found for non-INV LPN');
805: END IF;
806: l_progress := '100';
807: -- RCV and WIP LPN's should have valid move order lines
808: FND_MESSAGE.SET_NAME('WMS', 'WMS_MO_NOT_FOUND');
809: FND_MSG_PUB.ADD;
810: RAISE FND_API.G_EXC_ERROR;
811: ELSE
812: -- LPN is an Inventory LPN with no move order lines.
906: ELSE
907: IF (l_debug = 1) THEN
908: print_debug('Failure returned from create_mo API');
909: END IF;
910: FND_MESSAGE.SET_NAME('WMS', 'WMS_TD_MO_ERROR');
911: FND_MSG_PUB.ADD;
912: RAISE FND_API.G_EXC_ERROR;
913: END IF;
914: l_progress := '150';
1109: END IF;
1110: l_progress := '230';
1111: -- This case should technically not occur if the move order
1112: -- lines are maintained properly.
1113: FND_MESSAGE.SET_NAME('WMS', 'WMS_MO_NOT_FOUND');
1114: FND_MSG_PUB.ADD;
1115: RAISE FND_API.G_EXC_ERROR;
1116: ELSE
1117: -- Full quantity has been matched
1217: IF (l_debug = 1) THEN
1218: print_debug('Could not find a matching move order line: ' ||
1219: l_current_serial);
1220: END IF;
1221: FND_MESSAGE.SET_NAME('WMS', 'WMS_MO_NOT_FOUND');
1222: FND_MSG_PUB.ADD;
1223: RAISE FND_API.G_EXC_ERROR;
1224: END IF;
1225:
1241: IF (l_primary_load_qty <> l_serial_quantity) THEN
1242: IF (l_debug = 1) THEN
1243: print_debug('Unable to fully match the load quantity');
1244: END IF;
1245: FND_MESSAGE.SET_NAME ('WMS', 'WMS_CONT_INVALID_X_QTY');
1246: FND_MSG_PUB.ADD;
1247: RAISE FND_API.G_EXC_ERROR;
1248: ELSE
1249: -- Full quantity has been matched
1270: IF (l_primary_load_qty <> l_marked_serials_tb.COUNT) THEN
1271: IF (l_debug = 1) THEN
1272: print_debug('Unable to fully match the load quantity');
1273: END IF;
1274: FND_MESSAGE.SET_NAME ('WMS', 'WMS_CONT_INVALID_X_QTY');
1275: FND_MSG_PUB.ADD;
1276: RAISE FND_API.G_EXC_ERROR;
1277: ELSE
1278: -- Full quantity has been matched
1387: IF (l_debug = 1) THEN
1388: print_debug('Could not find a matching move order line: ' ||
1389: l_marked_serials_tb(i).serial_number);
1390: END IF;
1391: FND_MESSAGE.SET_NAME('WMS', 'WMS_MO_NOT_FOUND');
1392: FND_MSG_PUB.ADD;
1393: RAISE FND_API.G_EXC_ERROR;
1394: END IF;
1395: END LOOP;--FOR i IN 1..l_marked_serials_tb.COUNT LOOP
1464: -- The MOL matched is not available for loading all the serials
1465: IF (l_debug = 1) THEN
1466: print_debug('Matching MOL does not have enough valid qty for load');
1467: END IF;
1468: FND_MESSAGE.SET_NAME('WMS', 'WMS_MO_NOT_FOUND');
1469: FND_MSG_PUB.ADD;
1470: RAISE FND_API.G_EXC_ERROR;
1471: ELSE
1472: -- The matched MOL has enough valid quantity to load all the serials
2507: -- Unable to load item if no valid suggestions were created
2508: IF (l_debug = 1) THEN
2509: print_debug('No valid suggestions created for MOL!');
2510: END IF;
2511: FND_MESSAGE.SET_NAME ('WMS', 'WMS_ALLOCATE_FAIL');
2512: FND_MSG_PUB.ADD;
2513: RAISE FND_API.G_EXC_ERROR;
2514: END IF;
2515:
2619: IF (x_return_status <> fnd_api.g_ret_sts_success) THEN
2620: IF (l_debug = 1) THEN
2621: print_debug('Error calling the Receiving TM!');
2622: END IF;
2623: FND_MESSAGE.SET_NAME ('WMS', 'WMS_TD_TXNMGR_ERROR');
2624: FND_MSG_PUB.ADD;
2625: RAISE FND_API.G_EXC_ERROR;
2626: ELSE
2627: IF (l_debug = 1) THEN
2657: IF (l_txn_return_status <> 0) THEN
2658: IF (l_debug = 1) THEN
2659: print_debug('Error calling the Inventory TM');
2660: END IF;
2661: FND_MESSAGE.SET_NAME ('WMS', 'WMS_TD_TXNMGR_ERROR');
2662: FND_MSG_PUB.ADD;
2663: RAISE FND_API.G_EXC_ERROR;
2664: ELSE
2665: IF (l_debug = 1) THEN
2808: ELSE
2809: IF (l_debug = 1) THEN
2810: print_debug('Failure returned from PackUnpack_Container API');
2811: END IF;
2812: FND_MESSAGE.SET_NAME ('WMS', 'WMS_CONT_INVALID_SER');
2813: FND_MSG_PUB.ADD;
2814: RAISE FND_API.G_EXC_ERROR;
2815: END IF;
2816: l_progress := '220';
2849: x_errorcode => l_errorcode)) THEN
2850: IF (l_debug = 1) THEN
2851: print_debug('Could not successfully parse the serials!');
2852: END IF;
2853: FND_MESSAGE.SET_NAME ('WMS', 'WMS_CONT_INVALID_SER');
2854: FND_MSG_PUB.ADD;
2855: RAISE FND_API.G_EXC_ERROR;
2856: END IF;
2857: IF (l_debug = 1) THEN
3043: IF (l_mo_lines_tb.COUNT = 0) THEN
3044: IF (l_debug = 1) THEN
3045: print_debug('No Move order lines were stored in the table!');
3046: END IF;
3047: FND_MESSAGE.SET_NAME('WMS', 'WMS_MO_NOT_FOUND');
3048: FND_MSG_PUB.ADD;
3049: RAISE FND_API.G_EXC_ERROR;
3050: END IF;
3051: