[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;
265: THEN
266: IF (p_st_quantity_tbl (1) <= p_rs_quantity_tbl (1))
267: THEN
268: -- means this is not a partial split.
269: fnd_message.set_name ('INV', 'INV_MIN_LOT_SPLIT');
270: fnd_msg_pub.ADD;
271: x_validation_status := 'N';
272: RAISE fnd_api.g_exc_error;
273: END IF;
277: FOR i IN 1 .. l_result_count
278: LOOP
279: IF (p_rs_org_id_tbl (i) <> p_st_org_id_tbl (1))
280: THEN
281: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
282: fnd_msg_pub.ADD;
283: x_validation_status := 'N';
284: RAISE fnd_api.g_exc_error;
285: END IF;
285: END IF;
286:
287: IF (p_rs_item_id_tbl (i) <> p_st_item_id_tbl (1))
288: THEN
289: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ITEM');
290: fnd_msg_pub.ADD;
291: x_validation_status := 'N';
292: RAISE fnd_api.g_exc_error;
293: END IF;
295: IF (NVL (p_rs_revision_tbl (i), 'NULL') <>
296: NVL (p_rs_revision_tbl (1), 'NULL')
297: )
298: THEN
299: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_REVISION');
300: fnd_msg_pub.ADD;
301: x_validation_status := 'N';
302: RAISE fnd_api.g_exc_error;
303: END IF;
309: , TO_CHAR (SYSDATE, 'DD-MON-RRRR')
310: )
311: )
312: THEN
313: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_LOT_EXP_DATE');
314: fnd_msg_pub.ADD;
315: x_validation_status := 'N';
316: RAISE fnd_api.g_exc_error;
317: END IF;
360: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
361: THEN
362: IF (l_start_count > 1)
363: THEN
364: fnd_message.set_name ('INV', 'INV_MIN_START_LOT_TRANSLATE');
365: fnd_msg_pub.ADD;
366: x_validation_status := 'N';
367: RAISE fnd_api.g_exc_error;
368: END IF;
368: END IF;
369:
370: IF (l_result_count > 1)
371: THEN
372: fnd_message.set_name ('INV', 'INV_MIN_RESULT_LOT_TRANSLATE');
373: fnd_msg_pub.ADD;
374: x_validation_status := 'N';
375: RAISE fnd_api.g_exc_error;
376: END IF;
376: END IF;
377:
378: IF (p_rs_org_id_tbl (1) <> p_st_org_id_tbl (1))
379: THEN
380: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
381: fnd_msg_pub.ADD;
382: x_validation_status := 'N';
383: RAISE fnd_api.g_exc_error;
384: END IF;
405: IF ( l_st_lot_control_code <> l_rs_lot_control_code
406: OR l_st_serial_control_code <> l_rs_serial_control_code
407: )
408: THEN
409: fnd_message.set_name ('INV', 'INV_LOT_SERIAL_CODE_DIFF');
410: fnd_msg_pub.ADD;
411: x_validation_status := 'N';
412: RAISE fnd_api.g_exc_error;
413: END IF;
484: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
485: THEN
486: IF (l_start_count < 2)
487: THEN
488: fnd_message.set_name ('INV', 'INV_MIN_START_LOT_MERGE');
489: fnd_msg_pub.ADD;
490: x_validation_status := 'N';
491: RAISE fnd_api.g_exc_error;
492: END IF;
492: END IF;
493:
494: IF (l_result_count > 1)
495: THEN
496: fnd_message.set_name ('INV', 'INV_MAX_RESULT_LOT_MERGE');
497: fnd_msg_pub.ADD;
498: x_validation_status := 'N';
499: RAISE fnd_api.g_exc_error;
500: END IF;
504: IF (i < l_start_count)
505: THEN
506: IF (p_st_org_id_tbl (i) <> p_st_org_id_tbl (i + 1))
507: THEN
508: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
509: fnd_msg_pub.ADD;
510: x_validation_status := 'N';
511: RAISE fnd_api.g_exc_error;
512: END IF;
513: END IF;
514:
515: IF (p_st_org_id_tbl (i) <> p_rs_org_id_tbl (1))
516: THEN
517: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ORG');
518: fnd_msg_pub.ADD;
519: x_validation_status := 'N';
520: RAISE fnd_api.g_exc_error;
521: END IF;
523: IF (i < l_start_count)
524: THEN
525: IF (p_st_item_id_tbl (i) <> p_st_item_id_tbl (i + 1))
526: THEN
527: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ITEM');
528: fnd_msg_pub.ADD;
529: x_validation_status := 'N';
530: RAISE fnd_api.g_exc_error;
531: END IF;
532: END IF;
533:
534: IF (p_st_item_id_tbl (i) <> p_rs_item_id_tbl (1))
535: THEN
536: fnd_message.set_name ('INV', 'INV_LOT_TRX_DIFF_ITEM');
537: fnd_msg_pub.ADD;
538: x_validation_status := 'N';
539: RAISE fnd_api.g_exc_error;
540: END IF;
549: THEN
550: print_debug ('Duplicate Lot', 'Validate_lots');
551: END IF;
552:
553: fnd_message.set_name ('INV', 'INV_DUPLICATE_LOT');
554: fnd_msg_pub.ADD;
555: x_validation_status := 'N';
556: RAISE fnd_api.g_exc_error;
557: END IF;
689: OR p_organization_id IS NULL
690: OR p_inventory_item_id IS NULL
691: )
692: THEN
693: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
694: fnd_msg_pub.ADD;
695: RAISE fnd_api.g_exc_error;
696: END IF;
697:
738: END IF;
739:
740: /* Bug:4405157. Modified the following message to be more specific to
741: Split transaction W.R.T Issue 15 of the bug*/
742: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_SPLIT');
743: fnd_msg_pub.ADD;
744: RAISE fnd_api.g_exc_unexpected_error;
745: END;
746: END;
787: END IF;
788:
789: /* Bug:4405157. Modified the following message to be more specific to
790: Merge transaction W.R.T Issue 15 of the bug*/
791: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_MERGE');
792: fnd_msg_pub.ADD;
793: RAISE fnd_api.g_exc_unexpected_error;
794: END;
795: END;
836: );
837: END IF;
838: /* Bug:4405157. Modified the following message to be more specific to
839: Translate transaction W.R.T Issue 15 of the bug*/
840: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
841: fnd_msg_pub.ADD;
842: RAISE fnd_api.g_exc_unexpected_error;
843: END;
844: END;
854: THEN
855: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_split)
856: THEN
857:
858: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_SPLIT');
859:
860: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
861: THEN
862:
859:
860: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_merge)
861: THEN
862:
863: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_MERGE');
864:
865: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
866: THEN
867:
864:
865: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate)
866: THEN
867:
868: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
869:
870: ELSE
871: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
872: END IF;
867:
868: fnd_message.set_name ('INV', 'INV_INVALID_LOT_ITEM_LOT_XLATE');
869:
870: ELSE
871: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
872: END IF;
873: fnd_msg_pub.ADD;
874: RAISE fnd_api.g_exc_error;
875: END IF;
979: THEN
980: print_debug ('Missing Required Parameter', 'Validate_Result_Lot');
981: END IF;
982:
983: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
984: fnd_msg_pub.ADD;
985: RAISE fnd_api.g_exc_error;
986: END IF;
987: /* Bug#4363274. This check is not required.
1004: END IF;
1005:
1006: IF (p_st_lot_num_tbl (i) = p_rs_lot_num_tbl (1))
1007: THEN
1008: fnd_message.set_name ('INV', 'INV_MERGELOT_USED');
1009: fnd_msg_pub.ADD;
1010: l_validation_status := 'N';
1011: RAISE fnd_api.g_exc_error;
1012: END IF;
1021: WHERE organization_id = p_organization_id;
1022: EXCEPTION
1023: WHEN NO_DATA_FOUND
1024: THEN
1025: fnd_message.set_name ('INV', 'INV_INT_ORG_CODE');
1026: fnd_msg_pub.ADD;
1027: x_validation_status := 'N';
1028: RAISE fnd_api.g_exc_unexpected_error;
1029: END;
1051:
1052: IF (l_lot_count > 0)
1053: THEN
1054: l_validation_status := 'N';
1055: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1056: fnd_msg_pub.ADD;
1057: RAISE fnd_api.g_exc_error;
1058: ELSE
1059: l_validation_status := 'Y';
1070:
1071: IF (l_lot_count > 0)
1072: THEN
1073: l_validation_status := 'N';
1074: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1075: fnd_msg_pub.ADD;
1076: RAISE fnd_api.g_exc_error;
1077: ELSE
1078: l_validation_status := 'Y';
1089: print_debug ('Duplicate Lot', 'Validate_Result_Lot');
1090: END IF;
1091:
1092: l_validation_status := 'N';
1093: fnd_message.set_name ('INV', 'INV_DUPLICATE_LOT');
1094: fnd_msg_pub.ADD;
1095: RAISE fnd_api.g_exc_error;
1096: END IF;
1097: END IF;
1117: -- this means the lot number exists for different item.
1118: -- for lot merge, the resultant lot can be an existing item, but of the same item,
1119: -- cannot be from different items.
1120: l_validation_status := 'N';
1121: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1122: fnd_msg_pub.ADD;
1123: RAISE fnd_api.g_exc_error;
1124: ELSE
1125: l_validation_status := 'Y';
1136:
1137: IF (l_lot_count > 0)
1138: THEN
1139: l_validation_status := 'N';
1140: fnd_message.set_name ('INV', 'INV_INT_LOTUNIQEXP');
1141: fnd_msg_pub.ADD;
1142: RAISE fnd_api.g_exc_error;
1143: ELSE
1144: l_validation_status := 'Y';
1160:
1161: IF (l_lot_count > 0)
1162: THEN
1163: l_validation_status := 'N';
1164: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1165: fnd_msg_pub.ADD;
1166: RAISE fnd_api.g_exc_error;
1167: ELSE
1168: l_validation_status := 'Y';
1177:
1178: IF l_lot_count > 0
1179: THEN
1180: l_validation_status := 'N';
1181: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1182: fnd_msg_pub.ADD;
1183: RAISE fnd_api.g_exc_error;
1184: ELSE
1185: l_validation_status := 'Y';
1196:
1197: IF l_lot_count > 0
1198: THEN
1199: l_validation_status := 'N';
1200: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1201: fnd_msg_pub.ADD;
1202: RAISE fnd_api.g_exc_error;
1203: ELSE
1204: l_validation_status := 'Y';
1215: print_debug ('Duplicate Lot', 'Validate_Result_Lot');
1216: END IF;
1217:
1218: l_validation_status := 'N';
1219: fnd_message.set_name ('INV', 'INV_DUPLICATE_LOT');
1220: fnd_msg_pub.ADD;
1221: RAISE fnd_api.g_exc_error;
1222: END IF;
1223: END IF;
1247:
1248: IF l_lot_count > 0
1249: THEN
1250: l_validation_status := 'N';
1251: fnd_message.set_name ('INV', 'INV_LOT_EXISTS');
1252: fnd_msg_pub.ADD;
1253: RAISE fnd_api.g_exc_error;
1254: ELSE
1255: l_validation_status := 'Y';
1275: end if;
1276: end loop;
1277:
1278: if( l_found = false ) then
1279: FND_MESSAGE.SET_NAME('INV', 'INV_DIFF_MERGE_ITEM');
1280: FND_MSG_PUB.ADD;
1281: l_validation_status := 'N';
1282: raise FND_API.G_EXC_ERROR;
1283: end if;
1315: AND mtlt.lot_number = p_rs_lot_num_tbl(1);
1316:
1317: IF l_lot_count = 0 Then
1318: l_validation_status := 'N';
1319: FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_LOT');
1320: FND_MSG_PUB.ADD;
1321: raise FND_API.G_EXC_ERROR;
1322: else
1323: l_validation_status := 'Y';
1338: x_validation_status := l_validation_status;
1339:
1340: IF (x_validation_status <> 'Y')
1341: THEN
1342: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
1343: fnd_msg_pub.ADD;
1344: RAISE fnd_api.g_exc_error;
1345: END IF;
1346:
1429: OR p_start_inv_item_id IS NULL
1430: OR p_result_inv_item_id IS NULL
1431: )
1432: THEN
1433: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1434: fnd_msg_pub.ADD;
1435: x_validation_status := 'N';
1436: RAISE fnd_api.g_exc_unexpected_error;
1437: END IF;
1447: );
1448: END IF;
1449:
1450: x_validation_status := 'N';
1451: fnd_message.set_name ('INV', 'INV_ALREADY_EXISTS');
1452: fnd_message.set_token ('ENTITY'
1453: , fnd_message.get_string ('INV', 'LOT_NUMBER')
1454: );
1455: fnd_msg_pub.ADD;
1448: END IF;
1449:
1450: x_validation_status := 'N';
1451: fnd_message.set_name ('INV', 'INV_ALREADY_EXISTS');
1452: fnd_message.set_token ('ENTITY'
1453: , fnd_message.get_string ('INV', 'LOT_NUMBER')
1454: );
1455: fnd_msg_pub.ADD;
1456: RAISE fnd_api.g_exc_error;
1449:
1450: x_validation_status := 'N';
1451: fnd_message.set_name ('INV', 'INV_ALREADY_EXISTS');
1452: fnd_message.set_token ('ENTITY'
1453: , fnd_message.get_string ('INV', 'LOT_NUMBER')
1454: );
1455: fnd_msg_pub.ADD;
1456: RAISE fnd_api.g_exc_error;
1457: ELSE
1461: /*if( p_start_inv_item_id = p_result_inv_item_id ) then
1462: x_validation_status := 'Y';
1463: else
1464: x_validation_status := 'N';
1465: FND_MESSAGE.SET_NAME('INV', 'INV_ALREADY_EXISTS');
1466: FND_MESSAGE.SET_TOKEN('ENTITY', FND_MESSAGE.get_String('INV', 'LOT_NUMBER'));
1467: FND_MSG_PUB.ADD;
1468: raise FND_API.G_EXC_ERROR;
1469: end if;*/
1462: x_validation_status := 'Y';
1463: else
1464: x_validation_status := 'N';
1465: FND_MESSAGE.SET_NAME('INV', 'INV_ALREADY_EXISTS');
1466: FND_MESSAGE.SET_TOKEN('ENTITY', FND_MESSAGE.get_String('INV', 'LOT_NUMBER'));
1467: FND_MSG_PUB.ADD;
1468: raise FND_API.G_EXC_ERROR;
1469: end if;*/
1470: x_validation_status := 'Y';
1541: RAISE fnd_api.g_exc_unexpected_error;
1542: END;
1543: IF(l_lpn_context <> 1) --does not resides in inventory
1544: THEN
1545: fnd_message.set_name('INV', 'INV_INVALID_LPN_CONTEXT');
1546: fnd_msg_pub.ADD;
1547: IF (l_debug = 1) THEN
1548: print_debug('validate_lpn_info: Invalid LPN Context for FROM LPN' , 'validate_lpn_info');
1549: END IF;
1572: RAISE fnd_api.g_exc_unexpected_error;
1573: END;
1574: IF(l_lpn_context NOT IN (1,5)) --does not 'resides in inventory' and not 'defined but not used'
1575: THEN
1576: fnd_message.set_name('INV', 'INV_INVALID_LPN_CONTEXT');
1577: fnd_msg_pub.ADD;
1578: IF (l_debug = 1) THEN
1579: print_debug('validate_lpn_info: Invalid LPN Context for TO LPN', 'validate_lpn_info');
1580: END IF;
1586: (NVL(l_sub_code, '@#$%') <> p_rs_sub_code_tbl(i))
1587: OR
1588: (NVL(l_locator_id, -9999) <> NVL(p_rs_locator_id_tbl(i), -9999))
1589: ) THEN
1590: fnd_message.set_name('INV', 'INV_INT_LPN');
1591: fnd_msg_pub.ADD;
1592: IF (l_debug = 1) THEN
1593: print_debug('validate_lpn_info: Org/Sub/Loc of LPN does not match', 'validate_lpn_info');
1594: END IF;
1703: OR p_organization_id IS NULL
1704: OR p_inventory_item_id IS NULL
1705: )
1706: THEN
1707: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1708: fnd_msg_pub.ADD;
1709: x_validation_status := 'N';
1710: RAISE fnd_api.g_exc_error;
1711: END IF;
1746: AND lot_number = p_lot_number;
1747: EXCEPTION
1748: WHEN NO_DATA_FOUND
1749: THEN
1750: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1751: fnd_message.set_token ('ATTRIBUTE'
1752: , fnd_message.get_string ('INV'
1753: , 'CAPS_LOT_NUMBER'
1754: )
1747: EXCEPTION
1748: WHEN NO_DATA_FOUND
1749: THEN
1750: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1751: fnd_message.set_token ('ATTRIBUTE'
1752: , fnd_message.get_string ('INV'
1753: , 'CAPS_LOT_NUMBER'
1754: )
1755: , FALSE
1748: WHEN NO_DATA_FOUND
1749: THEN
1750: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1751: fnd_message.set_token ('ATTRIBUTE'
1752: , fnd_message.get_string ('INV'
1753: , 'CAPS_LOT_NUMBER'
1754: )
1755: , FALSE
1756: );
1868: OR p_organization_id IS NULL
1869: OR p_inventory_item_id IS NULL
1870: )
1871: THEN
1872: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1873: fnd_msg_pub.ADD;
1874: x_validation_status := 'N';
1875: RAISE fnd_api.g_exc_error;
1876: END IF;
1918: , 'Validate_serial_status'
1919: );
1920: END IF;
1921:
1922: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1923: fnd_message.set_token ('ATTRIBUTE'
1924: , fnd_message.get_string ('INV'
1925: , 'CAPS_SERIAL_NUMBERS'
1926: )
1919: );
1920: END IF;
1921:
1922: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1923: fnd_message.set_token ('ATTRIBUTE'
1924: , fnd_message.get_string ('INV'
1925: , 'CAPS_SERIAL_NUMBERS'
1926: )
1927: , FALSE
1920: END IF;
1921:
1922: fnd_message.set_name ('INV', 'INV_INVALID_ATTRIBUTE');
1923: fnd_message.set_token ('ATTRIBUTE'
1924: , fnd_message.get_string ('INV'
1925: , 'CAPS_SERIAL_NUMBERS'
1926: )
1927: , FALSE
1928: );
2429: as zero and the count will be more than 1 even if the attributes
2430: arent filled in
2431: IF (l_rs_lot_attr_category IS NULL AND l_count > 0) THEN
2432: print_debug('Resultant lot category is null', 'Validate_Attributes');
2433: fnd_message.set_name('INV', 'INV_VALID_CAT');
2434: fnd_msg_pub.add;
2435: raise FND_API.G_EXC_ERROR;
2436: end if;
2437:
2460: || ','
2461: || l_rs_lot_attr_category
2462: , 'Validate_Attributes'
2463: );
2464: fnd_message.set_name ('INV', 'INV_VALID_CAT');
2465: fnd_msg_pub.ADD;
2466: RAISE fnd_api.g_exc_error;
2467: END IF;
2468:
2785: , 'Validate_Attributes'
2786: );
2787: END IF;
2788:
2789: fnd_message.set_name ('INV'
2790: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
2791: );
2792: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2793: fnd_message.set_token ('CONTEXTCODE'
2788:
2789: fnd_message.set_name ('INV'
2790: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
2791: );
2792: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2793: fnd_message.set_token ('CONTEXTCODE'
2794: , v_contexts.context_code (i)
2795: );
2796: fnd_message.set_token
2789: fnd_message.set_name ('INV'
2790: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
2791: );
2792: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2793: fnd_message.set_token ('CONTEXTCODE'
2794: , v_contexts.context_code (i)
2795: );
2796: fnd_message.set_token
2797: ('SEGMENT'
2792: fnd_message.set_token ('ATTRNAME', l_attributes_name);
2793: fnd_message.set_token ('CONTEXTCODE'
2794: , v_contexts.context_code (i)
2795: );
2796: fnd_message.set_token
2797: ('SEGMENT'
2798: , v_segments.application_column_name
2799: (j)
2800: );
2843:
2844: l_validation_status := 'N';
2845: x_return_status := fnd_api.g_ret_sts_error;
2846: x_msg_data := fnd_flex_descval.error_message;
2847: fnd_message.set_name ('INV', 'GENERIC');
2848: fnd_message.set_token ('MSGBODY', x_msg_data);
2849: fnd_msg_pub.ADD;
2850: x_msg_count := NVL (x_msg_count, 0) + 1;
2851: RAISE fnd_api.g_exc_error;
2844: l_validation_status := 'N';
2845: x_return_status := fnd_api.g_ret_sts_error;
2846: x_msg_data := fnd_flex_descval.error_message;
2847: fnd_message.set_name ('INV', 'GENERIC');
2848: fnd_message.set_token ('MSGBODY', x_msg_data);
2849: fnd_msg_pub.ADD;
2850: x_msg_count := NVL (x_msg_count, 0) + 1;
2851: RAISE fnd_api.g_exc_error;
2852: END IF;
3422: , 'validate_serial_attributes'
3423: );
3424: END IF;
3425:
3426: fnd_message.set_name ('INV'
3427: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
3428: );
3429: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3430: fnd_message.set_token ('CONTEXTCODE'
3425:
3426: fnd_message.set_name ('INV'
3427: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
3428: );
3429: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3430: fnd_message.set_token ('CONTEXTCODE'
3431: , v_contexts.context_code (i)
3432: );
3433: fnd_message.set_token
3426: fnd_message.set_name ('INV'
3427: , 'INV_LOT_SEL_DEFAULT_REQUIRED'
3428: );
3429: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3430: fnd_message.set_token ('CONTEXTCODE'
3431: , v_contexts.context_code (i)
3432: );
3433: fnd_message.set_token
3434: ('SEGMENT'
3429: fnd_message.set_token ('ATTRNAME', l_attributes_name);
3430: fnd_message.set_token ('CONTEXTCODE'
3431: , v_contexts.context_code (i)
3432: );
3433: fnd_message.set_token
3434: ('SEGMENT'
3435: , v_segments.application_column_name
3436: (j)
3437: );
3480:
3481: l_validation_status := 'N';
3482: x_return_status := fnd_api.g_ret_sts_error;
3483: x_msg_data := fnd_flex_descval.error_message;
3484: fnd_message.set_name ('INV', 'GENERIC');
3485: fnd_message.set_token ('MSGBODY', x_msg_data);
3486: fnd_msg_pub.ADD;
3487: x_msg_count := NVL (x_msg_count, 0) + 1;
3488: RAISE fnd_api.g_exc_error;
3481: l_validation_status := 'N';
3482: x_return_status := fnd_api.g_ret_sts_error;
3483: x_msg_data := fnd_flex_descval.error_message;
3484: fnd_message.set_name ('INV', 'GENERIC');
3485: fnd_message.set_token ('MSGBODY', x_msg_data);
3486: fnd_msg_pub.ADD;
3487: x_msg_count := NVL (x_msg_count, 0) + 1;
3488: RAISE fnd_api.g_exc_error;
3489: END IF;
3731: , 'Validate_cost_group'
3732: );
3733: END IF;
3734:
3735: fnd_message.set_name ('INV', 'INV_ERROR_GET_COST_GROUP');
3736: fnd_msg_pub.ADD;
3737: x_validation_status := 'N';
3738: RAISE fnd_api.g_exc_error;
3739: END IF;
3742: THEN
3743: l_cost_group_id := v_cost_group_id;
3744: ELSIF (l_cost_group_id <> v_cost_group_id)
3745: THEN
3746: fnd_message.set_name ('INV', 'INV_INT_CSTGRP');
3747: fnd_msg_pub.ADD;
3748: x_validation_status := 'N';
3749: RAISE fnd_api.g_exc_error;
3750: END IF;
3772: FOR i IN 1 .. l_result_count
3773: LOOP
3774: IF (x_rs_cost_group_tbl (i) <> l_cost_group_id)
3775: THEN
3776: fnd_message.set_name ('INV', 'INV_LOT_DIFF_COSTGROUP');
3777: fnd_msg_pub.ADD;
3778: l_validation_status := 'N';
3779: RAISE fnd_api.g_exc_error;
3780: END IF;
3841: );
3842:
3843: IF (l_return_status <> fnd_api.g_ret_sts_success)
3844: THEN
3845: fnd_message.set_name ('INV', 'INV_ERROR_GET_COST_GROUP');
3846: fnd_msg_pub.ADD;
3847: x_validation_status := 'N';
3848: RAISE fnd_api.g_exc_error;
3849: END IF;
3850: END IF;
3851:
3852: IF (l_current_cost_group_id <> l_cost_group_id)
3853: THEN
3854: fnd_message.set_name ('INV', 'INV_DIFF_MERGE_COST_GROUP');
3855: fnd_message.set_token ('ENTITY1', l_lot_number);
3856: fnd_msg_pub.ADD;
3857: x_validation_status := 'N';
3858: RAISE fnd_api.g_exc_error;
3851:
3852: IF (l_current_cost_group_id <> l_cost_group_id)
3853: THEN
3854: fnd_message.set_name ('INV', 'INV_DIFF_MERGE_COST_GROUP');
3855: fnd_message.set_token ('ENTITY1', l_lot_number);
3856: fnd_msg_pub.ADD;
3857: x_validation_status := 'N';
3858: RAISE fnd_api.g_exc_error;
3859: END IF;
4095: AND inventory_item_id = l_inventory_item_id;
4096: EXCEPTION
4097: WHEN NO_DATA_FOUND
4098: THEN
4099: fnd_message.set_name ('INV', 'INV_INT_ITEM_CODE');
4100: fnd_msg_pub.ADD;
4101: RAISE fnd_api.g_exc_error;
4102: END;
4103:
4158: );
4159:
4160: IF (l_start_primary_qty = -99999)
4161: THEN
4162: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4163: fnd_message.set_token ('UOM', l_start_uom_code);
4164: fnd_message.set_token ('ROUTINE'
4165: , g_pkg_name || 'Validate_Quantity');
4166: fnd_msg_pub.ADD;
4159:
4160: IF (l_start_primary_qty = -99999)
4161: THEN
4162: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4163: fnd_message.set_token ('UOM', l_start_uom_code);
4164: fnd_message.set_token ('ROUTINE'
4165: , g_pkg_name || 'Validate_Quantity');
4166: fnd_msg_pub.ADD;
4167: x_validation_status := 'N';
4160: IF (l_start_primary_qty = -99999)
4161: THEN
4162: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4163: fnd_message.set_token ('UOM', l_start_uom_code);
4164: fnd_message.set_token ('ROUTINE'
4165: , g_pkg_name || 'Validate_Quantity');
4166: fnd_msg_pub.ADD;
4167: x_validation_status := 'N';
4168: RAISE fnd_api.g_exc_unexpected_error;
4200: IF (l_return_values <> 'Y') THEN
4201: IF (l_debug = 1) THEN
4202: print_debug ('get_immediate_lpn_item_qty has returned error', 'Validate_Quantity');
4203: END IF;
4204: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4205: fnd_msg_pub.ADD;
4206: RAISE fnd_api.g_exc_error;
4207: END IF;
4208:
4212: print_debug ('l_lpn_qty is ' || l_lpn_qty, 'Validate_quantity');
4213: END IF;
4214:
4215: IF (l_att_qty < l_start_primary_qty) THEN
4216: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4217: fnd_msg_pub.ADD;
4218: RAISE fnd_api.g_exc_error;
4219: END IF;
4220:
4219: END IF;
4220:
4221: IF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4222: IF (l_att_qty <> l_start_primary_qty) THEN
4223: fnd_message.set_name ('INV', 'INV_LOT_TRANSLATE_QTY_ERR');
4224: fnd_msg_pub.ADD;
4225: RAISE fnd_api.g_exc_error;
4226: END IF;
4227: END IF;
4248: , to_name => NULL
4249: );
4250:
4251: IF (l_result_qty = -99999) THEN
4252: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4253: fnd_message.set_token ('UOM', l_start_uom_code);
4254: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4255: fnd_msg_pub.ADD;
4256: x_validation_status := 'N';
4249: );
4250:
4251: IF (l_result_qty = -99999) THEN
4252: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4253: fnd_message.set_token ('UOM', l_start_uom_code);
4254: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4255: fnd_msg_pub.ADD;
4256: x_validation_status := 'N';
4257: RAISE fnd_api.g_exc_unexpected_error;
4250:
4251: IF (l_result_qty = -99999) THEN
4252: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4253: fnd_message.set_token ('UOM', l_start_uom_code);
4254: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4255: fnd_msg_pub.ADD;
4256: x_validation_status := 'N';
4257: RAISE fnd_api.g_exc_unexpected_error;
4258: END IF;
4263: IF ( i = 1
4264: AND l_result_qty = l_att_qty
4265: AND p_transaction_type_id = inv_globals.g_type_inv_lot_split
4266: ) THEN
4267: fnd_message.set_name ('INV', 'INV_MIN_LOT_SPLIT');
4268: fnd_msg_pub.ADD;
4269: RAISE fnd_api.g_exc_error;
4270: END IF;
4271:
4294: print_debug ('Lot qty does not match the serial qty for lot split ', 'Validate_Quantity');
4295: print_debug ('Lot = > ' || p_rs_lot_num_tbl (i), 'Validate_Quantity');
4296: print_debug ('l_lot_serial_count = > ' || l_lot_serial_count, 'Validate_Quantity');
4297: END IF;
4298: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4299: fnd_msg_pub.ADD;
4300: RAISE fnd_api.g_exc_error;
4301: END IF;
4302: END IF;
4302: END IF;
4303: END LOOP;
4304:
4305: IF (l_total_qty = 0) THEN
4306: fnd_message.set_name ('INV', 'INV_INLTPU_QTY');
4307: fnd_msg_pub.ADD;
4308: RAISE fnd_api.g_exc_error;
4309: END IF;
4310:
4311: IF (l_total_qty <> l_start_primary_qty) THEN
4312: IF ( p_transaction_type_id = inv_globals.g_type_inv_lot_split
4313: AND l_total_qty > l_start_primary_qty) THEN
4314: x_validation_status := 'N';
4315: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_SPLIT');
4316: fnd_msg_pub.ADD;
4317: RAISE fnd_api.g_exc_error;
4318: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4319: x_validation_status := 'N';
4316: fnd_msg_pub.ADD;
4317: RAISE fnd_api.g_exc_error;
4318: ELSIF (p_transaction_type_id = inv_globals.g_type_inv_lot_translate) THEN
4319: x_validation_status := 'N';
4320: fnd_message.set_name ('INV', 'INV_TOTAL_EXCEED_TRANSLATE');
4321: fnd_msg_pub.ADD;
4322: RAISE fnd_api.g_exc_error;
4323: END IF;
4324: END IF;
4332: IF (l_debug = 1) THEN
4333: print_debug('Fractional qty is present for a lot serial controlled item'
4334: , 'Validate_Quantity');
4335: END IF;
4336: fnd_message.set_name ('INV', 'INV_LOT_SER_QTY_VIOLATION');
4337: fnd_msg_pub.ADD;
4338: RAISE fnd_api.g_exc_error;
4339: END IF;
4340:
4351: , 'Validate_Quantity');
4352: print_debug('l_total_qty => ' || l_total_qty, 'Validate_Quantity');
4353: END IF;
4354: x_validation_status := 'N';
4355: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4356: fnd_msg_pub.ADD;
4357: RAISE fnd_api.g_exc_error;
4358: END IF;
4359: END IF;
4378: );
4379:
4380: IF (l_start_primary_qty = -99999)
4381: THEN
4382: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4383: fnd_message.set_token ('UOM', l_start_uom_code);
4384: fnd_message.set_token ('ROUTINE'
4385: , g_pkg_name || 'Validate_Quantity'
4386: );
4379:
4380: IF (l_start_primary_qty = -99999)
4381: THEN
4382: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4383: fnd_message.set_token ('UOM', l_start_uom_code);
4384: fnd_message.set_token ('ROUTINE'
4385: , g_pkg_name || 'Validate_Quantity'
4386: );
4387: fnd_msg_pub.ADD;
4380: IF (l_start_primary_qty = -99999)
4381: THEN
4382: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4383: fnd_message.set_token ('UOM', l_start_uom_code);
4384: fnd_message.set_token ('ROUTINE'
4385: , g_pkg_name || 'Validate_Quantity'
4386: );
4387: fnd_msg_pub.ADD;
4388: x_validation_status := 'N';
4424: IF (l_return_values <> 'Y') THEN
4425: IF (l_debug = 1) THEN
4426: print_debug ('get_immediates_lpn_qty returned error', 'Validate_Quantity');
4427: END IF;
4428: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4429: fnd_msg_pub.ADD;
4430: RAISE fnd_api.g_exc_error;
4431: END IF;
4432:
4436: print_debug ('l_lpn_qty is ' || l_lpn_qty, 'Validate_quantity');
4437: END IF;
4438:
4439: IF (l_att_qty < l_start_primary_qty) THEN
4440: fnd_message.set_name ('INV', 'INV_NOT_ENOUGH_ATT');
4441: fnd_msg_pub.ADD;
4442: RAISE fnd_api.g_exc_error;
4443: END IF;
4444:
4463: print_debug ('Lot qty does not match the serial qty ', 'Validate_Quantity');
4464: print_debug ('Lot = > ' || p_st_lot_num_tbl (i), 'Validate_Quantity');
4465: print_debug ('l_lot_serial_count = > ' || l_lot_serial_count, 'Validate_Quantity');
4466: END IF;
4467: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4468: fnd_msg_pub.ADD;
4469: RAISE fnd_api.g_exc_error;
4470: END IF;
4471: END IF;
4492: );
4493:
4494: IF (l_result_qty = -99999)
4495: THEN
4496: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4497: fnd_message.set_token ('UOM', l_start_uom_code);
4498: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4499: fnd_msg_pub.ADD;
4500: x_validation_status := 'N';
4493:
4494: IF (l_result_qty = -99999)
4495: THEN
4496: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4497: fnd_message.set_token ('UOM', l_start_uom_code);
4498: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4499: fnd_msg_pub.ADD;
4500: x_validation_status := 'N';
4501: RAISE fnd_api.g_exc_unexpected_error;
4494: IF (l_result_qty = -99999)
4495: THEN
4496: fnd_message.set_name ('INV', 'INV-CANNOT CONVERT');
4497: fnd_message.set_token ('UOM', l_start_uom_code);
4498: fnd_message.set_token ('ROUTINE', g_pkg_name || 'Validate_Quantity');
4499: fnd_msg_pub.ADD;
4500: x_validation_status := 'N';
4501: RAISE fnd_api.g_exc_unexpected_error;
4502: END IF;
4510:
4511:
4512: IF (l_result_qty <> l_total_qty) THEN
4513: x_validation_status := 'N';
4514: fnd_message.set_name ('INV', 'INV_QTY_NOT_MATCHED');
4515: fnd_msg_pub.ADD;
4516: RAISE fnd_api.g_exc_error;
4517: END IF;
4518:
4519: /*For lot - serial items*/
4520: IF (l_serial_code IN (2, 5)) THEN
4521: IF ( TRUNC (l_start_primary_qty) <> TRUNC (l_start_primary_qty, 6)
4522: OR TRUNC (l_total_qty) <> TRUNC (l_total_qty, 6) ) THEN
4523: fnd_message.set_name ('INV', 'INV_LOT_SER_QTY_VIOLATION');
4524: fnd_msg_pub.ADD;
4525: RAISE fnd_api.g_exc_error;
4526: END IF;
4527:
4527:
4528: IF ( p_st_ser_number_tbl.COUNT <> l_total_qty
4529: OR p_rs_ser_number_tbl.COUNT <> l_result_qty ) THEN
4530: x_validation_status := 'N';
4531: fnd_message.set_name ('INV', 'INV_INVLTPU_LOTTRX_QTY');
4532: fnd_msg_pub.ADD;
4533: RAISE fnd_api.g_exc_error;
4534: END IF;
4535: END IF;
4577: l_period_id NUMBER;
4578: BEGIN
4579: IF (p_organization_id IS NULL)
4580: THEN
4581: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
4582: fnd_msg_pub.ADD;
4583: x_validation_status := 'N';
4584: RAISE fnd_api.g_exc_error;
4585: END IF;
4602: OR l_period_tbl_id = 0
4603: OR l_period_tbl_id = -1
4604: )
4605: THEN
4606: fnd_message.set_name ('INV', 'INV_NO_OPEN_PERIOD');
4607: fnd_msg_pub.ADD;
4608: x_validation_status := 'N';
4609: RAISE fnd_api.g_exc_error;
4610: END IF;
4611: END LOOP;
4612:
4613: IF (l_period_id = 0 OR l_period_id = -1)
4614: THEN
4615: fnd_message.set_name ('INV', 'INV_NO_OPEN_PERIOD');
4616: fnd_msg_pub.ADD;
4617: x_validation_status := 'N';
4618: RAISE fnd_api.g_exc_error;
4619: ELSE
4702: print_debug ('p_transaction_type_id is NULL', 'Validate_serials');
4703: END IF;
4704:
4705: l_validation_status := 'N';
4706: fnd_message.set_name ('INV', 'INV_MISSING_REQUIRED_PARAMETER');
4707: fnd_msg_pub.ADD;
4708: RAISE fnd_api.g_exc_error;
4709: END IF;
4710:
4734: );
4735: END IF;
4736:
4737: l_validation_status := 'N';
4738: fnd_message.set_name ('INV', 'INV_SERIAL_MATCH_ERROR');
4739: fnd_msg_pub.ADD;
4740: RAISE fnd_api.g_exc_error;
4741: /*Bug:5147899. Modified the following condition to throw error
4742: only when the group_mark_id holds a not null value other than -1 */
4753: );
4754: END IF;
4755:
4756: l_validation_status := 'N';
4757: fnd_message.set_name ('INV', 'INV_SERIAL_IN_USE');
4758: fnd_msg_pub.ADD;
4759: RAISE fnd_api.g_exc_error;
4760: ELSE
4761: /*Lot status validations are done in lot_trx_split_validations seperately.
4858: , 'Validate_serials'
4859: );
4860: END IF;
4861:
4862: fnd_message.set_name ('WMS', 'WMS_VALIDATE_STATUS_ERROR');
4863: fnd_msg_pub.ADD;
4864: fnd_msg_pub.count_and_get (p_count => x_msg_count
4865: , p_data => x_msg_data
4866: );
4947: print_debug ('breadcrumb 140', 'Validate_serials');
4948: END IF;
4949:
4950: l_validation_status := 'N';
4951: fnd_message.set_name ('INV', 'INV_FAIL_VALIDATE_SERIAL');
4952: fnd_msg_pub.ADD;
4953: RAISE fnd_api.g_exc_error;
4954: END IF;
4955:
5026: AND organization_id = p_organization_id;
5027: EXCEPTION
5028: WHEN NO_DATA_FOUND
5029: THEN
5030: fnd_message.set_name ('INV', 'INV_INVALID_ITEM');
5031: fnd_msg_pub.ADD;
5032: RAISE fnd_api.g_exc_unexpected_error;
5033: END;
5034:
5055: AND lot_number = p_st_lot_num;
5056: EXCEPTION
5057: WHEN NO_DATA_FOUND
5058: THEN
5059: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5060: fnd_msg_pub.ADD;
5061: RAISE fnd_api.g_exc_unexpected_error;
5062: END;
5063:
5066: );
5067:
5068: IF (l_lotexpdate IS NULL)
5069: THEN
5070: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5071: fnd_msg_pub.ADD;
5072: RAISE fnd_api.g_exc_unexpected_error;
5073: END IF;
5074:
5094: mtli.transaction_interface_id);
5095: EXCEPTION
5096: WHEN OTHERS
5097: THEN
5098: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5099: fnd_message.set_token ('ENTITY1'
5100: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5101: );
5102: fnd_msg_pub.ADD;
5095: EXCEPTION
5096: WHEN OTHERS
5097: THEN
5098: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5099: fnd_message.set_token ('ENTITY1'
5100: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5101: );
5102: fnd_msg_pub.ADD;
5103: RAISE fnd_api.g_exc_unexpected_error;
5138: );
5139:
5140: IF (l_lotexpdate IS NULL)
5141: THEN
5142: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5143: fnd_msg_pub.ADD;
5144: RAISE fnd_api.g_exc_unexpected_error;
5145: END IF;
5146:
5160: mtli.transaction_interface_id);
5161: EXCEPTION
5162: WHEN OTHERS
5163: THEN
5164: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5165: fnd_message.set_token ('ENTITY1'
5166: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5167: );
5168: fnd_msg_pub.ADD;
5161: EXCEPTION
5162: WHEN OTHERS
5163: THEN
5164: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5165: fnd_message.set_token ('ENTITY1'
5166: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5167: );
5168: fnd_msg_pub.ADD;
5169: RAISE fnd_api.g_exc_unexpected_error;
5185: AND lot_number = p_st_lot_num;
5186: EXCEPTION
5187: WHEN NO_DATA_FOUND
5188: THEN
5189: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5190: fnd_msg_pub.ADD;
5191: RAISE fnd_api.g_exc_unexpected_error;
5192: END;
5193:
5196: );
5197:
5198: IF (l_lotexpdate IS NULL)
5199: THEN
5200: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5201: fnd_msg_pub.ADD;
5202: RAISE fnd_api.g_exc_unexpected_error;
5203: END IF;
5204:
5214: mtli.transaction_interface_id);
5215: EXCEPTION
5216: WHEN OTHERS
5217: THEN
5218: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5219: fnd_message.set_token ('ENTITY1'
5220: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5221: );
5222: fnd_msg_pub.ADD;
5215: EXCEPTION
5216: WHEN OTHERS
5217: THEN
5218: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5219: fnd_message.set_token ('ENTITY1'
5220: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5221: );
5222: fnd_msg_pub.ADD;
5223: RAISE fnd_api.g_exc_unexpected_error;
5243: AND lot_number = p_st_lot_num;
5244: EXCEPTION
5245: WHEN NO_DATA_FOUND
5246: THEN
5247: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5248: fnd_msg_pub.ADD;
5249: RAISE fnd_api.g_exc_unexpected_error;
5250: END;
5251:
5267: );
5268:
5269: IF (l_lotexpdate IS NULL)
5270: THEN
5271: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5272: fnd_msg_pub.ADD;
5273: RAISE fnd_api.g_exc_unexpected_error;
5274: END IF;
5275:
5286: AND mtli.lot_expiration_date IS NULL);
5287: EXCEPTION
5288: WHEN OTHERS
5289: THEN
5290: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5291: fnd_message.set_token ('ENTITY1'
5292: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5293: );
5294: fnd_msg_pub.ADD;
5287: EXCEPTION
5288: WHEN OTHERS
5289: THEN
5290: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5291: fnd_message.set_token ('ENTITY1'
5292: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5293: );
5294: fnd_msg_pub.ADD;
5295: RAISE fnd_api.g_exc_unexpected_error;
5334: print_debug ( 'Lot exp date user defined : Merge2 '
5335: || l_lotexpdate
5336: , 'Compute Lot Exp'
5337: );
5338: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5339: fnd_msg_pub.ADD;
5340: RAISE fnd_api.g_exc_unexpected_error;
5341: END;
5342:
5356: IF l_update
5357: THEN
5358: IF (l_lotexpdate IS NULL)
5359: THEN
5360: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5361: fnd_msg_pub.ADD;
5362: RAISE fnd_api.g_exc_unexpected_error;
5363: END IF;
5364:
5375: mtli.transaction_interface_id);
5376: EXCEPTION
5377: WHEN OTHERS
5378: THEN
5379: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5380: fnd_message.set_token ('ENTITY1'
5381: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5382: );
5383: fnd_msg_pub.ADD;
5376: EXCEPTION
5377: WHEN OTHERS
5378: THEN
5379: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5380: fnd_message.set_token ('ENTITY1'
5381: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5382: );
5383: fnd_msg_pub.ADD;
5384: RAISE fnd_api.g_exc_unexpected_error;
5404: AND lot_number = p_st_lot_num;
5405: EXCEPTION
5406: WHEN NO_DATA_FOUND
5407: THEN
5408: fnd_message.set_name ('INV', 'INV_INVALID_LOT');
5409: fnd_msg_pub.ADD;
5410: RAISE fnd_api.g_exc_unexpected_error;
5411: END;
5412:
5416: );
5417:
5418: IF (l_lotexpdate IS NULL)
5419: THEN
5420: fnd_message.set_name ('INV', 'INV_INVALID_LOT_EXP');
5421: fnd_msg_pub.ADD;
5422: RAISE fnd_api.g_exc_unexpected_error;
5423: END IF;
5424:
5435: AND mtli.lot_expiration_date IS NULL);
5436: EXCEPTION
5437: WHEN OTHERS
5438: THEN
5439: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5440: fnd_message.set_token ('ENTITY1'
5441: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5442: );
5443: fnd_msg_pub.ADD;
5436: EXCEPTION
5437: WHEN OTHERS
5438: THEN
5439: fnd_message.set_name ('INV', 'INV_UPDATE_ERROR');
5440: fnd_message.set_token ('ENTITY1'
5441: , 'MTL_TRANSACTION_LOTS_INTERFACE'
5442: );
5443: fnd_msg_pub.ADD;
5444: RAISE fnd_api.g_exc_unexpected_error;
5686: /* Bug:5162705.Modified the message name from INV_SERIAL_NOT_UNIQUE
5687: to INV_SERIAL_UNIQUENESS */
5688: /*Bug:5397573. Modified the following message from INV_SERIAL_UNIQUENESS
5689: to INV_JOB_SERIAL_UNIQUENESS. */
5690: fnd_message.set_name ('INV', 'INV_JOB_SERIAL_UNIQUENESS');
5691: fnd_msg_pub.ADD;
5692: RAISE fnd_api.g_exc_error;
5693: END IF;
5694: