The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE DeleteCorrectionProcRuleRecs(
p_obj_def_id in number
);
PROCEDURE DeleteCorrectionProcTblsRecs(
p_obj_def_id in number
);
PROCEDURE DeleteObjectDefinition(
p_obj_def_id in number
)
IS
g_api_name constant varchar2(30) := 'DeleteObjectDefinition';
DeleteCorrectionProcRuleRecs(
p_obj_def_id => p_obj_def_id
);
DeleteCorrectionProcTblsRecs(
p_obj_def_id => p_obj_def_id
);
END DeleteObjectDefinition;
PROCEDURE DeleteCorrectionProcRuleRecs(
p_obj_def_id in number
)
--------------------------------------------------------------------------------
IS
BEGIN
delete from ftp_correction_proc_rule
where object_definition_id = p_obj_def_id;
END DeleteCorrectionProcRuleRecs;
PROCEDURE DeleteCorrectionProcTblsRecs(
p_obj_def_id in number
)
--------------------------------------------------------------------------------
IS
BEGIN
delete from ftp_correction_proc_tbls
where object_definition_id = p_obj_def_id;
END DeleteCorrectionProcTblsRecs;
insert into ftp_correction_proc_rule (
OBJECT_DEFINITION_ID
,FILTER_OBJECT_ID
,CREATION_DATE
,CREATED_BY
,LAST_UPDATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATE_LOGIN
,PREVIEW_FLAG
) select
p_target_obj_def_id
,FILTER_OBJECT_ID
,nvl(p_creation_date,creation_date)
,nvl(p_created_by,created_by)
,FND_GLOBAL.user_id
,sysdate
,FND_GLOBAL.user_id
,PREVIEW_FLAG
from ftp_correction_proc_rule
where object_definition_id = p_source_obj_def_id;
insert into ftp_correction_proc_tbls (
OBJECT_DEFINITION_ID
,TABLE_NAME
,CREATION_DATE
,CREATED_BY
,LAST_UPDATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATE_LOGIN
) select
p_target_obj_def_id
,TABLE_NAME
,nvl(p_creation_date,creation_date)
,nvl(p_created_by,created_by)
,FND_GLOBAL.user_id
,sysdate
,FND_GLOBAL.user_id
from ftp_correction_proc_tbls
where OBJECT_DEFINITION_ID = p_source_obj_def_id;