The following lines contain the word 'select', 'insert', 'update' or 'delete':
select line, text
from user_errors
where name = p_pkg_name
and type = decode(p_is_pkg_body,'FALSE','PACKAGE',
'TRUE','PACKAGE BODY');
PROCEDURE Update_Validation_Pkgs_Table
( l_sql_stmt VARCHAR2
)
IS
BEGIN
PUT_LINE('Execute Control Tbl Insert/Update Script');
END Update_Validation_Pkgs_Table;
SELECT distinct
ve.application_id,
ve.application_short_name,
ve.entity_id,
ve.db_object_name,
ve.entity_short_name,
ve.entity_display_name,
ve.validation_entity_id,
ve.validation_db_object_name,
ve.validation_entity_short_name,
ve.VALIDATION_ENTITY_DISPLAY_NAME,
vt.validation_tmplt_id,
vt.validation_tmplt_short_name,
vt.validation_tmplt_display_name,
rs.record_set_id,
rs.record_set_short_name,
rs.record_set_display_name
FROM oe_pc_vtmplts_vl vt,
oe_pc_rsets_vl rs,
oe_pc_ventities_v ve
WHERE ve.validation_entity_id = vt.entity_id
AND vt.validation_type <> 'API'
AND ve.validation_entity_id = rs.entity_id
-- Fix bug 1260054: if validating entity <> validation entity,
-- then generate packages only for the primary key record set
AND (ve.entity_id = ve.validation_entity_id
OR (ve.entity_id <> ve.validation_entity_id
AND rs.pk_record_set_flag = 'Y'))
AND (ve.entity_id, ve.validation_entity_id,
vt.validation_tmplt_id, rs.record_set_id)
NOT IN
(SELECT vp.validating_entity_id, vp.validation_entity_id,
vp.validation_tmplt_id, vp.record_set_id
FROM OE_PC_VALIDATION_PKGS vp
WHERE vp.validating_entity_id = ve.entity_id
AND vp.validation_entity_id = ve.validation_entity_id
AND vp.validation_tmplt_id = vt.validation_tmplt_id
AND vp.record_set_id = rs.record_set_id
AND vp.last_update_date > vt.last_update_date
AND vp.last_update_date > rs.last_update_date);
IF substr(l_control_tbl_sql,1,6) = 'INSERT' THEN
PUT_LINE('Execute Control Tbl Insert Script');
ELSIF substr(l_control_tbl_sql,1,6) = 'UPDATE' THEN
PUT_LINE('Execute Control Tbl Update Script');