Capturing output of REXX in a file

Raj Ponnuchamy · New User Joined: 09 Sep 2009 Posts: 9 Location: Chennai

Hi

I have a requirement as below,

1) I need to invoke TSO LISTUSER command from my rexx program. This one i achieved through ADDRESS TSO LISTUSER in my program.

2) I need to capture the output of LISTUSER command in a file in the same REXX program. I want to know whether it is possible to do this.

I got the output of TSO LISTUSER command in a file through batch using IKJEFT01. But i don't know whether it is possible to do this through online from rexx program.

Thanks

expat · Posted: Thu Sep 24, 2009 11:51 am

How did you do it in batch ?

Raj Ponnuchamy · New User Joined: 09 Sep 2009 Posts: 9 Location: Chennai

Hi,

I got the output in a file through the below job,

//STEP10 EXEC PGM=IKJEFT01
//SYSTSPRT DD DSN=output file ,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(CYL,(50,50),RLSE),
// UNIT=SYSDA,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSTSIN DD *
LISTUSER
/*

Thanks

expat · Posted: Thu Sep 24, 2009 12:00 pm

Take a look at OUTTRAP

It should suffice as a search keyword to get you some ideas

Raj Ponnuchamy · New User Joined: 09 Sep 2009 Posts: 9 Location: Chennai

Hi,

Thanks for the guidance. It solved my requirement.