I'll second the REXX approach. Years ago, I wrote a generalized REXX program that I could plug in ISPF edit macros to do the 'real work'. Came in real handy for this kind of thing.
Mark On Wed, Sep 29, 2010 at 2:11 PM, Tony Harminc <[email protected]> wrote: > On 29 September 2010 13:39, John Blythe Reid <[email protected]> > wrote: > > I'm writing some code to check VSAM CLUSTER defintions in a standard > > RECFM=FB,LRECL=80 PDS. It's to cross check IMS DBD defintions against > > their associated CLUSTER definitions. I've never used BPAM before but > > at first glance it seems to be OPEN/FIND/READ/CHECK/deblock to get > > logical records/CLOSE. > > I'm curious about why you would choose to do this in assembler... This > sounds like a fine example of something easily done in REXX. Do you > really want to parse DEFINE CLUSTER statements (or LISTCAT output - > not sure which you have) in assembler? > > > Does anyone have a sample piece of code to read PDS members with BPAM > > that I could have a look at ? > > PDS processing is not too hard in REXX. You can read the directory as > a sequential dataset, and then allocate and open each member in turn. > Or parse the output of LISTDS or one of the ISPF services. > > Tony H. >
