  TYPE
    jmt$qfile_count_range = 0 .. jmc$maximum_qfile_count;

*copyc jmc$maximum_qfile_count
