[Home] [Help]
540: l_loc_wt_uom VARCHAR2(3);
541: l_loc_vol_uom VARCHAR2(3);
542:
543: BEGIN
544: -- Standard Start of API savepoint
545: SAVEPOINT WMS_Update_Locator_Capacity;
546:
547: x_return_status := fnd_api.g_ret_sts_success ; --set to Success by default.
548:
792: l_IN_rec WSH_GLBL_VAR_STRCT_GRP.detailInRecType;
793: l_OUT_rec WSH_GLBL_VAR_STRCT_GRP.detailOutRecType;
794:
795: BEGIN
796: -- Standard Start of API savepoint
797: SAVEPOINT CREATE_LPNS_PVT;
798:
799: -- Standard call to check for call compatibility.
800: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
795: BEGIN
796: -- Standard Start of API savepoint
797: SAVEPOINT CREATE_LPNS_PVT;
798:
799: -- Standard call to check for call compatibility.
800: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
801: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
802: fnd_msg_pub.ADD;
803: RAISE fnd_api.g_exc_unexpected_error;
1125: END IF;
1126:
1127: l_progress := 'End of API body';
1128:
1129: -- Standard check of p_commit.
1130: IF fnd_api.to_boolean(p_commit) THEN
1131: COMMIT WORK;
1132: END IF;
1133:
1130: IF fnd_api.to_boolean(p_commit) THEN
1131: COMMIT WORK;
1132: END IF;
1133:
1134: -- Standard call to get message count and data
1135: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1136: EXCEPTION
1137: WHEN FND_API.G_EXC_ERROR THEN
1138: x_return_status := fnd_api.g_ret_sts_error;
1304:
1305: l_lsp_installed NUMBER := NVL(FND_PROFILE.VALUE('WMS_DEPLOYMENT_MODE'),1); --Added for LSPs, bug 9087971
1306:
1307: BEGIN
1308: -- Standard Start of API savepoint
1309: SAVEPOINT AUTO_CREATE_LPNS_PVT;
1310:
1311: -- Standard call to check for call compatibility.
1312: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1307: BEGIN
1308: -- Standard Start of API savepoint
1309: SAVEPOINT AUTO_CREATE_LPNS_PVT;
1310:
1311: -- Standard call to check for call compatibility.
1312: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1313: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
1314: fnd_msg_pub.ADD;
1315: RAISE fnd_api.g_exc_unexpected_error;
1725: END IF;
1726:
1727: x_created_lpns := l_lpn_tab;
1728:
1729: -- Standard check of p_commit.
1730: IF fnd_api.to_boolean(p_commit) THEN
1731: COMMIT WORK;
1732: END IF;
1733:
1730: IF fnd_api.to_boolean(p_commit) THEN
1731: COMMIT WORK;
1732: END IF;
1733:
1734: -- Standard call to get message count and data
1735: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1736: EXCEPTION
1737: WHEN FND_API.G_EXC_ERROR THEN
1738: x_return_status := fnd_api.g_ret_sts_error;
1962: --Bug 8693053
1963: honor_case_pick_count NUMBER := 0;
1964:
1965: BEGIN
1966: -- Standard Start of API savepoint
1967: SAVEPOINT MODIFY_LPNS_PVT;
1968:
1969: -- Standard call to check for call compatibility.
1970: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1965: BEGIN
1966: -- Standard Start of API savepoint
1967: SAVEPOINT MODIFY_LPNS_PVT;
1968:
1969: -- Standard call to check for call compatibility.
1970: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
1971: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
1972: fnd_msg_pub.ADD;
1973: RAISE fnd_api.g_exc_unexpected_error;
3210:
3211: --Bug 8693053
3212: SELECT count (*) into honor_case_pick_count
3213: FROM mtl_material_transactions_temp mmtt, wms_user_task_type_attributes wutta
3214: WHERE mmtt.standard_operation_id = wutta.user_task_type_id
3215: AND mmtt.organization_id = wutta.organization_id
3216: AND mmtt.transfer_lpn_id = l_old.lpn_id
3217: AND honor_case_pick_flag = 'Y';
3218:
3837: mdebug('Bulk Updated outermost WLPN count='||SQL%ROWCOUNT, G_INFO);
3838: END IF;
3839: END IF;
3840:
3841: -- Standard check of p_commit.
3842: IF fnd_api.to_boolean(p_commit) THEN
3843: COMMIT WORK;
3844: END IF;
3845:
3842: IF fnd_api.to_boolean(p_commit) THEN
3843: COMMIT WORK;
3844: END IF;
3845:
3846: -- Standard call to get message count and data
3847: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3848: EXCEPTION
3849: WHEN FND_API.G_EXC_ERROR THEN
3850: x_return_status := fnd_api.g_ret_sts_error;
4201: --mdebug('scrtype=' ||p_source_type_id|| ' srchdr=' ||p_source_header_id|| ' srcname=' ||p_source_name|| ' srcln=' ||p_source_line_id||' srclndet='||p_source_line_detail_id, G_INFO);
4202: --mdebug('p_total_length='||p_total_length||', p_ucc_128_suf='||p_ucc_128_suffix_flag);
4203: END IF;
4204:
4205: -- Standard call to check for call compatibility.
4206: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4207: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
4208: fnd_msg_pub.ADD;
4209: RAISE fnd_api.g_exc_unexpected_error;
4289: ELSE
4290: RAISE fnd_api.g_exc_error;
4291: END IF;
4292:
4293: -- Standard check of p_commit.
4294: IF fnd_api.to_boolean(p_commit) THEN
4295: COMMIT WORK;
4296: END IF;
4297:
4294: IF fnd_api.to_boolean(p_commit) THEN
4295: COMMIT WORK;
4296: END IF;
4297:
4298: -- Standard call to get message count and if count is 1,
4299: -- get message info.
4300: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4301: EXCEPTION
4302: WHEN fnd_api.g_exc_error THEN
4354: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
4355:
4356: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
4357: BEGIN
4358: -- Standard Start of API savepoint
4359: SAVEPOINT ASSOCIATE_LPN_PVT;
4360:
4361: -- Standard call to check for call compatibility.
4362: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4357: BEGIN
4358: -- Standard Start of API savepoint
4359: SAVEPOINT ASSOCIATE_LPN_PVT;
4360:
4361: -- Standard call to check for call compatibility.
4362: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4363: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
4364: fnd_msg_pub.ADD;
4365: RAISE fnd_api.g_exc_unexpected_error;
4416: END IF;
4417:
4418: -- End of API body
4419:
4420: -- Standard check of p_commit.
4421: IF fnd_api.to_boolean(p_commit) THEN
4422: COMMIT WORK;
4423: END IF;
4424:
4421: IF fnd_api.to_boolean(p_commit) THEN
4422: COMMIT WORK;
4423: END IF;
4424:
4425: -- Standard call to get message count and if count is 1,
4426: -- get message info.
4427: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4428: EXCEPTION
4429: WHEN fnd_api.g_exc_error THEN
4482:
4483: l_lpn_tbl WMS_Data_Type_Definitions_PUB.LPNTableType;
4484:
4485: BEGIN
4486: -- Standard Start of API savepoint
4487: SAVEPOINT CREATE_LPN_PVT;
4488:
4489: -- Standard call to check for call compatibility.
4490: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4485: BEGIN
4486: -- Standard Start of API savepoint
4487: SAVEPOINT CREATE_LPN_PVT;
4488:
4489: -- Standard call to check for call compatibility.
4490: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4491: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
4492: fnd_msg_pub.ADD;
4493: RAISE fnd_api.g_exc_unexpected_error;
4541: ELSE
4542: RAISE fnd_api.g_exc_error;
4543: END IF;
4544:
4545: -- Standard check of p_commit.
4546: IF fnd_api.to_boolean(p_commit) THEN
4547: COMMIT WORK;
4548: END IF;
4549:
4546: IF fnd_api.to_boolean(p_commit) THEN
4547: COMMIT WORK;
4548: END IF;
4549:
4550: -- Standard call to get message count and if count is 1,
4551: -- get message info.
4552: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4553: EXCEPTION
4554: WHEN FND_API.G_EXC_ERROR THEN
4775: CONNECT BY lpn_id = PRIOR parent_lpn_id;
4776: --13535759
4777:
4778: BEGIN
4779: -- Standard Start of API savepoint
4780: SAVEPOINT PACKUNPACK_CONTAINER;
4781:
4782: -- Standard call to check for call compatibility.
4783: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4778: BEGIN
4779: -- Standard Start of API savepoint
4780: SAVEPOINT PACKUNPACK_CONTAINER;
4781:
4782: -- Standard call to check for call compatibility.
4783: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
4784: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
4785: fnd_msg_pub.ADD;
4786: RAISE fnd_api.g_exc_unexpected_error;
6381: , p_sec_quantity --INVCONV kkillams
6382: , p_sec_uom --INVCONV kkillams
6383: );
6384:
6385: -- Standard check of p_commit.
6386: IF fnd_api.to_boolean(p_commit) THEN
6387: COMMIT WORK;
6388: END IF;
6389:
6534:
6535: l_lpn WMS_Data_Type_Definitions_PUB.LPNTableType;
6536:
6537: BEGIN
6538: -- Standard Start of API savepoint
6539: SAVEPOINT MODIFY_LPN_WRAPPER_PVT;
6540:
6541: -- Standard call to check for call compatibility.
6542: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
6537: BEGIN
6538: -- Standard Start of API savepoint
6539: SAVEPOINT MODIFY_LPN_WRAPPER_PVT;
6540:
6541: -- Standard call to check for call compatibility.
6542: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
6543: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
6544: fnd_msg_pub.ADD;
6545: RAISE fnd_api.g_exc_unexpected_error;
6592: -- Modify LPN should put the appropriate error message in the stack
6593: RAISE fnd_api.g_exc_error;
6594: END IF;
6595:
6596: -- Standard check of p_commit.
6597: IF fnd_api.to_boolean(p_commit) THEN
6598: COMMIT WORK;
6599: END IF;
6600:
6704: AND organization_id = p_organization_id);
6705:
6706: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
6707: BEGIN
6708: -- Standard Start of API savepoint
6709: SAVEPOINT CONTAINER_REQUIRED_QTY_PVT;
6710: -- Standard call to check for call compatibility.
6711: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
6712: p_api_version ,
6706: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
6707: BEGIN
6708: -- Standard Start of API savepoint
6709: SAVEPOINT CONTAINER_REQUIRED_QTY_PVT;
6710: -- Standard call to check for call compatibility.
6711: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
6712: p_api_version ,
6713: l_api_name ,
6714: G_PKG_NAME )
6948: END IF;
6949: END IF;
6950: -- End of API body
6951:
6952: -- Standard check of p_commit.
6953: IF FND_API.To_Boolean( p_commit ) THEN
6954: COMMIT WORK;
6955: END IF;
6956: -- Standard call to get message count and if count is 1,
6952: -- Standard check of p_commit.
6953: IF FND_API.To_Boolean( p_commit ) THEN
6954: COMMIT WORK;
6955: END IF;
6956: -- Standard call to get message count and if count is 1,
6957: -- get message info.
6958: FND_MSG_PUB.Count_And_Get
6959: ( p_count => x_msg_count,
6960: p_data => x_msg_data
7031: ret BOOLEAN;
7032: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
7033:
7034: BEGIN
7035: -- Standard Start of API savepoint
7036: SAVEPOINT PREPACK_LPN_CP_PVT;
7037:
7038: -- Standard call to check for call compatibility.
7039: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
7034: BEGIN
7035: -- Standard Start of API savepoint
7036: SAVEPOINT PREPACK_LPN_CP_PVT;
7037:
7038: -- Standard call to check for call compatibility.
7039: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
7040: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
7041: fnd_msg_pub.ADD;
7042: RAISE fnd_api.g_exc_unexpected_error;
7085: retcode := 2;
7086: errbuf := x_msg_data;
7087: END IF;
7088:
7089: -- Standard call to get message count and if count is 1,
7090: -- get message info.
7091: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7092: EXCEPTION
7093: WHEN fnd_api.g_exc_error THEN
7233: AND msnt1.transaction_temp_id(+) = mtlt.serial_transaction_temp_id
7234: AND msnt2.transaction_temp_id(+) = mmtt.transaction_temp_id;
7235:
7236: BEGIN
7237: -- Standard Start of API savepoint
7238: SAVEPOINT prepack_lpn_pub;
7239:
7240: -- Standard call to check for call compatibility.
7241: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
7236: BEGIN
7237: -- Standard Start of API savepoint
7238: SAVEPOINT prepack_lpn_pub;
7239:
7240: -- Standard call to check for call compatibility.
7241: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
7242: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
7243: fnd_msg_pub.ADD;
7244: RAISE fnd_api.g_exc_unexpected_error;
7952: END IF;
7953:
7954: -- End of API body
7955:
7956: -- Standard check of p_commit.
7957: IF fnd_api.to_boolean(p_commit) THEN
7958: COMMIT WORK;
7959: END IF;
7960:
7957: IF fnd_api.to_boolean(p_commit) THEN
7958: COMMIT WORK;
7959: END IF;
7960:
7961: -- Standard call to get message count and if count is 1,
7962: -- get message info.
7963: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7964: EXCEPTION
7965: WHEN fnd_api.g_exc_error THEN
8023:
8024: l_padded_length NUMBER;
8025: l_current_number NUMBER;
8026: BEGIN
8027: -- Standard Start of API savepoint
8028: SAVEPOINT PACK_PREPACK_CONTAINER;
8029:
8030: -- Standard call to check for call compatibility.
8031: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
8026: BEGIN
8027: -- Standard Start of API savepoint
8028: SAVEPOINT PACK_PREPACK_CONTAINER;
8029:
8030: -- Standard call to check for call compatibility.
8031: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
8032: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
8033: fnd_msg_pub.ADD;
8034: RAISE fnd_api.g_exc_unexpected_error;
8119: END IF;
8120: END IF;
8121: -- End of API body
8122:
8123: -- Standard check of p_commit.
8124: IF fnd_api.to_boolean(p_commit) THEN
8125: COMMIT WORK;
8126: END IF;
8127:
8124: IF fnd_api.to_boolean(p_commit) THEN
8125: COMMIT WORK;
8126: END IF;
8127:
8128: -- Standard call to get message count and if count is 1,
8129: -- get message info.
8130: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8131: EXCEPTION
8132: WHEN fnd_api.g_exc_error THEN
8206: -- bug 5103594, added the Order By clause
8207: ORDER BY inventory_item_id, revision, lot_number, serial_number;
8208:
8209: BEGIN
8210: -- Standard Start of API savepoint
8211: SAVEPOINT EXPLODE_LPN;
8212:
8213: IF (l_debug = 1) THEN
8214: mdebug(l_api_name || ' Entered ' || g_pkg_version, 1);
8214: mdebug(l_api_name || ' Entered ' || g_pkg_version, 1);
8215: mdebug('ver='||p_api_version||' initmsg='||p_init_msg_list||' commit='||p_commit||' lpn='||p_lpn_id||' explvl='||p_explosion_level, G_INFO);
8216: END IF;
8217:
8218: -- Standard call to check for call compatibility.
8219: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
8220: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
8221: fnd_msg_pub.ADD;
8222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8388: IF (l_debug = 1) THEN
8389: mdebug(l_api_name || ' Exit x_content_tbl count=' ||x_content_tbl.last, G_INFO);
8390: END IF;
8391:
8392: -- Standard check of p_commit.
8393: IF FND_API.To_Boolean( p_commit ) THEN
8394: COMMIT WORK;
8395: END IF;
8396:
8393: IF FND_API.To_Boolean( p_commit ) THEN
8394: COMMIT WORK;
8395: END IF;
8396:
8397: -- Standard call to get message count and if count is 1,
8398: -- get message info.
8399: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count, p_data => x_msg_data );
8400: EXCEPTION
8401: WHEN FND_API.G_EXC_ERROR THEN
8767:
8768: l_crnt_ser_rec LPN_serial_cur%ROWTYPE;
8769:
8770: BEGIN
8771: -- Standard Start of API savepoint
8772: SAVEPOINT MERGE_UP_LPN;
8773:
8774: -- Initialize message list if p_init_msg_list is set to TRUE.
8775: IF fnd_api.to_boolean(p_init_msg_list) THEN
8792: FROM DUAL;
8793:
8794: FOR Nested_LPN_rec IN Nested_LPN_cur LOOP
8795: -- Insert an 'UNPACK' transaction of child LPN from parent LPN into
8796: -- MTL_MATERIAL_TRANSACTIONS_TEMP using standard MMTT insert API
8797: l_return_status := INV_TRX_UTIL_PUB.INSERT_LINE_TRX (
8798: p_trx_hdr_id => l_trx_hdr_id
8799: , p_item_id => -1
8800: , p_org_id => p_organization_id
9111: IF ( l_debug = 1 ) THEN
9112: mdebug('Called INV_LABEL.PRINT_LABEL, return_status='||l_label_return||' label stat='||l_label_status, 1);
9113: END IF;
9114:
9115: -- Standard check of p_commit.
9116: IF FND_API.To_Boolean( p_commit ) THEN
9117: COMMIT WORK;
9118: END IF;
9119:
9167: l_label_return VARCHAR2(1);
9168: l_input_param_rec_tbl INV_LABEL.input_parameter_rec_type;
9169:
9170: BEGIN
9171: -- Standard Start of API savepoint
9172: SAVEPOINT BREAK_DOWN_LPN;
9173:
9174: -- Standard call to check for call compatibility.
9175: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
9170: BEGIN
9171: -- Standard Start of API savepoint
9172: SAVEPOINT BREAK_DOWN_LPN;
9173:
9174: -- Standard call to check for call compatibility.
9175: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
9176: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
9177: fnd_msg_pub.ADD;
9178: RAISE fnd_api.g_exc_unexpected_error;
9197:
9198: --Every nested lpn will need to be deconsolidated from the outermost lpn,
9199: FOR lpn_rec IN nested_lpn_cursor LOOP
9200: -- Insert an 'UNPACK' transaction of child LPN from parent LPN into
9201: -- MTL_MATERIAL_TRANSACTIONS_TEMP using standard MMTT insert API
9202: l_return_status := INV_TRX_UTIL_PUB.INSERT_LINE_TRX (
9203: p_trx_hdr_id => l_trx_hdr_id
9204: , p_item_id => -1
9205: , p_org_id => p_organization_id
9256: IF ( l_debug = 1 ) THEN
9257: mdebug('Called INV_LABEL.PRINT_LABEL, return_status='||l_label_return||' label stat='||l_label_status, 1);
9258: END IF;
9259:
9260: -- Standard check of p_commit.
9261: IF FND_API.To_Boolean( p_commit ) THEN
9262: COMMIT WORK;
9263: END IF;
9264:
9303: WHERE organization_id = p_organization_id
9304: AND outermost_lpn_id = p_outermost_lpn_id;
9305:
9306: BEGIN
9307: -- Standard Start of API savepoint
9308: SAVEPOINT INITIALIZE_LPN;
9309:
9310: -- Standard call to check for call compatibility.
9311: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
9306: BEGIN
9307: -- Standard Start of API savepoint
9308: SAVEPOINT INITIALIZE_LPN;
9309:
9310: -- Standard call to check for call compatibility.
9311: IF NOT fnd_api.compatible_api_call(l_api_version, p_api_version, l_api_name, g_pkg_name) THEN
9312: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
9313: fnd_msg_pub.ADD;
9314: RAISE fnd_api.g_exc_unexpected_error;
9351: , last_updated_by = fnd_global.user_id
9352: WHERE rowid = lpn_rec.rowid;
9353: END LOOP;
9354:
9355: -- Standard check of p_commit.
9356: IF FND_API.To_Boolean( p_commit ) THEN
9357: COMMIT WORK;
9358: END IF;
9359: