eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.INV_TRANSFER_ORDER_PVT dependencies on INV_TRANSFER_ORDER_PVT

Line 1: PACKAGE BODY inv_transfer_order_pvt AS

1: PACKAGE BODY inv_transfer_order_pvt AS
2: /* $Header: INVVTROB.pls 120.34.12010000.2 2008/07/29 13:50:01 ptkumar ship $ */
3:
4: -- Global constant holding the package name
5: g_pkg_name CONSTANT VARCHAR2(30) := 'INV_Transfer_Order_PVT';

Line 5: g_pkg_name CONSTANT VARCHAR2(30) := 'INV_Transfer_Order_PVT';

1: PACKAGE BODY inv_transfer_order_pvt AS
2: /* $Header: INVVTROB.pls 120.34.12010000.2 2008/07/29 13:50:01 ptkumar ship $ */
3:
4: -- Global constant holding the package name
5: g_pkg_name CONSTANT VARCHAR2(30) := 'INV_Transfer_Order_PVT';
6: isdebug BOOLEAN := TRUE;
7: debug_mode NUMBER := 1;
8: g_is_pickrelease_set NUMBER;
9: g_debug NUMBER;

Line 1174: DEBUG('MO Line failed due to Ship Set validation: ' || to_char(l_trolin_rec.line_id), 'Inv_Transfer_Order_PVT.Trolins');

1170: l_failed_ship_set_id := NULL;
1171: END IF;
1172:
1173: IF NVL(l_trolin_rec.ship_set_id, -99) = NVL(l_failed_ship_set_id, -999) THEN
1174: DEBUG('MO Line failed due to Ship Set validation: ' || to_char(l_trolin_rec.line_id), 'Inv_Transfer_Order_PVT.Trolins');
1175: RAISE fnd_api.g_exc_error;
1176: END IF;
1177:
1178: /* Bug 2504964: Tracking Ship Set : Code Ends */

Line 1204: DEBUG('Trolin operation:'|| l_trolin_rec.operation, 'Inv_Transfer_Order_PVT.Trolins');

1200: -- Set record return status.
1201: l_trolin_rec.return_status := fnd_api.g_ret_sts_success;
1202: -- Prepare record.
1203: IF (l_debug = 1) THEN
1204: DEBUG('Trolin operation:'|| l_trolin_rec.operation, 'Inv_Transfer_Order_PVT.Trolins');
1205: END IF;
1206:
1207: IF l_trolin_rec.operation = inv_globals.g_opr_create THEN
1208: l_trolin_rec.db_flag := fnd_api.g_false;

Line 1212: DEBUG('Trolin convert', 'Inv_Transfer_Order_PVT.Trolins');

1208: l_trolin_rec.db_flag := fnd_api.g_false;
1209: -- Set missing old record elements to NULL.
1210: --debug('Trolin convert');
1211: IF (l_debug = 1) THEN
1212: DEBUG('Trolin convert', 'Inv_Transfer_Order_PVT.Trolins');
1213: END IF;
1214: l_old_trolin_rec := inv_trolin_util.convert_miss_to_null(l_old_trolin_rec);
1215: ELSIF l_trolin_rec.operation = inv_globals.g_opr_update
1216: OR l_trolin_rec.operation = inv_globals.g_opr_delete THEN

Line 1223: DEBUG('Trolin line_id miss num', 'Inv_Transfer_Order_PVT.Trolins');

1219: -- Query Old if missing
1220: IF l_old_trolin_rec.line_id = fnd_api.g_miss_num THEN
1221: --debug('Trolin line_id miss num');
1222: IF (l_debug = 1) THEN
1223: DEBUG('Trolin line_id miss num', 'Inv_Transfer_Order_PVT.Trolins');
1224: END IF;
1225: l_old_trolin_rec := inv_trolin_util.query_row(p_line_id => l_trolin_rec.line_id);
1226: ELSE
1227: -- Set missing old record elements to NULL.

Line 1264: DEBUG('default missing attributes', 'Inv_Transfer_Order_PVT.Trolins');

