Suppose that you want to construct and execute an operating system command. Just push it to the token stream in the form of an X statement and have it executed under a pause interrupt.

The following module executes any system command given as an argument:

   start system(command);
      call push(" x '",command,"'; resume;");
      pause;
   finish;
   run system('listc');

The call generates and executes a LISTC command under MVS as follows:

   x 'listc'; resume;