Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-18 Thread Paul Gilmartin
On Mon, 17 Mar 2014 18:49:15 -0400, Shmuel Metz (Seymour J.) wrote: > on 03/17/2014 at 11:03 AM, Paul Gilmartin said: > >>No, and no. LINKMVS prefixes the programmer-supplied parameter >>with a halfword length field and passes the result as a single >>parameter to the called program. > >Still no

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-18 Thread Shmuel Metz (Seymour J.)
In <2445830881854866.wa.paulgboulderaim@listserv.ua.edu>, on 03/17/2014 at 11:03 AM, Paul Gilmartin said: >No, and no. LINKMVS prefixes the programmer-supplied parameter >with a halfword length field and passes the result as a single >parameter to the called program. Still not right; w

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-17 Thread Paul Gilmartin
On Mon, 17 Mar 2014 10:34:05 -0400, Shmuel Metz (Seymour J.) wrote: > >>I am not sure what LINKPGM would do for me. > >It would start the parameter with a halfword length field instead of >passing the length as a separate parameter. > No, and no. LINKMVS prefixes the programmer-supplied paramete

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-17 Thread Shmuel Metz (Seymour J.)
In , on 03/14/2014 at 09:01 PM, "Hansen, Dave L - Eagan, MN" said: >Sorry for the delay. We don't have ISRSUPC in the SYS1.LPALIB. LINK >worked, but I didn't figure out the error. I gave you the wrong environment; it should have been LINKMVS rather than LINK. Sorry. >I am not sure what LIN

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-14 Thread Hansen, Dave L - Eagan, MN
Thanks, Dave -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Friday, March 07, 2014 5:56 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR) On Fri, 7 Mar 2014 2

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-10 Thread Shmuel Metz (Seymour J.)
In <7695529832117020.wa.paulgboulderaim@listserv.ua.edu>, on 03/10/2014 at 10:04 AM, Paul Gilmartin said: >Yes, but I never claimed it was "just REXX and TSO issues", merely >that there was a context in which EXEC worked but '%' didn't. No, what you claimed was "There are parameter strin

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-10 Thread Paul Gilmartin
On Sun, 9 Mar 2014 23:41:12 -0400, Shmuel Metz (Seymour J.) wrote: > >>And it was in an ISPSTART context; > >Then you're dealing with ISPF issues, not just REXX and TSO issues; it >has nothing to do with what % allows. Try, at the command line, > >%rexx say arg(1); exit; ' > Yes, but I never claim

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-10 Thread Shmuel Metz (Seymour J.)
In <6209480351328263.wa.paulgboulderaim@listserv.ua.edu>, on 03/09/2014 at 06:51 PM, Paul Gilmartin said: >A string containing an unmatched apostrophe. %member 'foo should work just fine. >And it was in an ISPSTART context; Then you're dealing with ISPF issues, not just REXX and TSO is

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-09 Thread Paul Gilmartin
On Sun, 9 Mar 2014 08:52:02 -0400, Shmuel Metz (Seymour J.) wrote: > on 03/08/2014 at 09:07 PM, Paul Gilmartin said: > >>The syntactic restrictions are different. There are parameter >>strings that I can pass with EXEC that % disallows. > >Such as? > A string containing an unmatched apostrophe

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-09 Thread Shmuel Metz (Seymour J.)
In <2098713607740788.wa.paulgboulderaim@listserv.ua.edu>, on 03/08/2014 at 09:07 PM, Paul Gilmartin said: >The syntactic restrictions are different. There are parameter >strings that I can pass with EXEC that % disallows. Such as? -- Shmuel (Seymour J.) Metz, SysProg and JOAT

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-08 Thread Paul Gilmartin
On Sat, 8 Mar 2014 20:50:37 -0500, Shmuel Metz (Seymour J.) wrote: > >>(On occasion, I've wished for an analogous "EXEC *(MEMBER)".) > >%MEMBER > No. The syntactic restrictions are different. There are parameter strings that I can pass with EXEC that % disallows. -- gil ---

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-08 Thread Shmuel Metz (Seymour J.)
In <3530218517098767.wa.paulgboulderaim@listserv.ua.edu>, on 03/08/2014 at 10:28 AM, Paul Gilmartin said: >Of course, LINKMVS supports multiple parameters, such as alternate >DDNAME lists; I don't know that CALL does this. It does not. >with LINKMVS I can pass a parameter consisting of a

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-08 Thread Shmuel Metz (Seymour J.)
In , on 03/07/2014 at 10:41 PM, "Hansen, Dave L - Eagan, MN" said: >I was told by IBM I don't have ISRSUPC in the SYS1.LPALIB. That shouldn't matter. From z/OS TSO/E Command Reference, SA22-7782-11: * specifies that CALL should use the standard load module search sequence fo

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-08 Thread Paul Gilmartin
On Sat, 8 Mar 2014 05:42:47 -0600, Walt Farrell wrote: > >It does seem odd that the CALL command would simply hang. But yes, I believe >that LINKMVS will work in cases where CALL won't. > Of course, LINKMVS supports multiple parameters, such as alternate DDNAME lists; I don't know that CALL does

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-08 Thread Walt Farrell
On Fri, 7 Mar 2014 17:56:05 -0600, Paul Gilmartin wrote: >On Fri, 7 Mar 2014 22:41:44 +, Hansen, Dave L - Eagan, MN wrote: >> >>44 *-* /* "CALL *(ISRSUPC)" */ >>45 *-* "CALL *(ISRSUPC) 'FILECMP,DELTAL'" >> >L> "CALL *(ISRSUPC) 'FILECMP,DELTAL'" >> >> I was told by IBM I do

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-07 Thread Paul Gilmartin
On Fri, 7 Mar 2014 22:41:44 +, Hansen, Dave L - Eagan, MN wrote: > >44 *-* /* "CALL *(ISRSUPC)" */ >45 *-* "CALL *(ISRSUPC) 'FILECMP,DELTAL'" > >L> "CALL *(ISRSUPC) 'FILECMP,DELTAL'" > > I was told by IBM I don't have ISRSUPC in the SYS1.LPALIB. I had to use > LINKMVS to g

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-07 Thread Hansen, Dave L - Eagan, MN
t to work. CALL will just hang. Thank you and have a good weekend, Dave -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Friday, March 07, 2014 2:18 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: R

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-07 Thread Shmuel Metz (Seymour J.)
In , on 03/07/2014 at 03:35 PM, "Hansen, Dave L - Eagan, MN" said: >I don't know why CALL isn't working for me. You seem to be missing a space. Try "CALL *(ISRSUPC) 'FILECMP,DELTAL'" -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-07 Thread Hansen, Dave L - Eagan, MN
Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Shmuel Metz (Seymour J.) Sent: Thursday, March 06, 2014 8:43 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR) In <9380636879776208.wa.paulgboulderaim@listserv.ua.edu>, on 03/06/2014 at 0

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Paul Gilmartin
On Thu, 6 Mar 2014 21:42:39 -0500, Shmuel Metz (Seymour J.) wrote: > on 03/06/2014 at 04:20 PM, Paul Gilmartin said: > >>So, in Rexx: >>address TSO "call *(ISRSUPC) 'FILE'" > >That will work, but it's overkill. Why not use > > address LINK ISRSUPC 'FILE' > >instead? > Indeed. I was trying

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Shmuel Metz (Seymour J.)
In <9380636879776208.wa.paulgboulderaim@listserv.ua.edu>, on 03/06/2014 at 04:20 PM, Paul Gilmartin said: >So, in Rexx: >address TSO "call *(ISRSUPC) 'FILE'" That will work, but it's overkill. Why not use address LINK ISRSUPC 'FILE' instead? -- Shmuel (Seymour J.) Metz, S

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Shmuel Metz (Seymour J.)
In , on 03/06/2014 at 10:01 PM, "Hansen, Dave L - Eagan, MN" said: > address TSO "alloc fi(newdd) da('A3ZP.PROD.CICS("pgm")') shr reu" > address TSO "alloc fi(olddd) da('A3WD.APPROD3.CICS("pgm")') shr reu" What about the rest of the allocations? -- Shmuel (Seymour J.) Metz,

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Shmuel Metz (Seymour J.)
In , on 03/06/2014 at 03:43 PM, "Hansen, Dave L - Eagan, MN" said: >I would like to automate comparing a bunch of FONT libs. 1. the SuperC panels have an option to generate a batch job. Use it and look at the generated JCL 2. What did you allocate before invoking ISRSUPC? 3. What is

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Farley, Peter x23353
List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hansen, Dave L - Eagan, MN Sent: Thursday, March 06, 2014 5:02 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR) Dear Group, Ok, I got IEBCOMPR to work: "ALLOC FI(SYSUT1) DA('PMSBDH.VPS.LRS.AF

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Sri h Kolusu
:36 PM: > From: "Hansen, Dave L - Eagan, MN" > To: IBM-MAIN@listserv.ua.edu, > Date: 03/06/2014 02:02 PM > Subject: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR) > Sent by: IBM Mainframe Discussion List > > Dear Group, > >Ok, I got IEBCOMPR to w

