Specifying the DCB characteristics

Use the AFHODCBM macro to specify default DCB information for the I/O units that have a DCBSET=label parameter on the AFHOUNTM macro.

The syntax of AFHODCBM macro instruction is as follows:

[label]  AFHODCBM [,SFBUFNO=number | 2]
[,SUBUFNO=
number | 2]
[,SFBLKSI=
number | 800]
[,SUBLKSI=
number | 800]
[,SFLRECL=
number | 800]
[,SULRECL=
number | -1]
[,SFRECFM=
char | U]
[,SURECFM=
char | VS]
[,SFMAXRE=
number | 100]
[,SUMAXRE=
number | 100]
[,DMAXRE=
number | 100]

label
The name that is specified in the DCBSET parameter of one or more AFHOUNTM macro instructions to relate the I/O units to this set of DCB default values.

If label is omitted, the DCB data is assigned to all units defined in the unit attribute table by the AFHOUTCM macro instruction that does not have an AFHOUNTM macro instruction. If any of the units in the Unit Attribute Table do not have their own AFHOUNTM macro instruction, then you must provide an AFHODCBM macro instruction without a label to apply defaults to these units.

SFBUFNO=number | 2
Specifies the default value for the number of buffers for sequential formatted files on DASD or tape. number must be a value greater than or equal to 1 and less than or equal to 255. The default is 2.
SUBUFNO=number | 2
Specifies the default value for the number of buffers for sequential unformatted files on DASD or tape. number must be a value greater than or equal to 1 and less than or equal to 255. The default is 2.
SFBLKSI = number | 800
Specifies the block size for sequential formatted files. number is an integer expression of length 4 bytes; valid range of the blocksize is from 1 to 32760. The default is 800.
SUBLKSI = number | 800
Specifies the block size for sequential unformatted files. number is an integer expression of length 4 bytes; valid range of the blocksize is from 1 to 32760. The default is 800.
SFLRECL = number | 800
Specifies the logical record length for sequential formatted files. number is an integer expression of length 4 bytes; valid range is from 1 to 32756 for variable record formats (SURECFM= V, VA, VB, or VBA), or 1 to 32760 for all other record formats. The default is 800.
SULRECL = number | -1
Specifies the logical record length for sequential unformatted files. number is an integer expression of length 4 bytes; valid range is from 1 to 32756 for variable record formats (SURECFM= V, VA, VB, VBA, VS, or VBS), or 1 to 32760 for all other record formats or -1, which specifies an unlimited record length. -1 is valid for SURECFM=VS or VBS formats. The default is -1.
SFRECFM = char | U
Specifies the record format for sequential formatted files. The value of char must be F, FA, FB, FBA, V, VA, VB, VBA, U, or UA. For more information about I/O, see VS FORTRAN Version 2 Programming Guide for CMS and MVS. The default is U.
SURECFM = char | VS
Specifies the record format for sequential unformatted files. The value of char must be F, FA, FB, FBA, V, VA, VB, VBA, VS, VBS, U, or UA. For more information about I/O, see VS FORTRAN Version 2 Programming Guide for CMS and MVS. The default is VS.
SFMAXRE = number | 100
Specifies the amount of space to be converted into blocks in a sequential formatted file. It is only valid for new DASD files. If it is specified for an existing file, it is ignored. number is an integer expression of length 4. See MAXREC in VS FORTRAN Version 2 Programming Guide for CMS and MVS for information about how space is converted to blocks. The default is 100.
SUMAXRE = number | 100
Specifies the amount of space to be converted into blocks in a sequential unformatted file. It is only valid for new DASD files. If it is specified for an existing file, it is ignored. number is an integer expression of length 4. See MAXREC in VS FORTRAN Version 2 Programming Guide for CMS and MVS for information about how space is converted to blocks. The default is 100.
DMAXRE = number | 100
Specifies the amount of space to be converted into blocks in a direct file. It is only valid for new DASD files. If it is specified for an existing file, it is ignored. number is an integer expression of length 4. See VS FORTRAN Version 2 Programming Guide for CMS and MVS for information about how space is converted to blocks. The default is 100.
CAUTION:
If you change the IBM-supplied default DCB values, any existing Fortran programs that depend on the original defaults might not work.