1260: OR l_control_rec.change_attributes THEN
1261: -- Default missing attributes
1262: --debug('default missing attributes');
1263: IF (l_debug = 1) THEN
1264: DEBUG('default missing attributes', 'Inv_Transfer_Order_PVT.Trolins');
1265: END IF;
1266:
1267: --Bug #4347016 - Creating a temp variable to store output record
1268: --as there is a NOCOPY in inv_default_trolin.ATTRIBUTES

Line 1281: DEBUG('error in validate_attributes', 'Inv_Transfer_Order_PVT.Trolins');

1277:
1278: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1279: --debug('error in validate_attributes');
1280: IF (l_debug = 1) THEN
1281: DEBUG('error in validate_attributes', 'Inv_Transfer_Order_PVT.Trolins');
1282: END IF;
1283: RAISE fnd_api.g_exc_unexpected_error;
1284: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1285: IF (l_debug = 1) THEN

Line 1286: DEBUG('exc error in validate_attributes', 'Inv_Transfer_Order_PVT.Trolins');

1282: END IF;
1283: RAISE fnd_api.g_exc_unexpected_error;
1284: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1285: IF (l_debug = 1) THEN
1286: DEBUG('exc error in validate_attributes', 'Inv_Transfer_Order_PVT.Trolins');
1287: END IF;
1288: RAISE fnd_api.g_exc_error;
1289: END IF;
1290: END IF;

Line 1298: DEBUG('calling clear dependent attr', 'Inv_Transfer_Order_PVT.Trolins');

1294: -- Clear dependent attributes.
1295: IF l_control_rec.change_attributes THEN
1296: --debug('calling clear dependent attr');
1297: IF (l_debug = 1) THEN
1298: DEBUG('calling clear dependent attr', 'Inv_Transfer_Order_PVT.Trolins');
1299: END IF;
1300: inv_trolin_util.clear_dependent_attr(p_trolin_rec => l_trolin_rec, p_old_trolin_rec => l_old_trolin_rec, x_trolin_rec => l_trolin_rec);
1301: --debug('after calling dependent attr');
1302: END IF;

Line 1309: DEBUG('Trolin Apply attr', 'Inv_Transfer_Order_PVT.Trolins');

1305: IF l_control_rec.default_attributes
1306: OR l_control_rec.change_attributes THEN
1307: --debug('Trolin Apply attr');
1308: IF (l_debug = 1) THEN
1309: DEBUG('Trolin Apply attr', 'Inv_Transfer_Order_PVT.Trolins');
1310: END IF;
1311: inv_trolin_util.apply_attribute_changes(p_trolin_rec => l_trolin_rec, p_old_trolin_rec => l_old_trolin_rec, x_trolin_rec => l_trolin_rec);
1312: END IF;
1313:

Line 1323: DEBUG('Trolin Validate Entity', 'Inv_Transfer_Order_PVT.Trolins');

1319: inv_validate_trolin.entity_delete(x_return_status => l_return_status, p_trolin_rec => l_trolin_rec);
1320: ELSE
1321: --debug('Trolin Validate Entity');
1322: IF (l_debug = 1) THEN
1323: DEBUG('Trolin Validate Entity', 'Inv_Transfer_Order_PVT.Trolins');
1324: END IF;
1325: inv_validate_trolin.entity(x_return_status => l_return_status, p_trolin_rec => l_trolin_rec, p_old_trolin_rec => l_old_trolin_rec, p_move_order_type => p_move_order_type);
1326: END IF;
1327:

Line 1334: DEBUG('Error from Trolin Validate Entity', 'Inv_Transfer_Order_PVT.Trolins');

1330: RAISE fnd_api.g_exc_unexpected_error;
1331: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1332: l_trolin_rec.return_status := l_return_status;
1333: IF (l_debug = 1) THEN
1334: DEBUG('Error from Trolin Validate Entity', 'Inv_Transfer_Order_PVT.Trolins');
1335: END IF;
1336: RAISE fnd_api.g_exc_error;
1337: END IF;
1338: END IF;

