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.54.12020000.7 2013/03/23 01:46:31 sahmahes 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.54.12020000.7 2013/03/23 01:46:31 sahmahes 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 1177: DEBUG('MO Line failed due to Ship Set validation: ' || to_char(l_trolin_rec.line_id), 'Inv_Transfer_Order_PVT.Trolins');

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1297: -- Clear dependent attributes.
1298: IF l_control_rec.change_attributes THEN
1299: --debug('calling clear dependent attr');
1300: IF (l_debug = 1) THEN
1301: DEBUG('calling clear dependent attr', 'Inv_Transfer_Order_PVT.Trolins');
1302: END IF;
1303: 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);
1304: --debug('after calling dependent attr');
1305: END IF;

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

1308: IF l_control_rec.default_attributes
1309: OR l_control_rec.change_attributes THEN
1310: --debug('Trolin Apply attr');
1311: IF (l_debug = 1) THEN
1312: DEBUG('Trolin Apply attr', 'Inv_Transfer_Order_PVT.Trolins');
1313: END IF;
1314: 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);
1315: END IF;
1316:

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

1322: inv_validate_trolin.entity_delete(x_return_status => l_return_status, p_trolin_rec => l_trolin_rec);
1323: ELSE
1324: --debug('Trolin Validate Entity');
1325: IF (l_debug = 1) THEN
1326: DEBUG('Trolin Validate Entity', 'Inv_Transfer_Order_PVT.Trolins');
1327: END IF;
1328: 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);
1329: END IF;
1330:

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

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

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

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

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

1384: );
1385:
1386: IF (l_trolin_rec.secondary_quantity = -99999) THEN
1387: IF (l_debug = 1) THEN
1388: DEBUG('Cannot convert uom to secondary uom', 'Inv_Transfer_Order_PVT.Trolins');
1389: END IF;
1390: fnd_message.set_name('INV', 'INV_INVALID_UOM_CONV');
1391: fnd_message.set_token('VALUE1', l_old_trolin_rec.secondary_uom);
1392: fnd_message.set_token('VALUE2', l_trolin_rec.uom_code);

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

1396: END IF;
1397: -- END
1398:
1399: IF (l_debug = 1) THEN
1400: DEBUG('Populated primary quantity: ' || to_char(l_trolin_rec.primary_quantity), 'Inv_Transfer_Order_PVT.Trolins');
1401: END IF;
1402: END IF;
1403:
1404: -- Step 4. Write to DB

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

1405: IF l_control_rec.write_to_db THEN
1406: IF l_trolin_rec.operation = inv_globals.g_opr_delete THEN
1407: --debug('Calling inv_mold_query_rows');
1408: IF (l_debug = 1) THEN
1409: DEBUG('Calling inv_mold_query_rows for Line Id: ' || to_char(l_trolin_rec.line_id), 'Inv_Transfer_Order_PVT.Trolins');
1410: END IF;
1411: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1412:
1413: IF (l_troldt_tbl.COUNT > 0) THEN

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

1411: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1412:
1413: IF (l_troldt_tbl.COUNT > 0) THEN
1414: IF (l_debug = 1) THEN
1415: DEBUG('Calling Delete_Troldt', 'Inv_Transfer_Order_PVT.Trolins');
1416: END IF;
1417: 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);
1418:
1419: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

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

1436: l_trolin_rec.last_update_date := SYSDATE;
1437: l_trolin_rec.last_updated_by := fnd_global.user_id;
1438: l_trolin_rec.last_update_login := fnd_global.login_id;
1439: IF (l_debug = 1) THEN
1440: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1441: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');

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

1437: l_trolin_rec.last_updated_by := fnd_global.user_id;
1438: l_trolin_rec.last_update_login := fnd_global.login_id;
1439: IF (l_debug = 1) THEN
1440: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1441: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');

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

1438: l_trolin_rec.last_update_login := fnd_global.login_id;
1439: IF (l_debug = 1) THEN
1440: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1441: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1446: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');

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

1439: IF (l_debug = 1) THEN
1440: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1441: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1446: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1447: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');

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

