Allocate Disk Space for FOCUS Libraries

The following table shows the disk space requirements for the seven FOCUS libraries required to install the basic system. These must be catalogued with prefixed data set names on a permanently mounted pack. In choosing local data set names, remember that FOCLIB.LOAD, FUSELIB.LOAD, and ERRORS.DATA must be named so that all users can access them in read-only mode. If your site has RACF® or CA-ACF2® installed, you will have to establish a rule for each data set to be unloaded.

Space requirements are provided for 3390 disks, but you can use any CKD disk device with a track capacity of at least 13030 bytes. Load libraries on the FOCUS distribution cartridge are blocked at 13030 bytes. The DCB attributes of the other libraries are shown in the following table. You can vary the block sizes if you like, but not the RECFM or LRECL attributes. Do not alter the block size for FOCCTL.DATA, which contains linkage editor control statements. If you assign a block size that is too large, older versions of the linkage editor will not be able to open the data set.

Those planning to install the National Language Support ERRORS file, ERRNLS.DATA, who intend to copy ERRNLS.DATA members into ERRORS.DATA, will need substantially more space. See Customizing FOCUS for information about the ERRNLS.DATA data set and increase the space allocation for ERRORS.DATA accordingly.

Library/Format

Category

3390 cyl

3390 trks

FOCLIB.LOAD

(RECFM=U,BLKSIZE=13030)

Primary Allocation

180

3000

Secondary Allocation

6

90

Directory Blocks

89

89

FUSELIB.LOAD

(RECFM=U,BLKSIZE=13030)

Primary Allocation

2

30

Secondary Allocation

1

5

Directory Blocks

44

44

ERRORS.DATA

(LRECL=80,BLKSIZE=1600, 
RECFM=FB)

Primary Allocation

17

250

Secondary Allocation

1

5

Directory Blocks

44

44

FOCCTL.DATA

(LRECL=80, BLKSIZE=1600, 
RECFM=FB)

Primary Allocation

19

275

Secondary Allocation

1

5

Directory Blocks

44

44

FOCEXEC.DATA

(LRECL=80, BLKSIZE=1600, 
RECFM=FB)

Primary Allocation

50

750

Secondary Allocation

1

5

Directory Blocks

44

44

FOCSTYLE.DATA

(LRECL=80, BLKSIZE=1600,
RECFM=FB)
DSN prefix=WIBFOC.rel

Primary Allocation

1

15

Secondary Allocation

1

1

Directory Blocks

44

44

MASTER.DATA

(LRECL=80, BLKSIZE=1600, 
RECFM=FB)

Primary Allocation

2

30

Secondary Allocation

1

5

Directory Blocks

44

44

WINFORMS.DATA

(LRECL=80, BLKSIZE=1600, 
RECFM=FB)

Primary Allocation

1

15

Secondary Allocation

1

5

Directory Blocks

44

44

FUSELIB.DATA

(LRECL=80, BLKSIZE=1600, 
RECFM=FB)

Primary Allocation

1

5

Secondary Allocation

1

5

Directory Blocks

44

44



Example: JCL for Allocating Disk Space
//JOBNAME JOB (ACCT),'FOCUS ALLOC',
//     CLASS=T,MSGCLASS=X
//***********************************************************************
//STEP1  EXEC PGM=IEFBR14
//***********************************************************************
//FOCLOAD  DD DSN=prefix.FOCLIB.LOAD,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=U,BLKSIZE=13030)
//FUSELIB  DD DSN=prefix.FUSELIB.LOAD,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=U,BLKSIZE=13030)
//FUSELIBD DD DSN=prefix.FUSELIB.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)
 
//ERRORS  DD DSN=prefix.ERRORS.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)
//FOCCTL  DD DSN=prefix.FOCCTL.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)
//FOCEXEC  DD DSN=prefix.FOCEXEC.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)
//FOCSTYLE DD DSN=prefix.FOCSTYLE.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)
 
//MASTER  DD DSN=prefix.MASTER.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)
//WINFORMS  DD DSN=prefix.WINFORMS.DATA,DISP=(,CATLG,DELETE),
//       UNIT=SYSDA,VOL=SER=volid,SPACE=(xxx,(n,n,m)),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=1600)

where:

prefix

Is the high-level qualifier for your FOCUS production data sets.

xxx

Is either TRK or CYL.

n,n

Is the appropriate primary and secondary space allocation.

m

Is the number of directory blocks.

volid

Is a valid volume identifier.


Information Builders