DBA Data[Home] [Help]

APPS.HZ_CUST_ACCT_SITES_PKG dependencies on HZ_CUST_ACCT_SITES

Line 1: PACKAGE BODY HZ_CUST_ACCT_SITES_PKG AS

1: PACKAGE BODY HZ_CUST_ACCT_SITES_PKG AS
2: /*$Header: ARHASTTB.pls 120.4.12000000.2 2007/04/18 09:29:17 idali ship $ */
3:
4: PROCEDURE Insert_Row (
5: X_CUST_ACCT_SITE_ID IN OUT NOCOPY NUMBER,

Line 78: INSERT INTO HZ_CUST_ACCT_SITES_ALL ( -- Bug 3456489

74: END IF;
75:
76: WHILE l_success = 'N' LOOP
77: BEGIN
78: INSERT INTO HZ_CUST_ACCT_SITES_ALL ( -- Bug 3456489
79: CUST_ACCT_SITE_ID,
80: CUST_ACCOUNT_ID,
81: PARTY_SITE_ID,
82: LAST_UPDATE_DATE,

Line 150: DECODE( X_CUST_ACCT_SITE_ID, FND_API.G_MISS_NUM, HZ_CUST_ACCT_SITES_S.NEXTVAL, NULL, HZ_CUST_ACCT_SITES_S.NEXTVAL, X_CUST_ACCT_SITE_ID ),

146: APPLICATION_ID,
147: ORG_ID
148: )
149: VALUES (
150: DECODE( X_CUST_ACCT_SITE_ID, FND_API.G_MISS_NUM, HZ_CUST_ACCT_SITES_S.NEXTVAL, NULL, HZ_CUST_ACCT_SITES_S.NEXTVAL, X_CUST_ACCT_SITE_ID ),
151: DECODE( X_CUST_ACCOUNT_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_ID ),
152: DECODE( X_PARTY_SITE_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_SITE_ID ),
153: HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
154: HZ_UTILITY_V2PUB.LAST_UPDATED_BY,

Line 204: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_CUST_ACCT_SITE_ID, HZ_CUST_ACCT_SITES_S.CURRVAL)), NULL, TO_CHAR(NVL(X_CUST_ACCT_SITE_ID, HZ_CUST_ACCT_SITES_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),

200: DECODE( X_GLOBAL_ATTRIBUTE17, FND_API.G_MISS_CHAR, NULL, X_GLOBAL_ATTRIBUTE17 ),
201: DECODE( X_GLOBAL_ATTRIBUTE18, FND_API.G_MISS_CHAR, NULL, X_GLOBAL_ATTRIBUTE18 ),
202: DECODE( X_GLOBAL_ATTRIBUTE19, FND_API.G_MISS_CHAR, NULL, X_GLOBAL_ATTRIBUTE19 ),
203: DECODE( X_GLOBAL_ATTRIBUTE20, FND_API.G_MISS_CHAR, NULL, X_GLOBAL_ATTRIBUTE20 ),
204: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_CUST_ACCT_SITE_ID, HZ_CUST_ACCT_SITES_S.CURRVAL)), NULL, TO_CHAR(NVL(X_CUST_ACCT_SITE_ID, HZ_CUST_ACCT_SITES_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),
205: DECODE( X_STATUS, FND_API.G_MISS_CHAR, 'A', NULL, 'A', X_STATUS ),
206: DECODE( X_CUSTOMER_CATEGORY_CODE, FND_API.G_MISS_CHAR, NULL, X_CUSTOMER_CATEGORY_CODE ),
207: DECODE( X_KEY_ACCOUNT_FLAG, FND_API.G_MISS_CHAR, NULL, X_KEY_ACCOUNT_FLAG ),
208: DECODE( X_TP_HEADER_ID, FND_API.G_MISS_NUM, NULL, X_TP_HEADER_ID ),

Line 230: IF INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_U1' ) <> 0 OR

226: l_success := 'Y';
227:
228: EXCEPTION
229: WHEN DUP_VAL_ON_INDEX THEN
230: IF INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_U1' ) <> 0 OR
231: INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_PK' ) <> 0
232: THEN
233: DECLARE
234: l_count NUMBER;

Line 231: INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_PK' ) <> 0

227:
228: EXCEPTION
229: WHEN DUP_VAL_ON_INDEX THEN
230: IF INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_U1' ) <> 0 OR
231: INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_PK' ) <> 0
232: THEN
233: DECLARE
234: l_count NUMBER;
235: l_dummy VARCHAR2(1);

Line 239: SELECT HZ_CUST_ACCT_SITES_S.NEXTVAL

235: l_dummy VARCHAR2(1);
236: BEGIN
237: l_count := 1;
238: WHILE l_count > 0 LOOP
239: SELECT HZ_CUST_ACCT_SITES_S.NEXTVAL
240: INTO X_CUST_ACCT_SITE_ID FROM dual;
241: BEGIN
242: SELECT 'Y' INTO l_dummy
243: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489

Line 243: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489

239: SELECT HZ_CUST_ACCT_SITES_S.NEXTVAL
240: INTO X_CUST_ACCT_SITE_ID FROM dual;
241: BEGIN
242: SELECT 'Y' INTO l_dummy
243: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489
244: WHERE CUST_ACCT_SITE_ID = X_CUST_ACCT_SITE_ID;
245: l_count := 1;
246: EXCEPTION
247: WHEN NO_DATA_FOUND THEN

Line 252: ELSIF INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_U2' ) <> 0 AND

248: l_count := 0;
249: END;
250: END LOOP;
251: END;
252: ELSIF INSTRB( SQLERRM, 'HZ_CUST_ACCT_SITES_U2' ) <> 0 AND
253: X_ORIG_SYSTEM_REFERENCE IS NULL
254: THEN
255: DECLARE
256: l_count NUMBER;

Line 261: SELECT HZ_CUST_ACCT_SITES_S.NEXTVAL

257: l_dummy VARCHAR2(1);
258: BEGIN
259: l_count := 1;
260: WHILE l_count > 0 LOOP
261: SELECT HZ_CUST_ACCT_SITES_S.NEXTVAL
262: INTO X_CUST_ACCT_SITE_ID FROM dual;
263: BEGIN
264: SELECT 'Y' INTO l_dummy
265: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489

Line 265: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489

261: SELECT HZ_CUST_ACCT_SITES_S.NEXTVAL
262: INTO X_CUST_ACCT_SITE_ID FROM dual;
263: BEGIN
264: SELECT 'Y' INTO l_dummy
265: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489
266: WHERE ORIG_SYSTEM_REFERENCE = to_char(X_CUST_ACCT_SITE_ID)
267: AND ORG_ID = X_ORG_ID; -- Bug 3456489
268:
269: l_count := 1;

Line 351: UPDATE HZ_CUST_ACCT_SITES_ALL SET

347: ) IS
348:
349: BEGIN
350:
351: UPDATE HZ_CUST_ACCT_SITES_ALL SET
352: CUST_ACCT_SITE_ID = DECODE( X_CUST_ACCT_SITE_ID, NULL, CUST_ACCT_SITE_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCT_SITE_ID ),
353: CUST_ACCOUNT_ID = DECODE( X_CUST_ACCOUNT_ID, NULL, CUST_ACCOUNT_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_ID ),
354: PARTY_SITE_ID = DECODE( X_PARTY_SITE_ID, NULL, PARTY_SITE_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_SITE_ID ),
355: LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,

