//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
/*
//