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 115.20 2003/09/03 20:55:33 kttang 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 529: SELECT * FROM HZ_PERSON_PROFILES

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

Line 988: FROM HZ_PERSON_PROFILES

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

Line 1007: DELETE FROM HZ_PERSON_PROFILES

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

Line 1016: END HZ_PERSON_PROFILES_PKG;

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