519:
520: l_contact_preference_rec HZ_CONTACT_PREFERENCE_V2PUB.contact_preference_rec_type;
521:
522: CURSOR C_DO_PARTY(p_person_id NUMBER) IS
523: SELECT contact_preference_id FROM HZ_CONTACT_PREFERENCES
524: WHERE CONTACT_LEVEL_TABLE = 'HZ_PARTIES'
525: AND CONTACT_LEVEL_TABLE_ID = P_PERSON_ID
526: AND PREFERENCE_CODE = 'DO';
527:
525: AND CONTACT_LEVEL_TABLE_ID = P_PERSON_ID
526: AND PREFERENCE_CODE = 'DO';
527:
528: CURSOR C_DO_NOT_PARTY(p_person_id NUMBER) IS
529: SELECT contact_preference_id FROM HZ_CONTACT_PREFERENCES
530: WHERE CONTACT_LEVEL_TABLE = 'HZ_PARTIES'
531: AND CONTACT_LEVEL_TABLE_ID = P_PERSON_ID
532: AND PREFERENCE_CODE = 'DO_NOT';
533: