IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

REXX code for comparison of two different PDS


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Mani453

New User


Joined: 19 Nov 2015
Posts: 13
Location: INDIA

PostPosted: Fri Nov 20, 2015 5:21 am
Reply with quote

Hi

I am writing a rexx code for comparison of two different pds. Can anyone suggest on this.

Req : Two different pds will have many ps members. I need to cross check of all ps members(inside data also).
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 2567
Location: NYC,USA

PostPosted: Fri Nov 20, 2015 5:40 am
Reply with quote

Welcome!!
Why Rexx? 3.13 in a batch or SUPERCE should give you what you want and may use PARM=(DELTAL,LINECMP,'','')
Back to top
View user's profile Send private message
Mani453

New User


Joined: 19 Nov 2015
Posts: 13
Location: INDIA

PostPosted: Fri Nov 20, 2015 6:21 am
Reply with quote

Thanks...

But client requested me make a tool for that.. So I am trying in Rexx or easytrieve.
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 2567
Location: NYC,USA

PostPosted: Fri Nov 20, 2015 9:13 am
Reply with quote

Okay, you can start From LMMLIST.
If you are a new to this then you will have to refer the Rexx documentation which is located at the top under manuals.
Also search on this forum would help you to get similar stuff done in past, here are few of what I said above.
ibmmainframes.com/about38892.html
ibmmainframes.com/about55461.html
Also look for sort or iebcompr too. Suggest your client too the same.
Back to top
View user's profile Send private message
Mani453

New User


Joined: 19 Nov 2015
Posts: 13
Location: INDIA

PostPosted: Fri Nov 20, 2015 12:17 pm
Reply with quote

Hi,

For me its throwing JCL error. Please find my code. RC=25 m getting. can you suggest.


Code:
//Z015000A JOB (@,NM),'AUTO COMPR',
//         MSGCLASS=1,CLASS=A,NOTIFY=&SYSUID
//SUPERC  EXEC PGM=ISRSUPC,
//            PARM=(DELTAL,LINECMP,
//            '',
//            '')
//NEWDD  DD DSN=Z015000.TEST.PDS1,
//          DISP=SHR
//OLDDD  DD DSN=Z015000.TEST.PDS2,
//          DISP=SHR
//OUTDD  DD DSN=Z015000.TEST.PDSN(RESULT),
//          DISP=SHR
//SYSIN  DD *
  ISPF GENERATES THESE STATEMENTS..
/*


Code'd
Back to top
View user's profile Send private message
boyti ko

New User


Joined: 03 Nov 2014
Posts: 78
Location: Malaysia

PostPosted: Fri Nov 20, 2015 1:00 pm
Reply with quote

Put your output on a SEQDS, not on a PDS member. A length of 133 would suffice.
Back to top
View user's profile Send private message
Mani453

New User


Joined: 19 Nov 2015
Posts: 13
Location: INDIA

PostPosted: Fri Nov 20, 2015 2:05 pm
Reply with quote

Thanks a lot rohit.. Its working now..
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Execute step regardless of previous s... JCL & VSAM 2
No new posts Error 0C1 Reason Code 1 with branch i... PL/I & Assembler 3
No new posts Any examples of calling FTP from REXX? CLIST & REXX 1
No new posts SummeRx: a new framework for REXX z/OS CLIST & REXX 6
No new posts A command to change LRECL of an exist... JCL & VSAM 7
Search our Forums:

Back to Top