PROC dum$DISPLAY_ALL_JOB_FIXED display_all_job_fixed, disajf (
  o   : file = $local.job_fixed
  len : integer -281474976710655..281474976710655 = 32
  )

  crev s k=status
  pva = 01500000000(16)
  FOR i = 1 TO 50 DO
    dism pva $value(len) o=$fname($string($value(o))//'.$eoi') e=m status=s
    pva = pva + 100000000(16)
  FOREND

PROCEND dum$display_all_job_fixed
