[Home] [Help]
576: IF l_tag_custid>0 THEN
577: -- Tag DAta return customer contact details. So create the interaction by logging contact,primary party and
578: -- relation id.
579: BEGIN
580: select PARTY_TYPE into l_party_type from HZ_PARTIES
581: where party_id = l_tag_custid;
582: EXCEPTION WHEN OTHERS THEN
583: l_logmessage:='Error in getting Party Type for Party id '||l_tag_custid;
584: raise ABORT_PROCESSING;
1161: else -- External Account
1162: l_emp_flag:='N';
1163: if l_customer_id>0 then
1164: -- Check to see if party identified is a contact or not
1165: select party_type into l_party_type from hz_parties
1166: where party_id=l_customer_id;
1167: if l_party_type='PARTY_RELATIONSHIP' then
1168: -- Try to identify the actual party here
1169: begin
1173: and status='A';
1174: l_contact_id:=l_customer_id;
1175: select contact_point_id into l_contact_point_id
1176: from hz_contact_points
1177: where owner_table_name='HZ_PARTIES'
1178: and owner_table_id=l_customer_id
1179: and contact_point_type='EMAIL'
1180: and upper(email_address)=upper(l_sender)
1181: and contact_point_id not in (select contact_level_table_id from HZ_CONTACT_PREFERENCES