APPS.HZ_PARTY_SITE_USES_PKG dependencies on HZ_PARTY_SITE_USES

Line 1: PACKAGE BODY HZ_PARTY_SITE_USES_PKG AS

1: PACKAGE BODY HZ_PARTY_SITE_USES_PKG AS
2: /*$Header: ARHPSUTB.pls 115.9 2002/11/21 19:43:08 sponnamb ship $ */
3:
4: PROCEDURE Insert_Row (
5: X_PARTY_SITE_USE_ID IN OUT NOCOPY NUMBER,

Line 22: INSERT INTO HZ_PARTY_SITE_USES (

18: BEGIN
19:
20: WHILE l_success = 'N' LOOP
21: BEGIN
22: INSERT INTO HZ_PARTY_SITE_USES (
23: PARTY_SITE_USE_ID,
24: COMMENTS,
25: PARTY_SITE_ID,
26: LAST_UPDATE_DATE,

Line 43: DECODE( X_PARTY_SITE_USE_ID, FND_API.G_MISS_NUM, HZ_PARTY_SITE_USES_S.NEXTVAL, NULL, HZ_PARTY_SITE_USES_S.NEXTVAL, X_PARTY_SITE_USE_ID ),

39: CREATED_BY_MODULE,
40: APPLICATION_ID
41: )
42: VALUES (
43: DECODE( X_PARTY_SITE_USE_ID, FND_API.G_MISS_NUM, HZ_PARTY_SITE_USES_S.NEXTVAL, NULL, HZ_PARTY_SITE_USES_S.NEXTVAL, X_PARTY_SITE_USE_ID ),
44: DECODE( X_COMMENTS, FND_API.G_MISS_CHAR, NULL, X_COMMENTS ),
45: DECODE( X_PARTY_SITE_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_SITE_ID ),
46: HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
47: HZ_UTILITY_V2PUB.REQUEST_ID,

Line 70: IF INSTRB( SQLERRM, 'HZ_PARTY_SITE_USES_U1' ) <> 0 OR

66: l_success := 'Y';
67:
68: EXCEPTION
69: WHEN DUP_VAL_ON_INDEX THEN
70: IF INSTRB( SQLERRM, 'HZ_PARTY_SITE_USES_U1' ) <> 0 OR
71: INSTRB( SQLERRM, 'HZ_PARTY_SITE_USES_PK' ) <> 0
72: THEN
73: DECLARE
74: l_count NUMBER;

Line 71: INSTRB( SQLERRM, 'HZ_PARTY_SITE_USES_PK' ) <> 0

67:
68: EXCEPTION
69: WHEN DUP_VAL_ON_INDEX THEN
70: IF INSTRB( SQLERRM, 'HZ_PARTY_SITE_USES_U1' ) <> 0 OR
71: INSTRB( SQLERRM, 'HZ_PARTY_SITE_USES_PK' ) <> 0
72: THEN
73: DECLARE
74: l_count NUMBER;
75: l_dummy VARCHAR2(1);

Line 79: SELECT HZ_PARTY_SITE_USES_S.NEXTVAL

75: l_dummy VARCHAR2(1);
76: BEGIN
77: l_count := 1;
78: WHILE l_count > 0 LOOP
79: SELECT HZ_PARTY_SITE_USES_S.NEXTVAL
80: INTO X_PARTY_SITE_USE_ID FROM dual;
81: BEGIN
82: SELECT 'Y' INTO l_dummy
83: FROM HZ_PARTY_SITE_USES

Line 83: FROM HZ_PARTY_SITE_USES

79: SELECT HZ_PARTY_SITE_USES_S.NEXTVAL
80: INTO X_PARTY_SITE_USE_ID FROM dual;
81: BEGIN
82: SELECT 'Y' INTO l_dummy
83: FROM HZ_PARTY_SITE_USES
84: WHERE PARTY_SITE_USE_ID = X_PARTY_SITE_USE_ID;
85: l_count := 1;
86: EXCEPTION
87: WHEN NO_DATA_FOUND THEN

Line 116: UPDATE HZ_PARTY_SITE_USES SET

112: ) IS
113:
114: BEGIN
115:
116: UPDATE HZ_PARTY_SITE_USES SET
117: PARTY_SITE_USE_ID = DECODE( X_PARTY_SITE_USE_ID, NULL, PARTY_SITE_USE_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_SITE_USE_ID ),
118: COMMENTS = DECODE( X_COMMENTS, NULL, COMMENTS, FND_API.G_MISS_CHAR, NULL, X_COMMENTS ),
119: PARTY_SITE_ID = DECODE( X_PARTY_SITE_ID, NULL, PARTY_SITE_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_SITE_ID ),
120: LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,

Line 166: SELECT * FROM HZ_PARTY_SITE_USES

162: X_APPLICATION_ID IN NUMBER
163: ) IS
164:
165: CURSOR C IS
166: SELECT * FROM HZ_PARTY_SITE_USES
167: WHERE ROWID = x_Rowid
168: FOR UPDATE NOWAIT;
169: Recinfo C%ROWTYPE;
170:

Line 277: FROM HZ_PARTY_SITE_USES

273: X_PRIMARY_PER_TYPE,
274: X_STATUS,
275: X_CREATED_BY_MODULE,
276: X_APPLICATION_ID
277: FROM HZ_PARTY_SITE_USES
278: WHERE PARTY_SITE_USE_ID = X_PARTY_SITE_USE_ID;
279:
280: EXCEPTION
281: WHEN NO_DATA_FOUND THEN

Line 296: DELETE FROM HZ_PARTY_SITE_USES

292: ) IS
293:
294: BEGIN
295:
296: DELETE FROM HZ_PARTY_SITE_USES
297: WHERE PARTY_SITE_USE_ID = X_PARTY_SITE_USE_ID;
298:
299: IF ( SQL%NOTFOUND ) THEN
300: RAISE NO_DATA_FOUND;

Line 305: END HZ_PARTY_SITE_USES_PKG;

301: END IF;
302:
303: END Delete_Row;
304:
305: END HZ_PARTY_SITE_USES_PKG;