Line 1351: DEBUG('Transaction_type_id: '||to_char(l_trolin_rec.transaction_type_id),'Inv_Transfer_Order_PVT.Trolins');

1347: --Bug3467711. The quantity field should should have a precision
1348: --of 5 irrespective of the value passed.
1349: /*6971965: Adding if condition for WIP generated MO*/
1350: IF (l_debug = 1) THEN
1351: DEBUG('Transaction_type_id: '||to_char(l_trolin_rec.transaction_type_id),'Inv_Transfer_Order_PVT.Trolins');
1352: END IF;
1353: IF l_trolin_rec.transaction_type_id = 35 THEN
1354: l_trolin_rec.quantity := ROUND(l_trolin_rec.quantity , 6);
1355: ELSE

Line 1375: DEBUG('Cannot convert uom to secondary uom', 'Inv_Transfer_Order_PVT.Trolins');

1371: );
1372:
1373: IF (l_trolin_rec.secondary_quantity = -99999) THEN
1374: IF (l_debug = 1) THEN
1375: DEBUG('Cannot convert uom to secondary uom', 'Inv_Transfer_Order_PVT.Trolins');
1376: END IF;
1377: fnd_message.set_name('INV', 'INV_INVALID_UOM_CONV');
1378: fnd_message.set_token('VALUE1', l_old_trolin_rec.secondary_uom);
1379: fnd_message.set_token('VALUE2', l_trolin_rec.uom_code);

Line 1387: DEBUG('Populated primary quantity: ' || to_char(l_trolin_rec.primary_quantity), 'Inv_Transfer_Order_PVT.Trolins');

1383: END IF;
1384: -- END
1385:
1386: IF (l_debug = 1) THEN
1387: DEBUG('Populated primary quantity: ' || to_char(l_trolin_rec.primary_quantity), 'Inv_Transfer_Order_PVT.Trolins');
1388: END IF;
1389: END IF;
1390:
1391: -- Step 4. Write to DB

Line 1396: DEBUG('Calling inv_mold_query_rows for Line Id: ' || to_char(l_trolin_rec.line_id), 'Inv_Transfer_Order_PVT.Trolins');

1392: IF l_control_rec.write_to_db THEN
1393: IF l_trolin_rec.operation = inv_globals.g_opr_delete THEN
1394: --debug('Calling inv_mold_query_rows');
1395: IF (l_debug = 1) THEN
1396: DEBUG('Calling inv_mold_query_rows for Line Id: ' || to_char(l_trolin_rec.line_id), 'Inv_Transfer_Order_PVT.Trolins');
1397: END IF;
1398: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1399:
1400: IF (l_troldt_tbl.COUNT > 0) THEN

Line 1402: DEBUG('Calling Delete_Troldt', 'Inv_Transfer_Order_PVT.Trolins');

1398: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1399:
1400: IF (l_troldt_tbl.COUNT > 0) THEN
1401: IF (l_debug = 1) THEN
1402: DEBUG('Calling Delete_Troldt', 'Inv_Transfer_Order_PVT.Trolins');
1403: END IF;
1404: delete_troldt(x_return_status => l_return_status, x_msg_data => l_msg_data, x_msg_count => l_msg_count, p_troldt_tbl => l_troldt_tbl, p_move_order_type => l_move_order_type);
1405:
1406: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

Line 1427: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');

1423: l_trolin_rec.last_update_date := SYSDATE;
1424: l_trolin_rec.last_updated_by := fnd_global.user_id;
1425: l_trolin_rec.last_update_login := fnd_global.login_id;
1426: IF (l_debug = 1) THEN
1427: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');

Line 1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');

1424: l_trolin_rec.last_updated_by := fnd_global.user_id;
1425: l_trolin_rec.last_update_login := fnd_global.login_id;
1426: IF (l_debug = 1) THEN
1427: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');

Line 1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');

1425: l_trolin_rec.last_update_login := fnd_global.login_id;
1426: IF (l_debug = 1) THEN
1427: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');

Line 1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');

1426: IF (l_debug = 1) THEN
1427: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1434: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');

