APPS.HZ_PERSON_LANGUAGE_PKG dependencies on HZ_PERSON_LANGUAGE

Line 1: PACKAGE BODY HZ_PERSON_LANGUAGE_PKG AS

1: PACKAGE BODY HZ_PERSON_LANGUAGE_PKG AS
2: /*$Header: ARHPLATB.pls 120.5 2005/10/30 03:54:16 appldev ship $ */
3:
4:
5: PROCEDURE Insert_Row (

Line 27: INSERT INTO HZ_PERSON_LANGUAGE (

23: BEGIN
24:
25: WHILE l_success = 'N' LOOP
26: BEGIN
27: INSERT INTO HZ_PERSON_LANGUAGE (
28: LANGUAGE_USE_REFERENCE_ID,
29: LANGUAGE_NAME,
30: PARTY_ID,
31: NATIVE_LANGUAGE,

Line 52: DECODE( X_LANGUAGE_USE_REFERENCE_ID, FND_API.G_MISS_NUM, HZ_PERSON_LANGUAGE_S.NEXTVAL, NULL, HZ_PERSON_LANGUAGE_S.NEXTVAL, X_LANGUAGE_USE_REFERENCE_ID ),

48: CREATED_BY_MODULE,
49: APPLICATION_ID
50: )
51: VALUES (
52: DECODE( X_LANGUAGE_USE_REFERENCE_ID, FND_API.G_MISS_NUM, HZ_PERSON_LANGUAGE_S.NEXTVAL, NULL, HZ_PERSON_LANGUAGE_S.NEXTVAL, X_LANGUAGE_USE_REFERENCE_ID ),
53: DECODE( X_LANGUAGE_NAME, FND_API.G_MISS_CHAR, NULL, X_LANGUAGE_NAME ),
54: DECODE( X_PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
55: DECODE( X_NATIVE_LANGUAGE, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_NATIVE_LANGUAGE ),
56: DECODE( X_PRIMARY_LANGUAGE_INDICATOR, FND_API.G_MISS_CHAR, 'N', NULL, 'N', X_PRIMARY_LANGUAGE_INDICATOR ),

Line 83: IF INSTRB( SQLERRM, 'HZ_PERSON_LANGUAGE_U1' ) <> 0 OR

79: l_success := 'Y';
80:
81: EXCEPTION
82: WHEN DUP_VAL_ON_INDEX THEN
83: IF INSTRB( SQLERRM, 'HZ_PERSON_LANGUAGE_U1' ) <> 0 OR
84: INSTRB( SQLERRM, 'HZ_PERSON_LANGUAGE_PK' ) <> 0
85: THEN
86: DECLARE
87: l_count NUMBER;

Line 84: INSTRB( SQLERRM, 'HZ_PERSON_LANGUAGE_PK' ) <> 0

80:
81: EXCEPTION
82: WHEN DUP_VAL_ON_INDEX THEN
83: IF INSTRB( SQLERRM, 'HZ_PERSON_LANGUAGE_U1' ) <> 0 OR
84: INSTRB( SQLERRM, 'HZ_PERSON_LANGUAGE_PK' ) <> 0
85: THEN
86: DECLARE
87: l_count NUMBER;
88: l_dummy VARCHAR2(1);

Line 92: SELECT HZ_PERSON_LANGUAGE_S.NEXTVAL

88: l_dummy VARCHAR2(1);
89: BEGIN
90: l_count := 1;
91: WHILE l_count > 0 LOOP
92: SELECT HZ_PERSON_LANGUAGE_S.NEXTVAL
93: INTO X_LANGUAGE_USE_REFERENCE_ID FROM dual;
94: BEGIN
95: SELECT 'Y' INTO l_dummy
96: FROM HZ_PERSON_LANGUAGE

Line 96: FROM HZ_PERSON_LANGUAGE

92: SELECT HZ_PERSON_LANGUAGE_S.NEXTVAL
93: INTO X_LANGUAGE_USE_REFERENCE_ID FROM dual;
94: BEGIN
95: SELECT 'Y' INTO l_dummy
96: FROM HZ_PERSON_LANGUAGE
97: WHERE LANGUAGE_USE_REFERENCE_ID = X_LANGUAGE_USE_REFERENCE_ID;
98: l_count := 1;
99: EXCEPTION
100: WHEN NO_DATA_FOUND THEN

Line 134: UPDATE HZ_PERSON_LANGUAGE SET

130: ) IS
131:
132: BEGIN
133:
134: UPDATE HZ_PERSON_LANGUAGE SET
135: LANGUAGE_USE_REFERENCE_ID = DECODE( X_LANGUAGE_USE_REFERENCE_ID, NULL, LANGUAGE_USE_REFERENCE_ID, FND_API.G_MISS_NUM, NULL, X_LANGUAGE_USE_REFERENCE_ID ),
136: LANGUAGE_NAME = DECODE( X_LANGUAGE_NAME, NULL, LANGUAGE_NAME, FND_API.G_MISS_CHAR, NULL, X_LANGUAGE_NAME ),
137: PARTY_ID = DECODE( X_PARTY_ID, NULL, PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
138: NATIVE_LANGUAGE = DECODE( X_NATIVE_LANGUAGE, NULL, NATIVE_LANGUAGE, FND_API.G_MISS_CHAR, 'N', X_NATIVE_LANGUAGE ),

Line 193: SELECT * FROM HZ_PERSON_LANGUAGE

189: X_APPLICATION_ID IN NUMBER
190: ) IS
191:
192: CURSOR C IS
193: SELECT * FROM HZ_PERSON_LANGUAGE
194: WHERE ROWID = x_Rowid
195: FOR UPDATE NOWAIT;
196: Recinfo C%ROWTYPE;
197:

Line 328: FROM HZ_PERSON_LANGUAGE

324: X_SPOKEN_COMPREHENSION_LEVEL,
325: X_STATUS,
326: X_CREATED_BY_MODULE,
327: X_APPLICATION_ID
328: FROM HZ_PERSON_LANGUAGE
329: WHERE LANGUAGE_USE_REFERENCE_ID = X_LANGUAGE_USE_REFERENCE_ID;
330:
331: EXCEPTION
332: WHEN NO_DATA_FOUND THEN

Line 347: DELETE FROM HZ_PERSON_LANGUAGE

343: ) IS
344:
345: BEGIN
346:
347: DELETE FROM HZ_PERSON_LANGUAGE
348: WHERE LANGUAGE_USE_REFERENCE_ID = X_LANGUAGE_USE_REFERENCE_ID;
349:
350: IF ( SQL%NOTFOUND ) THEN
351: RAISE NO_DATA_FOUND;

Line 356: END HZ_PERSON_LANGUAGE_PKG;

352: END IF;
353:
354: END Delete_Row;
355:
356: END HZ_PERSON_LANGUAGE_PKG;