
  TYPE
    jmt$job_input_device = record
      size: 0 .. jmc$job_input_device_size,
      text: string (jmc$job_input_device_size),
    recend;

  CONST
    jmc$job_input_device_size = 256;
