IBM SC34-6814-04 User Manual
DFHWOSM FUNC=TERM macro
The DFHWOSM FUNC=TERM macro terminates communication between the
overseer program and DFHWOS, and releases any associated storage. It must be
issued before the overseer program completes to ensure an orderly termination.
overseer program and DFHWOS, and releases any associated storage. It must be
issued before the overseer program completes to ensure an orderly termination.
Input
The TOKEN value is the BUILD token.
Output
Register 15
Contains the following completion codes:
0
Communication terminated successfully
Nonzero
Request failed.
Customizing the sample XRF overseer program
The sample overseer program consists of four modules link-edited together. The
main module is DFH$AXRO; the other three modules are subroutines, described
below:
main module is DFH$AXRO; the other three modules are subroutines, described
below:
DFH$AGCB
sets up request parameter lists (RPLs), access method control blocks
(ACBs), and parameter lists.
(ACBs), and parameter lists.
DFH$ADSP
displays status information.
DFH$ARES
performs restart in place.
DFHDXGHD DSECT
GHDDXADB DS
GHDDXADB DS
CL4
DBCTL SSID
GHDDXRSE DS
CL8
IMS RSE name
GHDDXCTM DS
CL4
IMS connect time
GHDDXDTM DS
CL4
IMS disconnect time
GHDDXJNM DS
CL8
JES Job name of old active IMS
GHDDXJID DS
CL8
JES Job ID of old active IMS
GHDDXASD DS
H
ASID of old active IMS
GHDDXIRT DS
X
IMS region type
DXRHTSBY EQU
X’01’
region type is hot standby
DXRDBDC
EQU
X’02’
region type is IMS DB/DC
DXRDBCTL EQU
X’04’
region type is DBCTL
GHDDXTYP DS
X
GHD message type
DXMCNNCT EQU
X’01’
Message type = DBCTL connection
DXMDISC
EQU
X’02’
Message type = DBCTL disconnect
DXMDRAF
EQU
X’04’
Message type = DRA failure
DXMABEND EQU
X’08’
Message type = DBCTL abend
DXMERROR EQU
X’80’
Indicates severe error in DFHDBCT
DXGHDLEN EQU
*-DFHDXGHD
length of CICS XRF/DBCTL GHD
ORG
,
Figure 70. DFHDXGHD copy book
label
DFHWOSM FUNC=TERM
[,TOKEN={token register|14}]
Chapter 26. The extended recovery facility overseer program
703