APPS.IBE_MSITE_PRTY_ACCSS_PKG dependencies on IBE_MSITE_PRTY_ACCSS

Line 1: PACKAGE BODY Ibe_Msite_Prty_Accss_Pkg AS

1: PACKAGE BODY Ibe_Msite_Prty_Accss_Pkg AS
2: /* $Header: IBETMPRB.pls 115.2 2002/12/13 14:06:57 schak ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IBE_MSITE_PRTY_ACCSS_PKG';
5: G_FILE_NAME CONSTANT VARCHAR2(12):= 'IBETMPRB.pls';

Line 4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IBE_MSITE_PRTY_ACCSS_PKG';

1: PACKAGE BODY Ibe_Msite_Prty_Accss_Pkg AS
2: /* $Header: IBETMPRB.pls 115.2 2002/12/13 14:06:57 schak ship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IBE_MSITE_PRTY_ACCSS_PKG';
5: G_FILE_NAME CONSTANT VARCHAR2(12):= 'IBETMPRB.pls';
6:
7: -- HISTORY
8: -- 12/13/02 SCHAK Modified for NOCOPY (Bug # 2691704) Changes.

Line 28: CURSOR c IS SELECT rowid FROM ibe_msite_prty_accss

24: x_rowid OUT NOCOPY VARCHAR2,
25: x_msite_prty_accss_id OUT NOCOPY NUMBER
26: )
27: IS
28: CURSOR c IS SELECT rowid FROM ibe_msite_prty_accss
29: WHERE msite_prty_accss_id = x_msite_prty_accss_id;
30: CURSOR c2 IS SELECT ibe_msite_prty_accss_s1.nextval FROM dual;
31:
32: BEGIN

Line 30: CURSOR c2 IS SELECT ibe_msite_prty_accss_s1.nextval FROM dual;

26: )
27: IS
28: CURSOR c IS SELECT rowid FROM ibe_msite_prty_accss
29: WHERE msite_prty_accss_id = x_msite_prty_accss_id;
30: CURSOR c2 IS SELECT ibe_msite_prty_accss_s1.nextval FROM dual;
31:
32: BEGIN
33:
34: -- Primary key validation check

Line 45: INSERT INTO ibe_msite_prty_accss

41: CLOSE c2;
42: END IF;
43:
44: -- insert base
45: INSERT INTO ibe_msite_prty_accss
46: (
47: msite_prty_accss_id,
48: object_version_number,
49: msite_id,

Line 104: UPDATE ibe_msite_prty_accss SET

100: IS
101: BEGIN
102:
103: -- update base
104: UPDATE ibe_msite_prty_accss SET
105: object_version_number = object_version_number + 1,
106: start_date_active = decode(p_start_date_active, FND_API.G_MISS_DATE,
107: start_date_active, p_start_date_active),
108: end_date_active = decode(p_end_date_active, FND_API.G_MISS_DATE,

Line 139: DELETE FROM ibe_msite_prty_accss

135: )
136: IS
137: BEGIN
138:
139: DELETE FROM ibe_msite_prty_accss
140: WHERE msite_prty_accss_id = p_msite_prty_accss_id;
141:
142: IF (sql%NOTFOUND) THEN
143: RAISE NO_DATA_FOUND;

Line 148: END Ibe_Msite_Prty_Accss_Pkg;

144: END IF;
145:
146: END delete_row;
147:
148: END Ibe_Msite_Prty_Accss_Pkg;