To find the concurrent program Attached to Responsibility

To find the concurrent program Attached to Responsibility

SELECT responsibility_name
  FROM fnd_responsibility_tl rsp_tl,
       fnd_responsibility fr,
       fnd_request_groups frg,
       fnd_request_group_units frgu,
       fnd_concurrent_programs_tl fcpt
 WHERE     rsp_tl.responsibility_id = fr.responsibility_id
       AND frg.request_group_id = fr.request_group_id
       AND fr.request_group_id = frgu.request_group_id
       AND fcpt.concurrent_program_id = frgu.request_unit_id
       AND UPPER (fcpt.USER_CONCURRENT_PROGRAM_NAME) =
              UPPER ('XX program name');