DBA Data[Home] [Help]

APPS.HZ_PARTY_SITES_PKG dependencies on HZ_PARTY_SITES

Line 1: PACKAGE BODY HZ_PARTY_SITES_PKG AS

1: PACKAGE BODY HZ_PARTY_SITES_PKG AS
2: /*$Header: ARHPSTTB.pls 120.4.12010000.2 2010/03/04 11:00:29 rgokavar ship $ */
3:
4: G_MISS_CONTENT_SOURCE_TYPE CONSTANT VARCHAR2(30) := 'USER_ENTERED';
5:

Line 53: INSERT INTO HZ_PARTY_SITES (

49: BEGIN
50:
51: WHILE l_success = 'N' LOOP
52: BEGIN
53: INSERT INTO HZ_PARTY_SITES (
54: PARTY_SITE_ID,
55: PARTY_SITE_NUMBER,
56: PARTY_ID,
57: LOCATION_ID,

Line 102: DECODE( X_PARTY_SITE_ID, FND_API.G_MISS_NUM, HZ_PARTY_SITES_S.NEXTVAL, NULL, HZ_PARTY_SITES_S.NEXTVAL, X_PARTY_SITE_ID ),

98: GLOBAL_LOCATION_NUMBER,
99: DUNS_NUMBER_C
100: )
101: VALUES (
102: DECODE( X_PARTY_SITE_ID, FND_API.G_MISS_NUM, HZ_PARTY_SITES_S.NEXTVAL, NULL, HZ_PARTY_SITES_S.NEXTVAL, X_PARTY_SITE_ID ),
103: DECODE( X_PARTY_SITE_NUMBER, FND_API.G_MISS_CHAR, TO_CHAR( HZ_PARTY_SITE_NUMBER_S.NEXTVAL ), NULL, TO_CHAR( HZ_PARTY_SITE_NUMBER_S.NEXTVAL ), X_PARTY_SITE_NUMBER ),
104: DECODE( X_PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
105: DECODE( X_LOCATION_ID, FND_API.G_MISS_NUM, NULL, X_LOCATION_ID ),
106: HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,

Line 136: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_PARTY_SITE_ID,HZ_PARTY_SITES_S.CURRVAL)), NULL, TO_CHAR(NVL(X_PARTY_SITE_ID,HZ_PARTY_SITES_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),

132: DECODE( X_ATTRIBUTE17, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE17 ),
133: DECODE( X_ATTRIBUTE18, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE18 ),
134: DECODE( X_ATTRIBUTE19, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE19 ),
135: DECODE( X_ATTRIBUTE20, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE20 ),
136: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_PARTY_SITE_ID,HZ_PARTY_SITES_S.CURRVAL)), NULL, TO_CHAR(NVL(X_PARTY_SITE_ID,HZ_PARTY_SITES_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),
137: DECODE( X_MAILSTOP, FND_API.G_MISS_CHAR, NULL, X_MAILSTOP ),
138: DECODE( X_IDENTIFYING_ADDRESS_FLAG, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_IDENTIFYING_ADDRESS_FLAG ),
139: DECODE( X_STATUS, FND_API.G_MISS_CHAR, 'A', NULL, 'A', X_STATUS ),
140: DECODE( X_PARTY_SITE_NAME, FND_API.G_MISS_CHAR, NULL, X_PARTY_SITE_NAME ),

Line 161: IF INSTRB( SQLERRM, 'HZ_PARTY_SITES_U1' ) <> 0 OR

157: l_success := 'Y';
158:
159: EXCEPTION
160: WHEN DUP_VAL_ON_INDEX THEN
161: IF INSTRB( SQLERRM, 'HZ_PARTY_SITES_U1' ) <> 0 OR
162: INSTRB( SQLERRM, 'HZ_PARTY_SITES_PK' ) <> 0
163: THEN
164: DECLARE
165: l_count NUMBER;

Line 162: INSTRB( SQLERRM, 'HZ_PARTY_SITES_PK' ) <> 0

158:
159: EXCEPTION
160: WHEN DUP_VAL_ON_INDEX THEN
161: IF INSTRB( SQLERRM, 'HZ_PARTY_SITES_U1' ) <> 0 OR
162: INSTRB( SQLERRM, 'HZ_PARTY_SITES_PK' ) <> 0
163: THEN
164: DECLARE
165: l_count NUMBER;
166: l_dummy VARCHAR2(1);

Line 170: SELECT HZ_PARTY_SITES_S.NEXTVAL

166: l_dummy VARCHAR2(1);
167: BEGIN
168: l_count := 1;
169: WHILE l_count > 0 LOOP
170: SELECT HZ_PARTY_SITES_S.NEXTVAL
171: INTO X_PARTY_SITE_ID FROM dual;
172: BEGIN
173: SELECT 'Y' INTO l_dummy
174: FROM HZ_PARTY_SITES

Line 174: FROM HZ_PARTY_SITES

170: SELECT HZ_PARTY_SITES_S.NEXTVAL
171: INTO X_PARTY_SITE_ID FROM dual;
172: BEGIN
173: SELECT 'Y' INTO l_dummy
174: FROM HZ_PARTY_SITES
175: WHERE PARTY_SITE_ID = X_PARTY_SITE_ID;
176: l_count := 1;
177: EXCEPTION
178: WHEN NO_DATA_FOUND THEN

Line 183: ELSIF INSTRB( SQLERRM, 'HZ_PARTY_SITES_U2' ) <> 0 THEN

179: l_count := 0;
180: END;
181: END LOOP;
182: END;
183: ELSIF INSTRB( SQLERRM, 'HZ_PARTY_SITES_U2' ) <> 0 THEN
184: DECLARE
185: l_count NUMBER;
186: l_dummy VARCHAR2(1);
187: BEGIN

Line 190: hz_utility_v2pub.debug(p_message=>'DUP_VAL_ON_INDEX Error on HZ_PARTY_SITES_U2 Index',

186: l_dummy VARCHAR2(1);
187: BEGIN
188: -- Debug info.
189: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
190: hz_utility_v2pub.debug(p_message=>'DUP_VAL_ON_INDEX Error on HZ_PARTY_SITES_U2 Index',
191: p_prefix=>l_debug_prefix,
192: p_msg_level=>fnd_log.level_procedure);
193: END IF;
194: -- Bug9394160 When Profile HZ: Generate Party Site Number set to NO

Line 217: FROM HZ_PARTY_SITES

213: SELECT TO_CHAR( HZ_PARTY_SITE_NUMBER_S.NEXTVAL )
214: INTO X_PARTY_SITE_NUMBER FROM dual;
215: BEGIN
216: SELECT 'Y' INTO l_dummy
217: FROM HZ_PARTY_SITES
218: WHERE PARTY_SITE_NUMBER = X_PARTY_SITE_NUMBER;
219: l_count := 1;
220: EXCEPTION
221: WHEN NO_DATA_FOUND THEN

Line 280: UPDATE HZ_PARTY_SITES SET

276: ) IS
277:
278: BEGIN
279:
280: UPDATE HZ_PARTY_SITES SET
281: PARTY_SITE_ID = DECODE( X_PARTY_SITE_ID, NULL, PARTY_SITE_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_SITE_ID ),
282: PARTY_ID = DECODE( X_PARTY_ID, NULL, PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
283: LOCATION_ID = DECODE( X_LOCATION_ID, NULL, LOCATION_ID, FND_API.G_MISS_NUM, NULL, X_LOCATION_ID ),
284: LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,

Line 387: SELECT * FROM HZ_PARTY_SITES

383: X_GLOBAL_LOCATION_NUMBER IN VARCHAR2
384: ) IS
385:
386: CURSOR C IS
387: SELECT * FROM HZ_PARTY_SITES
388: WHERE ROWID = x_Rowid
389: FOR UPDATE NOWAIT;
390: Recinfo C%ROWTYPE;
391:

Line 666: FROM HZ_PARTY_SITES

662: X_APPLICATION_ID,
663: X_ACTUAL_CONTENT_SOURCE,
664: X_GLOBAL_LOCATION_NUMBER,
665: X_DUNS_NUMBER_C
666: FROM HZ_PARTY_SITES
667: WHERE PARTY_SITE_ID = X_PARTY_SITE_ID;
668:
669: EXCEPTION
670: WHEN NO_DATA_FOUND THEN

Line 685: DELETE FROM HZ_PARTY_SITES

681: ) IS
682:
683: BEGIN
684:
685: DELETE FROM HZ_PARTY_SITES
686: WHERE PARTY_SITE_ID = X_PARTY_SITE_ID;
687:
688: IF ( SQL%NOTFOUND ) THEN
689: RAISE NO_DATA_FOUND;

Line 694: END HZ_PARTY_SITES_PKG;

690: END IF;
691:
692: END Delete_Row;
693:
694: END HZ_PARTY_SITES_PKG;