1440: DEBUG(l_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1441: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1446: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1447: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1448: END IF;

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

1441: DEBUG(l_old_trolin_rec.quantity, 'Inv_Transfer_Order_PVT.Trolins');
1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1446: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1447: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1448: END IF;
1449:

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

1442: DEBUG(l_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1446: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1447: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1448: END IF;
1449:
1450: IF l_old_trolin_rec.required_quantity IS NOT NULL THEN

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

1443: DEBUG(l_old_trolin_rec.quantity_detailed, 'Inv_Transfer_Order_PVT.Trolins');
1444: DEBUG(l_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1445: DEBUG(l_old_trolin_rec.line_status, 'Inv_Transfer_Order_PVT.Trolins');
1446: DEBUG('l_trolin_Rec.required_quantity'|| l_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1447: DEBUG('l_old_trolin_Rec.required_quantity'|| l_old_trolin_rec.required_quantity, 'Inv_Transfer_Order_PVT.Trolins');
1448: END IF;
1449:
1450: IF l_old_trolin_rec.required_quantity IS NOT NULL THEN
1451: l_trolin_rec.required_quantity := l_old_trolin_rec.required_quantity;

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

1455: OR l_old_trolin_rec.line_status <> l_trolin_rec.line_status
1456: OR l_old_trolin_rec.quantity_detailed <> l_trolin_rec.quantity_detailed
1457: ) THEN
1458: IF (l_debug = 1) THEN
1459: DEBUG('calling mold query rows', 'Inv_Transfer_Order_PVT.Trolins');
1460: END IF;
1461: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1462: IF (l_debug = 1) THEN
1463: DEBUG('after mold query rows', 'Inv_Transfer_Order_PVT.Trolins');

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

1459: DEBUG('calling mold query rows', 'Inv_Transfer_Order_PVT.Trolins');
1460: END IF;
1461: l_troldt_tbl := inv_mo_line_detail_util.query_rows(p_line_id => l_trolin_rec.line_id);
1462: IF (l_debug = 1) THEN
1463: DEBUG('after mold query rows', 'Inv_Transfer_Order_PVT.Trolins');
1464: END IF;
1465:
1466: IF (l_troldt_tbl.COUNT > 0) THEN
1467: IF (l_debug = 1) THEN

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

1464: END IF;
1465:
1466: IF (l_troldt_tbl.COUNT > 0) THEN
1467: IF (l_debug = 1) THEN
1468: DEBUG('calling update troldt', 'Inv_Transfer_Order_PVT.Trolins');
1469: END IF;
1470: update_troldt(
1471: x_return_status => l_return_status
1472: , x_msg_data => l_msg_data

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

1480: );
1481:
1482: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1483: IF (l_debug = 1) THEN
1484: DEBUG('got error', 'Inv_Transfer_Order_PVT.Trolins');
1485: END IF;
1486: l_trolin_rec.return_status := l_return_status;
1487: RAISE fnd_api.g_exc_unexpected_error;
1488: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN

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

1492: END IF;
1493: END IF;
1494:
1495: IF (l_debug = 1) THEN
1496: DEBUG('calling update row', 'Inv_Transfer_Order_PVT.Trolins');
1497: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');
1498: END IF;
1499: inv_trolin_util.update_row(l_trolin_rec);
1500: IF (l_debug = 1) THEN

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

1493: END IF;
1494:
1495: IF (l_debug = 1) THEN
1496: DEBUG('calling update row', 'Inv_Transfer_Order_PVT.Trolins');
1497: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');
1498: END IF;
1499: inv_trolin_util.update_row(l_trolin_rec);
1500: IF (l_debug = 1) THEN
1501: DEBUG('after update row', 'Inv_Transfer_Order_PVT.Trolins');

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

1497: DEBUG(l_trolin_rec.line_id, 'Inv_Transfer_Order_PVT.Trolins');
1498: END IF;
1499: inv_trolin_util.update_row(l_trolin_rec);
1500: IF (l_debug = 1) THEN
1501: DEBUG('after update row', 'Inv_Transfer_Order_PVT.Trolins');
1502: END IF;
1503: ELSIF l_trolin_rec.operation = inv_globals.g_opr_create THEN
1504: l_trolin_rec.creation_date := SYSDATE;
1505: l_trolin_rec.created_by := fnd_global.user_id;

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

1506: l_trolin_rec.last_update_date := SYSDATE;
1507: l_trolin_rec.last_updated_by := fnd_global.user_id;
1508: l_trolin_rec.last_update_login := fnd_global.login_id;
1509: IF (l_debug = 1) THEN
1510: DEBUG('create row', 'Inv_Transfer_Order_PVT.Trolins');
1511: END IF;
1512: /*Bug#5764123. Added the below line to convert the MISSING data
1513: to NULL.*/
1514: l_trolin_rec := inv_trolin_util.convert_miss_to_null(l_trolin_rec);

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

1516: END IF;
1517: END IF;
1518:
1519: IF (l_debug = 1) THEN
1520: DEBUG('AFter Trolin Write to db', 'Inv_Transfer_Order_PVT.Trolins');
1521: END IF;
1522: -- Load tables.
1523: l_trolin_tbl(i) := l_trolin_rec;
1524: l_old_trolin_tbl(i) := l_old_trolin_rec;

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

1535: IF l_trolin_rec.ship_set_id IS NOT NULL AND NOT l_marked_failed_shipset THEN
1536: l_failed_ship_set_id := l_trolin_rec.ship_set_id;
1537: ROLLBACK TO MO_SHIPSET;
1538: IF (l_debug = 1) THEN
1539: DEBUG('MO Lines in ShipSet failure', 'Inv_Transfer_Order_PVT.Trolins');
1540: END IF;
1541:
1542: FOR l_count IN 1 .. l_trolin_tbl.COUNT LOOP
1543: IF l_trolin_tbl(l_count).ship_set_id = NVL(l_failed_ship_set_id, -99) THEN

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

1763: );
1764: END IF;
1765:
1766: IF (l_debug = 1) THEN
1767: DEBUG(l_trohdr_rec.header_id, 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1768: END IF;
1769: -- Load parent key if missing and operation is create.
1770: IF (l_debug = 1) THEN
1771: DEBUG('Calling trolin 1', 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');

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

1767: DEBUG(l_trohdr_rec.header_id, 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1768: END IF;
1769: -- Load parent key if missing and operation is create.
1770: IF (l_debug = 1) THEN
1771: DEBUG('Calling trolin 1', 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1772: END IF;
1773:
1774: FOR i IN 1 .. l_trolin_tbl.COUNT LOOP
1775: l_trolin_rec := l_trolin_tbl(i);

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

1779: OR l_trolin_rec.header_id = fnd_api.g_miss_num
1780: ) THEN
1781: -- Copy parent_id.
1782: IF (l_debug = 1) THEN
1783: DEBUG('Header:'|| TO_CHAR(l_trohdr_rec.header_id), 'Inv_Transfer_Order_PVT.Process_Transfer_Orders');
1784: END IF;
1785: l_trolin_tbl(i).header_id := l_trohdr_rec.header_id;
1786: --l_trolin_Tbl(I).grouping_rule_id := l_trohdr_Rec.grouping_rule_id;
1787: END IF;

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

6678:
6679: l_debug := g_debug;
6680:
6681: IF (l_debug = 1) THEN
6682: DEBUG('Fill Kill Profile = ' || l_kill_mo_profile,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6683: DEBUG('Transaction Hdr ID = ' || p_transaction_header_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6684: END IF;
6685:
6686: -- Check the Profile Fill Kill before doing anything.

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

6679: l_debug := g_debug;
6680:
6681: IF (l_debug = 1) THEN
6682: DEBUG('Fill Kill Profile = ' || l_kill_mo_profile,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6683: DEBUG('Transaction Hdr ID = ' || p_transaction_header_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6684: END IF;
6685:
6686: -- Check the Profile Fill Kill before doing anything.
6687: IF l_kill_mo_profile = 2 THEN

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

6697: OPEN c_mo_type(l_rep_mmtt_rec.move_order_line_id);
6698: FETCH c_mo_type INTO l_mo_type;
6699: IF c_mo_type%NOTFOUND THEN
6700: IF (l_debug = 1) THEN
6701: DEBUG('MO Header not found for the MO Line = ' || l_rep_mmtt_rec.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6702: END IF;
6703: CLOSE c_mo_type;
6704: RAISE FND_API.G_EXC_ERROR;
6705: END IF;

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

6705: END IF;
6706: CLOSE c_mo_type;
6707:
6708: IF (l_debug = 1) THEN
6709: DEBUG('Move Order Type = ' || l_mo_type,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6710: END IF;
6711: --If it is a replenishment move order, then check quantities and close it
6712: IF (l_mo_type = 2) THEN
6713: l_trolin_rec := inv_trolin_util.query_row(l_rep_mmtt_rec.move_order_line_id);

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

6718: IF (NVL(l_trolin_rec.quantity_delivered, 0) >= l_trolin_rec.quantity) THEN
6719: l_trolin_rec.line_status := 5;
6720: l_trolin_rec.status_date := SYSDATE; -- Bug 8563083
6721: IF (l_debug = 1) THEN
6722: DEBUG('Closing the replenishment move order','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6723: END IF;
6724: inv_trolin_util.update_row(l_trolin_rec);
6725: END IF; --END IF quantity_delivered > quantity
6726: END IF; --END IF line_status not closed, cancelled

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

6732: -- Loop thru all the Move Order Line IDs from MMTT for the passed Transaction Header ID
6733: FOR l_mo_line IN c_mo_lines
6734: LOOP
6735: IF (l_debug = 1) THEN
6736: DEBUG('For Kill Move Order = yes, Move Order Line = ' || l_mo_line.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6737: END IF;
6738:
6739: -- Getting the Move Order Type.
6740: OPEN c_mo_type(l_mo_line.move_order_line_id);

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

6740: OPEN c_mo_type(l_mo_line.move_order_line_id);
6741: FETCH c_mo_type INTO l_mo_type;
6742: IF c_mo_type%NOTFOUND THEN
6743: IF (l_debug = 1) THEN
6744: DEBUG('MO Header not found for the MO Line = ' || l_mo_line.move_order_line_id,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6745: END IF;
6746: CLOSE c_mo_type;
6747: RAISE FND_API.G_EXC_ERROR;
6748: END IF;

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

6748: END IF;
6749: CLOSE c_mo_type;
6750:
6751: IF (l_debug = 1) THEN
6752: DEBUG('Move Order Type = ' || l_mo_type,'INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6753: END IF;
6754:
6755: -- Proceed only if Move Order Type is Replenishment
6756: IF l_mo_type = 2 THEN

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

6754:
6755: -- Proceed only if Move Order Type is Replenishment
6756: IF l_mo_type = 2 THEN
6757: IF (l_debug = 1) THEN
6758: DEBUG('Replenishment Move Order... Closing the Move Order','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6759: END IF;
6760: 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);
6761:
6762: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

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

6770:
6771: EXCEPTION
6772: WHEN FND_API.G_EXC_ERROR THEN
6773: IF (l_debug = 1) THEN
6774: DEBUG('Expected error while closing the Line','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6775: END IF;
6776: x_return_status := FND_API.G_RET_STS_ERROR;
6777: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

6776: x_return_status := FND_API.G_RET_STS_ERROR;
6777: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6778: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6779: IF (l_debug = 1) THEN
6780: DEBUG('Unexpected error while closing the Line','INV_TRANSFER_ORDER_PVT.KILL_MOVE_ORDER');
6781: END IF;
6782: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6783: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6784: WHEN OTHERS THEN

Line 6839: 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');

6835: x_msg_data VARCHAR2(200);
6836:
6837: BEGIN
6838: IF (l_debug = 1) THEN
6839: 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');
6840: END IF;
6841:
6842: FOR l_serial_cursor IN serial_cursor LOOP
6843: EXIT WHEN serial_cursor%NOTFOUND;

Line 6853: 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');

6849: qty_count := qty_count + diff_qty;
6850: l_counter := l_counter+1;
6851:
6852: IF (l_debug = 1) THEN
6853: 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');
6854: END IF;
6855:
6856: if (qty_count>p_qty AND NOT delete_remaining_Serial) then
6857: --get rid of xtra serial numbers from msnt

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

6861: --following logic will derive the to_Serial_number
6862: --If range
6863:
6864: IF (l_debug = 1) THEN
6865: DEBUG('p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6866: END IF;
6867:
6868: IF (l_Serial_cursor.fm_serial_number <> l_Serial_cursor.to_serial_number ) THEN
6869:

Line 6874: 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');

6870: --if range then we have to either update the range or delete the whole range
6871: if (diff_qty = qty_count-p_qty) then
6872: --delete the whole range
6873: IF (l_debug = 1) THEN
6874: 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');
6875: END IF;
6876:
6877: delete from mtl_Serial_numbers_temp
6878: where transaction_temp_id = p_transaction_temp_id

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

6904:
6905: --update the range
6906:
6907: IF (l_debug = 1) THEN
6908: DEBUG('Inside ifelse p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6909: 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');
6910: END IF;
6911:
6912: IF NOT mtl_serial_check.INV_SERIAL_INFO

Line 6909: 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');

6905: --update the range
6906:
6907: IF (l_debug = 1) THEN
6908: DEBUG('Inside ifelse p_qty= '||p_qty||' diff_qty= '||diff_qty||' qty_count= '||qty_count,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6909: 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');
6910: END IF;
6911:
6912: IF NOT mtl_serial_check.INV_SERIAL_INFO
6913: (p_from_serial_number => l_Serial_cursor.fm_serial_number ,

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

6922:
6923: l_new_num:=l_from_number+(diff_qty-((qty_count-p_qty)+1));
6924: l_new_num_update:=l_from_number+(diff_qty-((qty_count-p_qty)+1))+1;
6925: IF (l_debug = 1) THEN
6926: DEBUG('l_new_num= '||l_new_num||' l_new_num_update='||l_new_num_update,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6927: END IF;
6928:
6929: if (length(l_new_num) 6930: l_new_num_str:=lpad(l_new_num,length(l_from_number),'0');

Line 6934: 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');

6930: l_new_num_str:=lpad(l_new_num,length(l_from_number),'0');
6931: l_new_num_str_update:=lpad(l_new_num_update,length(l_from_number),'0');
6932: end if;
6933: IF (l_debug = 1) THEN
6934: 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');
6935: END IF;
6936:
6937:
6938: update mtl_serial_numbers_temp

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

6942: and to_Serial_number = l_Serial_cursor.to_serial_number
6943: and transaction_temp_id = p_transaction_temp_id;
6944:
6945: IF (l_debug = 1) THEN
6946: DEBUG('after update l_new_num_Str= '||l_new_num_str,'INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
6947: END IF;
6948: --set a flag to delete the subsequent records from MSNT
6949:
6950: --unmark these serial numbers in MSN

Line 6975: 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');

6971: been_here := TRUE;
6972: end if;
6973: else --END of range
6974: IF (l_debug = 1) THEN
6975: 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');
6976: END IF;
6977:
6978: delete from mtl_serial_numbers_temp
6979: where fm_Serial_number = l_Serial_cursor.fm_serial_number

Line 7010: 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');

7006: end if;
7007:
7008: if (delete_remaining_serial and l_counter > 1 and NOT been_here) then
7009: IF (l_debug = 1) THEN
7010: 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');
7011: END IF;
7012:
7013: delete from mtl_serial_numbers_temp
7014: where fm_Serial_number = l_Serial_cursor.fm_serial_number

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

7042:
7043: EXCEPTION
7044: WHEN FND_API.G_EXC_ERROR THEN
7045: IF (l_debug = 1) THEN
7046: DEBUG('Expected error while closing the Line','INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
7047: END IF;
7048: x_return_status := FND_API.G_RET_STS_ERROR;
7049: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7050: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

7048: x_return_status := FND_API.G_RET_STS_ERROR;
7049: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7050: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7051: IF (l_debug = 1) THEN
7052: DEBUG('Unexpected error while closing the Line','INV_TRANSFER_ORDER_PVT.adjust_serial_numbers_in_MMTT');
7053: END IF;
7054: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7055: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7056: WHEN OTHERS THEN

Line 7065: END inv_transfer_order_pvt;

7061: END IF;
7062: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7063: END adjust_serial_numbers_in_MSNT;
7064:
7065: END inv_transfer_order_pvt;