Properties file update JCL (DFHMAMPU)

//jobname  JOB DFHMAMPU,'DFHMAMPU',CLASS=A,MSGCLASS=H TYPRUN=SCAN
//*********************************************************************
//* @START_RRS_COPYRIGHT@
//* Licensed Materials - Property of IBM
//*
//* "Restricted Materials of IBM"
//*
//* 5655-M15
//*
//* (c) Copyright IBM Corp. 2000, 2006
//*
//* CICS Service Flow Runtime
//* @END_RRS_COPYRIGHT@
//*********************************************************************
//*********************************************************************
//* RUN DFHMAMUP (CICS SFR PROPERTIES FILE UPDATE PROGRAM)
//*
//*********************************************************************
//MAMUP    EXEC PGM=DFHMAMUP
//STEPLIB DD DSN='hlq.SCIZLOAD',DISP=SHR
//*********************************************************************
//*     The output will go to SYSPRINT
//*********************************************************************
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//DFHMAMPF DD DSN=hlq.DFHMAMPF,DISP=SHR
//**********************************************************************
//*                                                                    *
//*   SYSIN control card formats                                       *
//*                                                                    *
//*   Card=MODE  *******************************************************
//*                                                                    *
//*  MODE (SAFE; OVERWRITE)                                            *
//*                                                                    *
//**  Card=TYPE  *******************************************************
//*                                                                    *
//*  TYPE (R-REQUEST; 0-NAVIGATOR; 1-DPL; 2-MQPUT; 3-FEPI; 4-MQGET;    *
//*                   5-LINK3270)                                      *
//*                                                                    *
//**  Card=NAME  *******************************************************
//*                                                                    *
//*  NAME (REQUEST NAME/COMMAND NAME)                                  *
//*                                                                    *
//*                                                                    *
//**  PARMS TYPE=R  ****************************************************
//*                                                                    *
//*  PARM01      : REQUEST TYPE (0-ASYNC; 1-SYNC; 2-SYNC ROLLBACK)     *
//*  PARM02      : INITIAL PROGRAM ID                                  *
//*  PARM03      : INITIAL TRANSACTION ID                              *
//*  PARM04      : PERSISTENCE IND                                     *
//*  PARM05      : XML PARSE PROGRAM ID                                *
//*  PARM06      : DEPLOYMENT IND                                      *
//*  PARM07      : INITIAL PROGRAM TYPE                                *
//*                                                                    *
//**  PARMS TYPE=0  ****************************************************
//*                                                                    *
//*  (reserved)                                                        *
//*                                                                    *
//**  PARMS TYPE=1  ****************************************************
//*                                                                    *
//*  PARM01      : DPL PROGRAM                                         *
//*  PARM02      : DPL SYSID                                           *
//*  PARM03      : DPL MIRROR TRANSACTION                              *
//*  PARM04      : DPL SYNCONRETURN (Y/N)                              *
//*                                                                    *
//**  PARMS TYPE=2  ****************************************************
//*                                                                    *
//*  PARM01      : MQ MSGTYPE  (1-REQUEST; 2-REPLY; 8-DATAGRAM)        *
//*  PARM02      : MQ REQUEST QNAME                                    *
//*  PARM03      : MQ REPLYTOQ                                         *
//*  PARM04      : MQ REPLYTOQMGR                                      *
//*                                                                    *
//**  PARMS TYPE=3  ****************************************************
//*                                                                    *
//*  PARM01      : FEPI POOL NAME                                      *
//*  PARM02      : FEPI TARGET NAME                                    *
//*  PARM03      : FEPI (BE) TIMEOUT VALUE                             *
//*  PARM04      : FEPI EXIT ACTION (R-RELEASE; F-FORCE; P-PASS;       *
//*                                  H-HOLD; A-LEAVE ASSIGNED)         *
//*  PARM05      : FEPI SIGNON PROGRAM NAME  (NOT CURRENTLY SUPPORTED) *
//*  PARM06      : FEPI SIGNOFF PROGRAM NAME (NOT CURRENTLY SUPPORTED) *
//*  PARM07      : FEPI ROUTING PROGRAM NAME (NOT CURRENTLY SUPPORTED) *
//*  PARM08      : FEPI NON-UNIQUE USERID                              *
//*                  (Y - NON-UNIQUE USERIDS IN USE.                   *
//*                       UNIQUE ASSIGNMENT REQUIRED.)                 *
//*                  (N - UNIQUE USERIDS IN USE                        *
//*                       NO UNIQUE ASSIGNMENT REQUIRED.)              *
//*                                                                    *
//**  PARMS TYPE=4  ****************************************************
//*                                                                    *
//*  PARM01      : MQ WAIT LIMIT (SECONDS)                             *
//*  PARM02      : MQ REPLYTOQ                                         *
//*  PARM03      : MQ REPLYTOQMGR                                      *
//*                                                                    *
//**  PARMS TYPE=5  ****************************************************
//*                                                                    *
//*  PARM01      : LINK3270 SERVICE NAME                               *
//*  PARM02      : LINK3270 FACILITYLIKE                               *
//*  PARM03      : LINK3270 MAX. FACILITY KEEPTIME (seconds)           *
//*  PARM04      : LINK3270 GETWAITINTERVAL (milli-seconds)            *
//*  PARM05      : LINK3270 DEALLOCATE FACILITY ON EXIT                *
//*                         (0-NO; 1-ALWAYS; 2-IF SUCCESSFUL;          *
//*                          3-IF UNSUCCESSFUL)                        *
//*  PARM06      : LINK3270 NON-UNIQUE USERID ASSIGNMENT               *
//*                         (Y - NON-UNIQUE USERIDS IN USE.            *
//*                              UNIQUE ASSIGNMENT REQUIRED.)          *
//*                         (N - UNIQUE USERIDS IN USE                 *
//*                              NO UNIQUE ASSIGNMENT REQUIRED.)       *
//*  PARM07      : LINK3270 AOR ROUTING ALLOWED/IN USE                 *
//*                         (Y - AOR ROUTING ALLOWED/IN USE)           *
//*                         (N - AOR ROUTING NOT ALLOWED/IN USE)       *
//*  PARM08      : LINK3270 VECTOR LOGGING  (0-OFF; 1-ON; 2-TRACE)     *
//*                                                                    *
//**********************************************************************
//SYSIN   DD *
MODE=SAFE
TYPE=R
NAME=requestname
PARM01=requesttype
PARM02=initialprogramid
PARM03=initialtranid
PARM04=persistenceind
PARM05=xmlparseprgramid
PARM06=deploymentind
PARM07=initialprogramtype
PARMXX
TYPE=1
NAME=dplprogramid
PARM01=linkprogramid
PARM02=linksysid
PARM03=linktranid
PARM04=linksynconreturn
PARMXX
TYPE=2
NAME=mqputprogramid
PARM01=mqmdmsgtype
PARM02=mqodobjectname
PARM03=mqmdreplytoq
PARM04=mqmdreplytoqmgr
PARMXX
TYPE=3
NAME=fepiprogramid
PARM01=poolname
PARM02=targetname
PARM03=timeout
PARM04=releasetype
PARM05=RESERVED
PARM06=RESERVED
PARM07=RESERVED
PARM08=nonuniqueuserid
PARMXX
TYPE=4
NAME=mqgetprogramid
PARM01=mqgmowaitinterval
PARM02=mqodobjectname
PARM03=mqodobjectqmgrname
PARMXX
TYPE=5
NAME=link3270programid
PARM01=servicename
PARM02=facilitylike
PARM03=maxkeeptime
PARM04=getwaitinterval
PARM05=deallocatefacility
PARM06=nonuniqueuserid
PARM07=aorrouting
PARM08=vectorlogging
PARMXX
/*
//