Re: RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Paul Gilmartin
On Thu, 6 Mar 2014 22:01:36 +, Hansen, Dave L - Eagan wrote: > > I found this site: > http://computer-programming-forum.com/38-rexx/35af2e8f164fb280.htm and this > EXEC: > > address tso "call *(isrsupc)" > if rc = 0 then

RC 24 from ISRSUPC (Was 0C4 from TSOEXEC IEBCOMPR)

2014-03-06 Thread Hansen, Dave L - Eagan, MN
#x27;00'X,8) ||, /* DDNAME 11 OVERRIDE: SYSUT4 */ COPIES('00'X,8) ||, /* DDNAME 12 OVERRIDE: SYSTERM */ COPIES('00'X,8) ||, /* DDNAME 13 OVERRIDE: N/A */ COPIES('00'X,8) /* DDNAME 14 OVERRIDE: SYSCIN */ ADDRESS 'LINKMVS&#x

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Sri h Kolusu
REE FI(PDS1 PDS2 CTL REP)" EXIT RC Sri Hari Kolusu DFSORT Development IBM Corporation Email: skol...@us.ibm.com Phone: 408-927-2187 Tie Line: 457-2187 IBM Mainframe Discussion List wrote on 03/06/2014 09:34:58 AM: > From: Paul Gilmartin > To: IBM-MAIN@listserv.ua.edu, &g

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Paul Gilmartin
On Thu, 6 Mar 2014 09:20:56 -0800, Sri h Kolusu wrote: >Hansen, > >The following REXX will invoke IEBCOMPR > >/* REXX */ >ADDRESS TSO >"ALLOC FI(SYSUT1) DA('Your.PDS1.To.Compare') SHR" >"ALLOC FI(SYSUT2) DA('Your.PDS2.To.Compare') SHR" >"ALLOC DD(SYSPRINT) DA(*) REU" >"ALLOC DD(SYSIN) NEW REU RECF

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Paul Gilmartin
On Thu, 6 Mar 2014 15:43:22 +, Hansen, Dave L - Eagan, MN wrote: > > My trace ===> 30 *-* "ISPEXEC SELECT PGM(ISRSUPC)" >>L> "ISPEXEC SELECT PGM(ISRSUPC)" > Eek! I've always just ALLOCATEd a couple DDNames and done "address LINKMVS ISRSUPC". (It may

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Sri h Kolusu
Hansen, The following REXX will invoke IEBCOMPR /* REXX */ ADDRESS TSO "ALLOC FI(SYSUT1) DA('Your.PDS1.To.Compare') SHR" "ALLOC FI(SYSUT2) DA('Your.PDS2.To.Compare') SHR" "ALLOC DD(SYSPRINT) DA(*) REU" "ALLOC DD(SYSIN) NEW REU RECFM(F B) LRECL(80)" QUEUE " COMPARE TYPORG=PO " "EXECIO "QUE

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Hansen, Dave L - Eagan, MN
M Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Terry Sambrooks Sent: Thursday, March 06, 2014 2:14 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: 0C4 from TSOEXEC IEBCOMPR Hi Dave, Acknowledging that an example for comparing two PDSEs may existing in the z/OS V1R12.0

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-06 Thread Terry Sambrooks
Hi Dave, Acknowledging that an example for comparing two PDSEs may existing in the z/OS V1R12.0 DFSMSdfp Utilities (SC26-7414-07) manual. When I last looked at IEBCOMPR in the utilities manual, I notice the very first paragraph is "Recommendation: Use the SuperC utility instead of IEBCOMPR. Super

Re: 0C4 from TSOEXEC IEBCOMPR

2014-03-05 Thread Jim Mulder
>I am trying to compare two PDSEs. I found Example 8: Compare Two > PDSEs in the z/OS V1R12.0 DFSMSdfp Utilities (SC26-7414-07). I am > trying to get IEBCOMPR to work from REXX like I got IEBCOPY to work. > We are running z/OS V1R13. > > "ALLOC FI(SYSUT1) DA('PMSBDH.VPS.LRS.AFP.V2R10.FDEFLI

0C4 from TSOEXEC IEBCOMPR

2014-03-05 Thread Hansen, Dave L - Eagan, MN
Dear Group, I am trying to compare two PDSEs. I found Example 8: Compare Two PDSEs in the z/OS V1R12.0 DFSMSdfp Utilities (SC26-7414-07). I am trying to get IEBCOMPR to work from REXX like I got IEBCOPY to work. We are running z/OS V1R13. "ALLOC FI(SYSUT1) DA('PMSBDH.VPS.LRS.AFP.V2R10.FD