check with abap which jobs are running

select single jobname 
  from tbtco 
  into lv_jobname
  where 
    jobname like lv_jobname_pat and 
    status = 'R'.