Line 1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');

1427: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1434: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1435: END IF;

Line 1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');

1428: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1434: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1435: END IF;
1436:

Line 1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');

1429: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1434: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1435: END IF;
1436:
1437: IF l_old_trolin_rec.required_quantity IS NOT NULL THEN

Line 1434: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');

1430: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1431: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1432: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1433: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1434: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1435: END IF;
1436:
1437: IF l_old_trolin_rec.required_quantity IS NOT NULL THEN
1438: l_trolin_rec.required_quantity := l_old_trolin_rec.required_quantity;

Line 1446: DEBUG('calling mold query rows', 'Inv_Transfer_Order_PVT.Trolins');

1442: OR l_old_trolin_rec.line_status <> l_trolin_rec.line_status
1443: OR l_old_trolin_rec.quantity_detailed <> l_trolin_rec.quantity_detailed
1444: ) THEN
1445: IF (l_debug = 1) THEN
1446: DEBUG('calling mold query rows', 'Inv_Transfer_Order_PVT.Trolins');
1447: END IF;
1448: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1449: IF (l_debug = 1) THEN
1450: DEBUG('after mold query rows', 'Inv_Transfer_Order_PVT.Trolins');

Line 1450: DEBUG('after mold query rows', 'Inv_Transfer_Order_PVT.Trolins');

1446: DEBUG('calling mold query rows', 'Inv_Transfer_Order_PVT.Trolins');
1447: END IF;
1448: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1449: IF (l_debug = 1) THEN
1450: DEBUG('after mold query rows', 'Inv_Transfer_Order_PVT.Trolins');
1451: END IF;
1452:
1453: IF (l_troldt_tbl.COUNT > 0) THEN
1454: IF (l_debug = 1) THEN

Line 1455: DEBUG('calling update troldt', 'Inv_Transfer_Order_PVT.Trolins');

1451: END IF;
1452:
1453: IF (l_troldt_tbl.COUNT > 0) THEN
1454: IF (l_debug = 1) THEN
1455: DEBUG('calling update troldt', 'Inv_Transfer_Order_PVT.Trolins');
1456: END IF;
1457: update_troldt(
1458: x_return_status => l_return_status
1459: , x_msg_data => l_msg_data

Line 1471: DEBUG('got error', 'Inv_Transfer_Order_PVT.Trolins');

1467: );
1468:
1469: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1470: IF (l_debug = 1) THEN
1471: DEBUG('got error', 'Inv_Transfer_Order_PVT.Trolins');
1472: END IF;
1473: l_trolin_rec.return_status := l_return_status;
1474: RAISE fnd_api.g_exc_unexpected_error;
1475: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN

Line 1483: DEBUG('calling update row', 'Inv_Transfer_Order_PVT.Trolins');

1479: END IF;
1480: END IF;
1481:
1482: IF (l_debug = 1) THEN
1483: DEBUG('calling update row', 'Inv_Transfer_Order_PVT.Trolins');
1484: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');
1485: END IF;
1486: inv_trolin_util.update_row(l_trolin_rec);
1487: IF (l_debug = 1) THEN

Line 1484: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');

1480: END IF;
1481:
1482: IF (l_debug = 1) THEN
1483: DEBUG('calling update row', 'Inv_Transfer_Order_PVT.Trolins');
1484: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');
1485: END IF;
1486: inv_trolin_util.update_row(l_trolin_rec);
1487: IF (l_debug = 1) THEN
1488: DEBUG('after update row', 'Inv_Transfer_Order_PVT.Trolins');

Line 1488: DEBUG('after update row', 'Inv_Transfer_Order_PVT.Trolins');

1484: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');
1485: END IF;
1486: inv_trolin_util.update_row(l_trolin_rec);
1487: IF (l_debug = 1) THEN
1488: DEBUG('after update row', 'Inv_Transfer_Order_PVT.Trolins');
1489: END IF;
1490: ELSIF l_trolin_rec.operation = inv_globals.g_opr_create THEN
1491: l_trolin_rec.creation_date := SYSDATE;
1492: l_trolin_rec.created_by := fnd_global.user_id;

