APPS.HZ_CUST_ACCOUNT_ROLES_PKG dependencies on HZ_CUST_ACCOUNT_ROLES

Line 1: PACKAGE BODY HZ_CUST_ACCOUNT_ROLES_PKG AS

1: PACKAGE BODY HZ_CUST_ACCOUNT_ROLES_PKG AS
2: /*$Header: ARHACRTB.pls 115.11 2002/11/21 20:13:02 sponnamb ship $ */
3:
4: PROCEDURE Insert_Row (
5: X_CUST_ACCOUNT_ROLE_ID IN OUT NOCOPY NUMBER,

Line 55: INSERT INTO HZ_CUST_ACCOUNT_ROLES (

51: END IF;
52:
53: WHILE l_success = 'N' LOOP
54: BEGIN
55: INSERT INTO HZ_CUST_ACCOUNT_ROLES (
56: CUST_ACCOUNT_ROLE_ID,
57: PARTY_ID,
58: CUST_ACCOUNT_ID,
59: CUST_ACCT_SITE_ID,

Line 106: DECODE( X_CUST_ACCOUNT_ROLE_ID, FND_API.G_MISS_NUM, HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL, NULL, HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL, X_CUST_ACCOUNT_ROLE_ID ),

102: APPLICATION_ID,
103: CURRENT_ROLE_STATE
104: )
105: VALUES (
106: DECODE( X_CUST_ACCOUNT_ROLE_ID, FND_API.G_MISS_NUM, HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL, NULL, HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL, X_CUST_ACCOUNT_ROLE_ID ),
107: DECODE( X_PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
108: DECODE( X_CUST_ACCOUNT_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_ID ),
109: DECODE( X_CUST_ACCT_SITE_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCT_SITE_ID ),
110: DECODE( X_PRIMARY_FLAG, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_PRIMARY_FLAG ),

Line 147: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_CUST_ACCOUNT_ROLE_ID,HZ_CUST_ACCOUNT_ROLES_S.CURRVAL)), NULL, TO_CHAR(NVL(X_CUST_ACCOUNT_ROLE_ID,HZ_CUST_ACCOUNT_ROLES_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),

143: DECODE( X_ATTRIBUTE21, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE21 ),
144: DECODE( X_ATTRIBUTE22, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE22 ),
145: DECODE( X_ATTRIBUTE23, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE23 ),
146: DECODE( X_ATTRIBUTE24, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE24 ),
147: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_CUST_ACCOUNT_ROLE_ID,HZ_CUST_ACCOUNT_ROLES_S.CURRVAL)), NULL, TO_CHAR(NVL(X_CUST_ACCOUNT_ROLE_ID,HZ_CUST_ACCOUNT_ROLES_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),
148: DECODE( X_ATTRIBUTE25, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE25 ),
149: DECODE( X_STATUS, FND_API.G_MISS_CHAR, 'A', NULL, 'A', X_STATUS ),
150: DECODE( X_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, X_OBJECT_VERSION_NUMBER ),
151: DECODE( X_CREATED_BY_MODULE, FND_API.G_MISS_CHAR, NULL, X_CREATED_BY_MODULE ),

Line 164: IF INSTRB( SQLERRM, 'HZ_CUST_ACCOUNT_ROLES_U1' ) <> 0 OR

160: l_success := 'Y';
161:
162: EXCEPTION
163: WHEN DUP_VAL_ON_INDEX THEN
164: IF INSTRB( SQLERRM, 'HZ_CUST_ACCOUNT_ROLES_U1' ) <> 0 OR
165: INSTRB( SQLERRM, 'HZ_CUST_ACCOUNT_ROLES_PK' ) <> 0
166: THEN
167: DECLARE
168: l_count NUMBER;

Line 165: INSTRB( SQLERRM, 'HZ_CUST_ACCOUNT_ROLES_PK' ) <> 0

161:
162: EXCEPTION
163: WHEN DUP_VAL_ON_INDEX THEN
164: IF INSTRB( SQLERRM, 'HZ_CUST_ACCOUNT_ROLES_U1' ) <> 0 OR
165: INSTRB( SQLERRM, 'HZ_CUST_ACCOUNT_ROLES_PK' ) <> 0
166: THEN
167: DECLARE
168: l_count NUMBER;
169: l_dummy VARCHAR2(1);

Line 173: SELECT HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL

169: l_dummy VARCHAR2(1);
170: BEGIN
171: l_count := 1;
172: WHILE l_count > 0 LOOP
173: SELECT HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL
174: INTO X_CUST_ACCOUNT_ROLE_ID FROM dual;
175: BEGIN
176: SELECT 'Y' INTO l_dummy
177: FROM HZ_CUST_ACCOUNT_ROLES

Line 177: FROM HZ_CUST_ACCOUNT_ROLES

173: SELECT HZ_CUST_ACCOUNT_ROLES_S.NEXTVAL
174: INTO X_CUST_ACCOUNT_ROLE_ID FROM dual;
175: BEGIN
176: SELECT 'Y' INTO l_dummy
177: FROM HZ_CUST_ACCOUNT_ROLES
178: WHERE CUST_ACCOUNT_ROLE_ID = X_CUST_ACCOUNT_ROLE_ID;
179: l_count := 1;
180: EXCEPTION
181: WHEN NO_DATA_FOUND THEN

Line 239: UPDATE HZ_CUST_ACCOUNT_ROLES SET

235: ) IS
236:
237: BEGIN
238:
239: UPDATE HZ_CUST_ACCOUNT_ROLES SET
240: CUST_ACCOUNT_ROLE_ID = DECODE( X_CUST_ACCOUNT_ROLE_ID, NULL, CUST_ACCOUNT_ROLE_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_ROLE_ID ),
241: PARTY_ID = DECODE( X_PARTY_ID, NULL, PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
242: CUST_ACCOUNT_ID = DECODE( X_CUST_ACCOUNT_ID, NULL, CUST_ACCOUNT_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_ID ),
243: 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 ),

Line 348: SELECT * FROM HZ_CUST_ACCOUNT_ROLES

344: X_APPLICATION_ID IN NUMBER
345: ) IS
346:
347: CURSOR C IS
348: SELECT * FROM HZ_CUST_ACCOUNT_ROLES
349: WHERE ROWID = x_Rowid
350: FOR UPDATE NOWAIT;
351: Recinfo C%ROWTYPE;
352:

Line 633: FROM HZ_CUST_ACCOUNT_ROLES

629: X_ATTRIBUTE25,
630: X_STATUS,
631: X_CREATED_BY_MODULE,
632: X_APPLICATION_ID
633: FROM HZ_CUST_ACCOUNT_ROLES
634: WHERE CUST_ACCOUNT_ROLE_ID = X_CUST_ACCOUNT_ROLE_ID;
635:
636: EXCEPTION
637: WHEN NO_DATA_FOUND THEN

Line 652: DELETE FROM HZ_CUST_ACCOUNT_ROLES

648: ) IS
649:
650: BEGIN
651:
652: DELETE FROM HZ_CUST_ACCOUNT_ROLES
653: WHERE CUST_ACCOUNT_ROLE_ID = X_CUST_ACCOUNT_ROLE_ID;
654:
655: IF ( SQL%NOTFOUND ) THEN
656: RAISE NO_DATA_FOUND;

Line 661: END HZ_CUST_ACCOUNT_ROLES_PKG;

657: END IF;
658:
659: END Delete_Row;
660:
661: END HZ_CUST_ACCOUNT_ROLES_PKG;