DBA Data[Home] [Help]

APPS.MTL_INV_UTIL_GRP dependencies on INV_VALIDATE

Line 1147: l_org INV_Validate.ORG;

1143: IS
1144: l_subinventory_code VARCHAR2(25);
1145: l_locator_id NUMBER;
1146: l_result NUMBER;
1147: l_org INV_Validate.ORG;
1148: l_lpn WMS_CONTAINER_PUB.LPN;
1149: l_content_item INV_Validate.ITEM;
1150: l_lot INV_Validate.LOT;
1151: l_loaded_sys_qty NUMBER; --bug 2640378

Line 1149: l_content_item INV_Validate.ITEM;

1145: l_locator_id NUMBER;
1146: l_result NUMBER;
1147: l_org INV_Validate.ORG;
1148: l_lpn WMS_CONTAINER_PUB.LPN;
1149: l_content_item INV_Validate.ITEM;
1150: l_lot INV_Validate.LOT;
1151: l_loaded_sys_qty NUMBER; --bug 2640378
1152:
1153: e_Invalid_Inputs EXCEPTION;

Line 1150: l_lot INV_Validate.LOT;

1146: l_result NUMBER;
1147: l_org INV_Validate.ORG;
1148: l_lpn WMS_CONTAINER_PUB.LPN;
1149: l_content_item INV_Validate.ITEM;
1150: l_lot INV_Validate.LOT;
1151: l_loaded_sys_qty NUMBER; --bug 2640378
1152:
1153: e_Invalid_Inputs EXCEPTION;
1154:

Line 1177: l_result := INV_Validate.Organization(l_org);

1173: -- Validate Inputs
1174: -- Validate Organization ID
1175: IF (p_organization_id IS NOT NULL) THEN
1176: l_org.organization_id := p_organization_id;
1177: l_result := INV_Validate.Organization(l_org);
1178: IF (l_result = INV_Validate.F) THEN
1179: IF (l_debug = 1) THEN
1180: mdebug('invalid org id');
1181: END IF;

Line 1178: IF (l_result = INV_Validate.F) THEN

1174: -- Validate Organization ID
1175: IF (p_organization_id IS NOT NULL) THEN
1176: l_org.organization_id := p_organization_id;
1177: l_result := INV_Validate.Organization(l_org);
1178: IF (l_result = INV_Validate.F) THEN
1179: IF (l_debug = 1) THEN
1180: mdebug('invalid org id');
1181: END IF;
1182: RAISE e_Invalid_Inputs;

Line 1191: IF (l_result = INV_Validate.F) THEN

1187: IF p_lpn_id IS NOT NULL THEN
1188: l_lpn.lpn_id := p_lpn_id;
1189: l_lpn.license_plate_number := NULL;
1190: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
1191: IF (l_result = INV_Validate.F) THEN
1192: IF (l_debug = 1) THEN
1193: mdebug('invalid lpn id');
1194: END IF;
1195: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');

Line 1204: l_result := INV_Validate.inventory_item(l_content_item, l_org);

1200:
1201: -- Validate Inventory Item ID
1202: IF (p_inventory_item_id IS NOT NULL) THEN
1203: l_content_item.inventory_item_id := p_inventory_item_id;
1204: l_result := INV_Validate.inventory_item(l_content_item, l_org);
1205: IF (l_result = INV_Validate.F) THEN
1206: IF (l_debug = 1) THEN
1207: mdebug('invalid inventory item id');
1208: END IF;

Line 1205: IF (l_result = INV_Validate.F) THEN

1201: -- Validate Inventory Item ID
1202: IF (p_inventory_item_id IS NOT NULL) THEN
1203: l_content_item.inventory_item_id := p_inventory_item_id;
1204: l_result := INV_Validate.inventory_item(l_content_item, l_org);
1205: IF (l_result = INV_Validate.F) THEN
1206: IF (l_debug = 1) THEN
1207: mdebug('invalid inventory item id');
1208: END IF;
1209: RAISE e_Invalid_Inputs;

