1: PACKAGE BODY PSB_ELEMENT_POS_SET_GROUPS_PVT AS
2: /* $Header: PSBVPSGB.pls 120.2 2005/07/13 11:29:13 shtripat ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PSB_ELEMENT_POS_SET_GROUPS_PVT';
5:
1: PACKAGE BODY PSB_ELEMENT_POS_SET_GROUPS_PVT AS
2: /* $Header: PSBVPSGB.pls 120.2 2005/07/13 11:29:13 shtripat ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'PSB_ELEMENT_POS_SET_GROUPS_PVT';
5:
6: /* ----------------------------------------------------------------------- */
7:
8: PROCEDURE INSERT_ROW
28: l_api_version CONSTANT NUMBER := 1.0;
29: l_row_id varchar2(40);
30: --
31: cursor c1 is
32: select ROWID from psb_element_pos_set_groups
33: where position_set_group_id = p_position_set_group_id
34: and pay_element_id = p_pay_element_id;
35:
36: BEGIN
60: p_return_status := FND_API.G_RET_STS_SUCCESS;
61:
62:
63: -- API body
64: INSERT INTO psb_element_pos_set_groups
65: (
66: POSITION_SET_GROUP_ID ,
67: PAY_ELEMENT_ID ,
68: NAME ,
188:
189: p_return_status := FND_API.G_RET_STS_SUCCESS;
190:
191: -- API body
192: UPDATE psb_element_pos_set_groups SET
193: NAME = P_NAME ,
194: LAST_UPDATE_DATE = P_LAST_UPDATE_DATE ,
195: LAST_UPDATED_BY = P_LAST_UPDATED_BY ,
196: LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN
299: DELETE FROM psb_pay_element_distributions
300: WHERE position_set_group_id = p_position_set_group_id;
301:
302: --Delete the record in the master table
303: DELETE FROM psb_element_pos_set_groups
304: WHERE position_set_group_id = p_position_set_group_id
305: AND pay_element_id = p_pay_element_id;
306:
307:
380: l_api_version CONSTANT NUMBER := 1.0;
381: --
382: counter number;
383:
384: CURSOR C IS SELECT * FROM PSB_ELEMENT_POS_SET_GROUPS
385: WHERE position_set_group_id = p_position_set_group_id
386: AND pay_element_id = p_pay_element_id
387: FOR UPDATE of POSITION_SET_GROUP_Id NOWAIT;
388: Recinfo C%ROWTYPE;
510: l_tmp VARCHAR2(1);
511:
512: CURSOR c IS
513: SELECT '1'
514: FROM psb_element_pos_set_groups
515: WHERE p_pay_element_id IS NOT NULL
516: AND name = p_name
517: AND pay_element_id = p_pay_element_id
518: AND (
694: --
695: END Check_References;
696:
697:
698: END PSB_ELEMENT_POS_SET_GROUPS_PVT;