The following lines contain the word 'select', 'insert', 'update' or 'delete':
FUNCTION check_update_status(
p_source_code IN VARCHAR2
, p_res_upd_tbl IN okl_res_tbl) RETURN VARCHAR2 IS
l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_RESI_CAT_SETS_PVT.check_update_status';
l_api_name CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||'check_update_status';
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRRCSB.pls call check_update_status');
SELECT
COUNT(1)
INTO
l_temp_cnt
FROM
MTL_ITEM_CATEGORIES MTL
WHERE
MTL.INVENTORY_ITEM_ID = p_res_upd_tbl(i).inventory_item_id
AND MTL.ORGANIZATION_ID = p_res_upd_tbl(i).organization_id;
SELECT
COUNT(1)
INTO
l_temp_cnt
FROM
MTL_ITEM_CATEGORIES MTL
WHERE
MTL.CATEGORY_ID = p_res_upd_tbl(i).category_id
AND MTL.CATEGORY_SET_ID = p_res_upd_tbl(i).category_set_id;
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRRCSB.pls call check_update_status');
END check_update_status;
okl_rcs_pvt.insert_row(
p_api_version => p_api_version
, p_init_msg_list => p_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_rcsv_rec => l_rcsv_rec
, x_rcsv_rec => x_rcsv_rec);
okl_res_pvt.insert_row(
p_api_version => p_api_version
, p_init_msg_list => p_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_res_tbl => l_res_tbl
, x_res_tbl => x_res_tbl);
Procedure to update the residual category set. It inserts new lines if any
into the OKL_FE_RESI_CAT_OBJECTS table. It inactivates the residual category set if
any of the existing lines are not present in the inventory.
*/
PROCEDURE update_rcs (
p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_rcsv_rec IN okl_rcsv_rec
, p_res_tbl IN okl_res_tbl
, x_rcsv_rec OUT NOCOPY okl_rcsv_rec
) IS
l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_RESI_CAT_SETS_PVT.update_rcs';
l_api_name CONSTANT VARCHAR2(40) := 'update_rcs';
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRRCSB.pls call update_rcs');
OKL_RES_PVT.update_row(
p_api_version => l_api_version
, p_init_msg_list => l_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_res_tbl => lp_res_upd_tbl
, x_res_tbl => lx_res_upd_tbl);
OKL_RES_PVT.insert_row(
p_api_version => l_api_version
, p_init_msg_list => l_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_res_tbl => lp_res_crt_tbl
, x_res_tbl => lx_res_crt_tbl);
l_make_inactive := check_update_status( p_rcsv_rec.source_code, lp_res_upd_tbl);
OKL_RCS_PVT.update_row(
p_api_version => l_api_version
, p_init_msg_list => l_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_rcsv_rec => lp_rcsv_rec
, x_rcsv_rec => x_rcsv_rec);
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRRCSB.pls call update_rcs');
END update_rcs;
l_make_inactive := check_update_status( p_rcsv_rec.source_code, p_res_tbl);
OKL_RCS_PVT.update_row(
p_api_version => l_api_version
, p_init_msg_list => l_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_rcsv_rec => lp_rcsv_rec
, x_rcsv_rec => x_rcsv_rec);
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRRCSB.pls call update_rcs');
OKL_RCS_PVT.update_row(
p_api_version => l_api_version
, p_init_msg_list => l_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_rcsv_rec => lp_rcsv_rec
, x_rcsv_rec => x_rcsv_rec);
PROCEDURE delete_objects(
p_api_version IN NUMBER
, p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE
, x_return_status OUT NOCOPY VARCHAR2
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, p_res_tbl IN okl_res_tbl) IS
l_module CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_RESI_CAT_SETS_PVT.delete_objects';
l_api_name CONSTANT VARCHAR2(40) := 'delete_objects';
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'begin debug OKLRRCSB.pls call delete_objects');
OKL_RES_PVT.delete_row(
p_api_version => l_api_version
, p_init_msg_list => l_init_msg_list
, x_return_status => l_return_status
, x_msg_count => x_msg_count
, x_msg_data => x_msg_data
, p_res_tbl => p_res_tbl);
okl_debug_pub.log_debug(FND_LOG.LEVEL_PROCEDURE,l_module,'end debug OKLRRCSB.pls call delete_objects');
END delete_objects;