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;