APPS.HZ_ROLE_RESPONSIBILITY_PKG dependencies on HZ_ROLE_RESPONSIBILITY

Line 1: PACKAGE BODY HZ_ROLE_RESPONSIBILITY_PKG AS

1: PACKAGE BODY HZ_ROLE_RESPONSIBILITY_PKG AS
2: /*$Header: ARHCRRTB.pls 115.7 2002/11/21 19:49:32 sponnamb ship $ */
3:
4: PROCEDURE Insert_Row (
5: X_RESPONSIBILITY_ID IN OUT NOCOPY NUMBER,

Line 41: INSERT INTO HZ_ROLE_RESPONSIBILITY (

37: END IF;
38:
39: WHILE l_success = 'N' LOOP
40: BEGIN
41: INSERT INTO HZ_ROLE_RESPONSIBILITY (
42: RESPONSIBILITY_ID,
43: CUST_ACCOUNT_ROLE_ID,
44: RESPONSIBILITY_TYPE,
45: PRIMARY_FLAG,

Line 77: DECODE( X_RESPONSIBILITY_ID, FND_API.G_MISS_NUM, HZ_ROLE_RESPONSIBILITY_S.NEXTVAL, NULL, HZ_ROLE_RESPONSIBILITY_S.NEXTVAL, X_RESPONSIBILITY_ID ),

73: CREATED_BY_MODULE,
74: APPLICATION_ID
75: )
76: VALUES (
77: DECODE( X_RESPONSIBILITY_ID, FND_API.G_MISS_NUM, HZ_ROLE_RESPONSIBILITY_S.NEXTVAL, NULL, HZ_ROLE_RESPONSIBILITY_S.NEXTVAL, X_RESPONSIBILITY_ID ),
78: DECODE( X_CUST_ACCOUNT_ROLE_ID, FND_API.G_MISS_NUM, NULL, X_CUST_ACCOUNT_ROLE_ID ),
79: DECODE( X_RESPONSIBILITY_TYPE, FND_API.G_MISS_CHAR, NULL, X_RESPONSIBILITY_TYPE ),
80: DECODE( X_PRIMARY_FLAG, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_PRIMARY_FLAG ),
81: HZ_UTILITY_V2PUB.CREATED_BY,

Line 106: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_RESPONSIBILITY_ID,HZ_ROLE_RESPONSIBILITY_S.CURRVAL)), NULL, TO_CHAR(NVL(X_RESPONSIBILITY_ID,HZ_ROLE_RESPONSIBILITY_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),

102: DECODE( X_ATTRIBUTE12, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE12 ),
103: DECODE( X_ATTRIBUTE13, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE13 ),
104: DECODE( X_ATTRIBUTE14, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE14 ),
105: DECODE( X_ATTRIBUTE15, FND_API.G_MISS_CHAR, NULL, X_ATTRIBUTE15 ),
106: DECODE( X_ORIG_SYSTEM_REFERENCE, FND_API.G_MISS_CHAR, TO_CHAR(NVL(X_RESPONSIBILITY_ID,HZ_ROLE_RESPONSIBILITY_S.CURRVAL)), NULL, TO_CHAR(NVL(X_RESPONSIBILITY_ID,HZ_ROLE_RESPONSIBILITY_S.CURRVAL)), X_ORIG_SYSTEM_REFERENCE ),
107: DECODE( X_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, X_OBJECT_VERSION_NUMBER ),
108: DECODE( X_CREATED_BY_MODULE, FND_API.G_MISS_CHAR, NULL, X_CREATED_BY_MODULE ),
109: DECODE( X_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, X_APPLICATION_ID )
110: ) RETURNING

Line 119: IF INSTRB( SQLERRM, 'HZ_ROLE_RESPONSIBILITY_U1' ) <> 0 OR

115: l_success := 'Y';
116:
117: EXCEPTION
118: WHEN DUP_VAL_ON_INDEX THEN
119: IF INSTRB( SQLERRM, 'HZ_ROLE_RESPONSIBILITY_U1' ) <> 0 OR
120: INSTRB( SQLERRM, 'HZ_ROLE_RESPONSIBILITY_PK' ) <> 0
121: THEN
122: DECLARE
123: l_count NUMBER;

Line 120: INSTRB( SQLERRM, 'HZ_ROLE_RESPONSIBILITY_PK' ) <> 0

116:
117: EXCEPTION
118: WHEN DUP_VAL_ON_INDEX THEN
119: IF INSTRB( SQLERRM, 'HZ_ROLE_RESPONSIBILITY_U1' ) <> 0 OR
120: INSTRB( SQLERRM, 'HZ_ROLE_RESPONSIBILITY_PK' ) <> 0
121: THEN
122: DECLARE
123: l_count NUMBER;
124: l_dummy VARCHAR2(1);

Line 128: SELECT HZ_ROLE_RESPONSIBILITY_S.NEXTVAL

124: l_dummy VARCHAR2(1);
125: BEGIN
126: l_count := 1;
127: WHILE l_count > 0 LOOP
128: SELECT HZ_ROLE_RESPONSIBILITY_S.NEXTVAL
129: INTO X_RESPONSIBILITY_ID FROM dual;
130: BEGIN
131: SELECT 'Y' INTO l_dummy
132: FROM HZ_ROLE_RESPONSIBILITY

Line 132: FROM HZ_ROLE_RESPONSIBILITY

128: SELECT HZ_ROLE_RESPONSIBILITY_S.NEXTVAL
129: INTO X_RESPONSIBILITY_ID FROM dual;
130: BEGIN
131: SELECT 'Y' INTO l_dummy
132: FROM HZ_ROLE_RESPONSIBILITY
133: WHERE RESPONSIBILITY_ID = X_RESPONSIBILITY_ID;
134: l_count := 1;
135: EXCEPTION
136: WHEN NO_DATA_FOUND THEN

Line 180: UPDATE HZ_ROLE_RESPONSIBILITY SET

176: ) IS
177:
178: BEGIN
179:
180: UPDATE HZ_ROLE_RESPONSIBILITY SET
181: RESPONSIBILITY_ID = DECODE( X_RESPONSIBILITY_ID, NULL, RESPONSIBILITY_ID, FND_API.G_MISS_NUM, NULL, X_RESPONSIBILITY_ID ),
182: 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 ),
183: RESPONSIBILITY_TYPE = DECODE( X_RESPONSIBILITY_TYPE, NULL, RESPONSIBILITY_TYPE, FND_API.G_MISS_CHAR, NULL, X_RESPONSIBILITY_TYPE ),
184: PRIMARY_FLAG = DECODE( X_PRIMARY_FLAG, NULL, PRIMARY_FLAG, FND_API.G_MISS_CHAR, 'N', X_PRIMARY_FLAG ),

Line 260: SELECT * FROM HZ_ROLE_RESPONSIBILITY

256: X_APPLICATION_ID IN NUMBER
257: ) IS
258:
259: CURSOR C IS
260: SELECT * FROM HZ_ROLE_RESPONSIBILITY
261: WHERE ROWID = x_Rowid
262: FOR UPDATE NOWAIT;
263: Recinfo C%ROWTYPE;
264:

Line 461: FROM HZ_ROLE_RESPONSIBILITY

457: X_ATTRIBUTE15,
458: X_ORIG_SYSTEM_REFERENCE,
459: X_CREATED_BY_MODULE,
460: X_APPLICATION_ID
461: FROM HZ_ROLE_RESPONSIBILITY
462: WHERE RESPONSIBILITY_ID = X_RESPONSIBILITY_ID;
463:
464: EXCEPTION
465: WHEN NO_DATA_FOUND THEN

Line 480: DELETE FROM HZ_ROLE_RESPONSIBILITY

476: ) IS
477:
478: BEGIN
479:
480: DELETE FROM HZ_ROLE_RESPONSIBILITY
481: WHERE RESPONSIBILITY_ID = X_RESPONSIBILITY_ID;
482:
483: IF ( SQL%NOTFOUND ) THEN
484: RAISE NO_DATA_FOUND;

Line 489: END HZ_ROLE_RESPONSIBILITY_PKG;

485: END IF;
486:
487: END Delete_Row;
488:
489: END HZ_ROLE_RESPONSIBILITY_PKG;