The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT jtf_dsp_tpl_ctg_s1.NEXTVAL
FROM DUAL;
INSERT INTO JTF_DSP_TPL_CTG (
TPL_CTG_ID,
OBJECT_VERSION_NUMBER,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ITEM_ID,
CATEGORY_ID
)
VALUES (
l_dsp_tpl_seq_id,
1,
SYSDATE,
FND_GLOBAL.user_id,
SYSDATE,
FND_GLOBAL.user_id,
FND_GLOBAL.user_id,
p_template_id,
p_category_id);
---dbms_output.put_line('insert record ' || p_template_id || '0-0'|| p_category_id);
PROCEDURE delete_tpl_ctg_relation(
p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2 := FND_API.g_false,
p_commit IN VARCHAR2 := FND_API.g_false,
x_return_status OUT VARCHAR2,
x_msg_count OUT NUMBER,
x_msg_data OUT VARCHAR2,
p_tpl_ctg_id_tbl IN tpl_ctg_id_TBL_TYPE
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'delete_tpl_ctg_relation';
SELECT category_id ,ITEM_ID from jtf_dsp_tpl_ctg where
tpl_ctg_id = p_tpl_ctg_id;
SAVEPOINT delete_tpl_ctg_relation;
SAVEPOINT delete_ctg_relation;
DELETE FROM JTF_DSP_TPL_CTG WHERE
TPL_CTG_ID = p_tpl_ctg_id_tbl(l_index);
JTF_LogicalContent_grp.delete_category_dlv( l_category_id,
l_deliverable_id);
ROLLBACK TO delete_ctg_relation;
ROLLBACK TO delete_tpl_ctg_relation;
ROLLBACK TO delete_tpl_ctg_relation;
ROLLBACK TO delete_tpl_ctg_relation;
END delete_tpl_ctg_relation;
PROCEDURE delete_deliverable(
p_template_id IN NUMBER
)
IS
BEGIN
--------------------- initialize -----------------------
SAVEPOINT delete_deliverable;
delete from jtf_dsp_tpl_ctg where
item_id = p_template_id;
ROLLBACK TO delete_deliverable;
END delete_deliverable;
PROCEDURE delete_category(
p_category_id IN NUMBER
)
IS
BEGIN
--------------------- initialize -----------------------
SAVEPOINT delete_category;
delete from jtf_dsp_tpl_ctg where
category_id = p_category_id;
ROLLBACK TO delete_category;
END delete_category;