1: PACKAGE BODY jtf_rs_team_members_pub AS
2: /* $Header: jtfrspeb.pls 120.0 2005/05/11 08:21:06 appldev ship $ */
3:
4: /*****************************************************************************************
5: This package body defines the procedures for managing resource team members, like
8: Create Resource Team Members
9: Update Resource Team Members
10: Delete Resource Team Members
11: This package validates the input parameters to these procedures and then
12: Calls corresponding procedures from jtf_rs_team_members_pvt
13: to do business validations and to do actual inserts, updates and deletes into tables.
14: ******************************************************************************************/
15:
16: /* Package variables. */
14: ******************************************************************************************/
15:
16: /* Package variables. */
17:
18: G_PKG_NAME VARCHAR2(30) := 'JTF_RS_TEAM_MEMBERS_PUB';
19:
20:
21: /* Procedure to create the resource team members
22: based on input values passed by calling routines. */
24: PROCEDURE create_resource_team_members
25: (P_API_VERSION IN NUMBER,
26: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
27: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
28: P_TEAM_ID IN JTF_RS_TEAM_MEMBERS.TEAM_ID%TYPE,
29: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
30: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
31: P_TEAM_RESOURCE_NUMBER IN NUMBER,
32: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
26: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
27: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
28: P_TEAM_ID IN JTF_RS_TEAM_MEMBERS.TEAM_ID%TYPE,
29: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
30: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
31: P_TEAM_RESOURCE_NUMBER IN NUMBER,
32: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
33: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
34: X_MSG_COUNT OUT NOCOPY NUMBER,
28: P_TEAM_ID IN JTF_RS_TEAM_MEMBERS.TEAM_ID%TYPE,
29: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
30: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
31: P_TEAM_RESOURCE_NUMBER IN NUMBER,
32: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
33: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
34: X_MSG_COUNT OUT NOCOPY NUMBER,
35: X_MSG_DATA OUT NOCOPY VARCHAR2,
36: X_TEAM_MEMBER_ID OUT NOCOPY JTF_RS_TEAM_MEMBERS.TEAM_MEMBER_ID%TYPE
32: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
33: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
34: X_MSG_COUNT OUT NOCOPY NUMBER,
35: X_MSG_DATA OUT NOCOPY VARCHAR2,
36: X_TEAM_MEMBER_ID OUT NOCOPY JTF_RS_TEAM_MEMBERS.TEAM_MEMBER_ID%TYPE
37: ) IS
38:
39: l_api_version CONSTANT NUMBER := 1.0;
40: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_RESOURCE_TEAM_MEMBERS';
37: ) IS
38:
39: l_api_version CONSTANT NUMBER := 1.0;
40: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_RESOURCE_TEAM_MEMBERS';
41: l_team_id jtf_rs_team_members.team_id%TYPE := p_team_id;
42: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
43: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
44: l_team_resource_number NUMBER := p_team_resource_number;
45: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
39: l_api_version CONSTANT NUMBER := 1.0;
40: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_RESOURCE_TEAM_MEMBERS';
41: l_team_id jtf_rs_team_members.team_id%TYPE := p_team_id;
42: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
43: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
44: l_team_resource_number NUMBER := p_team_resource_number;
45: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
46: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
47:
41: l_team_id jtf_rs_team_members.team_id%TYPE := p_team_id;
42: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
43: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
44: l_team_resource_number NUMBER := p_team_resource_number;
45: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
46: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
47:
48: l_team_id_out jtf_rs_team_members.team_id%TYPE;
49: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
42: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
43: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
44: l_team_resource_number NUMBER := p_team_resource_number;
45: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
46: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
47:
48: l_team_id_out jtf_rs_team_members.team_id%TYPE;
49: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
50:
44: l_team_resource_number NUMBER := p_team_resource_number;
45: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
46: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
47:
48: l_team_id_out jtf_rs_team_members.team_id%TYPE;
49: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
50:
51: BEGIN
52:
45: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
46: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
47:
48: l_team_id_out jtf_rs_team_members.team_id%TYPE;
49: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
50:
51: BEGIN
52:
53:
161:
162: END IF; /* End of Resource Validation */
163:
164:
165: jtf_rs_team_members_pvt.create_resource_team_members
166: (P_API_VERSION => 1,
167: P_INIT_MSG_LIST => fnd_api.g_false,
168: P_COMMIT => fnd_api.g_false,
169: P_TEAM_ID => l_team_id,
235: PROCEDURE delete_resource_team_members
236: (P_API_VERSION IN NUMBER,
237: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
238: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
239: P_TEAM_ID IN JTF_RS_TEAM_MEMBERS.TEAM_ID%TYPE,
240: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
241: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
242: P_TEAM_RESOURCE_NUMBER IN NUMBER,
243: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
237: P_INIT_MSG_LIST IN VARCHAR2 DEFAULT FND_API.G_FALSE,
238: P_COMMIT IN VARCHAR2 DEFAULT FND_API.G_FALSE,
239: P_TEAM_ID IN JTF_RS_TEAM_MEMBERS.TEAM_ID%TYPE,
240: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
241: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
242: P_TEAM_RESOURCE_NUMBER IN NUMBER,
243: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
244: P_OBJECT_VERSION_NUM IN JTF_RS_TEAM_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
245: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
239: P_TEAM_ID IN JTF_RS_TEAM_MEMBERS.TEAM_ID%TYPE,
240: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
241: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
242: P_TEAM_RESOURCE_NUMBER IN NUMBER,
243: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
244: P_OBJECT_VERSION_NUM IN JTF_RS_TEAM_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
245: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
246: X_MSG_COUNT OUT NOCOPY NUMBER,
247: X_MSG_DATA OUT NOCOPY VARCHAR2
240: P_TEAM_NUMBER IN JTF_RS_TEAMS_VL.TEAM_NUMBER%TYPE,
241: P_TEAM_RESOURCE_ID IN JTF_RS_TEAM_MEMBERS.TEAM_RESOURCE_ID%TYPE,
242: P_TEAM_RESOURCE_NUMBER IN NUMBER,
243: P_RESOURCE_TYPE IN JTF_RS_TEAM_MEMBERS.RESOURCE_TYPE%TYPE,
244: P_OBJECT_VERSION_NUM IN JTF_RS_TEAM_MEMBERS.OBJECT_VERSION_NUMBER%TYPE,
245: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
246: X_MSG_COUNT OUT NOCOPY NUMBER,
247: X_MSG_DATA OUT NOCOPY VARCHAR2
248: ) IS
248: ) IS
249:
250: l_api_version CONSTANT NUMBER := 1.0;
251: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_RESOURCE_TEAM_MEMBERS';
252: l_team_id jtf_rs_team_members.team_id%TYPE := p_team_id;
253: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
254: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
255: l_team_resource_number NUMBER := p_team_resource_number;
256: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
250: l_api_version CONSTANT NUMBER := 1.0;
251: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_RESOURCE_TEAM_MEMBERS';
252: l_team_id jtf_rs_team_members.team_id%TYPE := p_team_id;
253: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
254: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
255: l_team_resource_number NUMBER := p_team_resource_number;
256: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
257: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
258: --added for NOCOPY
252: l_team_id jtf_rs_team_members.team_id%TYPE := p_team_id;
253: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
254: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
255: l_team_resource_number NUMBER := p_team_resource_number;
256: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
257: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
258: --added for NOCOPY
259: l_team_id_out jtf_rs_team_members.team_id%TYPE;
260: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
253: l_team_number jtf_rs_teams_vl.team_number%TYPE := p_team_number;
254: l_team_resource_id jtf_rs_team_members.team_resource_id%TYPE := p_team_resource_id;
255: l_team_resource_number NUMBER := p_team_resource_number;
256: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
257: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
258: --added for NOCOPY
259: l_team_id_out jtf_rs_team_members.team_id%TYPE;
260: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
261:
255: l_team_resource_number NUMBER := p_team_resource_number;
256: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
257: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
258: --added for NOCOPY
259: l_team_id_out jtf_rs_team_members.team_id%TYPE;
260: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
261:
262:
263: BEGIN
256: l_resource_type jtf_rs_team_members.resource_type%TYPE := upper(p_resource_type);
257: l_team_member_id jtf_rs_team_members.team_member_id%TYPE;
258: --added for NOCOPY
259: l_team_id_out jtf_rs_team_members.team_id%TYPE;
260: l_team_resource_id_out jtf_rs_team_members.team_resource_id%TYPE;
261:
262:
263: BEGIN
264:
375:
376:
377: /* Call the private procedure for delete */
378:
379: jtf_rs_team_members_pvt.delete_resource_team_members
380: (P_API_VERSION => 1,
381: P_INIT_MSG_LIST => fnd_api.g_false,
382: P_COMMIT => fnd_api.g_false,
383: P_TEAM_ID => l_team_id,
442: END delete_resource_team_members;
443:
444:
445:
446: END jtf_rs_team_members_pub;