
  TYPE
    dft$client_job_id = record
      job_list_pointer_index: dft$job_list_ptr_array_index,
      job_list_index: dft$client_job_list_index,
    recend;

  CONST
    dfc$client_job_list_size = 40;

  TYPE
    dft$client_job_list_index = 1 .. dfc$client_job_list_size;

  CONST
    dfc$max_job_list_p_array_size = 0ff(16);

  TYPE
    dft$job_list_ptr_array_index = 1 .. dfc$max_job_list_p_array_size;

