The following lines contain the word 'select', 'insert', 'update' or 'delete':
CURSOR c_cost_group is SELECT ccg.cost_group_id
FROM cst_cost_groups ccg,
cst_cost_group_accounts cca
WHERE ccg.cost_group_id = cca.cost_group_id
AND NVL(ccg.organization_id, p_organization_id)
= cca.organization_id
AND ccg.cost_group_type = p_cost_group_type_id
AND sysdate <= nvl(ccg.disable_date, sysdate)
AND NVL(ccg.organization_id, p_organization_id )
= p_organization_id
AND (p_material_account = l_miss_num
OR (p_material_account IS NULL AND cca.material_account IS NULL)
OR p_material_account = cca.material_account
)
AND (p_material_overhead_account = l_miss_num
OR (p_material_overhead_account IS NULL AND cca.material_overhead_account IS NULL)
OR p_material_overhead_account = cca.material_overhead_account
)
AND (p_resource_account = l_miss_num
OR (p_resource_account IS NULL AND cca.resource_account IS NULL)
OR p_resource_account = cca.resource_account
)
AND (p_overhead_account = l_miss_num
OR (p_overhead_account IS NULL AND cca.overhead_account IS NULL)
OR p_overhead_account = cca.overhead_account
)
AND (p_outside_processing_account = l_miss_num
OR (p_outside_processing_account IS NULL AND cca.outside_processing_account IS NULL)
OR p_outside_processing_account = cca.outside_processing_account
)
AND (p_expense_account = l_miss_num
OR (p_expense_account IS NULL AND cca.expense_account IS NULL)
OR p_expense_account = cca.expense_account
)
AND (p_encumbrance_account = l_miss_num
OR (p_encumbrance_account IS NULL AND cca.encumbrance_account IS NULL)
OR p_encumbrance_account = cca.encumbrance_account
)
AND (p_average_cost_var_account = l_miss_num
OR (p_average_cost_var_account IS NULL AND cca.average_cost_var_account IS NULL)
OR p_average_cost_var_account = cca.average_cost_var_account
)
AND (p_payback_mat_var_account = l_miss_num
OR (p_payback_mat_var_account IS NULL AND cca.payback_mat_var_account IS NULL)
OR p_payback_mat_var_account = cca.payback_mat_var_account
)
AND (p_payback_res_var_account = l_miss_num
OR (p_payback_res_var_account IS NULL AND cca.payback_res_var_account IS NULL)
OR p_payback_res_var_account = cca.payback_res_var_account
)
AND (p_payback_osp_var_account = l_miss_num
OR (p_payback_osp_var_account IS NULL AND cca.payback_osp_var_account IS NULL)
OR p_payback_osp_var_account = cca.payback_osp_var_account
)
AND (p_payback_moh_var_account = l_miss_num
OR (p_payback_moh_var_account IS NULL AND cca.payback_moh_var_account IS NULL)
OR p_payback_moh_var_account = cca.payback_moh_var_account
)
AND (p_payback_ovh_var_account = l_miss_num
OR (p_payback_ovh_var_account IS NULL AND cca.payback_ovh_var_account IS NULL)
OR p_payback_ovh_var_account = cca.payback_ovh_var_account
);
l_last_updated_by NUMBER := fnd_global.user_id;
l_last_update_login NUMBER := fnd_global.login_id;
SELECT COUNT(*)
INTO l_count
FROM CST_COST_GROUPS
WHERE COST_GROUP = p_cost_group;
SELECT cst_cost_groups_s.NEXTVAL
INTO l_cost_group_id
FROM dual;
INSERT INTO CST_COST_GROUPS( COST_GROUP_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID ,
PROGRAM_UPDATE_DATE,
ORGANIZATION_ID,
COST_GROUP,
COST_GROUP_TYPE)
VALUES (l_cost_group_id,
l_sysdate,
l_last_updated_by,
l_sysdate,
l_last_updated_by,
l_last_update_login,
l_request_id,
l_program_application_id,
l_program_id,
l_sysdate,
decode (p_multi_org, 1, NULL, p_organization_id),
l_cost_group,
p_cost_group_type_id);
INSERT INTO CST_COST_GROUP_ACCOUNTS( COST_GROUP_ID,
ORGANIZATION_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
REQUEST_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_ID ,
PROGRAM_UPDATE_DATE,
MATERIAL_ACCOUNT,
MATERIAL_OVERHEAD_ACCOUNT,
RESOURCE_ACCOUNT,
OVERHEAD_ACCOUNT,
OUTSIDE_PROCESSING_ACCOUNT,
ENCUMBRANCE_ACCOUNT,
EXPENSE_ACCOUNT,
AVERAGE_COST_VAR_ACCOUNT,
PAYBACK_MAT_VAR_ACCOUNT,
PAYBACK_RES_VAR_ACCOUNT,
PAYBACK_OSP_VAR_ACCOUNT,
PAYBACK_MOH_VAR_ACCOUNT,
PAYBACK_OVH_VAR_ACCOUNT)
VALUES (l_cost_group_id,
p_organization_id,
l_sysdate,
l_last_updated_by,
l_sysdate,
l_last_updated_by,
l_last_update_login,
l_request_id,
l_program_application_id,
l_program_id,
l_sysdate,
p_material_account,
p_material_overhead_account,
p_resource_account,
p_overhead_account,
p_outside_processing_account,
p_encumbrance_account,
p_expense_account,
p_average_cost_var_account,
p_payback_mat_var_account,
p_payback_res_var_account,
p_payback_osp_var_account,
p_payback_moh_var_account,
p_payback_ovh_var_account);
SELECT MATERIAL_ACCOUNT,
MATERIAL_OVERHEAD_ACCOUNT,
RESOURCE_ACCOUNT,
OVERHEAD_ACCOUNT,
OUTSIDE_PROCESSING_ACCOUNT,
ENCUMBRANCE_ACCOUNT,
EXPENSE_ACCOUNT,
AVERAGE_COST_VAR_ACCOUNT,
PAYBACK_MAT_VAR_ACCOUNT,
PAYBACK_RES_VAR_ACCOUNT,
PAYBACK_OSP_VAR_ACCOUNT,
PAYBACK_MOH_VAR_ACCOUNT,
PAYBACK_OVH_VAR_ACCOUNT
INTO x_material_account,
x_material_overhead_account,
x_resource_account,
x_overhead_account,
x_outside_processing_account,
x_encumbrance_account,
x_expense_account,
x_average_cost_var_account,
x_payback_mat_var_account,
x_payback_res_var_account,
x_payback_osp_var_account,
x_payback_moh_var_account,
x_payback_ovh_var_account
FROM CST_COST_GROUP_ACCOUNTS
WHERE COST_GROUP_ID = p_cost_group_id
AND ORGANIZATION_ID = p_organization_id ;
SELECT COUNT(*)
INTO x_change_allowed
FROM mtl_onhand_quantities
WHERE organization_id = p_organization_id
AND cost_group_id = p_cost_group_id
AND rownum = 1;
SELECT primary_cost_method
INTO l_cost_method
FROM mtl_parameters
WHERE organization_id = p_organization_id;
SELECT COUNT(*)
INTO x_change_allowed
FROM cst_quantity_layers
WHERE organization_id = p_organization_id
AND cost_group_id = p_cost_group_id
AND layer_quantity <> 0
AND rownum = 1;
SELECT COUNT(*)
INTO x_change_allowed
FROM mtl_material_transactions_temp
WHERE (
( organization_id = p_organization_id
AND cost_group_id = p_cost_group_id
)
OR
( transfer_organization = p_organization_id
AND transfer_cost_group_id = p_cost_group_id
)
)
AND rownum = 1;
SELECT COUNT(*)
INTO x_change_allowed
FROM mtl_material_transactions
WHERE costed_flag in ('N','E')
AND (
( organization_id = p_organization_id
AND cost_group_id = p_cost_group_id
)
OR
( transfer_organization_id = p_organization_id
AND transfer_cost_group_id = p_cost_group_id
)
)
AND rownum = 1;