IBM SC34-6814-04 User Manual

Page 716

Advertising
background image

The sample overseer program reads the DFHOSD records in key sequence and
builds a table of entries. Each active-alternate pair is known by its generic applid on
this data set. Every entry on the data set contains the following information:

v

A 12-byte key field, containing the 4-byte value ‘GNbb’ followed by the 8-byte
generic applid of the active-alternate pair.

v

The ddnames of the control data set and the message data set associated with
this generic applid. Each of these is an 8-byte value.

v

An optional 8-byte RELATEID, to identify related systems.

v

A restart-in-place indicator to show whether a region can be restarted in place.
The only value that prevents an attempt to restart in place is ‘N’.

The data structure of the DFHOSD data set entries is provided in member
DFH$XRDS of CICSTS32.CICS.SDFHSAMP.

You can use the job in Figure 67 to create and initialize DFHOSD.

1 This entry is for an XRF system that is not associated with any other CICS

region, and does not require a related system identifier. This entry is suitable to use
with the XRF IVPs supplied with CICS and described in the CICS/MVS Installation
Guide
.

//DEFOSD

JOB accounting information,CLASS=A,

//

MSGLEVEL=(1,1),MSGCLASS=A,NOTIFY=userid

//DEFDS

EXEC PGM=IDCAMS

//DDNAME1

DD VOL=SER=volid,UNIT=SYSDA,DISP=SHR

//SYSPRINT DD SYSOUT=A
//SYSIN

DD *

DELETE (’CICSTS32.DFHOSD’) PURGE CLUSTER
DEFINE CLUSTER (TRACKS(1,1)

-

NAME (CICSTS32.DFHOSD)

-

SHAREOPTIONS(2)

-

VOLUMES (volid)

-

FILE (DDNAME1))

-

DATA

-

(RECORDSIZE(80,80)

-

CONTROLINTERVALSIZE(2048)

-

NAME (CICSTS32.DATA.DFHOSD)

-

KEYS(12,0))

-

INDEX

-

(NAME(CICSTS32.INDEX.DFHOSD)) -

/*
//INITOSD

EXEC PGM=IDCAMS

//SYSPRINT DD SYSOUT=A
//* COLUMN
//* 1

5

14

23

32

41

//* GN

genappl

relsysid ddnxrctl ddnxrmsg ind

//*
//SYS01

DD *

GN

DBDCCICS

CTLDBDC

MSGDBDC

1

GN

DBDCMRO1 MROSYS

CTLMRO1

MSGMRO1

N

2

GN

DBDCMRO2 MROSYS

CTLMRO2

MSGMRO2

GN

DBDCMRO3 MROSYS

CTLMRO3

MSGMRO3

/*
//SYSIN

DD *

REPRO INFILE ( SYS01 ) -

OUTDATASET (CICSTS32.DFHOSD)

/*

Figure 67. Sample job to create and initialize the DFHOSD data set

694

Customization Guide

Advertising