[Home] [Help]
794: IS
795:
796: CURSOR c_id_type IS
797: SELECT description
798: FROM igs_pe_person_id_typ
799: WHERE preferred_ind ='Y';
800:
801: l_id_type igs_pe_person_id_typ.description%TYPE;
802:
797: SELECT description
798: FROM igs_pe_person_id_typ
799: WHERE preferred_ind ='Y';
800:
801: l_id_type igs_pe_person_id_typ.description%TYPE;
802:
803:
804: BEGIN
805:
1054: preferred_name igs_pe_person_base_v.known_as%TYPE,
1055: suffix igs_pe_person_base_v.suffix%TYPE,
1056: prefix igs_pe_person_base_v.pre_name_adjunct%TYPE,
1057: middle_name igs_pe_person_base_v.middle_name%TYPE,
1058: alternate_id igs_pe_person_id_type_v.api_person_id%TYPE);
1059:
1060: l_member_rec member_type;
1061:
1062: -- changed the cursor to pick up the primary email and removed the
1102: ' p.middle_name, ' ||
1103: ' pit.api_person_id alternate_id ' ||
1104: ' FROM ' ||
1105: ' igs_pe_person_base_v p, ' ||
1106: ' igs_pe_person_id_type_v pit ' ||
1107: ' WHERE ' ||
1108: ' p.person_id = pit.pe_person_id (+) AND ' ||
1109: ' p.person_id IN ';
1110:
1426: l_msg_count NUMBER;
1427: l_msg_data VARCHAR2(255);
1428: l_contact_point_id hz_contact_points.contact_point_id%TYPE;
1429: l_date DATE;
1430: l_id_type igs_pe_person_id_typ.person_id_type%TYPE;
1431: l_count NUMBER(9);
1432:
1433: CURSOR c_id_type IS
1434: SELECT person_id_type
1431: l_count NUMBER(9);
1432:
1433: CURSOR c_id_type IS
1434: SELECT person_id_type
1435: FROM igs_pe_person_id_typ
1436: WHERE preferred_ind ='Y';
1437:
1438: CURSOR c_email(cp_person_id NUMBER) IS
1439: SELECT email_address
1730: -- Hz parties check
1731: CURSOR cur_hz_parties (cp_first_name VARCHAR2, cp_last_name VARCHAR2,cp_birth_date DATE,
1732: cp_gender VARCHAR2, cp_person_num VARCHAR2, cp_pref_alt_id VARCHAR2) IS
1733: SELECT count(*), max(person_id)
1734: FROM igs_pe_person_base_v PE, IGS_PE_PERSON_ID_TYPE_V ALT
1735: WHERE pe.person_id = alt.pe_person_id(+)
1736: AND UPPER(pe.first_name) = UPPER(cp_first_name)
1737: AND UPPER(pe.last_name) = UPPER(cp_last_name)
1738: AND NVL(pe.birth_date,l_default_date) = NVL(cp_birth_date,l_default_date)
1756: l_zip_party_id HZ_PARTIES.PARTY_ID%TYPE;
1757:
1758: CURSOR c_pref_alt_id(cp_alt_id VARCHAR2) IS
1759: SELECT 1
1760: FROM igs_pe_alt_pers_id alt, igs_pe_person_id_typ typ
1761: WHERE alt.api_person_id = cp_alt_id
1762: AND typ.person_id_type = alt.person_id_type
1763: AND typ.preferred_ind = 'Y';
1764: l_alt_id_found NUMBER;
1765:
1766: CURSOR c_dup_zip(cp_first_name VARCHAR2, cp_last_name VARCHAR2, cp_birth_date VARCHAR2, cp_pref_alt_id VARCHAR2,
1767: cp_person_num VARCHAR2, cp_gender VARCHAR2, cp_zipcode VARCHAR2) IS
1768: SELECT count(*), max(hz.party_id)
1769: FROM igs_pe_person_id_type_v alt, hz_parties hz, hz_person_profiles hzp
1770: WHERE hz.party_id = alt.pe_person_id(+)
1771: AND UPPER(hz.person_first_name) = UPPER(cp_first_name)
1772: AND UPPER(hz.person_last_name) = UPPER(cp_last_name)
1773: AND NVL(hzp.date_of_birth,l_default_date) = NVL(cp_birth_date,l_default_date)
1946: || p_phoneNumber,p_person_id
1947: */
1948: CURSOR c_pref_alt_type IS
1949: SELECT person_id_type, unique_ind, description, format_mask
1950: FROM igs_pe_person_id_typ
1951: WHERE preferred_ind ='Y';
1952:
1953: CURSOR c_seq_num IS
1954: SELECT IGS_PE_GEN_USER_S.nextval
1953: CURSOR c_seq_num IS
1954: SELECT IGS_PE_GEN_USER_S.nextval
1955: FROM DUAL;
1956:
1957: lv_UniqueInd igs_pe_person_id_typ.UNIQUE_IND%TYPE;
1958: l_person_number hz_parties.party_number%TYPE;
1959:
1960: l_person_id_typ igs_pe_person_id_typ.PERSON_ID_TYPE%TYPE;
1961: l_format igs_pe_person_id_typ.format_mask%type;
1956:
1957: lv_UniqueInd igs_pe_person_id_typ.UNIQUE_IND%TYPE;
1958: l_person_number hz_parties.party_number%TYPE;
1959:
1960: l_person_id_typ igs_pe_person_id_typ.PERSON_ID_TYPE%TYPE;
1961: l_format igs_pe_person_id_typ.format_mask%type;
1962: l_exists VARCHAR2(1);
1963: l_alt_id_desc igs_pe_person_id_typ.description%TYPE;
1964:
1957: lv_UniqueInd igs_pe_person_id_typ.UNIQUE_IND%TYPE;
1958: l_person_number hz_parties.party_number%TYPE;
1959:
1960: l_person_id_typ igs_pe_person_id_typ.PERSON_ID_TYPE%TYPE;
1961: l_format igs_pe_person_id_typ.format_mask%type;
1962: l_exists VARCHAR2(1);
1963: l_alt_id_desc igs_pe_person_id_typ.description%TYPE;
1964:
1965: l_event_t wf_event_t;
1959:
1960: l_person_id_typ igs_pe_person_id_typ.PERSON_ID_TYPE%TYPE;
1961: l_format igs_pe_person_id_typ.format_mask%type;
1962: l_exists VARCHAR2(1);
1963: l_alt_id_desc igs_pe_person_id_typ.description%TYPE;
1964:
1965: l_event_t wf_event_t;
1966: l_parameter_list_t wf_parameter_list_t;
1967: l_wf_name VARCHAR2(8) ;
2171: AND lookup_code = cp_gender;
2172:
2173: CURSOR cur_person_id_type (cp_pers_id_type VARCHAR2) IS
2174: SELECT description
2175: FROM igs_pe_person_id_typ
2176: WHERE person_id_type = cp_pers_id_type;
2177:
2178: l_gender FND_LOOKUP_VALUES.LOOKUP_CODE%TYPE;
2179: l_phone_area_code HZ_CONTACT_POINTS.PHONE_AREA_CODE%TYPE;
2179: l_phone_area_code HZ_CONTACT_POINTS.PHONE_AREA_CODE%TYPE;
2180: l_phone_country_code HZ_CONTACT_POINTS.PHONE_COUNTRY_CODE%TYPE;
2181: l_phone_number HZ_CONTACT_POINTS.PHONE_NUMBER%TYPE;
2182: l_gender_meaning FND_LOOKUP_VALUES.MEANING%TYPE;
2183: l_person_id_type IGS_PE_PERSON_ID_TYP.DESCRIPTION%TYPE;
2184: l_formatted_phone VARCHAR2(100);
2185: x_return_status VARCHAR2(1);
2186: x_msg_count NUMBER;
2187: x_msg_data VARCHAR2(2000);