How get all the members of a PDS into a PS.....

satishstar · New User Joined: 14 Mar 2005 Posts: 18

Hi,

/*REXX*/
SAY 'ENTER A DATA SET NAME'
PARSE UPPER PULL DSNAME
SAY 'DATASET NAME:'DSNAME
"LISTDS '"DSNAME"' MEMBERS"
RETURN
END

Using the above code i got all the members of PDS to the TSO screen,but my requirement is that i want to have all the members of the PDS written into a PS line by line like below :-

--MEMBERS--
ADD
COMS
LINESPGM
MEMBERS
PANEL2
PASS
REXXPGM
REXXREPL
RPT805TS
RPT805TZ
SATGUDTS
SATSHGUD
SCREEN1
SUBROUT
TRACE

Plz let me know if any.

Thx,
satish

enrico-sorichetti

is this some kind of homework

suddemly there is a flurr of posts on the same issue, without any apparent business justification

after You have got the member names in a dataset what are You going to do with them

satishstar · New User Joined: 14 Mar 2005 Posts: 18

This is for a business purpose where i want to read each and every member from the PS with all the members and prepare a report with the no.of lines in the PDS(production libraires for different ones) and get the total no.of lines for migration project.

Thx,
satish

enrico-sorichetti

why don' t You loak at the proper ISPF functions for it
LM.... LMM.... family

dbzTHEdinosauer · Posted: Wed Apr 23, 2008 4:50 pm Post subject:

wow, we laid 9000 lines of code!

vch · New User Joined: 01 Feb 2008 Posts: 16 Location: chennai

Use OUTRAP command in rexx. Allocate a PS data set in rexx and move OUTRAP data to PS file finally Alloc write command to write into PS file

ParagChouguley · Posted: Thu Apr 24, 2008 11:57 am Post subject:

superk

z/OS V1R9.0 ISPF Services Guide.

1.4 Chapter 4. Using Edit Models from the z/OS V1R9.0 ISPF Edit and Edit Macros manual.

ParagChouguley · Posted: Thu Apr 24, 2008 12:45 pm Post subject:

Thanks for the links !!!

--Parag