APPS.HZ_PERSON_PROFILES_PKG dependencies on HZ_PERSON_PROFILES

Line 1: PACKAGE BODY HZ_PERSON_PROFILES_PKG AS

1: PACKAGE BODY HZ_PERSON_PROFILES_PKG AS
2: /*$Header: ARHPERTB.pls 120.7.12020000.2 2012/07/18 09:56:30 rgokavar ship $ */
3:
4: g_miss_content_source_type CONSTANT VARCHAR2(30) := 'USER_ENTERED';
5: g_sst_source_type CONSTANT VARCHAR2(30) := 'SST';

Line 86: INSERT INTO HZ_PERSON_PROFILES (

82: BEGIN
83:
84: WHILE l_success = 'N' LOOP
85: BEGIN
86: INSERT INTO HZ_PERSON_PROFILES (
87: PERSON_PROFILE_ID,
88: PARTY_ID,
89: PERSON_NAME,
90: LAST_UPDATE_DATE,

Line 167: DECODE( X_PERSON_PROFILE_ID, FND_API.G_MISS_NUM, HZ_PERSON_PROFILES_S.NEXTVAL, NULL, HZ_PERSON_PROFILES_S.NEXTVAL, X_PERSON_PROFILE_ID ),

163: ACTUAL_CONTENT_SOURCE,
164: VERSION_NUMBER
165: )
166: VALUES (
167: DECODE( X_PERSON_PROFILE_ID, FND_API.G_MISS_NUM, HZ_PERSON_PROFILES_S.NEXTVAL, NULL, HZ_PERSON_PROFILES_S.NEXTVAL, X_PERSON_PROFILE_ID ),
168: DECODE( X_PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
169: DECODE( X_PERSON_NAME, FND_API.G_MISS_CHAR, NULL, X_PERSON_NAME ),
170: HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,
171: HZ_UTILITY_V2PUB.LAST_UPDATED_BY,

Line 255: IF INSTRB( SQLERRM, 'HZ_PERSON_PROFILES_U1' ) <> 0 OR

251: l_success := 'Y';
252:
253: EXCEPTION
254: WHEN DUP_VAL_ON_INDEX THEN
255: IF INSTRB( SQLERRM, 'HZ_PERSON_PROFILES_U1' ) <> 0 OR
256: INSTRB( SQLERRM, 'HZ_PERSON_PROFILES_PK' ) <> 0
257: THEN
258: DECLARE
259: l_count NUMBER;

Line 256: INSTRB( SQLERRM, 'HZ_PERSON_PROFILES_PK' ) <> 0

252:
253: EXCEPTION
254: WHEN DUP_VAL_ON_INDEX THEN
255: IF INSTRB( SQLERRM, 'HZ_PERSON_PROFILES_U1' ) <> 0 OR
256: INSTRB( SQLERRM, 'HZ_PERSON_PROFILES_PK' ) <> 0
257: THEN
258: DECLARE
259: l_count NUMBER;
260: l_dummy VARCHAR2(1);

Line 264: SELECT HZ_PERSON_PROFILES_S.NEXTVAL

260: l_dummy VARCHAR2(1);
261: BEGIN
262: l_count := 1;
263: WHILE l_count > 0 LOOP
264: SELECT HZ_PERSON_PROFILES_S.NEXTVAL
265: INTO X_PERSON_PROFILE_ID FROM dual;
266: BEGIN
267: SELECT 'Y' INTO l_dummy
268: FROM HZ_PERSON_PROFILES

Line 268: FROM HZ_PERSON_PROFILES

264: SELECT HZ_PERSON_PROFILES_S.NEXTVAL
265: INTO X_PERSON_PROFILE_ID FROM dual;
266: BEGIN
267: SELECT 'Y' INTO l_dummy
268: FROM HZ_PERSON_PROFILES
269: WHERE PERSON_PROFILE_ID = X_PERSON_PROFILE_ID;
270: l_count := 1;
271: EXCEPTION
272: WHEN NO_DATA_FOUND THEN

Line 361: UPDATE HZ_PERSON_PROFILES SET

357: ) IS
358:
359: BEGIN
360:
361: UPDATE HZ_PERSON_PROFILES SET
362: PERSON_PROFILE_ID = DECODE( X_PERSON_PROFILE_ID, NULL, PERSON_PROFILE_ID, FND_API.G_MISS_NUM, NULL, X_PERSON_PROFILE_ID ),
363: PARTY_ID = DECODE( X_PARTY_ID, NULL, PARTY_ID, FND_API.G_MISS_NUM, NULL, X_PARTY_ID ),
364: PERSON_NAME = DECODE( X_PERSON_NAME, NULL, PERSON_NAME, FND_API.G_MISS_CHAR, NULL, X_PERSON_NAME),
365: LAST_UPDATE_DATE = HZ_UTILITY_V2PUB.LAST_UPDATE_DATE,

Line 530: SELECT * FROM HZ_PERSON_PROFILES

526: X_ACTUAL_CONTENT_SOURCE IN VARCHAR2 DEFAULT NULL
527: ) IS
528:
529: CURSOR C IS
530: SELECT * FROM HZ_PERSON_PROFILES
531: WHERE ROWID = x_Rowid
532: FOR UPDATE NOWAIT;
533: Recinfo C%ROWTYPE;
534:

Line 989: FROM HZ_PERSON_PROFILES

985: X_MIDDLE_NAME_PHONETIC,
986: X_CREATED_BY_MODULE,
987: X_APPLICATION_ID,
988: X_ACTUAL_CONTENT_SOURCE
989: FROM HZ_PERSON_PROFILES
990: WHERE PERSON_PROFILE_ID = X_PERSON_PROFILE_ID;
991:
992: EXCEPTION
993: WHEN NO_DATA_FOUND THEN

Line 1008: DELETE FROM HZ_PERSON_PROFILES

1004: ) IS
1005:
1006: BEGIN
1007:
1008: DELETE FROM HZ_PERSON_PROFILES
1009: WHERE PERSON_PROFILE_ID = X_PERSON_PROFILE_ID;
1010:
1011: IF ( SQL%NOTFOUND ) THEN
1012: RAISE NO_DATA_FOUND;

Line 1017: END HZ_PERSON_PROFILES_PKG;

1013: END IF;
1014:
1015: END Delete_Row;
1016:
1017: END HZ_PERSON_PROFILES_PKG;