[Home] [Help]
540: --bayadav 31-Jan-2002 Added one DFF in IGS_PE_STAT_DETAILS and DFF columns in IGS_AD_STAT_INT table.
541: -- Due to which 1)Using the columns attribute1 to attribute20 parameters of this TBH
542: -- to transfer the data from IGS_AD_STAT_INT DFF columns to IGS_PE_STAT_DETAILS DFF columns
543: -- 2)Changing the earlier use of these parameters attribute1 to attribute20 for HZ table to NULL.Bug number:2203778
544: --pkpatel 27-JUN-2003 Bug 3019813(Made the Hz_Party_v2Pub.update_person call only while HZ related attrubures are modified)
545: svisweas 26-may-2000 get_fk_igs_lookups_view procedure from tbh.
546: (reverse chronological order - newest change first)
547: ***************************************************************/
548: LV_INIT_MSG_LIST VARCHAR2(1) ;
549: LV_COMMIT VARCHAR2(1) ;
550: LV_LAST_UPDATE_DATE DATE ;
551: LV_PARTY_LAST_UPDATE_DATE DATE;
552: LV_PROFILE_ID NUMBER;
553: LV_PERSON_REC_TYPE Hz_Party_V2Pub.PERSON_REC_TYPE;
554: LV_PARTY_REC_TYPE Hz_Party_V2Pub.PARTY_REC_TYPE;
555: l_tmp_var1 VARCHAR2(2000);
556: l_tmp_var VARCHAR2(2000);
557: l_default_date DATE := igs_ge_date.igsdate('9999/01/01');
550: LV_LAST_UPDATE_DATE DATE ;
551: LV_PARTY_LAST_UPDATE_DATE DATE;
552: LV_PROFILE_ID NUMBER;
553: LV_PERSON_REC_TYPE Hz_Party_V2Pub.PERSON_REC_TYPE;
554: LV_PARTY_REC_TYPE Hz_Party_V2Pub.PARTY_REC_TYPE;
555: l_tmp_var1 VARCHAR2(2000);
556: l_tmp_var VARCHAR2(2000);
557: l_default_date DATE := igs_ge_date.igsdate('9999/01/01');
558: l_default_value VARCHAR2(1) := 'X';
655: LV_PERSON_REC_TYPE.MARITAL_STATUS_EFFECTIVE_DATE := NVL(X_MARITAL_STAT_EFFECT_DT ,FND_API.G_MISS_DATE);
656: LV_PERSON_REC_TYPE.HOUSEHOLD_INCOME := NVL(X_ANN_FAMILY_INCOME,FND_API.G_MISS_NUM);
657: LV_PERSON_REC_TYPE.HOUSEHOLD_SIZE := NVL(X_NUMBER_IN_FAMILY,FND_API.G_MISS_NUM);
658: LV_PERSON_REC_TYPE.PLACE_OF_BIRTH := NVL(X_PLACE_OF_BIRTH,FND_API.G_MISS_CHAR);
659: LV_PERSON_REC_TYPE.CONTENT_SOURCE_TYPE := HZ_PARTY_V2PUB.G_MISS_CONTENT_SOURCE_TYPE;
660: LV_PERSON_REC_TYPE.INTERNAL_FLAG := NVL(X_INTERNAL_FLAG , FND_API.G_MISS_CHAR);
661:
662: -- do not initialise the attribute 1.20 and do not pass global attributes 1.20
663:
669: NVL(old_references.marital_status,l_default_value) <> NVL(new_references.marital_status,l_default_value) OR
670: NVL(old_references.marital_status_effective_date,l_default_date) <> NVL(new_references.marital_status_effective_date,l_default_date) OR
671: NVL(old_references.place_of_birth,l_default_value) <> NVL(new_references.place_of_birth,l_default_value)) THEN
672:
673: Hz_Party_v2Pub.update_person(
674: p_party_object_version_number => x_hz_parties_ovn,
675: P_PERSON_REC => LV_PERSON_REC_TYPE,
676: X_PROFILE_ID => Z_PROFILE_ID,
677: X_RETURN_STATUS => Z_RETURN_STATUS,
855: -- Due to which 1)Using the columns attribute1 to attribute20 parameters of this TBH
856: -- to transfer the data from IGS_AD_STAT_INT DFF columns to IGS_PE_STAT_DETAILS DFF columns
857: -- 2)Changing the earlier use of these parameters attribute1 to attribute20 for HZ table to NULL.Bug number:2203778
858: svisweas 26-may-2000 get_fk_igs_lookups_view procedure from tbh.
859: --pkpatel 27-JUN-2003 Bug 3019813(Made the Hz_Party_v2Pub.update_person call only while HZ related attrubures are modified)
860: (reverse chronological order - newest change first)
861: ***************************************************************/
862: LV_INIT_MSG_LIST VARCHAR2(1);
863: LV_COMMIT VARCHAR2(1);
870:
871: l_default_date DATE := igs_ge_date.igsdate('9999/01/01');
872: l_default_value VARCHAR2(1) := 'X';
873:
874: LV_PERSON_REC_TYPE Hz_Party_V2Pub.PERSON_REC_TYPE;
875: LV_PARTY_REC_TYPE Hz_Party_V2Pub.PARTY_REC_TYPE;
876: CURSOR party_cur IS
877: SELECT hp.last_update_date , xx.effective_start_date
878: FROM hz_person_profiles xx ,
871: l_default_date DATE := igs_ge_date.igsdate('9999/01/01');
872: l_default_value VARCHAR2(1) := 'X';
873:
874: LV_PERSON_REC_TYPE Hz_Party_V2Pub.PERSON_REC_TYPE;
875: LV_PARTY_REC_TYPE Hz_Party_V2Pub.PARTY_REC_TYPE;
876: CURSOR party_cur IS
877: SELECT hp.last_update_date , xx.effective_start_date
878: FROM hz_person_profiles xx ,
879: hz_parties hp
990: LV_PERSON_REC_TYPE.MARITAL_STATUS_EFFECTIVE_DATE := NVL(X_MARITAL_STAT_EFFECT_DT ,FND_API.G_MISS_DATE);
991: LV_PERSON_REC_TYPE.HOUSEHOLD_INCOME := NVL(X_ANN_FAMILY_INCOME,FND_API.G_MISS_NUM);
992: LV_PERSON_REC_TYPE.HOUSEHOLD_SIZE := NVL(X_NUMBER_IN_FAMILY,FND_API.G_MISS_NUM);
993: LV_PERSON_REC_TYPE.PLACE_OF_BIRTH := NVL(X_PLACE_OF_BIRTH,FND_API.G_MISS_CHAR);
994: LV_PERSON_REC_TYPE.CONTENT_SOURCE_TYPE := HZ_PARTY_V2PUB.G_MISS_CONTENT_SOURCE_TYPE;
995: LV_PERSON_REC_TYPE.INTERNAL_FLAG := NVL(X_INTERNAL_FLAG , FND_API.G_MISS_CHAR);
996:
997:
998: IF X_ACTION ='UPDATE' THEN
1001: NVL(old_references.marital_status,l_default_value) <> NVL(new_references.marital_status,l_default_value) OR
1002: NVL(old_references.marital_status_effective_date,l_default_date) <> NVL(new_references.marital_status_effective_date,l_default_date) OR
1003: NVL(old_references.place_of_birth,l_default_value) <> NVL(new_references.place_of_birth,l_default_value)) THEN
1004:
1005: Hz_Party_V2Pub.update_person(
1006: p_party_object_version_number => x_hz_parties_ovn ,
1007: P_PERSON_REC => LV_PERSON_REC_TYPE,
1008: X_PROFILE_ID => Z_PROFILE_ID,
1009: X_RETURN_STATUS => Z_RETURN_STATUS,