The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* FOR INSERT */
PROCEDURE INSERT_GROUP_RELATE(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_GROUP_RELATE_ID IN JTF_RS_GRP_RELATIONS.GROUP_RELATE_ID %TYPE,
P_GROUP_ID IN JTF_RS_GRP_RELATIONS.GROUP_ID %TYPE,
P_RELATED_GROUP_ID IN JTF_RS_GRP_RELATIONS.RELATED_GROUP_ID%TYPE,
P_RELATION_TYPE IN JTF_RS_GRP_RELATIONS.RELATION_TYPE%TYPE,
P_START_DATE_ACTIVE IN JTF_RS_GRP_RELATIONS.START_DATE_ACTIVE%TYPE,
P_END_DATE_ACTIVE IN JTF_RS_GRP_RELATIONS.END_DATE_ACTIVE%TYPE,
P_OBJECT_VERSION_NUMBER IN JTF_RS_GRP_RELATIONS.OBJECT_VERSION_NUMBER%TYPE,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2 )
IS
l_group_relate_aud_id jtf_rs_grp_relate_aud.group_relate_audit_id%type;
l_api_name CONSTANT VARCHAR2(30) := 'INSERT_GROUP_RELATE';
select jtf_rs_grp_relate_aud_s.nextval
into l_group_relate_aud_id
from dual;
JTF_RS_GRP_RELATE_AUD_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_group_RELATE_AUDIT_ID => l_group_relate_aud_id,
X_group_RELATE_ID => p_group_relate_id,
X_NEW_GROUP_ID => p_group_id,
X_OLD_GROUP_ID => null,
X_NEW_RELATED_GROUP_ID => p_related_group_id,
X_OLD_RELATED_GROUP_ID => null,
x_NEW_RELATION_TYPE => p_relation_type,
x_OLD_RELATION_TYPE => 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_GROUP_RELATE;
/*FOR UPDATE */
PROCEDURE UPDATE_group_RELATE(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_GROUP_RELATE_ID IN JTF_RS_GRP_RELATIONS.GROUP_RELATE_ID %TYPE,
P_GROUP_ID IN JTF_RS_GRP_RELATIONS.GROUP_ID %TYPE,
P_RELATED_GROUP_ID IN JTF_RS_GRP_RELATIONS.RELATED_GROUP_ID%TYPE,
P_RELATION_TYPE IN JTF_RS_GRP_RELATIONS.RELATION_TYPE%TYPE,
P_START_DATE_ACTIVE IN JTF_RS_GRP_RELATIONS.START_DATE_ACTIVE%TYPE,
P_END_DATE_ACTIVE IN JTF_RS_GRP_RELATIONS.END_DATE_ACTIVE%TYPE,
P_OBJECT_VERSION_NUMBER IN JTF_RS_GRP_RELATIONS.OBJECT_VERSION_NUMBER%TYPE,
X_RETURN_STATUS OUT NOCOPY VARCHAR2,
X_MSG_COUNT OUT NOCOPY NUMBER,
X_MSG_DATA OUT NOCOPY VARCHAR2 )
IS
CURSOR rr_old_cur(l_group_relate_id JTF_RS_grp_RELATIONS.group_RELATE_ID%TYPE)
IS
SELECT group_id,
related_group_id,
relation_type,
start_date_active,
end_date_active,
object_version_number
FROM jtf_rs_grp_relations
WHERE group_relate_id = l_group_relate_id;
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_GROUP_RELATE';
select jtf_rs_grp_relate_aud_s.nextval
into l_group_relate_aud_id
from dual;
JTF_RS_GRP_RELATE_AUD_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_group_RELATE_AUDIT_ID => l_group_relate_aud_id,
X_group_RELATE_ID => p_group_relate_id,
X_NEW_group_ID => l_group_id_n,
X_OLD_group_ID => l_group_id,
X_NEW_RELATED_GROUP_ID => l_related_group_id_n,
X_OLD_RELATED_GROUP_ID => l_related_group_id,
x_NEW_RELATION_TYPE => l_relation_type_n,
x_OLD_RELATION_TYPE => l_relation_type,
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_group_RELATE;
PROCEDURE DELETE_group_RELATE(
P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2,
P_COMMIT IN VARCHAR2,
P_GROUP_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_group_relate_id JTF_RS_GRP_RELATIONS.group_RELATE_ID%TYPE)
IS
SELECT group_id,
related_group_id,
relation_type,
start_date_active,
end_date_active,
object_version_number
FROM jtf_rs_grp_relations
WHERE group_relate_id = l_group_relate_id;
l_api_name CONSTANT VARCHAR2(30) := 'DELETE_GROUP_RELATE';
select jtf_rs_grp_relate_aud_s.nextval
into l_group_relate_aud_id
from dual;
JTF_RS_GRP_RELATE_AUD_PKG.INSERT_ROW (
X_ROWID => l_row_id,
X_group_RELATE_AUDIT_ID => l_group_relate_aud_id,
X_group_RELATE_ID => p_group_relate_id,
X_NEW_group_ID =>null,
X_OLD_group_ID => l_group_id,
X_NEW_RELATED_GROUP_ID => null,
X_OLD_RELATED_GROUP_ID => l_related_group_id,
x_NEW_RELATION_TYPE => null,
x_OLD_RELATION_TYPE => l_relation_type,
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_group_RELATE;