On Tue, 12 Jul 2011 19:36:09 +0000 Ted MacNEIL <[email protected]> wrote:
:>I disagree. :>JCL meets all criteria to be a programming language. :>It doesn't do everything, but what language does? No looping construct. :>But, it is more complex than channel programmes, and they're considered a programming language. Has TIC :>Ted MacNEIL :>[email protected] :>Twitter: @TedMacNEIL :> :>-----Original Message----- :>From: Cris Hernandez #9 <[email protected]> :>Sender: IBM Mainframe Discussion List <[email protected]> :>Date: Tue, 12 Jul 2011 12:08:22 :>To: <[email protected]> :>Reply-To: IBM Mainframe Discussion List <[email protected]> :>Subject: Re: JCL Question :> :>contrary to popular misconceptions, JCL is not a programming language, meaning it's not used to manipulate data. To append data onto any existing file, code disp=mod instead of shr/new/old and use appropriate pgm/util to read in & write out what you want. :> :> :>--- On Tue, 7/12/11, Mosley, George <[email protected]> wrote: :> :>> From: Mosley, George <[email protected]> :>> Subject: JCL Question :>> To: [email protected] :>> Date: Tuesday, July 12, 2011, 1:27 PM :>> Hello All. :>> :>> We're trying to set up a batch job that will append a :>> datestamp to a dataset name. :>> For example: :>> :>> //S0 EXEC PGM=EMCSRDF :>> //SYSPRINT DD DSN=STRG.SRDF.INVTRKS.JUL09.@1408, :>> // :>> STORCLAS=BASE,MGMTCLAS=MEDIUM, :>> // DISP=(,CATLG), :>> // :>> SPACE=(TRK,(15,15),RLSE), :>> // :>> DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0) :>> //SYSIN DD * :>> EMC-SQ VOL,44FA,INV_TRKS :>> /* :>> :>> When we run this job, we hard code JUL09.@1408 to the end :>> of the SYSPRINT dataset name. :>> Is there a way to have the JCL automatically add the :>> datestamp? :>> :>> George (ICBC) :>> ------------------------------------------------------------ :>> This email and any attachments are intended only for the :>> named :>> recipient and may contain confidential and/or privileged :>> material. :>> Any unauthorized copying, dissemination or other use by a :>> person :>> other than the named recipient of this communication is :>> prohibited. :>> If you received this in error or are not named as a :>> recipient, :>> please notify the sender and destroy all copies of this :>> email :>> immediately. :>> :>> ---------------------------------------------------------------------- :>> For IBM-MAIN subscribe / signoff / archive access :>> instructions, :>> send email to [email protected] :>> with the message: GET IBM-MAIN INFO :>> Search the archives at http://bama.ua.edu/archives/ibm-main.html :>> :> :>---------------------------------------------------------------------- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to [email protected] with the message: GET IBM-MAIN INFO :>Search the archives at http://bama.ua.edu/archives/ibm-main.html :> :>---------------------------------------------------------------------- :>For IBM-MAIN subscribe / signoff / archive access instructions, :>send email to [email protected] with the message: GET IBM-MAIN INFO :>Search the archives at http://bama.ua.edu/archives/ibm-main.html -- Binyamin Dissen <[email protected]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html

