Eliminate records using Seq and PDS

In this Mainframe Forum - You can post your queries on JCL, OS/390 JCL, MVS JCL, z/OS JCL, JES2 & JES3

Moderators: Frank Yaeger, DikDude, Moderator Group

Post Reply
valis
Member
Posts: 4
Joined: Fri Jan 12, 2007 9:35 pm

Eliminate records using Seq and PDS

Post by valis » Fri Jan 12, 2007 9:41 pm

I would like to be able to eliminate records from a sequential dataset by comparing it to the members of a PDS. One of the fields in the seq. dataset would correspond with the member name in the PDS. Any help would be great.

Veera
Moderator
Posts: 111
Joined: Wed Feb 22, 2006 2:59 pm

Eliminate records using Seq and PDS

Post by Veera » Thu Jan 25, 2007 4:59 am

Vilas,

Can you elaborate your requirement clearly and also do you have any constraints such as you should use only utility or pgm, can you use EZT or REXX.

I just wanted to give you some idea of how this can be achieved

1.You can get the entire list of PDS members and write into a PS file.

2. Now assume you have 2 files one PS file with the data FILEA and FILEB with list of members of PDS, now Using any SORT or EZT pgm do a match on keys and eliminate the Matched records.

Find below some sample code of how to get the member names using REXX. The below code display the member names instead you can write into a file.

ADDRESS "ISPEXEC"
"LMINIT DATAID(LMID) DATASET('"HERE GIVE UR PDSNAME"')"
"LMOPEN DATAID("LMID")"
DO FOREVER = 1
"LMMLIST DATAID("LMID") MEMBER(LMMEM)"
IF RC > 0
THEN LEAVE
ELSE
SAY LMMEM
END
"LMFREE DATAID("LMID")"

Thanks
Veera

valis
Member
Posts: 4
Joined: Fri Jan 12, 2007 9:35 pm

Post by valis » Fri Jan 26, 2007 10:29 pm

Nevermind, I don't actually need to do this.

Veera
Moderator
Posts: 111
Joined: Wed Feb 22, 2006 2:59 pm

Post by Veera » Fri Jan 26, 2007 11:50 pm

Vali I appreciate if u can post ur approach or code it will be useful for others with similar kind of requirement. Please note post it in the
appropriate forum using which lang/utility u have acheived it.

Thanks
Veera.

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others