20: , x_msg_count OUT NOCOPY NUMBER
21: , x_msg_data OUT NOCOPY VARCHAR2
22: , p_caller IN VARCHAR2
23: , p_lock_flag IN VARCHAR2
24: , p_lpn_id_table IN OUT NOCOPY WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType
25: ) IS
26: l_api_name CONSTANT VARCHAR2(30) := 'Check_Purge_LPNs';
27: l_api_version CONSTANT NUMBER := 1.0;
28: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
27: l_api_version CONSTANT NUMBER := 1.0;
28: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
29: l_progress VARCHAR2(500) := 'Entered API';
30:
31: l_valid_lpns WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
32:
33: BEGIN
34: IF (l_debug = 1) THEN
35: inv_trx_util_pub.trace(l_api_name || ' Entered ' || g_pkg_version, l_api_name, 4);
126: , x_return_status OUT NOCOPY VARCHAR2
127: , x_msg_count OUT NOCOPY NUMBER
128: , x_msg_data OUT NOCOPY VARCHAR2
129: , p_caller IN VARCHAR2
130: , p_lpn_id_table IN WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType
131: , p_purge_count IN OUT NOCOPY WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType
132: ) IS
133: l_api_name CONSTANT VARCHAR2(30) := 'Purge_LPNs';
134: l_api_version CONSTANT NUMBER := 1.0;
127: , x_msg_count OUT NOCOPY NUMBER
128: , x_msg_data OUT NOCOPY VARCHAR2
129: , p_caller IN VARCHAR2
130: , p_lpn_id_table IN WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType
131: , p_purge_count IN OUT NOCOPY WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType
132: ) IS
133: l_api_name CONSTANT VARCHAR2(30) := 'Purge_LPNs';
134: l_api_version CONSTANT NUMBER := 1.0;
135: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
252: x_msg_count NUMBER;
253: x_msg_data VARCHAR2(2000);
254:
255: l_max_batch_size CONSTANT NUMBER := 1000;
256: l_purge_count WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
257: l_tmp_purge_count WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
258: l_lpn_tbl WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
259: l_wsh_lpn_rec WSH_GLBL_VAR_STRCT_GRP.purgeInOutRecType;
260:
253: x_msg_data VARCHAR2(2000);
254:
255: l_max_batch_size CONSTANT NUMBER := 1000;
256: l_purge_count WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
257: l_tmp_purge_count WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
258: l_lpn_tbl WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
259: l_wsh_lpn_rec WSH_GLBL_VAR_STRCT_GRP.purgeInOutRecType;
260:
261: CURSOR LPNS_FOR_PURGE IS
254:
255: l_max_batch_size CONSTANT NUMBER := 1000;
256: l_purge_count WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
257: l_tmp_purge_count WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
258: l_lpn_tbl WMS_DATA_TYPE_DEFINITIONS_PUB.NumberTableType;
259: l_wsh_lpn_rec WSH_GLBL_VAR_STRCT_GRP.purgeInOutRecType;
260:
261: CURSOR LPNS_FOR_PURGE IS
262: SELECT lpn_id