The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE DeleteCalRuleRec(
p_obj_def_id IN NUMBER
);
PROCEDURE DeleteObjectDefinition(
p_obj_def_id IN NUMBER
)
--------------------------------------------------------------------------------
IS
G_API_NAME CONSTANT VARCHAR2(30) := 'DeleteObjectDefinition';
DeleteCalRuleRec(
p_obj_def_id => p_obj_def_id
);
END DeleteObjectDefinition;
INSERT INTO PFT_PPROF_CALC_RULES (
PPROF_CALC_OBJ_DEF_ID
,VALUE_INDEX_FORMULA_ID
,CONDITION_OBJ_ID
,REGION_COUNTING_FLAG
,PROFT_PERCENTILE_FLAG
,VALUE_INDEX_FLAG
,PROSPECT_IDENT_FLAG
,HIERARCHY_OBJ_ID
,CUSTOMER_LEVEL
,OUTPUT_COLUMN
,CREATED_BY
,CREATION_DATE
,last_updated_by
,last_update_date
,last_update_login
,object_version_number
) SELECT
p_target_obj_def_id
,VALUE_INDEX_FORMULA_ID
,CONDITION_OBJ_ID
,REGION_COUNTING_FLAG
,PROFT_PERCENTILE_FLAG
,VALUE_INDEX_FLAG
,PROSPECT_IDENT_FLAG
,HIERARCHY_OBJ_ID
,CUSTOMER_LEVEL
,OUTPUT_COLUMN
,NVL(p_created_by,created_by)
,NVL(p_creation_date,creation_date)
,FND_GLOBAL.user_id
,SYSDATE
,FND_GLOBAL.login_id
,object_version_number
FROM PFT_PPROF_CALC_RULES
WHERE PPROF_CALC_OBJ_DEF_ID = p_source_obj_def_id;
PROCEDURE DeleteCalRuleRec(
p_obj_def_id IN NUMBER
)
--------------------------------------------------------------------------------
IS
BEGIN
DELETE FROM PFT_PPROF_CALC_RULES
WHERE PPROF_CALC_OBJ_DEF_ID = p_obj_def_id;
END DeleteCalRuleRec;