Link3270 Repository file update JCL (DFHMAMLU)

Start of changeThe DFHMAMLU sample JCL utility is provided to support the running of MQIAC flows in the runtime environment only. It is used to generate repository entries from CICS® BMS map source code. The sample JCL utility runs the Link3270 Repository file update batch program (DFHMALUP) that generates repository entries. This can be included as an additional step in a BMS assembly procedure. The Link3270 Repository file is not used in the runtime processing of CICS SFR service adapters.End of change

//jobname  JOB DFHMAMLU,'DFHMAMLU',CLASS=A,MSGCLASS=H TYPRUN=SCAN       
//********************************************************************* 
//* @START_COPYRIGHT@                                                   
//*                                                                     
//* 5655-M15 
//*                                                                     
//* CICS SERVICE FLOW RUNTIME                                           
//*                                                                     
//* @END_COPYRIGHT@                                                     
//********************************************************************* 
//********************************************************************* 
//* RUN DFHMALUP (CICS SFR REPOSITORY FILE UPDATE PROGRAM)              
//*                                                                     
//********************************************************************* 
//MALUP    EXEC PGM=DFHMALUP                                            
//STEPLIB DD DSN='hlq.SCIZLOAD',DISP=SHR                                
//********************************************************************* 
//*     The output will go to SYSPRINT                                  
//********************************************************************* 
//SYSPRINT DD SYSOUT=*                                                  
//SYSOUT   DD SYSOUT=*                                                  
//BMS      DD DSN=hlq.COBLIB(XXXXXXX),DISP=SHR                          
//DFHMALRF DD DSN=hlq.DFHMALRF,DISP=SHR                                 
//**********************************************************************
//*                                                                    *
//*   SYSIN control card formats                                       *
//*                                                                    *
//**  PARAMETERS  ******************************************************
//*                                                                    *
//*  MAPSET=    Mapset name  (REQUIRED)                                *
//*             (7 bytes maximum; uppercase entry only)                *
//*                                                                    *
//*  OVERRIDE=  Y/N - use mapset name from MAPSET= parameter           *
//*                   overriding mapset name in BMS file.              *
//*             (1 byte OPTIONAL parameter; uppercase only if provided)*
//*                                                                    *
//*  STATIC=    Y/N - include fields with INITIAL data but no          *
//*                   field names. Static 3270 screen content.         *
//*             (1 byte OPTIONAL parameter; uppercase only if provided)*
//*                                                                    *
//*  PRINT=     Print switch; valid values (A/N/P/spaces).             *
//*                                                                    *
//*             (A)ll       - print all BMS records read and errors    *
//*             (N)o        - only errors reported                     *
//*             (P)rocessed - print only processed BMS records read    *
//*             spaces      - defaults to (P)                          *
//*             NULL        - defaults to (P)                          *
//*                                                                    *
//*             (1 byte OPTIONAL parameter; uppercase only if provided)*
//*                                                                    *
//**********************************************************************
//*+5++++0++++5++++0++++5++++0++++5++++0++++5++++0++++5++++0++++5++++0++
//SYSIN   DD *                                                          
MAPSET=name                                                             
//*OVERRIDE=                                                            
//*STATIC=                                                              
//*PRINT=                                                               
/*                                                                      
//