The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure UPDATE_RESOURCE_DEFAULTS (
P_PLAN_RES_DEF_ID_TBL IN system.pa_num_tbl_type ,
P_RESOURCE_CLASS_ID_TBL IN system.pa_num_tbl_type ,
P_OBJECT_TYPE_TBL IN system.pa_varchar2_30_tbl_type ,
P_OBJECT_ID_TBL IN system.pa_num_tbl_type ,
P_SPREAD_CURVE_ID_TBL IN system.pa_num_tbl_type ,
P_ETC_METHOD_CODE_TBL IN system.pa_varchar2_30_tbl_type ,
P_EXPENDITURE_TYPE_TBL IN system.pa_varchar2_30_tbl_type ,
P_ITEM_CATEGORY_SET_ID_TBL IN system.pa_num_tbl_type ,
P_ITEM_MASTER_ID_TBL IN system.pa_num_tbl_type ,
P_MFC_COST_TYPE_ID_TBL IN system.pa_num_tbl_type ,
P_ENABLED_FLAG_TBL IN system.pa_varchar2_1_tbl_type ,
X_RECORD_VERSION_NUMBER_TBL IN OUT NOCOPY system.pa_num_tbl_type ,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2
) is
l_item_master_id NUMBER;
select ITEM_CATEGORY_SET_ID, ITEM_MASTER_ID
into l_item_category_set_id, l_item_master_id
from PA_PLAN_RES_DEFAULTS
where PLAN_RES_DEFAULT_ID = P_PLAN_RES_DEF_ID_TBL(i);
select 'Y'
into l_master_used
from pa_res_formats_b format,
pa_res_types_b types
where types.res_type_code = 'INVENTORY_ITEM'
and types.res_type_id = format.res_type_id
and exists (select 'Y'
from PA_RESOURCE_LIST_MEMBERS rlm
where rlm.res_format_id = format.res_format_id);
SELECT MULT_ITEM_CAT_ASSIGN_FLAG, CATEGORY_SET_NAME
INTO l_cat_flag, l_cat_name
FROM mtl_category_sets_vl
WHERE category_set_id = l_item_category_set_id;
select 'Y'
into l_category_used
from pa_res_formats_b format,
pa_res_types_b types
where types.res_type_code = 'ITEM_CATEGORY'
and types.res_type_id = format.res_type_id
and exists (select 'Y'
from PA_RESOURCE_LIST_MEMBERS rlm
where rlm.res_format_id = format.res_format_id);
pa_plan_res_defaults_pvt.UPDATE_ROW (
P_PLAN_RES_DEFAULT_ID => P_PLAN_RES_DEF_ID_TBL(i) ,
P_RESOURCE_CLASS_ID => P_RESOURCE_CLASS_ID_TBL(i) ,
P_OBJECT_TYPE => P_OBJECT_TYPE_TBL(i) ,
P_OBJECT_ID => P_OBJECT_ID_TBL(i) ,
P_SPREAD_CURVE_ID => P_SPREAD_CURVE_ID_TBL(i) ,
P_ETC_METHOD_CODE => P_ETC_METHOD_CODE_TBL(i) ,
P_EXPENDITURE_TYPE => P_EXPENDITURE_TYPE_TBL(i) ,
P_ITEM_CATEGORY_SET_ID => P_ITEM_CATEGORY_SET_ID_TBL(i) ,
P_ITEM_MASTER_ID => P_ITEM_MASTER_ID_TBL(i) ,
P_MFC_COST_TYPE_ID => P_MFC_COST_TYPE_ID_TBL(i) ,
P_ENABLED_FLAG => P_ENABLED_FLAG_TBL(i) ,
X_RECORD_VERSION_NUMBER => X_RECORD_VERSION_NUMBER_TBL(i) ,
P_LAST_UPDATE_DATE => sysdate ,
P_LAST_UPDATED_BY => fnd_global.user_id ,
P_LAST_UPDATE_LOGIN => fnd_global.user_id ,
x_return_status => x_return_status ,
x_msg_count => x_msg_count ,
x_msg_data => x_msg_data);
end UPDATE_RESOURCE_DEFAULTS;