[Home] [Help]
451: AND transaction_temp_id = p_trx_temp_id;
452: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
453: BEGIN
454: IF (l_debug = 1) THEN
455: inv_pick_wave_pick_confirm_pub.tracelog ( 'Inside InsertLot API' , 'INV_LOT_API_PUB');
456: END IF;
457: -- Standard Start of API savepoint
458: SAVEPOINT apiinsertlot_apipub;
459:
491: EXCEPTION
492: WHEN NO_DATA_FOUND
493: THEN
494: IF (l_debug = 1) THEN
495: inv_pick_wave_pick_confirm_pub.tracelog ( 'Exception in LOT_CONTROL_CODE' , 'INV_LOT_API_PUB');
496: END IF;
497: fnd_message.set_name ('INV' , 'INV_INVALID_ITEM' );
498: fnd_msg_pub.ADD;
499: x_return_status := fnd_api.g_ret_sts_error;
529: fnd_msg_pub.ADD;
530: x_return_status := fnd_api.g_ret_sts_error;
531: RAISE fnd_api.g_exc_unexpected_error;
532: IF (l_debug = 1) THEN
533: inv_pick_wave_pick_confirm_pub.tracelog ( 'Exception in MTL_LOT_NUMBER' , 'INV_LOT_API_PUB');
534: END IF;
535: END IF;
536: END IF;
537:
569: END IF;
570: END IF;
571:
572: IF (l_debug = 1) THEN
573: inv_pick_wave_pick_confirm_pub.tracelog ( 'Before calling populateattributesColumn' , 'INV_LOT_API_PUB');
574: END IF;
575:
576: SELECT mtl_gen_object_id_s.NEXTVAL
577: INTO x_object_id
578: FROM DUAL;
579:
580: populateattributescolumn ( );
581: IF (l_debug = 1) THEN
582: inv_pick_wave_pick_confirm_pub.tracelog ( 'After calling populateattributesColumn' , 'INV_LOT_API_PUB');
583: END IF;
584:
585: IF ( p_transaction_temp_id IS NOT NULL ) THEN
586: IF (l_debug = 1) THEN
583: END IF;
584:
585: IF ( p_transaction_temp_id IS NOT NULL ) THEN
586: IF (l_debug = 1) THEN
587: inv_pick_wave_pick_confirm_pub.tracelog ( 'p_transaction_temp_id' || p_transaction_temp_id, 'INV_LOT_API_PUB');
588: END IF;
589: OPEN lot_temp_csr ( p_lot_number, p_transaction_temp_id );
590:
591: LOOP
676:
677: IF (( p_transaction_action_id IS NOT NULL AND p_transaction_action_id = 3 AND g_firstscan = FALSE)
678: OR ( p_transaction_action_id is not null AND p_transaction_action_id = 12 )) THEN
679: IF (l_debug = 1) THEN
680: inv_pick_wave_pick_confirm_pub.tracelog ( 'Before Insert action_id=3' , 'INV_LOT_API_PUB');
681: END IF;
682: BEGIN
683: select count(*)
684: into l_lotcount
1108: AND organization_id = p_organization_id
1109: AND inventory_item_id = p_inventory_item_id;
1110:
1111: IF (l_debug = 1) THEN
1112: inv_pick_wave_pick_confirm_pub.tracelog ( 'After Insert action_id=3' , 'INV_LOT_API_PUB');
1113: END IF;
1114: ELSE -- if transaction_action_id is not 3
1115: /* ---------------------------------------------------------
1116: * call inv_lot_sel_attr.get_default to get the default value
1118: * ---------------------------------------------------------*/
1119: IF ( inv_install.adv_inv_installed ( NULL ) = TRUE ) THEN
1120:
1121: IF (l_debug = 1) THEN
1122: inv_pick_wave_pick_confirm_pub.tracelog ( 'Before calling get_default' , 'INV_LOT_API_PUB');
1123: END IF;
1124: inv_lot_sel_attr.get_default (
1125: x_attributes_default => l_attributes_default,
1126: x_attributes_default_count => l_attributes_default_count,
1134: p_lot_serial_number => p_lot_number,
1135: p_attributes => l_attributes_in
1136: );
1137: IF (l_debug = 1) THEN
1138: inv_pick_wave_pick_confirm_pub.tracelog ( 'After get_default' , 'INV_LOT_API_PUB');
1139: END IF;
1140:
1141: IF ( l_return_status <> fnd_api.g_ret_sts_success ) THEN
1142: IF (l_debug = 1) THEN
1139: END IF;
1140:
1141: IF ( l_return_status <> fnd_api.g_ret_sts_success ) THEN
1142: IF (l_debug = 1) THEN
1143: inv_pick_wave_pick_confirm_pub.tracelog ( 'exception of get_default' , 'INV_LOT_API_PUB');
1144: END IF;
1145: x_return_status := l_return_status;
1146: RAISE fnd_api.g_exc_unexpected_error;
1147: END IF;
1171: l_source_non_wms_lot_att_rec.attribute15 := NULL;
1172:
1173: IF p_transfer_organization_id IS NOT NULL THEN
1174: IF (l_debug = 1) THEN
1175: inv_pick_wave_pick_confirm_pub.tracelog ( 'Before calling get_lot_att_from_source' , 'INV_LOT_API_PUB');
1176: END IF;
1177:
1178: get_lot_att_from_source
1179: (
1196: l_attributes_default := l_att_after_source_copy;
1197: l_attributes_default_count := l_num_wms_lot_att_copied;
1198:
1199: IF (l_debug = 1) THEN
1200: inv_pick_wave_pick_confirm_pub.tracelog ( 'After calling get_lot_att_from_source' , 'INV_LOT_API_PUB');
1201: END IF;
1202: END IF;
1203:
1204: /* Bug 2181558 - Code Ends */
1233: * g_lot_attributes_tbl(5).COLUMN_VALUE if OUT parameter
1234: * 'lot_status_enabled' is 'Y'.
1235: ***********************************************************************/
1236: IF (l_debug = 1) THEN
1237: inv_pick_wave_pick_confirm_pub.tracelog ( 'before calling get_lot_Serial_status_control' , 'INV_LOT_API_PUB');
1238: END IF;
1239: inv_material_status_grp.get_lot_serial_status_control (
1240: p_organization_id => p_organization_id,
1241: p_inventory_item_id => p_inventory_item_id,
1247: x_serial_status_enabled => l_serial_status_enabled,
1248: x_default_serial_status_id => l_default_serial_status_id
1249: );
1250: IF (l_debug = 1) THEN
1251: inv_pick_wave_pick_confirm_pub.tracelog ( 'After get_lot_Serial_status_control' , 'INV_LOT_API_PUB');
1252: END IF;
1253:
1254: IF ( l_return_status <> fnd_api.g_ret_sts_success ) THEN
1255: x_return_status := l_return_status;
1271: p_inventory_item_id,
1272: 'Lot Attributes'
1273: );
1274: IF (l_debug = 1) THEN
1275: inv_pick_wave_pick_confirm_pub.tracelog ( 'before inserting into mtl_lot_numbers' , 'INV_LOT_API_PUB');
1276: END IF;
1277:
1278: --print_debug('after get_context_code 30', 4);
1279:
1485: p_origination_type -- bug 15896641 - inserting origination type
1486: );
1487:
1488: IF (l_debug = 1) THEN
1489: inv_pick_wave_pick_confirm_pub.tracelog ( 'After inserting the lot' , 'INV_LOT_API_PUB');
1490: END IF;
1491:
1492: END IF;
1493:
1500: l_status_rec.status_id := l_default_lot_status_id;
1501: l_status_rec.initial_status_flag := 'Y';
1502: inv_material_status_pkg.insert_status_history ( l_status_rec);
1503: IF (l_debug = 1) THEN
1504: inv_pick_wave_pick_confirm_pub.tracelog ( 'after calling insert_status_history' , 'INV_LOT_API_PUB');
1505: END IF;
1506: END IF;
1507:
1508: x_return_status := fnd_api.g_ret_sts_success;
1507:
1508: x_return_status := fnd_api.g_ret_sts_success;
1509: ELSE
1510: IF (l_debug = 1) THEN
1511: inv_pick_wave_pick_confirm_pub.tracelog ( 'INV_LOT_EXISTS' , 'INV_LOT_API_PUB');
1512: END IF;
1513: fnd_message.set_name ('INV' , 'INV_LOT_EXISTS' );
1514: fnd_msg_pub.ADD;
1515: --l_return_status := FND_API.G_RET_STS_SUCCESS;
1521: l_userid := fnd_global.user_id;
1522:
1523: --Lot exists, but now the user has entered the lot expiration date
1524: IF (l_debug = 1) THEN
1525: inv_pick_wave_pick_confirm_pub.tracelog ('Update the expiration date', 'INV_LOT_API_PUB');
1526: END IF;
1527:
1528: UPDATE mtl_lot_numbers
1529: SET expiration_date = p_expiration_date,
1539:
1540: -- End of API body.
1541: -- Standard check of p_commit.
1542: IF (l_debug = 1) THEN
1543: inv_pick_wave_pick_confirm_pub.tracelog ( 'Inserted the Lot ' || p_lot_number, 'INV_LOT_API_PUB');
1544: END IF;
1545:
1546: IF fnd_api.to_boolean ( p_commit ) THEN
1547: COMMIT WORK;
1555:
1556: EXCEPTION
1557: WHEN OTHERS THEN
1558: IF (l_debug = 1) THEN
1559: inv_pick_wave_pick_confirm_pub.tracelog ( 'Inside the exception ' || p_lot_number, 'INV_LOT_API_PUB');
1560: END IF;
1561: --print_debug('insertlot other exception', 4);
1562:
1563: ROLLBACK TO apiinsertlot_apipub;