1: Package Body JTF_RS_GROUP_MEMBERS_AUD_PVT AS
2: /* $Header: jtfrsamb.pls 120.0 2005/05/11 08:19:09 appldev ship $ */
3: -- API Name : JTF_RS_GROUP_MEMBERS_AUD_PVT
4: -- Type : Private
5: -- Purpose : Inserts IN the JTF_RS_GROUPS_B_AUD
1: Package Body JTF_RS_GROUP_MEMBERS_AUD_PVT AS
2: /* $Header: jtfrsamb.pls 120.0 2005/05/11 08:19:09 appldev ship $ */
3: -- API Name : JTF_RS_GROUP_MEMBERS_AUD_PVT
4: -- Type : Private
5: -- Purpose : Inserts IN the JTF_RS_GROUPS_B_AUD
6: -- Modification History
7: -- DATE NAME PURPOSE
8: -- 20 JAN 2000 S Choudhury Created
9: -- Notes:
10: --
11:
12: g_pkg_name varchar2(30) := 'JTF_RS_GROUP_MEMBERS_AUD_PVT';
13:
14: /*FOR INSERT */
15: PROCEDURE INSERT_MEMBER(
16: P_API_VERSION IN NUMBER,
25: X_MSG_COUNT OUT NOCOPY NUMBER,
26: X_MSG_DATA OUT NOCOPY VARCHAR2)
27: IS
28:
29: l_group_member_audit_id jtf_rs_group_members_aud.group_member_audit_id%type;
30: l_row_id varchar2(24) := null;
31:
32: --other variables
33: l_api_name CONSTANT VARCHAR2(30) := 'INSERT_MEMBER';
61: l_login_id := NVL(FND_PROFILE.Value('LOGIN_ID'), -1);
62:
63:
64:
65: select jtf_rs_group_members_aud_s.nextval
66: into l_group_member_audit_id
67: from dual;
68:
69:
67: from dual;
68:
69:
70: /* CALL TABLE HANDLER */
71: JTF_RS_GROUP_MEMBERS_AUD_PKG.INSERT_ROW (
72: X_ROWID => l_row_id,
73: x_group_member_audit_id => l_group_member_audit_id,
74: x_group_member_id => p_group_member_id,
75: x_new_group_id => p_group_id,
156:
157:
158:
159: rr_old_rec rr_old_cur%rowtype;
160: l_group_member_audit_id jtf_rs_group_members_aud.group_member_audit_id%type;
161: l_row_id varchar2(24) := null;
162:
163: --other variables
164: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_MEMBER';
218: end if;
219:
220:
221:
222: select jtf_rs_group_members_aud_s.nextval
223: into l_group_member_audit_id
224: from dual;
225:
226:
224: from dual;
225:
226:
227: /* CALL TABLE HANDLER */
228: JTF_RS_GROUP_MEMBERS_AUD_PKG.INSERT_ROW (
229: X_ROWID => l_row_id,
230: x_group_member_audit_id => l_group_member_audit_id,
231: x_group_member_id => p_group_member_id,
232: x_new_group_id => l_group_id_n,
302:
303:
304:
305: rr_old_rec rr_old_cur%rowtype;
306: l_group_member_audit_id jtf_rs_group_members_aud.group_member_audit_id%type;
307: l_row_id varchar2(24) := null;
308:
309: --other variables
310: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_MEMBER';
349:
350:
351:
352:
353: select jtf_rs_group_members_aud_s.nextval
354: into l_group_member_audit_id
355: from dual;
356:
357:
355: from dual;
356:
357:
358: /* CALL TABLE HANDLER */
359: JTF_RS_GROUP_MEMBERS_AUD_PKG.INSERT_ROW (
360: X_ROWID => l_row_id,
361: x_group_member_audit_id => l_group_member_audit_id,
362: x_group_member_id => p_group_member_id,
363: x_new_group_id => NULL,
400: FND_MSG_PUB.add;
401: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data);
402:
403: END delete_member;
404: END; -- Package Body JTF_RS_GROUP_MEMBERS_AUD_PVT