The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE DeleteAcctRelConsRec(
p_obj_def_id IN NUMBER
);
PROCEDURE DeleteObjectDefinition(
p_obj_def_id IN NUMBER
)
--------------------------------------------------------------------------------
IS
G_API_NAME CONSTANT VARCHAR2(30) := 'DeleteObjectDefinition';
DeleteAcctRelConsRec(
p_obj_def_id => p_obj_def_id
);
END DeleteObjectDefinition;
INSERT INTO PFT_ACCT_REL_CONS_RULES (
acct_rel_cons_obj_def_id
,processing_table
,condition_obj_id
,load_secondary_rel_flag
,created_by
,creation_date
,last_updated_by
,last_update_date
,last_update_login
,object_version_number
,col_tmplt_obj_id
) SELECT
p_target_obj_def_id
,processing_table
,condition_obj_id
,load_secondary_rel_flag
,NVL(p_created_by,created_by)
,NVL(p_creation_date,creation_date)
,FND_GLOBAL.user_id
,SYSDATE
,FND_GLOBAL.login_id
,object_version_number
,col_tmplt_obj_id
FROM pft_acct_rel_cons_rules
WHERE acct_rel_cons_obj_def_id = p_source_obj_def_id;
PROCEDURE DeleteAcctRelConsRec(
p_obj_def_id IN NUMBER
)
--------------------------------------------------------------------------------
IS
BEGIN
DELETE FROM pft_acct_rel_cons_rules
WHERE acct_rel_cons_obj_def_id = p_obj_def_id;
END DeleteAcctRelConsRec;