SELECT
  CaseParticipantRoleLink.caseparticipantroleid,
  concernrole.concernrolename
INTO
  :caseParticipantRoleID,
  :name 
FROM
  CaseParticipantRoleLink,
  concernrole,
  caseparticipantrole 
WHERE caseparticipantrole.CASEPARTICIPANTROLEID =CaseParticipantRoleLink.CASEPARTICIPANTROLEID 
  AND concernrole.concernroleid =caseparticipantrole.PARTICIPANTROLEID 
  AND 
  (
    CaseParticipantRoleLink.RELATEDID = 
    ( 
    SELECT
      hearingwitnessid 
    FROM
      hearingwitness 
    WHERE caseparticipantroleid = :caseParticipantRoleID 
    ) 
    OR CaseParticipantRoleLink.RELATEDID = 
    ( 
    SELECT
      hearingrepresentativeid 
    FROM
      HearingRepresentative 
    WHERE caseparticipantroleid = :caseParticipantRoleID 
    ) 
  )