APPS.HZ_RELATIONSHIP_TYPES_PKG dependencies on HZ_RELATIONSHIP_TYPES

Line 1: PACKAGE BODY HZ_RELATIONSHIP_TYPES_PKG AS

1: PACKAGE BODY HZ_RELATIONSHIP_TYPES_PKG AS
2: /*$Header: ARHRLTTB.pls 120.7 2006/01/02 10:14:48 nkanbapu noship $ */
3:
4: PROCEDURE Insert_Row (
5: X_RELATIONSHIP_TYPE_ID IN OUT NOCOPY NUMBER,

Line 34: INSERT INTO HZ_RELATIONSHIP_TYPES (

30: BEGIN
31:
32: WHILE l_success = 'N' LOOP
33: BEGIN
34: INSERT INTO HZ_RELATIONSHIP_TYPES (
35: RELATIONSHIP_TYPE_ID,
36: RELATIONSHIP_TYPE,
37: FORWARD_REL_CODE,
38: BACKWARD_REL_CODE,

Line 60: DECODE( X_RELATIONSHIP_TYPE_ID, FND_API.G_MISS_NUM, HZ_RELATIONSHIP_TYPES_S.NEXTVAL, NULL, HZ_RELATIONSHIP_TYPES_S.NEXTVAL, X_RELATIONSHIP_TYPE_ID ),

56: CREATED_BY_MODULE,
57: APPLICATION_ID
58: )
59: VALUES (
60: DECODE( X_RELATIONSHIP_TYPE_ID, FND_API.G_MISS_NUM, HZ_RELATIONSHIP_TYPES_S.NEXTVAL, NULL, HZ_RELATIONSHIP_TYPES_S.NEXTVAL, X_RELATIONSHIP_TYPE_ID ),
61: DECODE( X_RELATIONSHIP_TYPE, FND_API.G_MISS_CHAR, NULL, X_RELATIONSHIP_TYPE ),
62: DECODE( X_FORWARD_REL_CODE, FND_API.G_MISS_CHAR, NULL, X_FORWARD_REL_CODE ),
63: DECODE( X_BACKWARD_REL_CODE, FND_API.G_MISS_CHAR, NULL, X_BACKWARD_REL_CODE ),
64: DECODE( X_DIRECTION_CODE, FND_API.G_MISS_CHAR, NULL, X_DIRECTION_CODE ),

Line 79: DECODE( X_ROLE,FND_API.G_MISS_CHAR,'USER_ROLE_'||TO_CHAR(HZ_RELATIONSHIP_TYPES_S.CURRVAL),NULL,'USER_ROLE_'||TO_CHAR(HZ_RELATIONSHIP_TYPES_S.CURRVAL),X_ROLE),

75: HZ_UTILITY_V2PUB.LAST_UPDATE_LOGIN,
76: DECODE( X_ALLOW_CIRCULAR_RELATIONSHIPS, FND_API.G_MISS_CHAR, 'Y', NULL, 'Y', X_ALLOW_CIRCULAR_RELATIONSHIPS ),
77: DECODE( X_MULTIPLE_PARENT_ALLOWED, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_MULTIPLE_PARENT_ALLOWED ),
78: DECODE( X_INCL_UNRELATED_ENTITIES, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_INCL_UNRELATED_ENTITIES ),
79: DECODE( X_ROLE,FND_API.G_MISS_CHAR,'USER_ROLE_'||TO_CHAR(HZ_RELATIONSHIP_TYPES_S.CURRVAL),NULL,'USER_ROLE_'||TO_CHAR(HZ_RELATIONSHIP_TYPES_S.CURRVAL),X_ROLE),
80: DECODE( X_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, NULL, X_OBJECT_VERSION_NUMBER ),
81: DECODE( X_CREATED_BY_MODULE, FND_API.G_MISS_CHAR, NULL, X_CREATED_BY_MODULE ),
82: DECODE( X_APPLICATION_ID, FND_API.G_MISS_NUM, NULL, X_APPLICATION_ID )
83: ) RETURNING

Line 101: FROM hz_relationship_types

97: SELECT 'Y' INTO l_do_not_allow_convert
98: FROM dual
99: WHERE EXISTS (
100: SELECT 'Y'
101: FROM hz_relationship_types
102: WHERE relationship_type = X_RELATIONSHIP_TYPE
103: AND ( direction_code = 'N' OR
104: do_not_allow_convert = 'Y'));
105:

Line 114: UPDATE hz_relationship_types

110: END;
111:
112: END IF;
113:
114: UPDATE hz_relationship_types
115: SET do_not_allow_convert = l_do_not_allow_convert
116: WHERE relationship_type = X_RELATIONSHIP_TYPE;
117:
118: l_success := 'Y';

Line 122: IF INSTRB( SQLERRM, 'HZ_RELATIONSHIP_TYPES_U1' ) <> 0 OR

118: l_success := 'Y';
119:
120: EXCEPTION
121: WHEN DUP_VAL_ON_INDEX THEN
122: IF INSTRB( SQLERRM, 'HZ_RELATIONSHIP_TYPES_U1' ) <> 0 OR
123: INSTRB( SQLERRM, 'HZ_RELATIONSHIP_TYPES_PK' ) <> 0
124: THEN
125: DECLARE
126: l_count NUMBER;

Line 123: INSTRB( SQLERRM, 'HZ_RELATIONSHIP_TYPES_PK' ) <> 0

119:
120: EXCEPTION
121: WHEN DUP_VAL_ON_INDEX THEN
122: IF INSTRB( SQLERRM, 'HZ_RELATIONSHIP_TYPES_U1' ) <> 0 OR
123: INSTRB( SQLERRM, 'HZ_RELATIONSHIP_TYPES_PK' ) <> 0
124: THEN
125: DECLARE
126: l_count NUMBER;
127: l_dummy VARCHAR2(1);

Line 131: SELECT HZ_RELATIONSHIP_TYPES_S.NEXTVAL

127: l_dummy VARCHAR2(1);
128: BEGIN
129: l_count := 1;
130: WHILE l_count > 0 LOOP
131: SELECT HZ_RELATIONSHIP_TYPES_S.NEXTVAL
132: INTO X_RELATIONSHIP_TYPE_ID FROM dual;
133: BEGIN
134: SELECT 'Y' INTO l_dummy
135: FROM HZ_RELATIONSHIP_TYPES

Line 135: FROM HZ_RELATIONSHIP_TYPES

131: SELECT HZ_RELATIONSHIP_TYPES_S.NEXTVAL
132: INTO X_RELATIONSHIP_TYPE_ID FROM dual;
133: BEGIN
134: SELECT 'Y' INTO l_dummy
135: FROM HZ_RELATIONSHIP_TYPES
136: WHERE RELATIONSHIP_TYPE_ID = X_RELATIONSHIP_TYPE_ID;
137: l_count := 1;
138: EXCEPTION
139: WHEN NO_DATA_FOUND THEN

Line 177: UPDATE HZ_RELATIONSHIP_TYPES SET

173: ) IS
174:
175: BEGIN
176:
177: UPDATE HZ_RELATIONSHIP_TYPES SET
178: RELATIONSHIP_TYPE_ID = DECODE( X_RELATIONSHIP_TYPE_ID, NULL, RELATIONSHIP_TYPE_ID, FND_API.G_MISS_NUM, NULL, X_RELATIONSHIP_TYPE_ID ),
179: RELATIONSHIP_TYPE = DECODE( X_RELATIONSHIP_TYPE, NULL, RELATIONSHIP_TYPE, FND_API.G_MISS_CHAR, NULL, X_RELATIONSHIP_TYPE ),
180: FORWARD_REL_CODE = DECODE( X_FORWARD_REL_CODE, NULL, FORWARD_REL_CODE, FND_API.G_MISS_CHAR, NULL, X_FORWARD_REL_CODE ),
181: BACKWARD_REL_CODE = DECODE( X_BACKWARD_REL_CODE, NULL, BACKWARD_REL_CODE, FND_API.G_MISS_CHAR, NULL, X_BACKWARD_REL_CODE ),

Line 237: SELECT * FROM HZ_RELATIONSHIP_TYPES

233: X_APPLICATION_ID IN NUMBER
234: ) IS
235:
236: CURSOR C IS
237: SELECT * FROM HZ_RELATIONSHIP_TYPES
238: WHERE ROWID = x_Rowid
239: FOR UPDATE NOWAIT;
240: Recinfo C%ROWTYPE;
241:

Line 390: FROM HZ_RELATIONSHIP_TYPES

386: X_INCL_UNRELATED_ENTITIES,
387: X_ROLE,
388: X_CREATED_BY_MODULE,
389: X_APPLICATION_ID
390: FROM HZ_RELATIONSHIP_TYPES
391: WHERE RELATIONSHIP_TYPE_ID = X_RELATIONSHIP_TYPE_ID;
392:
393: EXCEPTION
394: WHEN NO_DATA_FOUND THEN

Line 409: DELETE FROM HZ_RELATIONSHIP_TYPES

405: ) IS
406:
407: BEGIN
408:
409: DELETE FROM HZ_RELATIONSHIP_TYPES
410: WHERE RELATIONSHIP_TYPE_ID = X_RELATIONSHIP_TYPE_ID;
411:
412: IF ( SQL%NOTFOUND ) THEN
413: RAISE NO_DATA_FOUND;

Line 418: END HZ_RELATIONSHIP_TYPES_PKG;

414: END IF;
415:
416: END Delete_Row;
417:
418: END HZ_RELATIONSHIP_TYPES_PKG;