Esta macro de rexx, con base en el comando WRKACTJOB con salida a spool, se copia a un fisico y se valida cada status a fin de presentarlo en pantalla, solo basta copiar el codigo a un contenedor de fuentes que se llama QREXSRC como un miembro cualquiera y dar la opcion 16 para ejecutarla, si desean crear un comando solo basta crear una cl con el comando STRREXPRC para poder ejecutar la macro rexx.