Line 1497: DEBUG('create row', 'Inv_Transfer_Order_PVT.Trolins');

1493: l_trolin_rec.last_update_date := SYSDATE;
1494: l_trolin_rec.last_updated_by := fnd_global.user_id;
1495: l_trolin_rec.last_update_login := fnd_global.login_id;
1496: IF (l_debug = 1) THEN
1497: DEBUG('create row', 'Inv_Transfer_Order_PVT.Trolins');
1498: END IF;
1499: /*Bug#5764123. Added the below line to convert the MISSING data
1500: to NULL.*/
1501: l_trolin_rec := inv_trolin_util.convert_miss_to_null(l_trolin_rec);

Line 1507: DEBUG('AFter Trolin Write to db', 'Inv_Transfer_Order_PVT.Trolins');

1503: END IF;
1504: END IF;
1505:
1506: IF (l_debug = 1) THEN
1507: DEBUG('AFter Trolin Write to db', 'Inv_Transfer_Order_PVT.Trolins');
1508: END IF;
1509: -- Load tables.
1510: l_trolin_tbl(i) := l_trolin_rec;
1511: l_old_trolin_tbl(i) := l_old_trolin_rec;

Line 1526: DEBUG('MO Lines in ShipSet failure', 'Inv_Transfer_Order_PVT.Trolins');

1522: IF l_trolin_rec.ship_set_id IS NOT NULL AND NOT l_marked_failed_shipset THEN
1523: l_failed_ship_set_id := l_trolin_rec.ship_set_id;
1524: ROLLBACK TO MO_SHIPSET;
1525: IF (l_debug = 1) THEN
1526: DEBUG('MO Lines in ShipSet failure', 'Inv_Transfer_Order_PVT.Trolins');
1527: END IF;
1528:
1529: FOR l_count IN 1 .. l_trolin_tbl.COUNT LOOP
1530: IF l_trolin_tbl(l_count).ship_set_id = NVL(l_failed_ship_set_id, -99) THEN

