Dfhwosm func=term macro, Customizing the sample xrf overseer program – IBM SC34-6814-04 User Manual

Page 725

Advertising
background image

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.

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:

DFH$AGCB

sets up request parameter lists (RPLs), access method control blocks
(ACBs), and parameter lists.

DFH$ADSP

displays status information.

DFH$ARES

performs restart in place.

DFHDXGHD DSECT
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

Advertising