| View previous topic :: View next topic |
| Author |
Message |
Manick
Beginner
Joined: 24 May 2010
Posts: 6
Topics: 3
|
 Posted: Tue Jun 01, 2010 4:48 am Post subject: Super C through Macro |
 |
|
Hi,
I need to invoke the 3.13 SUPER C Comparison, give two files for comparison and get the result in a PS. Can anyone explain me how this can be done automatically using a Edit Macro or REXX? |
|
| Back to top |
|
 |
expat
Intermediate
Joined: 01 Mar 2007
Posts: 475
Topics: 9
Location: Welsh Wales
|
| Posted: Tue Jun 01, 2010 9:48 am Post subject: |
|
|
In REXX,
Allocate the files to the required DDnames that you would use in batch and then use the CALL or ISPF SELECT statement to execute the program.
_________________
If it's true that we are here to help others,
then what exactly are the others here for ? |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12399
Topics: 75
Location: San Jose
|
| Posted: Tue Jun 01, 2010 10:35 am Post subject: |
|
|
Manick,
Try this (untested)
| Code: |
ADDRESS ISREDIT "MACRO"
ADDRESS TSO
NEWDSN = "YOUR NEW PS FILE TO COMPARE"
OLDDSN = "YOUR OLD PS FILE TO COMPARE"
OUTDSN = "YOUR OUTPUT LISTING FILE"
"ALLOC FI(NEWDD) DA('"NEWDSN"') REUSE SHR "
"ALLOC FI(OLDDD) DA('"OLDDSN"') REUSE SHR "
"ALLOC DA('"OUTDSN"') F(OUTDD) NEW RECFM(F,B)",
"LRECL(80) SPACE(5,10) TRACK BLKSIZE(0)"
"ALLOC FI(SYSIN) DUMMY REUSE SHR "
PARMS = "DELTAL,LINECMP,SEQ"
ADDRESS ISPEXEC "SELECT PGM(ISRSUPC) PARM("PARMS")"
SAY "RETURN CODE" RC
EXIT
|
Kolusu |
|
| Back to top |
|
|
Manick
Beginner
Joined: 24 May 2010
Posts: 6
Topics: 3
|
| Posted: Thu Jun 24, 2010 8:03 am Post subject: |
|
|
Hi,
Thanks for the replies and sorry for the delayed reply. I'll try these options.... |
|
| Back to top |
|
|
semigeezer
Supermod
Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis
|
| Posted: Thu Jun 24, 2010 11:11 pm Post subject: |
|
|
The built-in COMPARE command might already do what you want.
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html. |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
