
  VAR
    jmv$last_used_application_index: [XREF, oss$mainframe_pageable]
          jmt$qfile_application_index;

?? PUSH (LISTEXT := ON) ??
*copyc jmt$qfile_application_table
*copyc oss$mainframe_pageable
?? POP ??
