Before we got CA-Endevor to do our compiles and stuff, I was working on a generic COMPILE JCL proc. To give you an idea of what I was attempting, I will include the "header" of the JCL.
//COMPILE PROC LANGUAGE=, // LINK=YES, // CICS=NO, // CICSID=NO, // CPARM=, // LPARM='LET,LIST,CALL,XREF', // INTRTST=NO, // XPEDITOR=NO, // ABENDAID=NO, // SYMDUMP=NO, // PROG=, // SRCLIB=, // SRCTYPE=, // SRCLIST=, // LINKLIB= //* LANGUAGE= SPECIFIES THE COMPILER TO USE. //* VALID PARAMETERS ARE: //* COB1 = OS/VS COBOL 2.4 //* COB2 = VS COBOL II 1.4 //* COB3 = COBOL FOR OS/390 AND VM //* ASM = HIGH LEVEL ASSEMBLER //* FORT = FORTRAN //* //* LINK=YES TO LINK-EDIT THE PROGRAM //* NO TO NOT LINK-EDIT THE PROGRAM //* //* CICS=NO - BATCH COMPILE //* 2 - CICS 2.1.2 PROGRAM //* 4 - CICS 4.1 PROGRAM //* 5 - CICS/TS 1.3 PROGRAM //* //* INTRTST=NO DO NOT USE INTERTEST //* YES USE INTERTEST //* //* XPEDITOR=NO DO NOT USE XPEDITOR //* YES USE XPEDITOR //* //* ABENDAID=NO DO NOT USE ABEND/AID //* YES USE ABEND/AID //* //* SYMDUMP=NO DO NOT USE SYMDUMP //* YES USE SYMDUMP //* //* PROG= PROGRAM NAME //* //* SRCLIB= SOURCE LIBRARY NAME //* //* SRCTYPE IS USE TO SPECIFY THE TYPE OF INPUT DATASET //* =PAN - PANVALET //* =PDS - PARTITIONED DATASET //* =SEQ - SEQUENTIAL DATASET //* LINKLIB= LOAD LIBRARY INTO WHICH TO LINK THE PROGRAM //* This procedure is quite complicated already in that it is 124 statements long. But it does its thing via the use of // INCLUDE MEMBER=. The entire thing currently consists of 154 different members which can be INCLUDE'd by this one procedure. Now, it is incomplete because I abandoned it when we got Endevor. But I was thinking that it might be of interest to others. If for no other reason that the insane way it uses symbolics to generate the name of the member to be INCLUDE'd. Does anybody think this might be worth submitting to the CBT site for possible inclusion? If not as a totally working system, then at least as an example of advanced JCL. Well, it is advanced in my world, at least. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology The information contained in this e-mail message may be privileged and/or confidential. It is for intended addressee(s) only. If you are not the intended recipient, you are hereby notified that any disclosure, reproduction, distribution or other use of this communication is strictly prohibited and could, in certain circumstances, be a criminal offense. If you have received this e-mail in error, please notify the sender by reply and delete this message without copying or disclosing it. ---------------------------------------------------------------------- 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
