1: PACKAGE BODY jtf_rs_group_members_pub AS
2: /* $Header: jtfrspmb.pls 120.0 2005/05/11 08:21:16 appldev ship $ */
3:
4: /*****************************************************************************************
5: This package body defines the procedures for managing resource group members, like
7: Its main procedures are as following:
8: Create Resource Group Members
9: Delete Resource Group Members
10: This package validates the input parameters to these procedures and then
11: Calls corresponding procedures from jtf_rs_group_members_pvt
12: to do business validations and to do actual inserts and deletes into tables.
13: ******************************************************************************************/
14:
15: /* Package variables. */
13: ******************************************************************************************/
14:
15: /* Package variables. */
16:
17: G_PKG_NAME VARCHAR2(30) := 'JTF_RS_GROUP_MEMBERS_PUB';
18:
19:
20: /* Procedure to create the resource group members
21: based on input values passed by calling routines. */
23: PROCEDURE create_resource_group_members
24: (P_API_VERSION IN NUMBER,
25: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
26: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
27: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
28: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
29: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
30: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
31: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
25: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
26: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
27: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
28: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
29: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
30: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
31: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
32: X_MSG_COUNT OUT NOCOPY NUMBER,
33: X_MSG_DATA OUT NOCOPY VARCHAR2,
30: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
31: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
32: X_MSG_COUNT OUT NOCOPY NUMBER,
33: X_MSG_DATA OUT NOCOPY VARCHAR2,
34: X_GROUP_MEMBER_ID OUT NOCOPY JTF_RS_GROUP_MEMBERS.GROUP_MEMBER_ID%TYPE
35: ) IS
36:
37:
38: l_api_version CONSTANT NUMBER := 1.0;
36:
37:
38: l_api_version CONSTANT NUMBER := 1.0;
39: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_RESOURCE_GROUP_MEMBERS';
40: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
41: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
42: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
43: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
44: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
38: l_api_version CONSTANT NUMBER := 1.0;
39: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_RESOURCE_GROUP_MEMBERS';
40: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
41: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
42: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
43: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
44: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
45:
46: l_group_id_out jtf_rs_group_members.group_id%TYPE;
40: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
41: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
42: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
43: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
44: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
45:
46: l_group_id_out jtf_rs_group_members.group_id%TYPE;
47: l_resource_id_out jtf_rs_group_members.resource_id%type;
48:
42: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
43: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
44: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
45:
46: l_group_id_out jtf_rs_group_members.group_id%TYPE;
47: l_resource_id_out jtf_rs_group_members.resource_id%type;
48:
49: BEGIN
50:
43: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
44: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
45:
46: l_group_id_out jtf_rs_group_members.group_id%TYPE;
47: l_resource_id_out jtf_rs_group_members.resource_id%type;
48:
49: BEGIN
50:
51:
120: END; /* End of Resource Validation */
121:
122:
123:
124: jtf_rs_group_members_pvt.create_resource_group_members
125: (P_API_VERSION => 1,
126: P_INIT_MSG_LIST => fnd_api.g_false,
127: P_COMMIT => fnd_api.g_false,
128: P_GROUP_ID => l_group_id,
198: PROCEDURE update_resource_group_members
199: (P_API_VERSION IN NUMBER,
200: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
201: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
202: P_GROUP_MEMBER_ID IN JTF_RS_GROUP_MEMBERS.GROUP_MEMBER_ID%TYPE,
203: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
204: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
205: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
206: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
199: (P_API_VERSION IN NUMBER,
200: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
201: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
202: P_GROUP_MEMBER_ID IN JTF_RS_GROUP_MEMBERS.GROUP_MEMBER_ID%TYPE,
203: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
204: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
205: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
206: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
207: P_OBJECT_VERSION_NUMBER IN OUT NOCOPY JTF_RS_GROUP_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
201: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
202: P_GROUP_MEMBER_ID IN JTF_RS_GROUP_MEMBERS.GROUP_MEMBER_ID%TYPE,
203: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
204: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
205: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
206: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
207: P_OBJECT_VERSION_NUMBER IN OUT NOCOPY JTF_RS_GROUP_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
208: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
209: X_MSG_COUNT OUT NOCOPY NUMBER,
203: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
204: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
205: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
206: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
207: P_OBJECT_VERSION_NUMBER IN OUT NOCOPY JTF_RS_GROUP_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
208: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
209: X_MSG_COUNT OUT NOCOPY NUMBER,
210: X_MSG_DATA OUT NOCOPY VARCHAR2
211: ) IS
212:
213:
214: l_api_version CONSTANT NUMBER := 1.0;
215: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_RESOURCE_GROUP_MEMBERS';
216: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
217: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
218: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
219: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
220: l_group_member_id jtf_rs_group_members.group_member_id%TYPE := p_group_member_id;
214: l_api_version CONSTANT NUMBER := 1.0;
215: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_RESOURCE_GROUP_MEMBERS';
216: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
217: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
218: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
219: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
220: l_group_member_id jtf_rs_group_members.group_member_id%TYPE := p_group_member_id;
221:
222: l_group_id_out jtf_rs_group_members.group_id%TYPE;
216: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
217: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
218: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
219: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
220: l_group_member_id jtf_rs_group_members.group_member_id%TYPE := p_group_member_id;
221:
222: l_group_id_out jtf_rs_group_members.group_id%TYPE;
223: l_resource_id_out jtf_rs_group_members.resource_id%type;
224:
218: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
219: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
220: l_group_member_id jtf_rs_group_members.group_member_id%TYPE := p_group_member_id;
221:
222: l_group_id_out jtf_rs_group_members.group_id%TYPE;
223: l_resource_id_out jtf_rs_group_members.resource_id%type;
224:
225: BEGIN
226:
219: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
220: l_group_member_id jtf_rs_group_members.group_member_id%TYPE := p_group_member_id;
221:
222: l_group_id_out jtf_rs_group_members.group_id%TYPE;
223: l_resource_id_out jtf_rs_group_members.resource_id%type;
224:
225: BEGIN
226:
227:
295: END; /* End of Resource Validation */
296:
297:
298:
299: jtf_rs_group_members_pvt.update_resource_group_members
300: (P_API_VERSION => 1,
301: P_INIT_MSG_LIST => fnd_api.g_false,
302: P_COMMIT => fnd_api.g_false,
303: P_GROUP_MEMBER_ID => l_group_member_id,
374: PROCEDURE delete_resource_group_members
375: (P_API_VERSION IN NUMBER,
376: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
377: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
378: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
379: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
380: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
381: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
382: P_OBJECT_VERSION_NUM IN JTF_RS_GROUP_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
376: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
377: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
378: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
379: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
380: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
381: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
382: P_OBJECT_VERSION_NUM IN JTF_RS_GROUP_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
383: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
384: X_MSG_COUNT OUT NOCOPY NUMBER,
378: P_GROUP_ID IN JTF_RS_GROUP_MEMBERS.GROUP_ID%TYPE,
379: P_GROUP_NUMBER IN JTF_RS_GROUPS_VL.GROUP_NUMBER%TYPE,
380: P_RESOURCE_ID IN JTF_RS_GROUP_MEMBERS.RESOURCE_ID%TYPE,
381: P_RESOURCE_NUMBER IN JTF_RS_RESOURCE_EXTNS.RESOURCE_NUMBER%TYPE,
382: P_OBJECT_VERSION_NUM IN JTF_RS_GROUP_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
383: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
384: X_MSG_COUNT OUT NOCOPY NUMBER,
385: X_MSG_DATA OUT NOCOPY VARCHAR2
386: ) IS
386: ) IS
387:
388: l_api_version CONSTANT NUMBER := 1.0;
389: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_RESOURCE_GROUP_MEMBERS';
390: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
391: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
392: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
393: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
394: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
388: l_api_version CONSTANT NUMBER := 1.0;
389: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_RESOURCE_GROUP_MEMBERS';
390: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
391: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
392: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
393: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
394: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
395: l_group_id_out jtf_rs_group_members.group_id%TYPE;
396: l_resource_id_out jtf_rs_group_members.resource_id%type;
390: l_group_id jtf_rs_group_members.group_id%TYPE := p_group_id;
391: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
392: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
393: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
394: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
395: l_group_id_out jtf_rs_group_members.group_id%TYPE;
396: l_resource_id_out jtf_rs_group_members.resource_id%type;
397:
398:
391: l_group_number jtf_rs_groups_vl.group_number%TYPE := p_group_number;
392: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
393: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
394: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
395: l_group_id_out jtf_rs_group_members.group_id%TYPE;
396: l_resource_id_out jtf_rs_group_members.resource_id%type;
397:
398:
399: CURSOR c_resource_id IS
392: l_resource_id jtf_rs_group_members.resource_id%type := p_resource_id;
393: l_resource_number jtf_rs_resource_extns.resource_number%type := p_resource_number;
394: l_group_member_id jtf_rs_group_members.group_member_id%TYPE;
395: l_group_id_out jtf_rs_group_members.group_id%TYPE;
396: l_resource_id_out jtf_rs_group_members.resource_id%type;
397:
398:
399: CURSOR c_resource_id IS
400: SELECT resource_id
515: END;
516:
517: /* Call the private procedure for delete */
518:
519: jtf_rs_group_members_pvt.delete_resource_group_members
520: (P_API_VERSION => 1,
521: P_INIT_MSG_LIST => fnd_api.g_false,
522: P_COMMIT => fnd_api.g_false,
523: P_GROUP_ID => l_group_id,
586: END delete_resource_group_members;
587:
588:
589:
590: END jtf_rs_group_members_pub;