Line 1754: DEBUG(l_trohdr_rec.header_id, 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');

1750: );
1751: END IF;
1752:
1753: IF (l_debug = 1) THEN
1754: DEBUG(l_trohdr_rec.header_id, 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1755: END IF;
1756: -- Load parent key if missing and operation is create.
1757: IF (l_debug = 1) THEN
1758: DEBUG('Calling trolin 1', 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');

Line 1758: DEBUG('Calling trolin 1', 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');

1754: DEBUG(l_trohdr_rec.header_id, 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1755: END IF;
1756: -- Load parent key if missing and operation is create.
1757: IF (l_debug = 1) THEN
1758: DEBUG('Calling trolin 1', 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1759: END IF;
1760:
1761: FOR i IN 1 .. l_trolin_tbl.COUNT LOOP
1762: l_trolin_rec := l_trolin_tbl(i);

Line 1770: DEBUG('Header:'|| TO_CHAR(l_trohdr_rec.header_id), 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');

1766: OR l_trolin_rec.header_id = fnd_api.g_miss_num
1767: ) THEN
1768: -- Copy parent_id.
1769: IF (l_debug = 1) THEN
1770: DEBUG('Header:'|| TO_CHAR(l_trohdr_rec.header_id), 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1771: END IF;
1772: l_trolin_tbl(i).header_id := l_trohdr_rec.header_id;
1773: --l_trolin_Tbl(I).grouping_rule_id := l_trohdr_Rec.grouping_rule_id;
1774: END IF;

Line 6249: DEBUG('Fill Kill Profile = ' || l_kill_mo_profile,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6245:
6246: l_debug := g_debug;
6247:
6248: IF (l_debug = 1) THEN
6249: DEBUG('Fill Kill Profile = ' || l_kill_mo_profile,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6250: DEBUG('Transaction Hdr ID = ' || p_transaction_header_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6251: END IF;
6252:
6253: -- Check the Profile Fill Kill before doing anything.

Line 6250: DEBUG('Transaction Hdr ID = ' || p_transaction_header_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6246: l_debug := g_debug;
6247:
6248: IF (l_debug = 1) THEN
6249: DEBUG('Fill Kill Profile = ' || l_kill_mo_profile,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6250: DEBUG('Transaction Hdr ID = ' || p_transaction_header_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6251: END IF;
6252:
6253: -- Check the Profile Fill Kill before doing anything.
6254: IF l_kill_mo_profile = 2 THEN

Line 6268: DEBUG('MO Header not found for the MO Line = ' || l_rep_mmtt_rec.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6264: OPEN c_mo_type(l_rep_mmtt_rec.move_order_line_id);
6265: FETCH c_mo_type INTO l_mo_type;
6266: IF c_mo_type%NOTFOUND THEN
6267: IF (l_debug = 1) THEN
6268: DEBUG('MO Header not found for the MO Line = ' || l_rep_mmtt_rec.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6269: END IF;
6270: CLOSE c_mo_type;
6271: RAISE FND_API.G_EXC_ERROR;
6272: END IF;

Line 6276: DEBUG('Move Order Type = ' || l_mo_type,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6272: END IF;
6273: CLOSE c_mo_type;
6274:
6275: IF (l_debug = 1) THEN
6276: DEBUG('Move Order Type = ' || l_mo_type,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6277: END IF;
6278: --If it is a replenishment move order, then check quantities and close it
6279: IF (l_mo_type = 2) THEN
6280: l_trolin_rec := inv_trolin_util.query_row(l_rep_mmtt_rec.move_order_line_id);

Line 6288: DEBUG('Closing the replenishment move order','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6284: IF l_trolin_rec.line_status NOT IN (5, 6) THEN
6285: IF (NVL(l_trolin_rec.quantity_delivered, 0) >= l_trolin_rec.quantity) THEN
6286: l_trolin_rec.line_status := 5;
6287: IF (l_debug = 1) THEN
6288: DEBUG('Closing the replenishment move order','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6289: END IF;
6290: inv_trolin_util.update_row(l_trolin_rec);
6291: END IF; --END IF quantity_delivered > quantity
6292: END IF; --END IF line_status not closed, cancelled

Line 6302: DEBUG('For Kill Move Order = yes, Move Order Line = ' || l_mo_line.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6298: -- Loop thru all the Move Order Line IDs from MMTT for the passed Transaction Header ID
6299: FOR l_mo_line IN c_mo_lines
6300: LOOP
6301: IF (l_debug = 1) THEN
6302: DEBUG('For Kill Move Order = yes, Move Order Line = ' || l_mo_line.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6303: END IF;
6304:
6305: -- Getting the Move Order Type.
6306: OPEN c_mo_type(l_mo_line.move_order_line_id);

Line 6310: DEBUG('MO Header not found for the MO Line = ' || l_mo_line.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6306: OPEN c_mo_type(l_mo_line.move_order_line_id);
6307: FETCH c_mo_type INTO l_mo_type;
6308: IF c_mo_type%NOTFOUND THEN
6309: IF (l_debug = 1) THEN
6310: DEBUG('MO Header not found for the MO Line = ' || l_mo_line.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6311: END IF;
6312: CLOSE c_mo_type;
6313: RAISE FND_API.G_EXC_ERROR;
6314: END IF;

Line 6318: DEBUG('Move Order Type = ' || l_mo_type,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6314: END IF;
6315: CLOSE c_mo_type;
6316:
6317: IF (l_debug = 1) THEN
6318: DEBUG('Move Order Type = ' || l_mo_type,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6319: END IF;
6320:
6321: -- Proceed only if Move Order Type is Replenishment
6322: IF l_mo_type = 2 THEN

Line 6324: DEBUG('Replenishment Move Order... Closing the Move Order','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6320:
6321: -- Proceed only if Move Order Type is Replenishment
6322: IF l_mo_type = 2 THEN
6323: IF (l_debug = 1) THEN
6324: DEBUG('Replenishment Move Order... Closing the Move Order','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6325: END IF;
6326: INV_MO_ADMIN_PUB.close_line(1.0,'F','F','F',l_mo_line.move_order_line_id,l_msg_count,l_msg_data,l_return_status);
6327:
6328: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 6340: DEBUG('Expected error while closing the Line','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6336:
6337: EXCEPTION
6338: WHEN FND_API.G_EXC_ERROR THEN
6339: IF (l_debug = 1) THEN
6340: DEBUG('Expected error while closing the Line','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6341: END IF;
6342: x_return_status := FND_API.G_RET_STS_ERROR;
6343: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6344: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 6346: DEBUG('Unexpected error while closing the Line','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');

6342: x_return_status := FND_API.G_RET_STS_ERROR;
6343: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6344: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6345: IF (l_debug = 1) THEN
6346: DEBUG('Unexpected error while closing the Line','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6347: END IF;
6348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6349: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6350: WHEN OTHERS THEN

Line 6405: DEBUG('adjust_serial_numbers_in_MMTT p_transaction_temp_id='||p_transaction_temp_id||' p_qty= '||p_qty,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6401: x_msg_data VARCHAR2(200);
6402:
6403: BEGIN
6404: IF (l_debug = 1) THEN
6405: DEBUG('adjust_serial_numbers_in_MMTT p_transaction_temp_id='||p_transaction_temp_id||' p_qty= '||p_qty,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6406: END IF;
6407:
6408: FOR l_serial_cursor IN serial_cursor LOOP
6409: EXIT WHEN serial_cursor%NOTFOUND;

Line 6419: DEBUG('p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count||' l_counter='||l_counter,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6415: qty_count := qty_count + diff_qty;
6416: l_counter := l_counter+1;
6417:
6418: IF (l_debug = 1) THEN
6419: DEBUG('p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count||' l_counter='||l_counter,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6420: END IF;
6421:
6422: if (qty_count>p_qty AND NOT delete_remaining_Serial) then
6423: --get rid of xtra serial numbers from msnt

Line 6431: DEBUG('p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6427: --following logic will derive the to_Serial_number
6428: --If range
6429:
6430: IF (l_debug = 1) THEN
6431: DEBUG('p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6432: END IF;
6433:
6434: IF (l_Serial_cursor.fm_serial_number <> l_Serial_cursor.to_serial_number ) THEN
6435:

Line 6440: DEBUG('Inside if p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count||' fm_Serial='||l_Serial_cursor.fm_serial_number||' to_ser='||l_serial_cursor.to_serial_number,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6436: --if range then we have to either update the range or delete the whole range
6437: if (diff_qty = qty_count-p_qty) then
6438: --delete the whole range
6439: IF (l_debug = 1) THEN
6440: DEBUG('Inside if p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count||' fm_Serial='||l_Serial_cursor.fm_serial_number||' to_ser='||l_serial_cursor.to_serial_number,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6441: END IF;
6442:
6443: delete from mtl_Serial_numbers_temp
6444: where transaction_temp_id = p_transaction_temp_id

Line 6474: DEBUG('Inside ifelse p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6470:
6471: --update the range
6472:
6473: IF (l_debug = 1) THEN
6474: DEBUG('Inside ifelse p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6475: DEBUG(' fm_Ser_num= '||l_Serial_cursor.fm_serial_number ||' to_Ser_num= '||l_Serial_cursor.to_serial_number ,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6476: END IF;
6477:
6478: IF NOT mtl_serial_check.INV_SERIAL_INFO

Line 6475: DEBUG(' fm_Ser_num= '||l_Serial_cursor.fm_serial_number ||' to_Ser_num= '||l_Serial_cursor.to_serial_number ,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6471: --update the range
6472:
6473: IF (l_debug = 1) THEN
6474: DEBUG('Inside ifelse p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6475: DEBUG(' fm_Ser_num= '||l_Serial_cursor.fm_serial_number ||' to_Ser_num= '||l_Serial_cursor.to_serial_number ,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6476: END IF;
6477:
6478: IF NOT mtl_serial_check.INV_SERIAL_INFO
6479: (p_from_serial_number => l_Serial_cursor.fm_serial_number ,

Line 6492: DEBUG('l_new_num= '||l_new_num||' l_new_num_update='||l_new_num_update,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6488:
6489: l_new_num:=l_from_number+(diff_qty-((qty_count-p_qty)+1));
6490: l_new_num_update:=l_from_number+(diff_qty-((qty_count-p_qty)+1))+1;
6491: IF (l_debug = 1) THEN
6492: DEBUG('l_new_num= '||l_new_num||' l_new_num_update='||l_new_num_update,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6493: END IF;
6494:
6495: if (length(l_new_num) 6496: l_new_num_str:=lpad(l_new_num,length(l_from_number),'0');

Line 6500: DEBUG('l_new_num_Str= '||l_new_num_str||' l_new_num_Str_update='||l_new_num_str_update,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6496: l_new_num_str:=lpad(l_new_num,length(l_from_number),'0');
6497: l_new_num_str_update:=lpad(l_new_num_update,length(l_from_number),'0');
6498: end if;
6499: IF (l_debug = 1) THEN
6500: DEBUG('l_new_num_Str= '||l_new_num_str||' l_new_num_Str_update='||l_new_num_str_update,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6501: END IF;
6502:
6503:
6504: update mtl_serial_numbers_temp

Line 6512: DEBUG('after update l_new_num_Str= '||l_new_num_str,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6508: and to_Serial_number = l_Serial_cursor.to_serial_number
6509: and transaction_temp_id = p_transaction_temp_id;
6510:
6511: IF (l_debug = 1) THEN
6512: DEBUG('after update l_new_num_Str= '||l_new_num_str,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6513: END IF;
6514: --set a flag to delete the subsequent records from MSNT
6515:
6516: --unmark these serial numbers in MSN

Line 6541: DEBUG('after update fm_Serial_num= '||l_Serial_cursor.fm_serial_number||' to_Ser_num= '||l_serial_cursor.to_serial_number,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6537: been_here := TRUE;
6538: end if;
6539: else --END of range
6540: IF (l_debug = 1) THEN
6541: DEBUG('after update fm_Serial_num= '||l_Serial_cursor.fm_serial_number||' to_Ser_num= '||l_serial_cursor.to_serial_number,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6542: END IF;
6543:
6544: delete from mtl_serial_numbers_temp
6545: where fm_Serial_number = l_Serial_cursor.fm_serial_number

Line 6576: DEBUG('After update fm_Serial_num= '||l_Serial_cursor.fm_serial_number||' to_Ser_num= '||l_serial_cursor.to_serial_number,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6572: end if;
6573:
6574: if (delete_remaining_serial and l_counter > 1 and NOT been_here) then
6575: IF (l_debug = 1) THEN
6576: DEBUG('After update fm_Serial_num= '||l_Serial_cursor.fm_serial_number||' to_Ser_num= '||l_serial_cursor.to_serial_number,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6577: END IF;
6578:
6579: delete from mtl_serial_numbers_temp
6580: where fm_Serial_number = l_Serial_cursor.fm_serial_number

Line 6612: DEBUG('Expected error while closing the Line','INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6608:
6609: EXCEPTION
6610: WHEN FND_API.G_EXC_ERROR THEN
6611: IF (l_debug = 1) THEN
6612: DEBUG('Expected error while closing the Line','INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6613: END IF;
6614: x_return_status := FND_API.G_RET_STS_ERROR;
6615: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 6618: DEBUG('Unexpected error while closing the Line','INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');

6614: x_return_status := FND_API.G_RET_STS_ERROR;
6615: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6616: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6617: IF (l_debug = 1) THEN
6618: DEBUG('Unexpected error while closing the Line','INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6619: END IF;
6620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6621: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6622: WHEN OTHERS THEN

Line 6631: END inv_transfer_order_pvt;

6627: END IF;
6628: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6629: END adjust_serial_numbers_in_MSNT;
6630:
6631: END inv_transfer_order_pvt;