In a recent note, Gilbert Saint-Flour said:
> Date: Sun, 7 May 2006 11:50:33 -0400
>
> REXX is probably your best bet, but in the 1970s and 1980s, REXX wasn't
> available on MVS and I often used the AREAD capability of ASMH (also
> available in HLASM) to generate job streams. See example below (it's
> been a while, correct syntax is NOT guaranteed):
>
Having attempted this sort of tailoring variously in Rexx,
POSIX shell from a here-document, and sed, I find Rexx is
uniformly hardest to use; POSIX shell is best for simple
operations (the sort of thing that could almost be done
with JCL symbol substitutions except for various onerous
restrictions), and sed is best for complex operations or
any use of external prototype data.
I haven't tried assembler, but it intrigues me. Does
the "AREAD ... PUNCH" sequence perform symbol substitution,
presumably of GBLC variables? (I assume that's the main
point of the exercise.) This could well bypass the
limitations of JCL symbol substitutions so often discussed
here, and permit self-contained tailorable jobs with no
external skeletons, filters, etc. Might be easier than
Rexx.
> MACRO
> JPUNCH
> .LOOP ANOP
> AREAD &CARD
> AIF ('&CARD' EQ '').EOJ
No specific EOF test? Pity. What if the input data contain
an actual empty line?
> PUNCH '&CARD'
> AGO .LOOP
> .EOJ END
> MEND ---------------
> JPUNCH , <---------- execute macro and read data cards
> PFX TUSER.HH
> RST ADCD.A.CNTL
> RST ADCD.LIB.JCL
> /*
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [log in to unmask] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> ___________________________________________________________________
>
> Back to: Top of message | Previous page | Main IBM-MAIN page
> BAMA.UA.EDU Secured by F-Secure Anti-Virus CataList email list search
> Powered by LISTSERV email list manager
--
StorageTek
INFORMATION made POWERFUL
----------------------------------------------------------------------
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