36: x_email_addr IN VARCHAR2 ,
37: x_level_of_qual_id IN NUMBER ,
38: x_military_service_reg IN VARCHAR2 ,
39: x_veteran IN VARCHAR2 ,
40: x_hz_parties_ovn IN NUMBER,
41: x_attribute_category IN VARCHAR2 ,
42: x_attribute1 IN VARCHAR2 ,
43: x_attribute2 IN VARCHAR2 ,
44: x_attribute3 IN VARCHAR2 ,
171: new_references.email_addr := x_email_addr;
172: new_references.level_of_qual_id := x_level_of_qual_id;
173: new_references.military_service_reg := x_military_service_reg;
174: new_references.veteran := x_veteran;
175: new_references.object_version_number := x_hz_parties_ovn;
176: new_references.attribute_category := x_attribute_category;
177: new_references.attribute1 := x_attribute1;
178: new_references.attribute2 := x_attribute2;
179: new_references.attribute3 := x_attribute3;
265: mmkumar 19-JUL-2005 Passed NULL for x_oss_org_unit_cd in insert_row
266: ***************************************************************/
267: CURSOR cur_rowid IS
268: SELECT p.ROWID row_id
269: FROM hz_parties p
270: WHERE p.party_id = x_person_id;
271: lv_rowid cur_rowid%ROWTYPE;
272: CURSOR chk_igs_pe_hz_party is
273: SELECT rowid
270: WHERE p.party_id = x_person_id;
271: lv_rowid cur_rowid%ROWTYPE;
272: CURSOR chk_igs_pe_hz_party is
273: SELECT rowid
274: FROM igs_pe_hz_parties
275: WHERE party_id = x_person_id;
276: pehz_rowid varchar2(25);
277: BEGIN
278: OPEN cur_rowid;
278: OPEN cur_rowid;
279: FETCH cur_rowid INTO lv_rowid;
280: IF (cur_rowid%FOUND) THEN
281: CLOSE cur_rowid;
282: -- check if the person exits in teh IGS_PE_HZ_PARTIES
283: OPEN chk_igs_pe_hz_party;
284: FETCH chk_igs_pe_hz_party INTO pehz_rowid;
285: -- if the person does not exist tehn insert with the minimum required data
286: IF (chk_igs_pe_hz_party%NOTFOUND) THEN
284: FETCH chk_igs_pe_hz_party INTO pehz_rowid;
285: -- if the person does not exist tehn insert with the minimum required data
286: IF (chk_igs_pe_hz_party%NOTFOUND) THEN
287: pehz_rowid := null;
288: IGS_PE_HZ_PARTIES_PKG.INSERT_ROW(
289: X_ROWID => pehz_rowid,
290: X_PARTY_ID => X_PERSON_ID,
291: X_DECEASED_IND => NULL,
292: X_ARCHIVE_EXCLUSION_IND => NULL,
360: x_email_addr IN VARCHAR2 ,
361: x_level_of_qual_id IN NUMBER ,
362: x_military_service_reg IN VARCHAR2 ,
363: x_veteran IN VARCHAR2 ,
364: x_hz_parties_ovn IN NUMBER,
365: x_attribute_category IN VARCHAR2 ,
366: x_attribute1 IN VARCHAR2 ,
367: x_attribute2 IN VARCHAR2 ,
368: x_attribute3 IN VARCHAR2 ,
435: x_email_addr,
436: x_level_of_qual_id,
437: x_military_service_reg,
438: x_veteran,
439: x_hz_parties_ovn,
440: x_attribute_category,
441: x_attribute1,
442: x_attribute2,
443: x_attribute3,
530: x_EMAIL_ADDR IN VARCHAR2,
531: x_LEVEL_OF_QUAL_ID IN NUMBER,
532: x_MILITARY_SERVICE_REG IN VARCHAR2,
533: x_VETERAN IN VARCHAR2,
534: X_HZ_PARTIES_OVN IN OUT NOCOPY NUMBER,
535: x_ATTRIBUTE_CATEGORY IN VARCHAR2,
536: x_ATTRIBUTE1 IN VARCHAR2,
537: x_ATTRIBUTE2 IN VARCHAR2,
538: x_ATTRIBUTE3 IN VARCHAR2,
572: mmkumar 19-JUL-2005 Passed NULL for x_oss_org_unit_cd in insert_row
573: ***************************************************************/
574: CURSOR C IS
575: SELECT p.ROWID row_id
576: FROM hz_parties p
577: WHERE p.party_id = x_person_id;
578: lv_rowid VARCHAR2(30);
579: lv_rowid1 VARCHAR2(30);
580: ln_type_instance_id IGS_PE_TYP_INSTANCES.TYPE_INSTANCE_ID%TYPE;
582: lv_Person_Type_Code IGS_PE_PERSON_TYPES.person_type_code%TYPE;
583: CURSOR c_pe_rowid (cp_person_id IGS_PE_PERSON.PERSON_ID%TYPE,
584: cp_person_number IGS_PE_PERSON.PERSON_NUMBER%TYPE) IS
585: SELECT rowid
586: FROM HZ_PARTIES
587: WHERE party_id = cp_person_id
588: AND party_number = cp_person_number;
589: CURSOR ptc IS
590: SELECT pt.person_type_code
626: x_email_addr=>X_EMAIL_ADDR,
627: x_level_of_qual_id =>X_LEVEL_OF_QUAL_ID,
628: x_military_service_reg=>X_MILITARY_SERVICE_REG,
629: x_veteran=>X_VETERAN,
630: x_hz_parties_ovn => X_HZ_PARTIES_OVN,
631: x_attribute_category=>X_ATTRIBUTE_CATEGORY,
632: x_attribute1=>X_ATTRIBUTE1,
633: x_attribute2=>X_ATTRIBUTE2,
634: x_attribute3=>X_ATTRIBUTE3,
673: v_person_rec.party_rec.PARTY_ID := X_PERSON_ID;
674: v_person_rec.party_rec.PARTY_number := X_PERSON_number;
675:
676:
677: IGS_PE_HZ_PARTIES_PKG.INSERT_ROW(
678: X_ROWID => l_rowid,
679: X_PARTY_ID => X_PERSON_ID,
680: X_DECEASED_IND => new_references.deceased_ind,
681: X_ARCHIVE_EXCLUSION_IND => new_references.archive_exclusion_ind,
827: x_EMAIL_ADDR IN VARCHAR2,
828: x_LEVEL_OF_QUAL_ID IN NUMBER,
829: x_MILITARY_SERVICE_REG IN VARCHAR2,
830: x_VETERAN IN VARCHAR2,
831: X_HZ_PARTIES_OVN IN OUT NOCOPY NUMBER,
832: x_ATTRIBUTE_CATEGORY IN VARCHAR2,
833: x_ATTRIBUTE1 IN VARCHAR2,
834: x_ATTRIBUTE2 IN VARCHAR2,
835: x_ATTRIBUTE3 IN VARCHAR2,
880: tlinfo c1%ROWTYPE;
881:
882: CURSOR c2 IS
883: SELECT pehz.ROWID, pehz.*
884: FROM IGS_PE_HZ_PARTIES pehz
885: WHERE party_id = x_person_id;
886: tlinfo2 c2%ROWTYPE;
887:
888: tmp_var1 VARCHAR2(2000);
919: x_preferred_given_name=>X_PREFERRED_GIVEN_NAME,
920: x_email_addr=>X_EMAIL_ADDR,
921: x_level_of_qual_id =>X_LEVEL_OF_QUAL_ID,
922: x_military_service_reg=>X_MILITARY_SERVICE_REG,
923: x_hz_parties_ovn => X_HZ_PARTIES_OVN,
924: x_veteran=>X_VETERAN,
925: x_attribute_category=>NVL(X_ATTRIBUTE_CATEGORY,FND_API.G_MISS_CHAR),
926: x_attribute1=>NVL(X_ATTRIBUTE1,FND_API.G_MISS_CHAR),
927: x_attribute2=>NVL(X_ATTRIBUTE2,FND_API.G_MISS_CHAR),
970: v_person_rec.marital_status := NVL(x_marital_status,FND_API.G_MISS_CHAR);
971: v_person_rec.marital_status_effective_date := NVL(x_marital_status_date,FND_API.G_MISS_DATE);
972:
973: HZ_PARTY_V2PUB.UPDATE_PERSON (
974: p_party_object_version_number => x_hz_parties_ovn,
975: p_person_rec => v_person_rec,
976: x_profile_id => x_profile_id,
977: x_return_status =>x_return_status,
978: x_msg_count => x_msg_count,
982:
983: IF X_RETURN_STATUS NOT IN ('E','U') THEN
984: OPEN c2;
985: FETCH c2 INTO tlinfo2;
986: IGS_PE_HZ_PARTIES_PKG.ADD_ROW(
987: X_ROWID => tlinfo2.ROWID,
988: X_PARTY_ID => X_PERSON_ID,
989: X_DECEASED_IND => new_references.deceased_ind,
990: X_ARCHIVE_EXCLUSION_IND => new_references.archive_exclusion_ind,