|
View previous topic :: View next topic
|
| Author |
Message |
ap_mainframes
Active User
Joined: 29 Dec 2005
Posts: 181
Location: Canada
|
|
|
|
Hi,
I have the following peice of code, but some how ISRSUPC is just not returning any thing.
The screen goes blank and then I have to connect it again.
Can anybody help me on this??
Thanks
IF SYSDSN("'"REG.J"'") = 'OK' THEN DO
ADDRESS TSO
"ALLOC DD(NEWDD) SHR REUS DA('"REG.J"')"
"ALLOC DD(OLDDD) SHR REUS DA('"DSN"')"
"ALLOC DD(OUTDD) DA(COMP.LIST) SP(10,10) TR NEW RELEASE REU",
"LRECL(133) BLKSIZE(13566) RECFM(F,B,A) ",
"MGMTCLAS(MCDCOMM)"
LISTPARM = 'DELTAL,LINECMP'
"CALL 'SYS1.SISPLPA(ISRSUPC)','DELTAL,LINECMP'"
"FREE DD(OLDDD) "
"FREE DD(NEWDD) "
"FREE DD(OUTDD) " |
|
| Back to top |
|
 |
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
First, what does the TRACE output show?
Second, You probably need SYSIN allocated as DD DUMMY, or, if the two datasets are PDS's, then SYSIN would contain the member selection criteria.
Third, wouldn't the call specified as:
"CALL *(ISRSUPC) 'DELTAL,LINECMP'"
work better? |
|
| Back to top |
|
|
ap_mainframes
Active User
Joined: 29 Dec 2005
Posts: 181
Location: Canada
|
|
|
|
Hey superk,
Yes I am trying to compare the two members in PDS.
But do we need to give SYSIN in SUPERC??
Can you please let me know why and how do we give that, as, if we open the ISPF SUPERC in batch mode the JCL shown there doesnt have SYSIN.
In case we still need to give it. Can you please let me know how do we do that?
Thanks for all the information you can provide.
ap_mainframes |
|
| Back to top |
|
|
ap_mainframes
Active User
Joined: 29 Dec 2005
Posts: 181
Location: Canada
|
|
|
|
Group,
This issue is still unsolved.
Can anybody help?/ |
|
| Back to top |
|
|
|
|
