The following lines contain the word 'select', 'insert', 'update' or 'delete':
/*Package to send the Notification message to the selected supplier contacts by invoking the wfengine*/
PROCEDURE wf_process
( p_process IN VARCHAR2,
p_role IN VARCHAR2,
p_msg_subject IN VARCHAR2,
p_msg_body IN VARCHAR2,
p_osn_message IN VARCHAR2,
p_defer IN BOOLEAN
)
IS
l_itemtype wf_items.item_type%TYPE;
'SELECT DISTINCT ' ||
' hp.person_first_name, ' ||
' hp.person_last_name, ' ||
' hcpe.email_address, ' ||
' fu.user_name, ' ||
' fu.email_address ' ||
'FROM hz_parties hp, ' ||
' hz_relationships hzr, ' ||
' hz_party_usg_assignments hpua, ' ||
' hz_contact_points hcpe, ' ||
' fnd_user fu, ' ||
' ap_suppliers aps ' ||
'WHERE hp.party_id = hzr.subject_id ' ||
' AND hzr.object_id = aps.party_id ' ||
' AND hzr.relationship_type = ''CONTACT'' ' ||
' AND hzr.relationship_code = ''CONTACT_OF'' ' ||
' AND hzr.subject_type = ''PERSON'' ' ||
' AND hzr.object_type = ''ORGANIZATION'' ' ||
' AND hzr.status = ''A'' ' ||
' AND NVL(hzr.end_date, SYSDATE) >= SYSDATE ' ||
' AND hpua.party_id = hp.party_id ' ||
' AND hpua.status_flag = ''A'' ' ||
' AND hpua.party_usage_code = ''SUPPLIER_CONTACT'' ' ||
' AND NVL(hpua.effective_end_date, SYSDATE) >= SYSDATE ' ||
' AND hcpe.owner_table_name(+) = ''HZ_PARTIES'' ' ||
' AND hcpe.owner_table_id(+) = hzr.party_id ' ||
' AND hcpe.contact_point_type(+) = ''EMAIL'' ' ||
' AND hcpe.primary_flag(+) = ''Y'' ' ||
' AND NVL(hcpe.status, ''A'') = ''A'' ' ||
' AND fu.person_party_id(+) = hp.party_id ' ||
' AND NVL(fu.end_date, SYSDATE) >= SYSDATE ';