The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* FOR INSERT */
PROCEDURE INSERT_ROLE_RELATE(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_ROLE_RELATE_ID IN NUMBER,
P_ROLE_RESOURCE_TYPE IN VARCHAR2,
P_ROLE_RESOURCE_ID IN NUMBER,
P_ROLE_ID IN NUMBER,
P_START_DATE_ACTIVE IN DATE,
P_END_DATE_ACTIVE IN DATE,
P_OBJECT_VERSION_NUMBER IN NUMBER,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2 )
IS
l_role_relate_aud_id jtf_rs_role_relate_aud.role_relate_audit_id%type;
l_api_name CONSTANT VARCHAR2(30) := 'INSERT_ROLE_RELATE';
select jtf_rs_role_relate_aud_s.nextval
into l_role_relate_aud_id
from dual;
JTF_RS_ROLE_RELATE_AUD_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_ROLE_RELATE_AUDIT_ID => l_role_relate_aud_id,
X_ROLE_RELATE_ID => p_role_relate_id,
X_NEW_ROLE_RESOURCE_TYPE => p_role_resource_type,
X_OLD_ROLE_RESOURCE_TYPE => null,
X_NEW_ROLE_RESOURCE_ID => p_role_resource_id,
X_OLD_ROLE_RESOURCE_ID => null,
X_NEW_ROLE_ID => p_role_id,
X_OLD_ROLE_ID => null,
X_NEW_START_DATE_ACTIVE => p_start_date_active,
X_OLD_START_DATE_ACTIVE => null,
X_NEW_END_DATE_ACTIVE => p_end_date_active,
X_OLD_END_DATE_ACTIVE => null,
X_NEW_OBJECT_VERSION_NUMBER => p_object_version_number,
X_OLD_OBJECT_VERSION_NUMBER => null,
X_CREATION_DATE => l_date,
X_CREATED_BY => l_user_id,
X_LAST_UPDATE_DATE => l_date,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => l_login_id
);
END INSERT_ROLE_RELATE;
/*FOR UPDATE */
PROCEDURE UPDATE_ROLE_RELATE(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_ROLE_RELATE_ID IN NUMBER,
P_ROLE_RESOURCE_TYPE IN VARCHAR2,
P_ROLE_RESOURCE_ID IN NUMBER,
P_ROLE_ID IN NUMBER,
P_START_DATE_ACTIVE IN DATE,
P_END_DATE_ACTIVE IN DATE,
P_OBJECT_VERSION_NUMBER IN NUMBER,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2)
IS
CURSOR rr_old_cur(l_role_relate_id JTF_RS_ROLE_RELATIONS.ROLE_RELATE_ID%TYPE)
IS
SELECT role_resource_id,
role_resource_type,
role_id,
start_date_active,
end_date_active,
object_version_number
FROM jtf_rs_role_relations
WHERE role_relate_id = l_role_relate_id;
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_ROLE_RELATE';
select jtf_rs_role_relate_aud_s.nextval
into l_role_relate_aud_id
from dual;
JTF_RS_ROLE_RELATE_AUD_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_ROLE_RELATE_AUDIT_ID => l_role_relate_aud_id,
X_ROLE_RELATE_ID => p_role_relate_id,
X_NEW_ROLE_RESOURCE_TYPE => l_role_resource_type_n,
X_OLD_ROLE_RESOURCE_TYPE => l_role_resource_type,
X_NEW_ROLE_RESOURCE_ID => l_role_resource_id_n,
X_OLD_ROLE_RESOURCE_ID => l_role_resource_id,
X_NEW_ROLE_ID => l_role_id_n,
X_OLD_ROLE_ID => l_role_id,
X_NEW_START_DATE_ACTIVE => l_start_date_active_n,
X_OLD_START_DATE_ACTIVE => l_start_date_active,
X_NEW_END_DATE_ACTIVE => l_end_date_active_n,
X_OLD_END_DATE_ACTIVE => l_end_date_active,
X_NEW_OBJECT_VERSION_NUMBER => l_object_version_number_n,
X_OLD_OBJECT_VERSION_NUMBER => l_object_version_number,
X_CREATION_DATE => l_date,
X_CREATED_BY => l_user_id,
X_LAST_UPDATE_DATE => l_date,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => l_login_id
);
END UPDATE_ROLE_RELATE;
PROCEDURE DELETE_ROLE_RELATE(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_ROLE_RELATE_ID IN NUMBER,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2 )
IS
CURSOR rr_old_cur(l_role_relate_id JTF_RS_ROLE_RELATIONS.ROLE_RELATE_ID%TYPE)
IS
SELECT role_resource_id,
role_resource_type,
role_id,
start_date_active,
end_date_active,
object_version_number
FROM jtf_rs_role_relations
WHERE role_relate_id = l_role_relate_id;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_ROLE_RELATE';
select jtf_rs_role_relate_aud_s.nextval
into l_role_relate_aud_id
from dual;
JTF_RS_ROLE_RELATE_AUD_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_ROLE_RELATE_AUDIT_ID => l_role_relate_aud_id,
X_ROLE_RELATE_ID => p_role_relate_id,
X_NEW_ROLE_RESOURCE_TYPE => null,
X_OLD_ROLE_RESOURCE_TYPE => l_role_resource_type,
X_NEW_ROLE_RESOURCE_ID => null,
X_OLD_ROLE_RESOURCE_ID => l_role_resource_id,
X_NEW_ROLE_ID => null,
X_OLD_ROLE_ID => l_role_id,
X_NEW_START_DATE_ACTIVE => null,
X_OLD_START_DATE_ACTIVE => l_start_date_active,
X_NEW_END_DATE_ACTIVE => null,
X_OLD_END_DATE_ACTIVE => l_end_date_active,
X_NEW_OBJECT_VERSION_NUMBER =>null,
X_OLD_OBJECT_VERSION_NUMBER => l_object_version_number,
X_CREATION_DATE => l_date,
X_CREATED_BY => l_user_id,
X_LAST_UPDATE_DATE => l_date,
X_LAST_UPDATED_BY => l_user_id,
X_LAST_UPDATE_LOGIN => l_login_id
);
END DELETE_ROLE_RELATE;