Ron,

As mentioned in my reply, the steps are using 2 different inputs.

      24 //SORTIN   DD DSN=N01.&CC.SWC.WC926.GSAMOUT1,DISP=SHR 00910000
          IEFC653I SUBSTITUTION JCL - 
DSN=N01.HG.SWC.WC926.GSAMOUT1,DISP00920000
       25 //         DD DSN=N01.&CC.SWC.WCW73.CLUB.USE,DISP=SHR 00930000
          IEFC653I SUBSTITUTION JCL - 
DSN=N01.HG.SWC.WCW73.CLUB.USE,DISP00940000
       26 //SORTOUT  DD 
DSN=RRONTDE.SWC.WC926.SORTOUTU,DISP=(,CATLG,DELE00950000
          //             DCB=(LRECL=80,RECFM=FB,DSORG=PS), 00960000
          //             SPACE=(80,(140,30),RLSE),AVGREC=K 00970000
       27 //SYSIN    DD * 00980000


       38 //SORTIN   DD DSN=N01.&CC.SWC.WC926.GSAMOUT1,DISP=SHR 01260000
          IEFC653I SUBSTITUTION JCL - 
DSN=N01.HG.SWC.WC926.GSAMOUT1,DISP01270000
       39 //         DD DSN=N01.&CC.SWC.WCW73.CLUB.USE.SNE1,DISP=SHR 
01280000
          IEFC653I SUBSTITUTION JCL - DSN=N01.HG.SWC.WCW73.CLUB.USE.SNE1
01290000
       40 //SORTOUT  DD DSN=RRONTDE.SWC.WC926.SORTOUTI, 01300000
          //             DISP=(,CATLG,DELETE), 01310000
          //             DCB=(LRECL=80,RECFM=FB,DSORG=PS), 01320000
 

Thanks,
Kolusu

IBM Mainframe Discussion List <[email protected]> wrote on 
07/30/2014 10:15:46 AM:

> From: Ron Thomas <[email protected]>
> To: [email protected]
> Date: 07/30/2014 10:16 AM
> Subject: Re: SORT JCL
> Sent by: IBM Mainframe Discussion List <[email protected]>
> 
> Ok Kolusu. I  have send the details.  Thanks.
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
> 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to