
  TYPE
    jmt$valid_mainframe_set = set of 1 .. jmc$maximum_mainframes;

*copyc jmc$maximum_mainframes