Line 502: SELECT * FROM HZ_CUST_ACCT_SITES

498: X_APPLICATION_ID IN NUMBER
499: ) IS
500:
501: CURSOR C IS
502: SELECT * FROM HZ_CUST_ACCT_SITES
503: WHERE ROWID = x_Rowid
504: FOR UPDATE NOWAIT;
505: Recinfo C%ROWTYPE;
506:

Line 919: FROM HZ_CUST_ACCT_SITES_ALL

915: X_TRANSLATED_CUSTOMER_NAME,
916: X_CREATED_BY_MODULE,
917: X_APPLICATION_ID,
918: X_ORG_ID
919: FROM HZ_CUST_ACCT_SITES_ALL
920: WHERE CUST_ACCT_SITE_ID = X_CUST_ACCT_SITE_ID;
921:
922: EXCEPTION
923: WHEN NO_DATA_FOUND THEN

Line 938: DELETE FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489

934: ) IS
935:
936: BEGIN
937:
938: DELETE FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489
939: WHERE CUST_ACCT_SITE_ID = X_CUST_ACCT_SITE_ID;
940:
941: IF ( SQL%NOTFOUND ) THEN
942: RAISE NO_DATA_FOUND;

Line 947: END HZ_CUST_ACCT_SITES_PKG;

943: END IF;
944:
945: END Delete_Row;
946:
947: END HZ_CUST_ACCT_SITES_PKG;