Line 1219: l_result := INV_Validate.Lot_Number(l_lot, l_org, l_container_item,

1215: IF (p_container_item_id IS NOT NULL) THEN
1216: IF (l_container_item.lot_control_code = 2) THEN
1217: IF (p_lot_number IS NOT NULL) THEN
1218: l_lot.lot_number := p_lot_number;
1219: l_result := INV_Validate.Lot_Number(l_lot, l_org, l_container_item,
1220: l_sub, l_locator, p_revision);
1221: IF (l_result = INV_Validate.F) THEN
1222: IF (l_debug = 1) THEN
1223: mdebug('invalid lot number');

Line 1221: IF (l_result = INV_Validate.F) THEN

1217: IF (p_lot_number IS NOT NULL) THEN
1218: l_lot.lot_number := p_lot_number;
1219: l_result := INV_Validate.Lot_Number(l_lot, l_org, l_container_item,
1220: l_sub, l_locator, p_revision);
1221: IF (l_result = INV_Validate.F) THEN
1222: IF (l_debug = 1) THEN
1223: mdebug('invalid lot number');
1224: END IF;
1225: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LOT');

Line 1237: l_result := INV_Validate.Revision(p_revision, l_org, l_container_item);

1233: -- Validate Revision Number
1234: IF (p_container_item_id IS NOT NULL) THEN
1235: IF (l_container_item.revision_qty_control_code = 2) THEN
1236: IF (p_revision IS NOT NULL) THEN
1237: l_result := INV_Validate.Revision(p_revision, l_org, l_container_item);
1238: IF (l_result = INV_Validate.F) THEN
1239: IF (l_debug = 1) THEN
1240: mdebug('invalid revision number');
1241: END IF;

Line 1238: IF (l_result = INV_Validate.F) THEN

1234: IF (p_container_item_id IS NOT NULL) THEN
1235: IF (l_container_item.revision_qty_control_code = 2) THEN
1236: IF (p_revision IS NOT NULL) THEN
1237: l_result := INV_Validate.Revision(p_revision, l_org, l_container_item);
1238: IF (l_result = INV_Validate.F) THEN
1239: IF (l_debug = 1) THEN
1240: mdebug('invalid revision number');
1241: END IF;
1242: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_REVISION');

Line 1253: l_result := INV_Validate.validate_serial(l_serial, l_org, l_container_item,

1249:
1250: -- Validate Serial Number
1251: IF (p_serial_number IS NOT NULL) THEN
1252: l_serial.serial_number := p_serial_number;
1253: l_result := INV_Validate.validate_serial(l_serial, l_org, l_container_item,
1254: l_sub, l_lot, l_locator, p_revision);
1255: IF (l_result = INV_Validate.F) THEN
1256: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_SERIAL');
1257: FND_MSG_PUB.ADD;

Line 1255: IF (l_result = INV_Validate.F) THEN

1251: IF (p_serial_number IS NOT NULL) THEN
1252: l_serial.serial_number := p_serial_number;
1253: l_result := INV_Validate.validate_serial(l_serial, l_org, l_container_item,
1254: l_sub, l_lot, l_locator, p_revision);
1255: IF (l_result = INV_Validate.F) THEN
1256: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_SERIAL');
1257: FND_MSG_PUB.ADD;
1258: RAISE FND_API.G_EXC_ERROR;
1259: END IF;

Line 1367: l_org inv_validate.org;

1363: ) IS
1364: l_subinventory_code VARCHAR2 (25);
1365: l_locator_id NUMBER;
1366: l_result NUMBER;
1367: l_org inv_validate.org;
1368: l_lpn wms_container_pub.lpn;
1369: l_content_item inv_validate.item;
1370: l_lot inv_validate.lot;
1371: l_loaded_sys_qty NUMBER;

Line 1369: l_content_item inv_validate.item;

1365: l_locator_id NUMBER;
1366: l_result NUMBER;
1367: l_org inv_validate.org;
1368: l_lpn wms_container_pub.lpn;
1369: l_content_item inv_validate.item;
1370: l_lot inv_validate.lot;
1371: l_loaded_sys_qty NUMBER;
1372: l_loaded_sec_sys_qty NUMBER;
1373: e_invalid_inputs EXCEPTION;

Line 1370: l_lot inv_validate.lot;

1366: l_result NUMBER;
1367: l_org inv_validate.org;
1368: l_lpn wms_container_pub.lpn;
1369: l_content_item inv_validate.item;
1370: l_lot inv_validate.lot;
1371: l_loaded_sys_qty NUMBER;
1372: l_loaded_sec_sys_qty NUMBER;
1373: e_invalid_inputs EXCEPTION;
1374: l_api_version CONSTANT NUMBER := 0.9;

Line 1397: l_result := inv_validate.ORGANIZATION (l_org);

1393: -- Validate Inputs
1394: -- Validate Organization ID
1395: IF (p_organization_id IS NOT NULL) THEN
1396: l_org.organization_id := p_organization_id;
1397: l_result := inv_validate.ORGANIZATION (l_org);
1398:
1399: IF (l_result = inv_validate.f) THEN
1400: IF (l_debug = 1) THEN
1401: mdebug ('invalid org id');

Line 1399: IF (l_result = inv_validate.f) THEN

1395: IF (p_organization_id IS NOT NULL) THEN
1396: l_org.organization_id := p_organization_id;
1397: l_result := inv_validate.ORGANIZATION (l_org);
1398:
1399: IF (l_result = inv_validate.f) THEN
1400: IF (l_debug = 1) THEN
1401: mdebug ('invalid org id');
1402: END IF;
1403:

Line 1414: IF (l_result = inv_validate.f) THEN

1410: l_lpn.lpn_id := p_lpn_id;
1411: l_lpn.license_plate_number := NULL;
1412: l_result := wms_container_pub.validate_lpn (l_lpn);
1413:
1414: IF (l_result = inv_validate.f) THEN
1415: IF (l_debug = 1) THEN
1416: mdebug ('invalid lpn id');
1417: END IF;
1418:

Line 1428: l_result := inv_validate.inventory_item (l_content_item, l_org);

1424:
1425: -- Validate Inventory Item ID
1426: IF (p_inventory_item_id IS NOT NULL) THEN
1427: l_content_item.inventory_item_id := p_inventory_item_id;
1428: l_result := inv_validate.inventory_item (l_content_item, l_org);
1429:
1430: IF (l_result = inv_validate.f) THEN
1431: IF (l_debug = 1) THEN
1432: mdebug ('invalid inventory item id');

Line 1430: IF (l_result = inv_validate.f) THEN

1426: IF (p_inventory_item_id IS NOT NULL) THEN
1427: l_content_item.inventory_item_id := p_inventory_item_id;
1428: l_result := inv_validate.inventory_item (l_content_item, l_org);
1429:
1430: IF (l_result = inv_validate.f) THEN
1431: IF (l_debug = 1) THEN
1432: mdebug ('invalid inventory item id');
1433: END IF;
1434: