Will there be any other words beside CHAIN? Are there any lengths beside 5?
It would be helpful to know all of the details of your input. Otherwise the solution will come in pieces only. Lizette > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Ron Thomas > Sent: Monday, September 15, 2014 8:38 AM > To: [email protected] > Subject: Re: SORT JCL > > Hello > > The below control card is working, but in some cases where there is a word > "CHAIN" , it is setting to zeros. We need this to be copied as it is. > If the input length is 5 then copy as it is else if it is 4 or less than 54 > append zeros to > it. > > > OUTREC IFTHEN=(WHEN=INIT,BUILD=(1,5,UFF,M1,6,2,8,5,UFF,M1,80:X)), > IFTHEN=(WHEN=(9,5,ZD,EQ,0),OVERLAY=(9:5X)) > > 1 – 43 > 343-999 > CHAIN > 4062 - 4108 > 4110 - 4700 > 4705 - 4706 > 4708 > 4714 > 4719 > 4723 > > 00001 – 00043 > 00343 - 00999 > CHAIN > 04062 - 04108 > 04110 - 04700 > 04705 - 04706 > 04708 > 04714 > 04719 > 04723 > > Thanks > Ron T ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
