1 ENDMQMBRK
2!  OPTION(*CNTRLD) 
2?
2  OPTION(*IMMED) 
3?  MQMNAME(QMgrName)