The following lines contain the word 'select', 'insert', 'update' or 'delete':
Update Resource Group Relate
Delete Resource Group Relate
This package validates the input parameters to these procedures and then
Calls corresponding procedures from jtf_rs_group_relate_pvt to do business
validations and to do actual inserts, updates and deletes into tables.
******************************************************************************************/
/* Package variables. */
G_PKG_NAME VARCHAR2(30) := 'JTF_RS_GROUP_RELATE_PUB';
SELECT group_id
FROM jtf_rs_groups_b
WHERE group_id = l_group_id
OR group_number = l_group_number;
SELECT 'X'
FROM fnd_lookups
WHERE lookup_type = 'JTF_RS_RELATION_TYPE'
AND UPPER(lookup_code) = UPPER(l_relation_type);
/* Procedure to update the resource group relation
based on input values passed by calling routines. */
PROCEDURE update_resource_group_relate
(P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
P_GROUP_RELATE_ID IN JTF_RS_GRP_RELATIONS.GROUP_RELATE_ID%TYPE,
P_START_DATE_ACTIVE IN JTF_RS_GRP_RELATIONS.START_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
P_END_DATE_ACTIVE IN JTF_RS_GRP_RELATIONS.END_DATE_ACTIVE%TYPE DEFAULT FND_API.G_MISS_DATE,
P_OBJECT_VERSION_NUM IN OUT NOCOPY 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_api_name CONSTANT VARCHAR2(30) := 'UPDATE_RESOURCE_GROUP_RELATE';
SELECT 'X'
FROM jtf_rs_grp_relations
where group_relate_id = l_group_relate_id;
jtf_rs_group_relate_pvt.update_resource_group_relate(
P_API_VERSION => 1.0,
P_INIT_MSG_LIST => p_init_msg_list,
P_COMMIT => null,
P_GROUP_RELATE_ID => l_group_relate_id,
P_START_DATE_ACTIVE => p_start_date_active,
P_END_DATE_ACTIVE => p_end_date_active,
P_OBJECT_VERSION_NUM => l_object_version_number,
X_RETURN_STATUS => l_return_status,
X_MSG_COUNT => l_msg_count,
X_MSG_DATA => l_msg_data );
END update_resource_group_relate;
/* Procedure to delete the resource group relation. */
PROCEDURE delete_resource_group_relate
(P_API_VERSION IN NUMBER,
P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
P_GROUP_RELATE_ID IN JTF_RS_GRP_RELATIONS.GROUP_RELATE_ID%TYPE,
P_OBJECT_VERSION_NUM IN JTF_RS_GROUPS_VL.OBJECT_VERSION_NUMBER%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) := 'DELETE_RESOURCE_GROUP_RELATE';
SELECT 'X'
FROM jtf_rs_grp_relations
where group_relate_id = l_group_relate_id;
jtf_rs_group_relate_pvt.delete_resource_group_relate(
P_API_VERSION => 1.0,
P_INIT_MSG_LIST => p_init_msg_list,
P_COMMIT => null,
P_GROUP_RELATE_ID => p_group_relate_id,
P_OBJECT_VERSION_NUM => l_object_version_number,
X_RETURN_STATUS => l_return_status,
X_MSG_COUNT => l_msg_count,
X_MSG_DATA => l_msg_data );
END delete_resource_group_relate;