[Home] [Help]
39: );
40: EXCEPTION
41: WHEN OTHERS
42: THEN
43: fnd_message.set_name ('WMS', 'WMS_INSTALL_CHK_ERROR');
44: fnd_msg_pub.ADD;
45: RAISE fnd_api.g_exc_unexpected_error;
46: END;
47:
59: );
60: EXCEPTION
61: WHEN OTHERS
62: THEN
63: fnd_message.set_name ('WMS', 'WMS_INSTALL_CHK_ERROR');
64: fnd_msg_pub.ADD;
65: RAISE fnd_api.g_exc_unexpected_error;
66: END;
67:
69: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
70: EXCEPTION
71: WHEN NO_DATA_FOUND
72: THEN
73: fnd_message.set_name ('INV', 'INV_INVALID_ORG');
74: fnd_msg_pub.ADD;
75: x_return_status := fnd_api.g_ret_sts_error;
76: fnd_msg_pub.count_and_get (p_count => x_msg_count
77: , p_data => x_msg_data);
224: OR p_rs_lot_num_tbl IS NULL
225: )
226: THEN
227: x_validation_status := 'N';
228: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
229: fnd_msg_pub.ADD;
230: RAISE fnd_api.g_exc_error;
231: END IF;
232:
252: THEN
253: print_debug ('INV_TOO_MANY_LOT_SPLIT', 'Validate_Lots');
254: END IF;
255:
256: fnd_message.set_name ('INV', 'INV_TOO_MANY_LOT_SPLIT');
257: fnd_msg_pub.ADD;
258: x_validation_status := 'N';
259: RAISE fnd_api.g_exc_error;
260: END IF;
263: THEN
264: IF (p_st_quantity_tbl (1) <= p_rs_quantity_tbl (1))
265: THEN
266: -- means this is not a partial split.
267: fnd_message.set_name ('INV', 'INV_MIN_LOT_SPLIT');
268: fnd_msg_pub.ADD;
269: x_validation_status := 'N';
270: RAISE fnd_api.g_exc_error;
271: END IF;
274: FOR i IN 1 .. l_result_count
275: LOOP
276: IF (p_rs_org_id_tbl (i) <> p_st_org_id_tbl (1))
277: THEN
278: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
279: fnd_msg_pub.ADD;
280: x_validation_status := 'N';
281: RAISE fnd_api.g_exc_error;
282: END IF;
282: END IF;
283:
284: IF (p_rs_item_id_tbl (i) <> p_st_item_id_tbl (1))
285: THEN
286: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ITEM');
287: fnd_msg_pub.ADD;
288: x_validation_status := 'N';
289: RAISE fnd_api.g_exc_error;
290: END IF;
292: IF (NVL (p_rs_revision_tbl (i), 'NULL') <>
293: NVL (p_rs_revision_tbl (1), 'NULL')
294: )
295: THEN
296: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_REVISION');
297: fnd_msg_pub.ADD;
298: x_validation_status := 'N';
299: RAISE fnd_api.g_exc_error;
300: END IF;
306: , TO_CHAR (SYSDATE, 'DD-MON-RRRR')
307: )
308: )
309: THEN
310: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_LOT_EXP_DATE');
311: fnd_msg_pub.ADD;
312: x_validation_status := 'N';
313: RAISE fnd_api.g_exc_error;
314: END IF;
357: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
358: THEN
359: IF (l_start_count > 1)
360: THEN
361: fnd_message.set_name ('INV', 'INV_MIN_START_LOT_TRANSLATE');
362: fnd_msg_pub.ADD;
363: x_validation_status := 'N';
364: RAISE fnd_api.g_exc_error;
365: END IF;
365: END IF;
366:
367: IF (l_result_count > 1)
368: THEN
369: fnd_message.set_name ('INV', 'INV_MIN_RESULT_LOT_TRANSLATE');
370: fnd_msg_pub.ADD;
371: x_validation_status := 'N';
372: RAISE fnd_api.g_exc_error;
373: END IF;
373: END IF;
374:
375: IF (p_rs_org_id_tbl (1) <> p_st_org_id_tbl (1))
376: THEN
377: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
378: fnd_msg_pub.ADD;
379: x_validation_status := 'N';
380: RAISE fnd_api.g_exc_error;
381: END IF;
402: IF ( l_st_lot_control_code <> l_rs_lot_control_code
403: OR l_st_serial_control_code <> l_rs_serial_control_code
404: )
405: THEN
406: fnd_message.set_name ('INV', 'INV_LOT_SERIAL_CODE_DIFF');
407: fnd_msg_pub.ADD;
408: x_validation_status := 'N';
409: RAISE fnd_api.g_exc_error;
410: END IF;
481: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
482: THEN
483: IF (l_start_count < 2)
484: THEN
485: fnd_message.set_name ('INV', 'INV_MIN_START_LOT_MERGE');
486: fnd_msg_pub.ADD;
487: x_validation_status := 'N';
488: RAISE fnd_api.g_exc_error;
489: END IF;
489: END IF;
490:
491: IF (l_result_count > 1)
492: THEN
493: fnd_message.set_name ('INV', 'INV_MAX_RESULT_LOT_MERGE');
494: fnd_msg_pub.ADD;
495: x_validation_status := 'N';
496: RAISE fnd_api.g_exc_error;
497: END IF;
501: IF (i < l_start_count)
502: THEN
503: IF (p_st_org_id_tbl (i) <> p_st_org_id_tbl (i + 1))
504: THEN
505: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
506: fnd_msg_pub.ADD;
507: x_validation_status := 'N';
508: RAISE fnd_api.g_exc_error;
509: END IF;
510: END IF;
511:
512: IF (p_st_org_id_tbl (i) <> p_rs_org_id_tbl (1))
513: THEN
514: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
515: fnd_msg_pub.ADD;
516: x_validation_status := 'N';
517: RAISE fnd_api.g_exc_error;
518: END IF;
520: IF (i < l_start_count)
521: THEN
522: IF (p_st_item_id_tbl (i) <> p_st_item_id_tbl (i + 1))
523: THEN
524: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ITEM');
525: fnd_msg_pub.ADD;
526: x_validation_status := 'N';
527: RAISE fnd_api.g_exc_error;
528: END IF;
529: END IF;
530:
531: IF (p_st_item_id_tbl (i) <> p_rs_item_id_tbl (1))
532: THEN
533: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ITEM');
534: fnd_msg_pub.ADD;
535: x_validation_status := 'N';
536: RAISE fnd_api.g_exc_error;
537: END IF;
546: THEN
547: print_debug ('Duplicate Lot', 'Validate_lots');
548: END IF;
549:
550: fnd_message.set_name ('INV', 'INV_DUPLICATE_LOT');
551: fnd_msg_pub.ADD;
552: x_validation_status := 'N';
553: RAISE fnd_api.g_exc_error;
554: END IF;
686: OR p_organization_id IS NULL
687: OR p_inventory_item_id IS NULL
688: )
689: THEN
690: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
691: fnd_msg_pub.ADD;
692: RAISE fnd_api.g_exc_error;
693: END IF;
694:
735: END IF;
736:
737: /* Bug:4405157. Modified the following message to be more specific to
738: Split transaction W.R.T Issue 15 of the bug*/
739: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_SPLIT');
740: fnd_msg_pub.ADD;
741: RAISE fnd_api.g_exc_unexpected_error;
742: END;
743: END;
784: END IF;
785:
786: /* Bug:4405157. Modified the following message to be more specific to
787: Merge transaction W.R.T Issue 15 of the bug*/
788: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_MERGE');
789: fnd_msg_pub.ADD;
790: RAISE fnd_api.g_exc_unexpected_error;
791: END;
792: END;
833: );
834: END IF;
835: /* Bug:4405157. Modified the following message to be more specific to
836: Translate transaction W.R.T Issue 15 of the bug*/
837: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
838: fnd_msg_pub.ADD;
839: RAISE fnd_api.g_exc_unexpected_error;
840: END;
841: END;
851: THEN
852: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
853: THEN
854:
855: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_SPLIT');
856:
857: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
858: THEN
859:
856:
857: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
858: THEN
859:
860: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_MERGE');
861:
862: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
863: THEN
864:
861:
862: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
863: THEN
864:
865: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
866:
867: ELSE
868: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
869: END IF;
864:
865: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
866:
867: ELSE
868: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
869: END IF;
870: fnd_msg_pub.ADD;
871: RAISE fnd_api.g_exc_error;
872: END IF;
976: THEN
977: print_debug ('Missing Required Parameter', 'Validate_Result_Lot');
978: END IF;
979:
980: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
981: fnd_msg_pub.ADD;
982: RAISE fnd_api.g_exc_error;
983: END IF;
984: /* Bug#4363274. This check is not required.
1001: END IF;
1002:
1003: IF (p_st_lot_num_tbl (i) = p_rs_lot_num_tbl (1))
1004: THEN
1005: fnd_message.set_name ('INV', 'INV_MERGELOT_USED');
1006: fnd_msg_pub.ADD;
1007: l_validation_status := 'N';
1008: RAISE fnd_api.g_exc_error;
1009: END IF;
1018: WHERE organization_id = p_organization_id;
1019: EXCEPTION
1020: WHEN NO_DATA_FOUND
1021: THEN
1022: fnd_message.set_name ('INV', 'INV_INT_ORG_CODE');
1023: fnd_msg_pub.ADD;
1024: x_validation_status := 'N';
1025: RAISE fnd_api.g_exc_unexpected_error;
1026: END;
1048:
1049: IF (l_lot_count > 0)
1050: THEN
1051: l_validation_status := 'N';
1052: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1053: fnd_msg_pub.ADD;
1054: RAISE fnd_api.g_exc_error;
1055: ELSE
1056: l_validation_status := 'Y';
1067:
1068: IF (l_lot_count > 0)
1069: THEN
1070: l_validation_status := 'N';
1071: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1072: fnd_msg_pub.ADD;
1073: RAISE fnd_api.g_exc_error;
1074: ELSE
1075: l_validation_status := 'Y';
1086: print_debug ('Duplicate Lot', 'Validate_Result_Lot');
1087: END IF;
1088:
1089: l_validation_status := 'N';
1090: fnd_message.set_name ('INV', 'INV_DUPLICATE_LOT');
1091: fnd_msg_pub.ADD;
1092: RAISE fnd_api.g_exc_error;
1093: END IF;
1094: END IF;
1107:
1108: IF (l_lot_count > 0)
1109: THEN
1110: l_validation_status := 'N';
1111: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1112: fnd_msg_pub.ADD;
1113: RAISE fnd_api.g_exc_error;
1114: ELSE
1115: l_validation_status := 'Y';
1126:
1127: IF (l_lot_count > 0)
1128: THEN
1129: l_validation_status := 'N';
1130: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1131: fnd_msg_pub.ADD;
1132: RAISE fnd_api.g_exc_error;
1133: ELSE
1134: l_validation_status := 'Y';
1148: -- this means the lot number exists for different item.
1149: -- for lot merge, the resultant lot can be an existing item, but of the same item,
1150: -- cannot be from different items.
1151: l_validation_status := 'N';
1152: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1153: fnd_msg_pub.ADD;
1154: RAISE fnd_api.g_exc_error;
1155: ELSE
1156: l_validation_status := 'Y';
1167:
1168: IF (l_lot_count > 0)
1169: THEN
1170: l_validation_status := 'N';
1171: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1172: fnd_msg_pub.ADD;
1173: RAISE fnd_api.g_exc_error;
1174: ELSE
1175: l_validation_status := 'Y';
1191:
1192: IF (l_lot_count > 0)
1193: THEN
1194: l_validation_status := 'N';
1195: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1196: fnd_msg_pub.ADD;
1197: RAISE fnd_api.g_exc_error;
1198: ELSE
1199: l_validation_status := 'Y';
1208:
1209: IF l_lot_count > 0
1210: THEN
1211: l_validation_status := 'N';
1212: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1213: fnd_msg_pub.ADD;
1214: RAISE fnd_api.g_exc_error;
1215: ELSE
1216: l_validation_status := 'Y';
1227:
1228: IF l_lot_count > 0
1229: THEN
1230: l_validation_status := 'N';
1231: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1232: fnd_msg_pub.ADD;
1233: RAISE fnd_api.g_exc_error;
1234: ELSE
1235: l_validation_status := 'Y';
1246: print_debug ('Duplicate Lot', 'Validate_Result_Lot');
1247: END IF;
1248:
1249: l_validation_status := 'N';
1250: fnd_message.set_name ('INV', 'INV_DUPLICATE_LOT');
1251: fnd_msg_pub.ADD;
1252: RAISE fnd_api.g_exc_error;
1253: END IF;
1254: END IF;
1277:
1278: IF (l_lot_count > 0)
1279: THEN
1280: l_validation_status := 'N';
1281: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1282: fnd_msg_pub.ADD;
1283: RAISE fnd_api.g_exc_error;
1284: ELSE
1285: l_validation_status := 'Y';
1293:
1294: IF l_lot_count > 0
1295: THEN
1296: l_validation_status := 'N';
1297: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1298: fnd_msg_pub.ADD;
1299: RAISE fnd_api.g_exc_error;
1300: ELSE
1301: l_validation_status := 'Y';
1312:
1313: IF l_lot_count > 0
1314: THEN
1315: l_validation_status := 'N';
1316: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1317: fnd_msg_pub.ADD;
1318: RAISE fnd_api.g_exc_error;
1319: ELSE
1320: l_validation_status := 'Y';
1339: end if;
1340: end loop;
1341:
1342: if( l_found = false ) then
1343: FND_MESSAGE.SET_NAME('INV', 'INV_DIFF_MERGE_ITEM');
1344: FND_MSG_PUB.ADD;
1345: l_validation_status := 'N';
1346: raise FND_API.G_EXC_ERROR;
1347: end if;
1379: AND mtlt.lot_number = p_rs_lot_num_tbl(1);
1380:
1381: IF l_lot_count = 0 Then
1382: l_validation_status := 'N';
1383: FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_LOT');
1384: FND_MSG_PUB.ADD;
1385: raise FND_API.G_EXC_ERROR;
1386: else
1387: l_validation_status := 'Y';
1402: x_validation_status := l_validation_status;
1403:
1404: IF (x_validation_status <> 'Y')
1405: THEN
1406: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
1407: fnd_msg_pub.ADD;
1408: RAISE fnd_api.g_exc_error;
1409: END IF;
1410:
1493: OR p_start_inv_item_id IS NULL
1494: OR p_result_inv_item_id IS NULL
1495: )
1496: THEN
1497: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1498: fnd_msg_pub.ADD;
1499: x_validation_status := 'N';
1500: RAISE fnd_api.g_exc_unexpected_error;
1501: END IF;
1511: );
1512: END IF;
1513:
1514: x_validation_status := 'N';
1515: fnd_message.set_name ('INV', 'INV_ALREADY_EXISTS');
1516: fnd_message.set_token ('ENTITY'
1517: , fnd_message.get_string ('INV', 'LOT_NUMBER')
1518: );
1519: fnd_msg_pub.ADD;
1512: END IF;
1513:
1514: x_validation_status := 'N';
1515: fnd_message.set_name ('INV', 'INV_ALREADY_EXISTS');
1516: fnd_message.set_token ('ENTITY'
1517: , fnd_message.get_string ('INV', 'LOT_NUMBER')
1518: );
1519: fnd_msg_pub.ADD;
1520: RAISE fnd_api.g_exc_error;
1513:
1514: x_validation_status := 'N';
1515: fnd_message.set_name ('INV', 'INV_ALREADY_EXISTS');
1516: fnd_message.set_token ('ENTITY'
1517: , fnd_message.get_string ('INV', 'LOT_NUMBER')
1518: );
1519: fnd_msg_pub.ADD;
1520: RAISE fnd_api.g_exc_error;
1521: ELSE
1525: /*if( p_start_inv_item_id = p_result_inv_item_id ) then
1526: x_validation_status := 'Y';
1527: else
1528: x_validation_status := 'N';
1529: FND_MESSAGE.SET_NAME('INV', 'INV_ALREADY_EXISTS');
1530: FND_MESSAGE.SET_TOKEN('ENTITY', FND_MESSAGE.get_String('INV', 'LOT_NUMBER'));
1531: FND_MSG_PUB.ADD;
1532: raise FND_API.G_EXC_ERROR;
1533: end if;*/
1526: x_validation_status := 'Y';
1527: else
1528: x_validation_status := 'N';
1529: FND_MESSAGE.SET_NAME('INV', 'INV_ALREADY_EXISTS');
1530: FND_MESSAGE.SET_TOKEN('ENTITY', FND_MESSAGE.get_String('INV', 'LOT_NUMBER'));
1531: FND_MSG_PUB.ADD;
1532: raise FND_API.G_EXC_ERROR;
1533: end if;*/
1534: x_validation_status := 'Y';
1605: RAISE fnd_api.g_exc_unexpected_error;
1606: END;
1607: IF(l_lpn_context <> 1) --does not resides in inventory
1608: THEN
1609: fnd_message.set_name('INV', 'INV_INVALID_LPN_CONTEXT');
1610: fnd_msg_pub.ADD;
1611: IF (l_debug = 1) THEN
1612: print_debug('validate_lpn_info: Invalid LPN Context for FROM LPN' , 'validate_lpn_info');
1613: END IF;
1636: RAISE fnd_api.g_exc_unexpected_error;
1637: END;
1638: IF(l_lpn_context NOT IN (1,5)) --does not 'resides in inventory' and not 'defined but not used'
1639: THEN
1640: fnd_message.set_name('INV', 'INV_INVALID_LPN_CONTEXT');
1641: fnd_msg_pub.ADD;
1642: IF (l_debug = 1) THEN
1643: print_debug('validate_lpn_info: Invalid LPN Context for TO LPN', 'validate_lpn_info');
1644: END IF;
1650: (NVL(l_sub_code, '@#$%') <> p_rs_sub_code_tbl(i))
1651: OR
1652: (NVL(l_locator_id, -9999) <> NVL(p_rs_locator_id_tbl(i), -9999))
1653: ) THEN
1654: fnd_message.set_name('INV', 'INV_INT_LPN');
1655: fnd_msg_pub.ADD;
1656: IF (l_debug = 1) THEN
1657: print_debug('validate_lpn_info: Org/Sub/Loc of LPN does not match', 'validate_lpn_info');
1658: END IF;
1766: OR p_organization_id IS NULL
1767: OR p_inventory_item_id IS NULL
1768: )
1769: THEN
1770: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1771: fnd_msg_pub.ADD;
1772: x_validation_status := 'N';
1773: RAISE fnd_api.g_exc_error;
1774: END IF;
1809: AND lot_number = p_lot_number;
1810: EXCEPTION
1811: WHEN NO_DATA_FOUND
1812: THEN
1813: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1814: fnd_message.set_token ('ATTRIBUTE'
1815: , fnd_message.get_string ('INV'
1816: , 'CAPS_LOT_NUMBER'
1817: )
1810: EXCEPTION
1811: WHEN NO_DATA_FOUND
1812: THEN
1813: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1814: fnd_message.set_token ('ATTRIBUTE'
1815: , fnd_message.get_string ('INV'
1816: , 'CAPS_LOT_NUMBER'
1817: )
1818: , FALSE
1811: WHEN NO_DATA_FOUND
1812: THEN
1813: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1814: fnd_message.set_token ('ATTRIBUTE'
1815: , fnd_message.get_string ('INV'
1816: , 'CAPS_LOT_NUMBER'
1817: )
1818: , FALSE
1819: );
1930: OR p_organization_id IS NULL
1931: OR p_inventory_item_id IS NULL
1932: )
1933: THEN
1934: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1935: fnd_msg_pub.ADD;
1936: x_validation_status := 'N';
1937: RAISE fnd_api.g_exc_error;
1938: END IF;
1980: , 'Validate_serial_status'
1981: );
1982: END IF;
1983:
1984: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1985: fnd_message.set_token ('ATTRIBUTE'
1986: , fnd_message.get_string ('INV'
1987: , 'CAPS_SERIAL_NUMBERS'
1988: )
1981: );
1982: END IF;
1983:
1984: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1985: fnd_message.set_token ('ATTRIBUTE'
1986: , fnd_message.get_string ('INV'
1987: , 'CAPS_SERIAL_NUMBERS'
1988: )
1989: , FALSE
1982: END IF;
1983:
1984: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1985: fnd_message.set_token ('ATTRIBUTE'
1986: , fnd_message.get_string ('INV'
1987: , 'CAPS_SERIAL_NUMBERS'
1988: )
1989: , FALSE
1990: );
2480: as zero and the count will be more than 1 even if the attributes
2481: arent filled in
2482: IF (l_rs_lot_attr_category IS NULL AND l_count > 0) THEN
2483: print_debug('Resultant lot category is null', 'Validate_Attributes');
2484: fnd_message.set_name('INV', 'INV_VALID_CAT');
2485: fnd_msg_pub.add;
2486: raise FND_API.G_EXC_ERROR;
2487: end if;
2488:
2511: || ','
2512: || l_rs_lot_attr_category
2513: , 'Validate_Attributes'
2514: );
2515: fnd_message.set_name ('INV', 'INV_VALID_CAT');
2516: fnd_msg_pub.ADD;
2517: RAISE fnd_api.g_exc_error;
2518: END IF;
2519:
2836: , 'Validate_Attributes'
2837: );
2838: END IF;
2839:
2840: fnd_message.set_name ('INV'
2841: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
2842: );
2843: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2844: fnd_message.set_token ('CONTEXTCODE'
2839:
2840: fnd_message.set_name ('INV'
2841: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
2842: );
2843: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2844: fnd_message.set_token ('CONTEXTCODE'
2845: , v_contexts.context_code (i)
2846: );
2847: fnd_message.set_token
2840: fnd_message.set_name ('INV'
2841: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
2842: );
2843: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2844: fnd_message.set_token ('CONTEXTCODE'
2845: , v_contexts.context_code (i)
2846: );
2847: fnd_message.set_token
2848: ('SEGMENT'
2843: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2844: fnd_message.set_token ('CONTEXTCODE'
2845: , v_contexts.context_code (i)
2846: );
2847: fnd_message.set_token
2848: ('SEGMENT'
2849: , v_segments.application_column_name
2850: (j)
2851: );
2894:
2895: l_validation_status := 'N';
2896: x_return_status := fnd_api.g_ret_sts_error;
2897: x_msg_data := fnd_flex_descval.error_message;
2898: fnd_message.set_name ('INV', 'GENERIC');
2899: fnd_message.set_token ('MSGBODY', x_msg_data);
2900: fnd_msg_pub.ADD;
2901: x_msg_count := NVL (x_msg_count, 0) + 1;
2902: RAISE fnd_api.g_exc_error;
2895: l_validation_status := 'N';
2896: x_return_status := fnd_api.g_ret_sts_error;
2897: x_msg_data := fnd_flex_descval.error_message;
2898: fnd_message.set_name ('INV', 'GENERIC');
2899: fnd_message.set_token ('MSGBODY', x_msg_data);
2900: fnd_msg_pub.ADD;
2901: x_msg_count := NVL (x_msg_count, 0) + 1;
2902: RAISE fnd_api.g_exc_error;
2903: END IF;
3463: , 'validate_serial_attributes'
3464: );
3465: END IF;
3466:
3467: fnd_message.set_name ('INV'
3468: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
3469: );
3470: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3471: fnd_message.set_token ('CONTEXTCODE'
3466:
3467: fnd_message.set_name ('INV'
3468: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
3469: );
3470: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3471: fnd_message.set_token ('CONTEXTCODE'
3472: , v_contexts.context_code (i)
3473: );
3474: fnd_message.set_token
3467: fnd_message.set_name ('INV'
3468: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
3469: );
3470: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3471: fnd_message.set_token ('CONTEXTCODE'
3472: , v_contexts.context_code (i)
3473: );
3474: fnd_message.set_token
3475: ('SEGMENT'
3470: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3471: fnd_message.set_token ('CONTEXTCODE'
3472: , v_contexts.context_code (i)
3473: );
3474: fnd_message.set_token
3475: ('SEGMENT'
3476: , v_segments.application_column_name
3477: (j)
3478: );
3521:
3522: l_validation_status := 'N';
3523: x_return_status := fnd_api.g_ret_sts_error;
3524: x_msg_data := fnd_flex_descval.error_message;
3525: fnd_message.set_name ('INV', 'GENERIC');
3526: fnd_message.set_token ('MSGBODY', x_msg_data);
3527: fnd_msg_pub.ADD;
3528: x_msg_count := NVL (x_msg_count, 0) + 1;
3529: RAISE fnd_api.g_exc_error;
3522: l_validation_status := 'N';
3523: x_return_status := fnd_api.g_ret_sts_error;
3524: x_msg_data := fnd_flex_descval.error_message;
3525: fnd_message.set_name ('INV', 'GENERIC');
3526: fnd_message.set_token ('MSGBODY', x_msg_data);
3527: fnd_msg_pub.ADD;
3528: x_msg_count := NVL (x_msg_count, 0) + 1;
3529: RAISE fnd_api.g_exc_error;
3530: END IF;
3772: , 'Validate_cost_group'
3773: );
3774: END IF;
3775:
3776: fnd_message.set_name ('INV', 'INV_ERROR_GET_COST_GROUP');
3777: fnd_msg_pub.ADD;
3778: x_validation_status := 'N';
3779: RAISE fnd_api.g_exc_error;
3780: END IF;
3783: THEN
3784: l_cost_group_id := v_cost_group_id;
3785: ELSIF (l_cost_group_id <> v_cost_group_id)
3786: THEN
3787: fnd_message.set_name ('INV', 'INV_INT_CSTGRP');
3788: fnd_msg_pub.ADD;
3789: x_validation_status := 'N';
3790: RAISE fnd_api.g_exc_error;
3791: END IF;
3813: FOR i IN 1 .. l_result_count
3814: LOOP
3815: IF (x_rs_cost_group_tbl (i) <> l_cost_group_id)
3816: THEN
3817: fnd_message.set_name ('INV', 'INV_LOT_DIFF_COSTGROUP');
3818: fnd_msg_pub.ADD;
3819: l_validation_status := 'N';
3820: RAISE fnd_api.g_exc_error;
3821: END IF;
3882: );
3883:
3884: IF (l_return_status <> fnd_api.g_ret_sts_success)
3885: THEN
3886: fnd_message.set_name ('INV', 'INV_ERROR_GET_COST_GROUP');
3887: fnd_msg_pub.ADD;
3888: x_validation_status := 'N';
3889: RAISE fnd_api.g_exc_error;
3890: END IF;
3891: END IF;
3892:
3893: IF (l_current_cost_group_id <> l_cost_group_id)
3894: THEN
3895: fnd_message.set_name ('INV', 'INV_DIFF_MERGE_COST_GROUP');
3896: fnd_message.set_token ('ENTITY1', l_lot_number);
3897: fnd_msg_pub.ADD;
3898: x_validation_status := 'N';
3899: RAISE fnd_api.g_exc_error;
3892:
3893: IF (l_current_cost_group_id <> l_cost_group_id)
3894: THEN
3895: fnd_message.set_name ('INV', 'INV_DIFF_MERGE_COST_GROUP');
3896: fnd_message.set_token ('ENTITY1', l_lot_number);
3897: fnd_msg_pub.ADD;
3898: x_validation_status := 'N';
3899: RAISE fnd_api.g_exc_error;
3900: END IF;
4136: AND inventory_item_id = l_inventory_item_id;
4137: EXCEPTION
4138: WHEN NO_DATA_FOUND
4139: THEN
4140: fnd_message.set_name ('INV', 'INV_INT_ITEM_CODE');
4141: fnd_msg_pub.ADD;
4142: RAISE fnd_api.g_exc_error;
4143: END;
4144:
4196: );
4197:
4198: IF (l_start_primary_qty = -99999)
4199: THEN
4200: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4201: fnd_message.set_token ('UOM', l_start_uom_code);
4202: fnd_message.set_token ('ROUTINE'
4203: , g_pkg_name || 'Validate_Quantity');
4204: fnd_msg_pub.ADD;
4197:
4198: IF (l_start_primary_qty = -99999)
4199: THEN
4200: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4201: fnd_message.set_token ('UOM', l_start_uom_code);
4202: fnd_message.set_token ('ROUTINE'
4203: , g_pkg_name || 'Validate_Quantity');
4204: fnd_msg_pub.ADD;
4205: x_validation_status := 'N';
4198: IF (l_start_primary_qty = -99999)
4199: THEN
4200: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4201: fnd_message.set_token ('UOM', l_start_uom_code);
4202: fnd_message.set_token ('ROUTINE'
4203: , g_pkg_name || 'Validate_Quantity');
4204: fnd_msg_pub.ADD;
4205: x_validation_status := 'N';
4206: RAISE fnd_api.g_exc_unexpected_error;
4238: IF (l_return_values <> 'Y') THEN
4239: IF (l_debug = 1) THEN
4240: print_debug ('get_immediate_lpn_item_qty has returned error', 'Validate_Quantity');
4241: END IF;
4242: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4243: fnd_msg_pub.ADD;
4244: RAISE fnd_api.g_exc_error;
4245: END IF;
4246:
4250: print_debug ('l_lpn_qty is ' || l_lpn_qty, 'Validate_quantity');
4251: END IF;
4252:
4253: IF (l_att_qty < l_start_primary_qty) THEN
4254: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4255: fnd_msg_pub.ADD;
4256: RAISE fnd_api.g_exc_error;
4257: END IF;
4258:
4257: END IF;
4258:
4259: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4260: IF (l_att_qty <> l_start_primary_qty) THEN
4261: fnd_message.set_name ('INV', 'INV_LOT_TRANSLATE_QTY_ERR');
4262: fnd_msg_pub.ADD;
4263: RAISE fnd_api.g_exc_error;
4264: END IF;
4265: END IF;
4283: , to_name => NULL
4284: );
4285:
4286: IF (l_result_qty = -99999) THEN
4287: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4288: fnd_message.set_token ('UOM', l_start_uom_code);
4289: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4290: fnd_msg_pub.ADD;
4291: x_validation_status := 'N';
4284: );
4285:
4286: IF (l_result_qty = -99999) THEN
4287: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4288: fnd_message.set_token ('UOM', l_start_uom_code);
4289: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4290: fnd_msg_pub.ADD;
4291: x_validation_status := 'N';
4292: RAISE fnd_api.g_exc_unexpected_error;
4285:
4286: IF (l_result_qty = -99999) THEN
4287: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4288: fnd_message.set_token ('UOM', l_start_uom_code);
4289: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4290: fnd_msg_pub.ADD;
4291: x_validation_status := 'N';
4292: RAISE fnd_api.g_exc_unexpected_error;
4293: END IF;
4298: IF ( i = 1
4299: AND l_result_qty = l_att_qty
4300: AND p_transaction_type_id = inv_globals.g_type_inv_lot_split
4301: ) THEN
4302: fnd_message.set_name ('INV', 'INV_MIN_LOT_SPLIT');
4303: fnd_msg_pub.ADD;
4304: RAISE fnd_api.g_exc_error;
4305: END IF;
4306:
4329: print_debug ('Lot qty does not match the serial qty for lot split ', 'Validate_Quantity');
4330: print_debug ('Lot = > ' || p_rs_lot_num_tbl (i), 'Validate_Quantity');
4331: print_debug ('l_lot_serial_count = > ' || l_lot_serial_count, 'Validate_Quantity');
4332: END IF;
4333: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4334: fnd_msg_pub.ADD;
4335: RAISE fnd_api.g_exc_error;
4336: END IF;
4337: END IF;
4337: END IF;
4338: END LOOP;
4339:
4340: IF (l_total_qty = 0) THEN
4341: fnd_message.set_name ('INV', 'INV_INLTPU_QTY');
4342: fnd_msg_pub.ADD;
4343: RAISE fnd_api.g_exc_error;
4344: END IF;
4345:
4346: IF (l_total_qty <> l_start_primary_qty) THEN
4347: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split
4348: AND l_total_qty > l_start_primary_qty) THEN
4349: x_validation_status := 'N';
4350: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_SPLIT');
4351: fnd_msg_pub.ADD;
4352: RAISE fnd_api.g_exc_error;
4353: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4354: x_validation_status := 'N';
4351: fnd_msg_pub.ADD;
4352: RAISE fnd_api.g_exc_error;
4353: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4354: x_validation_status := 'N';
4355: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_TRANSLATE');
4356: fnd_msg_pub.ADD;
4357: RAISE fnd_api.g_exc_error;
4358: END IF;
4359: END IF;
4367: IF (l_debug = 1) THEN
4368: print_debug('Fractional qty is present for a lot serial controlled item'
4369: , 'Validate_Quantity');
4370: END IF;
4371: fnd_message.set_name ('INV', 'INV_LOT_SER_QTY_VIOLATION');
4372: fnd_msg_pub.ADD;
4373: RAISE fnd_api.g_exc_error;
4374: END IF;
4375:
4386: , 'Validate_Quantity');
4387: print_debug('l_total_qty => ' || l_total_qty, 'Validate_Quantity');
4388: END IF;
4389: x_validation_status := 'N';
4390: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4391: fnd_msg_pub.ADD;
4392: RAISE fnd_api.g_exc_error;
4393: END IF;
4394: END IF;
4410: );
4411:
4412: IF (l_start_primary_qty = -99999)
4413: THEN
4414: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4415: fnd_message.set_token ('UOM', l_start_uom_code);
4416: fnd_message.set_token ('ROUTINE'
4417: , g_pkg_name || 'Validate_Quantity'
4418: );
4411:
4412: IF (l_start_primary_qty = -99999)
4413: THEN
4414: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4415: fnd_message.set_token ('UOM', l_start_uom_code);
4416: fnd_message.set_token ('ROUTINE'
4417: , g_pkg_name || 'Validate_Quantity'
4418: );
4419: fnd_msg_pub.ADD;
4412: IF (l_start_primary_qty = -99999)
4413: THEN
4414: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4415: fnd_message.set_token ('UOM', l_start_uom_code);
4416: fnd_message.set_token ('ROUTINE'
4417: , g_pkg_name || 'Validate_Quantity'
4418: );
4419: fnd_msg_pub.ADD;
4420: x_validation_status := 'N';
4456: IF (l_return_values <> 'Y') THEN
4457: IF (l_debug = 1) THEN
4458: print_debug ('get_immediates_lpn_qty returned error', 'Validate_Quantity');
4459: END IF;
4460: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4461: fnd_msg_pub.ADD;
4462: RAISE fnd_api.g_exc_error;
4463: END IF;
4464:
4468: print_debug ('l_lpn_qty is ' || l_lpn_qty, 'Validate_quantity');
4469: END IF;
4470:
4471: IF (l_att_qty < l_start_primary_qty) THEN
4472: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4473: fnd_msg_pub.ADD;
4474: RAISE fnd_api.g_exc_error;
4475: END IF;
4476:
4495: print_debug ('Lot qty does not match the serial qty ', 'Validate_Quantity');
4496: print_debug ('Lot = > ' || p_st_lot_num_tbl (i), 'Validate_Quantity');
4497: print_debug ('l_lot_serial_count = > ' || l_lot_serial_count, 'Validate_Quantity');
4498: END IF;
4499: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4500: fnd_msg_pub.ADD;
4501: RAISE fnd_api.g_exc_error;
4502: END IF;
4503: END IF;
4521: );
4522:
4523: IF (l_result_qty = -99999)
4524: THEN
4525: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4526: fnd_message.set_token ('UOM', l_start_uom_code);
4527: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4528: fnd_msg_pub.ADD;
4529: x_validation_status := 'N';
4522:
4523: IF (l_result_qty = -99999)
4524: THEN
4525: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4526: fnd_message.set_token ('UOM', l_start_uom_code);
4527: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4528: fnd_msg_pub.ADD;
4529: x_validation_status := 'N';
4530: RAISE fnd_api.g_exc_unexpected_error;
4523: IF (l_result_qty = -99999)
4524: THEN
4525: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4526: fnd_message.set_token ('UOM', l_start_uom_code);
4527: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4528: fnd_msg_pub.ADD;
4529: x_validation_status := 'N';
4530: RAISE fnd_api.g_exc_unexpected_error;
4531: END IF;
4539:
4540:
4541: IF (l_result_qty <> l_total_qty) THEN
4542: x_validation_status := 'N';
4543: fnd_message.set_name ('INV', 'INV_QTY_NOT_MATCHED');
4544: fnd_msg_pub.ADD;
4545: RAISE fnd_api.g_exc_error;
4546: END IF;
4547:
4548: /*For lot - serial items*/
4549: IF (l_serial_code IN (2, 5)) THEN
4550: IF ( TRUNC (l_start_primary_qty) <> TRUNC (l_start_primary_qty, 6)
4551: OR TRUNC (l_total_qty) <> TRUNC (l_total_qty, 6) ) THEN
4552: fnd_message.set_name ('INV', 'INV_LOT_SER_QTY_VIOLATION');
4553: fnd_msg_pub.ADD;
4554: RAISE fnd_api.g_exc_error;
4555: END IF;
4556:
4556:
4557: IF ( p_st_ser_number_tbl.COUNT <> l_total_qty
4558: OR p_rs_ser_number_tbl.COUNT <> l_result_qty ) THEN
4559: x_validation_status := 'N';
4560: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4561: fnd_msg_pub.ADD;
4562: RAISE fnd_api.g_exc_error;
4563: END IF;
4564: END IF;
4606: l_period_id NUMBER;
4607: BEGIN
4608: IF (p_organization_id IS NULL)
4609: THEN
4610: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
4611: fnd_msg_pub.ADD;
4612: x_validation_status := 'N';
4613: RAISE fnd_api.g_exc_error;
4614: END IF;
4631: OR l_period_tbl_id = 0
4632: OR l_period_tbl_id = -1
4633: )
4634: THEN
4635: fnd_message.set_name ('INV', 'INV_NO_OPEN_PERIOD');
4636: fnd_msg_pub.ADD;
4637: x_validation_status := 'N';
4638: RAISE fnd_api.g_exc_error;
4639: END IF;
4640: END LOOP;
4641:
4642: IF (l_period_id = 0 OR l_period_id = -1)
4643: THEN
4644: fnd_message.set_name ('INV', 'INV_NO_OPEN_PERIOD');
4645: fnd_msg_pub.ADD;
4646: x_validation_status := 'N';
4647: RAISE fnd_api.g_exc_error;
4648: ELSE
4731: print_debug ('p_transaction_type_id is NULL', 'Validate_serials');
4732: END IF;
4733:
4734: l_validation_status := 'N';
4735: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
4736: fnd_msg_pub.ADD;
4737: RAISE fnd_api.g_exc_error;
4738: END IF;
4739:
4763: );
4764: END IF;
4765:
4766: l_validation_status := 'N';
4767: fnd_message.set_name ('INV', 'INV_SERIAL_MATCH_ERROR');
4768: fnd_msg_pub.ADD;
4769: RAISE fnd_api.g_exc_error;
4770: /*Bug:5147899. Modified the following condition to throw error
4771: only when the group_mark_id holds a not null value other than -1 */
4782: );
4783: END IF;
4784:
4785: l_validation_status := 'N';
4786: fnd_message.set_name ('INV', 'INV_SERIAL_IN_USE');
4787: fnd_msg_pub.ADD;
4788: RAISE fnd_api.g_exc_error;
4789: ELSE
4790: /*Lot status validations are done in lot_trx_split_validations seperately.
4887: , 'Validate_serials'
4888: );
4889: END IF;
4890:
4891: fnd_message.set_name ('WMS', 'WMS_VALIDATE_STATUS_ERROR');
4892: fnd_msg_pub.ADD;
4893: fnd_msg_pub.count_and_get (p_count => x_msg_count
4894: , p_data => x_msg_data
4895: );
4976: print_debug ('breadcrumb 140', 'Validate_serials');
4977: END IF;
4978:
4979: l_validation_status := 'N';
4980: fnd_message.set_name ('INV', 'INV_FAIL_VALIDATE_SERIAL');
4981: fnd_msg_pub.ADD;
4982: RAISE fnd_api.g_exc_error;
4983: END IF;
4984:
5055: AND organization_id = p_organization_id;
5056: EXCEPTION
5057: WHEN NO_DATA_FOUND
5058: THEN
5059: fnd_message.set_name ('INV', 'INV_INVALID_ITEM');
5060: fnd_msg_pub.ADD;
5061: RAISE fnd_api.g_exc_unexpected_error;
5062: END;
5063:
5084: AND lot_number = p_st_lot_num;
5085: EXCEPTION
5086: WHEN NO_DATA_FOUND
5087: THEN
5088: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5089: fnd_msg_pub.ADD;
5090: RAISE fnd_api.g_exc_unexpected_error;
5091: END;
5092:
5095: );
5096:
5097: IF (l_lotexpdate IS NULL)
5098: THEN
5099: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5100: fnd_msg_pub.ADD;
5101: RAISE fnd_api.g_exc_unexpected_error;
5102: END IF;
5103:
5123: mtli.transaction_interface_id);
5124: EXCEPTION
5125: WHEN OTHERS
5126: THEN
5127: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5128: fnd_message.set_token ('ENTITY1'
5129: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5130: );
5131: fnd_msg_pub.ADD;
5124: EXCEPTION
5125: WHEN OTHERS
5126: THEN
5127: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5128: fnd_message.set_token ('ENTITY1'
5129: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5130: );
5131: fnd_msg_pub.ADD;
5132: RAISE fnd_api.g_exc_unexpected_error;
5167: );
5168:
5169: IF (l_lotexpdate IS NULL)
5170: THEN
5171: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5172: fnd_msg_pub.ADD;
5173: RAISE fnd_api.g_exc_unexpected_error;
5174: END IF;
5175:
5189: mtli.transaction_interface_id);
5190: EXCEPTION
5191: WHEN OTHERS
5192: THEN
5193: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5194: fnd_message.set_token ('ENTITY1'
5195: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5196: );
5197: fnd_msg_pub.ADD;
5190: EXCEPTION
5191: WHEN OTHERS
5192: THEN
5193: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5194: fnd_message.set_token ('ENTITY1'
5195: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5196: );
5197: fnd_msg_pub.ADD;
5198: RAISE fnd_api.g_exc_unexpected_error;
5214: AND lot_number = p_st_lot_num;
5215: EXCEPTION
5216: WHEN NO_DATA_FOUND
5217: THEN
5218: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5219: fnd_msg_pub.ADD;
5220: RAISE fnd_api.g_exc_unexpected_error;
5221: END;
5222:
5225: );
5226:
5227: IF (l_lotexpdate IS NULL)
5228: THEN
5229: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5230: fnd_msg_pub.ADD;
5231: RAISE fnd_api.g_exc_unexpected_error;
5232: END IF;
5233:
5243: mtli.transaction_interface_id);
5244: EXCEPTION
5245: WHEN OTHERS
5246: THEN
5247: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5248: fnd_message.set_token ('ENTITY1'
5249: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5250: );
5251: fnd_msg_pub.ADD;
5244: EXCEPTION
5245: WHEN OTHERS
5246: THEN
5247: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5248: fnd_message.set_token ('ENTITY1'
5249: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5250: );
5251: fnd_msg_pub.ADD;
5252: RAISE fnd_api.g_exc_unexpected_error;
5272: AND lot_number = p_st_lot_num;
5273: EXCEPTION
5274: WHEN NO_DATA_FOUND
5275: THEN
5276: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5277: fnd_msg_pub.ADD;
5278: RAISE fnd_api.g_exc_unexpected_error;
5279: END;
5280:
5296: );
5297:
5298: IF (l_lotexpdate IS NULL)
5299: THEN
5300: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5301: fnd_msg_pub.ADD;
5302: RAISE fnd_api.g_exc_unexpected_error;
5303: END IF;
5304:
5315: AND mtli.lot_expiration_date IS NULL);
5316: EXCEPTION
5317: WHEN OTHERS
5318: THEN
5319: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5320: fnd_message.set_token ('ENTITY1'
5321: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5322: );
5323: fnd_msg_pub.ADD;
5316: EXCEPTION
5317: WHEN OTHERS
5318: THEN
5319: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5320: fnd_message.set_token ('ENTITY1'
5321: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5322: );
5323: fnd_msg_pub.ADD;
5324: RAISE fnd_api.g_exc_unexpected_error;
5363: print_debug ( 'Lot exp date user defined : Merge2 '
5364: || l_lotexpdate
5365: , 'Compute Lot Exp'
5366: );
5367: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5368: fnd_msg_pub.ADD;
5369: RAISE fnd_api.g_exc_unexpected_error;
5370: END;
5371:
5385: IF l_update
5386: THEN
5387: IF (l_lotexpdate IS NULL)
5388: THEN
5389: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5390: fnd_msg_pub.ADD;
5391: RAISE fnd_api.g_exc_unexpected_error;
5392: END IF;
5393:
5404: mtli.transaction_interface_id);
5405: EXCEPTION
5406: WHEN OTHERS
5407: THEN
5408: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5409: fnd_message.set_token ('ENTITY1'
5410: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5411: );
5412: fnd_msg_pub.ADD;
5405: EXCEPTION
5406: WHEN OTHERS
5407: THEN
5408: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5409: fnd_message.set_token ('ENTITY1'
5410: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5411: );
5412: fnd_msg_pub.ADD;
5413: RAISE fnd_api.g_exc_unexpected_error;
5433: AND lot_number = p_st_lot_num;
5434: EXCEPTION
5435: WHEN NO_DATA_FOUND
5436: THEN
5437: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5438: fnd_msg_pub.ADD;
5439: RAISE fnd_api.g_exc_unexpected_error;
5440: END;
5441:
5445: );
5446:
5447: IF (l_lotexpdate IS NULL)
5448: THEN
5449: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5450: fnd_msg_pub.ADD;
5451: RAISE fnd_api.g_exc_unexpected_error;
5452: END IF;
5453:
5464: AND mtli.lot_expiration_date IS NULL);
5465: EXCEPTION
5466: WHEN OTHERS
5467: THEN
5468: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5469: fnd_message.set_token ('ENTITY1'
5470: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5471: );
5472: fnd_msg_pub.ADD;
5465: EXCEPTION
5466: WHEN OTHERS
5467: THEN
5468: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5469: fnd_message.set_token ('ENTITY1'
5470: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5471: );
5472: fnd_msg_pub.ADD;
5473: RAISE fnd_api.g_exc_unexpected_error;
5715: /* Bug:5162705.Modified the message name from INV_SERIAL_NOT_UNIQUE
5716: to INV_SERIAL_UNIQUENESS */
5717: /*Bug:5397573. Modified the following message from INV_SERIAL_UNIQUENESS
5718: to INV_JOB_SERIAL_UNIQUENESS. */
5719: fnd_message.set_name ('INV', 'INV_JOB_SERIAL_UNIQUENESS');
5720: fnd_msg_pub.ADD;
5721: RAISE fnd_api.g_exc_error;
5722: END IF;
5723: