The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT pbg.security_group_id
FROM per_business_groups pbg,
per_cagr_entitlements pce,
per_collective_agreements pca
WHERE pce.cagr_entitlement_id = p_cagr_entitlement_id
AND pca.collective_agreement_id = p_collective_agreement_id
AND pbg.business_group_id = pca.business_group_id;
SELECT pbg.legislation_code
FROM per_business_groups pbg,
per_cagr_entitlements pce,
per_collective_agreements pca
WHERE pce.cagr_entitlement_id = p_cagr_entitlement_id
AND pca.collective_agreement_id = p_collective_agreement_id
AND pbg.business_group_id = pca.business_group_id;
PROCEDURE chk_non_updateable_args
(p_effective_date IN DATE
,p_rec IN per_pce_shd.g_rec_type
) IS
--
l_proc VARCHAR2(72) := g_package || 'chk_non_updateable_args';
END chk_non_updateable_args;
SELECT cei.cagr_entitlement_item_id
FROM per_cagr_entitlement_items cei
WHERE cei.cagr_entitlement_item_id = p_cagr_entitlement_item_id;
SELECT cag.collective_agreement_id
FROM per_collective_agreements cag
WHERE cag.business_group_id = p_business_group_id
AND cag.collective_agreement_id = p_collective_agreement_id;
SELECT ff.formula_id
FROM ff_formulas_f ff,
ff_formula_types ft,
per_business_groups pg
WHERE NVL(ff.legislation_code, pg.legislation_code) =
pg.legislation_code
AND NVL(ff.business_group_id,p_business_group_id) =
pg.business_group_id
AND pg.business_group_id = p_business_group_id
AND ft.formula_type_name = 'CAGR'
AND ft.formula_type_id = ff.formula_type_id
AND ff.formula_id = p_formula_id
AND p_effective_date BETWEEN ff.effective_start_date
AND ff.effective_end_date;
SELECT pca.start_date
FROM per_collective_agreements pca
WHERE p_start_date < pca.start_date
AND pca.collective_Agreement_id = p_collective_agreement_id;
SELECT 'X'
FROM per_cagr_entitlement_lines_f pcl
WHERE pcl.cagr_entitlement_id = p_cagr_entitlement_id
AND DECODE(pcl.effective_end_date
,hr_general.end_of_time,hr_general.start_of_time
,pcl.effective_end_date) > NVL(p_end_date,hr_general.end_of_time);
SELECT pce.cagr_entitlement_id
FROM per_cagr_entitlements pce
WHERE pce.collective_agreement_id = p_collective_agreement_id
AND pce.cagr_entitlement_item_id = p_cagr_entitlement_item_id;
PROCEDURE insert_validate
(p_effective_date IN DATE
,p_rec IN per_pce_shd.g_rec_type
) IS
--
l_proc VARCHAR2(72) := g_package||'insert_validate';
END insert_validate;
PROCEDURE update_validate
(p_effective_date IN DATE
,p_rec IN per_pce_shd.g_rec_type
) IS
--
l_proc VARCHAR2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
END update_validate;
PROCEDURE delete_validate
(p_rec IN per_pce_shd.g_rec_type
) IS
--
l_proc VARCHAR2(72) := g_package||'delete_validate';
END delete_validate;