Supplying Variable Values through an External Member

In the previous steps, you provided the value for a user-defined AutoEdit variable by updating the job scheduling definition. But you can alternatively provide such values through special members dedicated to this purpose. This enables you to provide the values without updating the JCL, and without updating the job scheduling definition.

You can provide these values through an AutoEdit member identified by the AutoEdit control statements %%LIBSYM and %%MEMSYM.

1. Create a member IDTAPE in a work library. For purposes of this exercise, you will call the library CTM.TEST.AUTOEDIT.
2. In member IDTAPE, place the following lines:

   %%BRANCH01_TAPE=5554444

   %%BRANCH02_TAPE=3336666

   %%BRANCH03_TAPE=7654321

3. Edit the JCL for IDJOB6 as shown in the following instructions:
   1. Delete the comment lines, that is, those containing AutoEdit terms, that you added earlier.
   2. Add the following statements to the JCL, then exit the JCL:

      //* %%LIBSYM CTM.TEST.AUTOEDIT %%MEMSYM IDTAPE

      //* TAPE ID PROVIDED: %%BRANCH01_TAPE

      //* TAPE ID PROVIDED: %%BRANCH03_TAPE

4. Enter the AutoEdit Simulation utility and run the simulation for IDJOB6. The results of the simulation look similar to those shown in Figure 45. Observe the resolved values for the two //* TAPE ID PROVIDED: statements.

   Figure 45 AutoEdit Simulation Output

   ********************************* Top of Data *********************************

   SUB131ISUBMITTER STARTED                                                    

   14.50.17 AES175I JOB SUBMISSION SIMULATION   STARTED                        

   SCHEDLIB CTM.TEST.SCHEDULE                                                 

   TABLE  IDGS3                                                               

   JOB IDJOB6                                                                  

   WDATE   020201                                                              

   ODATE   020201                                                              

   LIST                                                                        

   14.50.17 AESL47I 'SCHEDLIB' CONTROL CARD FOUND - SCHEDULE LIBRARY PROCESSING MO

      

   14.50.17 AES190I IDJOB6   RETRIEVED FROM TABLE IDGS3    IN SCHEDULE LIBRARY CTM

   14.50.17 AESL53I IDJOB6   RETRIEVED FROM MEMLIB  LIBRARY CTM.TEST.JCL       

                                                                                  

   14.50.17 AES177I START SUBMISSION SIMULATION   OF MEMBER IDJOB6   LIBRARY CTM.T

   -------------------------------------------------------------------------------

   //M21  JOB APERLMAN,CLASS=A,                                                 

   //    MSGCLASS=X,NOTIFY=ID,                                                 

   //       MSGLEVEL=(1,1)                                                      

   //*NET ID=AESUSER                                                           

   //*---- SUBMITTED BY CONTROL-M (FROM MEMLIB)   ODATE=010202                 

   //*---- SCHEDULE CTM.TEST.SCHEDULE(IDGS3)                                   

   //*---- JCL      CTM.TEST.JCL(IDJOB6)                                        

   //*---- CONTROL-M JOB IDENTIFICATION:  ORDER ID=ZZZZZ  RUN NO.=00001         

   //* %%LIBSYM CTM.TEST.AUTOEDIT %%MEMSYM IDTAPE                               

   //* TAPE ID PROVIDED: 5554444                                            

   //* TAPE ID PROVIDED: 7654321                                            

   //S1  EXEC  PGM=IEFBR14                                                      

   SUB133IM21GRP3              IDJOB6 ZZZZZM21           SUBMITTED FROM LIBRARY (P)

   -------------------------------------------------------------------------------

   14.50.18 AES178I END SUBMISSION SIMULATION   OF MEMBER IDJOB6   LIBRARY CTM.TEST

   14.50.18 AES176I JOB SUBMISSION SIMULATION    ENDED                          

   SUB159ISHUT DOWN UPON REQUEST OF MAIN TASK                                   

   ******************************** Bottom of Data *******************************