*DECK RHFOVL
          IDENT  RHF
          LCC    OVERLAY(RHFOVL,0,00) 
          END 
          IDENT  CNTROL 
          END 
          IDENT  OVLLDR 
          END 
          IDENT  WAITR
          END 
          IDENT  DUMPFL 
          END 
          IDENT  CLEANUP
          END 
          IDENT   CLRLIDT 
          END 
          IDENT  CLRSCP 
          END 
          IDENT  ENDRHF 
          END 
          IDENT  NDRRSTR
          END 
          IDENT  RHFMSG 
          END 
          IDENT  ZBYTE
          END 
  
          IDENT  RHF0100
          LCC    OVERLAY(RHFOVL,1,00) 
          ENTRY  INIT 
 INIT     BSSZ   1
          RJ     =XSTARTUP
          EQ     INIT 
          END    INIT 
          IDENT  STARTUP
          END 
          IDENT  AUTLOAD
          END 
          IDENT  BATCJOB
          END 
          IDENT  AUTSTRT
          END 
          IDENT  STRTJOB
          END 
          IDENT  N$EESET
          END 
          IDENT  N$CONSL
          END 
          IDENT  GETRCF 
          END 
          IDENT  MOVE 
          END 
          IDENT  YZTB 
          END 
          IDENT  BINTODD
          END 
  
  
          IDENT  RHF0200
          LCC    OVERLAY(RHFOVL,2,00) 
          ENTRY  IDL
 IDL      BSSZ   1
          RJ     =XIDLE 
          EQ     IDL
          END    IDL
          IDENT  IDLE 
          END 
          IDENT  GETFREE
          END 
          IDENT  QUEUE
          END 
          IDENT  DEQUEUE
          END 
          IDENT  MOVE 
          END 
  
  
          IDENT  RHF0300
          LCC    OVERLAY(RHFOVL,3,00) 
          ENTRY  RES
 RES      BSSZ   1
          RJ     =XACTIVE 
          EQ     RES
          END    RES
          IDENT  ACTIVE 
          END 
          IDENT  EVNTSCN
          END 
          IDENT  OVLYSCN
          END 
          IDENT  CHCMD
          END 
          IDENT  MUJACT 
          END 
          IDENT  WAIT 
          END 
          IDENT  DEQUEUE
          END 
          IDENT  FREE 
          END 
          IDENT  GETFREE
          END 
          IDENT  QUEUE
          END 
          IDENT  QERRLGL
          END 
          IDENT  RTNNSUP
          END 
          IDENT  SUPRPLY
          END 
          IDENT  GENWAIT
          END 
          IDENT  UCPREQ 
          END 
          IDENT  UCPQUE 
          END 
          IDENT  NETGET 
          END 
          IDENT  NETGETL
          END 
          IDENT  NETXFR 
          END 
          IDENT  NETPUT 
          END 
          IDENT  RTNSMSG
          END 
          IDENT  UCPRPLY
          END 
          IDENT  GENNSUP
          END 
          IDENT  SSFREQ 
          END 
          IDENT  SSFERRP
          END 
          IDENT  UCPCOMP
          END 
          IDENT  MSGRPLY
          END 
          IDENT  MSGREQ 
          END 
          IDENT  NSUPR
          END 
          IDENT  SWAPIN 
          END 
          IDENT  NADREQ 
          END 
          IDENT  ASGNDR 
          END 
          IDENT  REQUECS
          END 
          IDENT  VFETFNC
          END 
          IDENT  ACKQ 
          END 
          IDENT  STRTNDR
          END 
          IDENT  NDRCOMP
          END 
          IDENT  QUEOFF 
          END 
          IDENT  STATCMP
          END 
          IDENT  FCACK
          END 
          IDENT  STATUSF
          END 
          IDENT  SENDCMP
          END 
          IDENT  CMPSTAT
          END 
          IDENT  READCMP
          END 
          IDENT  OVRFLOW
          END 
          IDENT  WRITCMP
          END 
          IDENT  LOCACK 
          END 
          IDENT  FCNAK
          END 
          IDENT  FETCMP 
          END 
          IDENT ECMCMP
          END 
          IDENT SCMCMP
          END 
          IDENT  NXTNADR
          END 
          IDENT  NADFUNC
          END 
  
          IDENT  RHF0301
          LCC    OVERLAY(RHFOVL,3,01) 
          ENTRY  OVL301 
 OVL301   BSSZ   1
          RJ     =XUNKNUCP
          EQ     OVL301 
          END    OVL301 
          IDENT  UNKNUCP
          END 
          IDENT  NOAPLAD
          END 
          IDENT  UCPMSG 
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  SSFCALL
          END 
          IDENT  UCPSWPI
          END 
  
          IDENT  RHF0302
          LCC    OVERLAY(RHFOVL,3,02) 
          ENTRY  OVL302 
 OVL302   BSSZ   1
          RJ     =XNETON
          EQ     OVL302 
          END    OVL302 
          IDENT  NETON
          END 
          IDENT  UCPSWPI
          END 
          IDENT  FINDAPL
          END 
          IDENT  NETONR 
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  SSFCALL
          END 
          IDENT  BINTODD
          END 
          IDENT  UCPVAL 
          END 
          IDENT  INITAPL
          END 
          IDENT  SETLTC 
          END 
          IDENT  CONREQR
          END 
  
          IDENT  RHF0303
          LCC    OVERLAY(RHFOVL,3,03) 
          ENTRY  OVL303 
 OVL303   BSSZ   1
          RJ     =XNETOFF 
          EQ     OVL303 
          END    OVL303 
          IDENT  NETOFF 
          END 
          IDENT  FREEACN
          END 
          IDENT  BINTODD
          END 
          IDENT  MOPQACN
          END 
          IDENT  MOPUPQS
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  NETOFFR
          END 
          IDENT  SSFCALL
          END 
          IDENT  UCPSWPI
          END 
          IDENT  WAITACN
          END 
          IDENT  OVERFLO
          END 
  
          IDENT  RHF0304
          LCC    OVERLAY(RHFOVL,3,04) 
          ENTRY  OVL304 
 OVL304   BSSZ   1
          RJ     =XNETWAIT
          EQ     OVL304 
          END    OVL304 
          IDENT  NETWAIT
          END 
  
          IDENT  RHF0305
          LCC    OVERLAY(RHFOVL,3,05) 
          ENTRY  OVL305 
 OVL305   BSSZ   1
          RJ     =XERRLGL 
          EQ     OVL305 
          END    OVL305 
          IDENT  ERRLGL 
          END 
          IDENT  BUILDEM
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  UCPMSG 
          END 
          IDENT  SSFCALL
          END 
          IDENT  UCPSWPI
          END 
  
          IDENT  RHF0306
          LCC    OVERLAY(RHFOVL,3,06) 
          ENTRY  OVL306 
 OVL306   BSSZ   1
          RJ     =XSTATEVT
          EQ     OVL306 
          END    OVL306 
          IDENT  STATEVT
          END 
          IDENT  BRAKACN
          END 
          IDENT  CONCBR 
          END 
          IDENT  ACRQA
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  CONREQR
          END 
          IDENT  FREEACN
          END 
          IDENT  BINTODD
          END 
          IDENT  MOPQACN
          END 
          IDENT  WAITACN
          END 
  
          IDENT  RHF0307
          LCC    OVERLAY(RHFOVL,3,07) 
          ENTRY  OVL307 
 OVL307   BSSZ   1
          RJ     =XCTRLMSG
          EQ     OVL307 
          END    OVL307 
          IDENT  CTRLMSG
          END 
          IDENT  PRCTRLM
          END 
          IDENT  BRKRCVD
          END 
          IDENT  DISCARD
          END 
          IDENT  RSTRCVD
          END 
  
          IDENT  RHF0310
          LCC    OVERLAY(RHFOVL,3,10) 
          ENTRY  OVL310 
 OVL310   BSSZ   1
          RJ     =XOVERFLO
          EQ     OVL310 
          END    OVL310 
          IDENT  OVERFLO
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  BINTODD
          END 
  
          IDENT  RHF0311
          LCC    OVERLAY(RHFOVL,3,11) 
          ENTRY  OVL311 
 OVL311   BSSZ   1
          RJ     =XNADOFF 
          EQ     OVL311 
          END    OVL311 
          IDENT  NADOFF 
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  BRAKACN
          END 
          IDENT  FREEACN
          END 
          IDENT  MOPQACN
          END 
          IDENT  WAITACN
          END 
          IDENT  BINTODD
          END 
          IDENT   UPDNWS
          END 
          IDENT   FALTPTH 
          END 
          IDENT   SPIDSTA 
          END 
          IDENT  ACRQA
          END 
          IDENT  CONCBR 
          END 
          IDENT  MHFMSG 
          END 
          IDENT  STRTJOB
          END 
          IDENT  BATCJOB
          END 
  
          IDENT  RHF0312
          LCC    OVERLAY(RHFOVL,3,12) 
          ENTRY  OVL312 
 OVL312   BSSZ   1
          RJ     =XSUPRMSG
          EQ     OVL312 
          END    OVL312 
          IDENT  SUPRMSG
          END 
          IDENT CMSELR
          END 
          IDENT QCMSELA 
          END 
          IDENT CMEXITR 
          END 
          IDENT  CTRLNFO
          END 
          IDENT  UCPSWPI
          END 
          IDENT  SSFCALL
          END 
          IDENT  UCPMSG 
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  SETLTC 
          END 
          IDENT  CTRLPID
          END 
          IDENT  CTRLNDT
          END 
          IDENT  CONARQR
          END 
          IDENT  CONCBR 
          END 
          IDENT  WAITACN
          END 
          IDENT  ACANSUP
          END 
          IDENT  ACRQA
          END 
          IDENT  ACNFND 
          END 
          IDENT  FINDPTH
          END 
          IDENT  SCANPTH
          END 
          IDENT   FINDPID 
          END 
          IDENT  REQCON 
          END 
          IDENT  UPDNWS 
          END 
          IDENT  FALTPTH
          END 
          IDENT  SPIDSTA
          END 
          IDENT  BINTODD
          END 
          IDENT  BLDRMSG
          END 
          IDENT  DCTOASC
          END 
          IDENT  CONENDR
          END 
          IDENT  FREEACN
          END 
          IDENT  MOPQACN
          END 
          IDENT  CONREQA
          END 
          IDENT  CONREQN
          END 
          IDENT  FCBRKR 
          END 
          IDENT  DISCARD
          END 
          IDENT  FCRSTR 
          END 
          IDENT  STATNDT
          END 
  
          IDENT  RHF0313
          LCC    OVERLAY(RHFOVL,3,13) 
          ENTRY  OVL313 
 OVL313   BSSZ   1
          RJ     =XREMCONR
          EQ     OVL313 
          END    OVL313 
          IDENT  REMCONR
          END 
          IDENT  CONVAL 
          END 
          IDENT  TRANSQ 
          END 
          IDENT  REMDAYF
          END 
          IDENT  ASCTODC
          END 
          IDENT  FINDACN
          END 
          IDENT  ACNFND 
          END 
          IDENT  PATHVAL
          END 
  
          IDENT  RHF0314
          LCC    OVERLAY(RHFOVL,3,14) 
          ENTRY  OVL314 
 OVL314   BSSZ   1
          RJ     =XASSIGN 
          EQ     OVL314 
          END    OVL314 
          IDENT  ASSIGN 
          END 
          IDENT  CONREQR
          END 
          IDENT  FINDACN
          END 
          IDENT  ACNFND 
          END 
          IDENT  FLUSH
          END 
          IDENT  PATHVAL
          END 
          IDENT  STRTJOB
          END 
          IDENT  BATCJOB
          END 
  
          IDENT  RHF0315
          LCC    OVERLAY(RHFOVL,3,15) 
          ENTRY  OVL315 
 OVL315   BSSZ   1
          RJ     =XTIMEVNT
          EQ     OVL315 
          END    OVL315 
          IDENT  TIMEVNT
          END 
          IDENT  WAITSWP
          END 
          IDENT  SSFCALL
          END 
          IDENT  CKSWPIN
          END 
          IDENT  AGEWAIT
          END 
          IDENT  AGEREQ 
          END 
          IDENT  ACRQA
          END 
          IDENT  FREEACN
          END 
          IDENT  MOPQACN
          END 
          IDENT  WAITACN
          END 
          IDENT  BINTODD
          END 
          IDENT  SNDSHDM
          END 
          IDENT  FLUSH
          END 
          IDENT  AGENTON
          END 
          IDENT  STRTJOB
          END 
          IDENT  BATCJOB
          END 
          IDENT  DLYRTRY
          END 
          IDENT  CKMXSUP
          END 
          IDENT  UCPMSG 
          END 
          IDENT  RHFMSGJ
          END 
          IDENT  UCPSWPI
          END 
          IDENT  CLRPTHR
          END 
          IDENT  REQSTAT
          END 
          IDENT  CKESTAT
          END 
          IDENT  MHFMSG 
          END 
          IDENT   UPDNWS
          END 
          IDENT   FALTPTH 
          END 
          IDENT   SPIDSTA 
          END 
          IDENT  CKOPMSG
          END 
          IDENT  FREEMEM
          END 
  
          IDENT  RHF0316
          LCC    OVERLAY(RHFOVL,3,16) 
          ENTRY  OVL316 
 OVL316   BSSZ   1
          RJ     =XPCMD 
          EQ     OVL316 
          END    OVL316 
          IDENT  PCMD 
          END 
          IDENT  ERROR
          END 
          IDENT  GETPAR 
          END 
          IDENT  GETCMD 
          END 
          IDENT  DDTOBIN
          END 
          IDENT  ORDCH
          END 
          IDENT  APPLDIS
          END 
          IDENT  STRTJOB
          END 
          IDENT  BATCJOB
          END 
          IDENT  SNDSHDM
          END 
          IDENT  IDDISEN
          END 
          IDENT  PATHDIS
          END 
          IDENT   FALTPTH 
          END 
          IDENT   SPIDSTA 
          END 
          IDENT  PATHC
          END 
          IDENT  BDTOBIN
          END 
  
          IDENT  RHF0317
          LCC    OVERLAY(RHFOVL,3,17) 
          ENTRY  OVL317 
 OVL317   BSSZ   1
          RJ     =XDSPL 
          EQ     OVL317 
          END    OVL317 
          IDENT  DSPL 
          END 
          IDENT  ABORT
          END 
          IDENT  APPLDSP
          END 
          IDENT  IDDSPL 
          END 
          IDENT  PATHDSP
          END 
          IDENT  BINTODD
          END 
