The following lines contain the word 'select', 'insert', 'update' or 'delete':
Update skill levels
Delete skill levels
Calls to these procedures will invoke procedures from JTF_RS_SKILL_LEVELS_PUB
to do business validations and to do actual inserts, updates and deletes into tables.
******************************************************************************************/
/* Package variables. */
G_PKG_NAME VARCHAR2(30) := 'JTF_RS_SKILL_LEVELS_PVT';
select * from
jtf_rs_skill_levels_b where
skill_level = ll_skill_level and
skill_level_id <> ll_skill_level_id;
select * from
jtf_rs_skill_levels_tl where
upper(level_name) = upper(ll_level_name) and
skill_level_id <> ll_skill_level_id;
SELECT jtf_rs_skill_levels_s.nextval
INTO l_skill_level_id
FROM dual;
JTF_RS_SKILL_LEVELS_PKG.INSERT_ROW(
X_ROWID => l_rowid,
X_SKILL_LEVEL_ID => l_skill_level_id,
X_SKILL_LEVEL => p_skill_level,
X_LEVEL_NAME => p_level_name,
X_LEVEL_DESC => p_level_desc,
X_OBJECT_VERSION_NUMBER => l_object_version_number,
X_ATTRIBUTE1 => p_attribute1,
X_ATTRIBUTE2 => p_attribute2,
X_ATTRIBUTE3 => p_attribute3,
X_ATTRIBUTE4 => p_attribute4,
X_ATTRIBUTE5 => p_attribute5,
X_ATTRIBUTE6 => p_attribute6,
X_ATTRIBUTE7 => p_attribute7,
X_ATTRIBUTE8 => p_attribute8,
X_ATTRIBUTE9 => p_attribute9,
X_ATTRIBUTE10 => p_attribute10,
X_ATTRIBUTE11 => p_attribute11,
X_ATTRIBUTE12 => p_attribute12,
X_ATTRIBUTE13 => p_attribute13,
X_ATTRIBUTE14 => p_attribute14,
X_ATTRIBUTE15 => p_attribute15,
X_ATTRIBUTE_CATEGORY => p_attribute_category,
X_CREATION_DATE => sysdate,
X_CREATED_BY => l_user_id,
X_LAST_UPDATE_DATE => sysdate,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => 0);
/* Procedure to update skill levels
based on input values passed by calling routines. */
PROCEDURE update_skills
(P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_SKILL_LEVEL_ID IN JTF_RS_SKILL_LEVELS_B.SKILL_LEVEL_ID%TYPE,
P_SKILL_LEVEL IN JTF_RS_SKILL_LEVELS_B.SKILL_LEVEL%TYPE,
P_LEVEL_NAME IN JTF_RS_SKILL_LEVELS_TL.LEVEL_NAME%TYPE,
P_LEVEL_DESC IN JTF_RS_SKILL_LEVELS_TL.LEVEL_DESC%TYPE,
P_OBJECT_VERSION_NUM IN OUT NOCOPY JTF_RS_SKILL_LEVELS_B.OBJECT_VERSION_NUMBER%TYPE,
P_ATTRIBUTE1 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE1%TYPE,
P_ATTRIBUTE2 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE2%TYPE,
P_ATTRIBUTE3 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE3%TYPE,
P_ATTRIBUTE4 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE4%TYPE,
P_ATTRIBUTE5 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE5%TYPE,
P_ATTRIBUTE6 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE6%TYPE,
P_ATTRIBUTE7 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE7%TYPE,
P_ATTRIBUTE8 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE8%TYPE,
P_ATTRIBUTE9 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE9%TYPE,
P_ATTRIBUTE10 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE10%TYPE,
P_ATTRIBUTE11 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE11%TYPE,
P_ATTRIBUTE12 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE12%TYPE,
P_ATTRIBUTE13 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE13%TYPE,
P_ATTRIBUTE14 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE14%TYPE,
P_ATTRIBUTE15 IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE15%TYPE,
P_ATTRIBUTE_CATEGORY IN JTF_RS_SKILL_LEVELS_B.ATTRIBUTE_CATEGORY%TYPE,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2
)IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_SKILLS';
SELECT *
FROM jtf_rs_skill_levels_vl
WHERE skill_level_id = ll_skill_level_id;
jtf_rs_skill_levels_pkg.update_row(
X_SKILL_LEVEL_ID => l_skill_level_id,
X_SKILL_LEVEL => l_skill_level,
X_LEVEL_NAME => l_level_name,
X_LEVEL_DESC => l_level_desc,
X_OBJECT_VERSION_NUMBER => l_object_version_number,
X_ATTRIBUTE1 => l_attribute1,
X_ATTRIBUTE2 => l_attribute2,
X_ATTRIBUTE3 => l_attribute3,
X_ATTRIBUTE4 => l_attribute4,
X_ATTRIBUTE5 => l_attribute5,
X_ATTRIBUTE6 => l_attribute6,
X_ATTRIBUTE7 => l_attribute7,
X_ATTRIBUTE8 => l_attribute8,
X_ATTRIBUTE9 => l_attribute9,
X_ATTRIBUTE10 => l_attribute10,
X_ATTRIBUTE11 => l_attribute11,
X_ATTRIBUTE12 => l_attribute12,
X_ATTRIBUTE13 => l_attribute13,
X_ATTRIBUTE14 => l_attribute14,
X_ATTRIBUTE15 => l_attribute15,
X_ATTRIBUTE_CATEGORY => l_attribute_category,
X_LAST_UPDATE_DATE => l_date,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => l_login_id);
END update_skills;
/* Procedure to delete the skill levels */
PROCEDURE delete_skills
(P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_SKILL_LEVEL_ID IN JTF_RS_SKILL_LEVELS_B.skill_level_id%TYPE,
P_OBJECT_VERSION_NUM IN JTF_RS_SKILL_LEVELS_B.OBJECT_VERSION_NUMBER%TYPE,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2
)IS
CURSOR chk_skill_exist_cur(ll_skill_level_id JTF_RS_SKILL_LEVELS_B.skill_level_id%TYPE)
IS
SELECT skill_level_id
FROM JTF_RS_SKILL_LEVELS_B
WHERE skill_level_id = ll_skill_level_id;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_SKILLS';
JTF_RS_SKILL_LEVELS_PKG.DELETE_ROW(
X_SKILL_LEVEL_ID => l_skill_level_id);
END delete_skills;