z/OS DFSMSdfp Utilities
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Example 6: Write Serial Numbers on Tape Volumes at Two Densities

z/OS DFSMSdfp Utilities
SC23-6864-00

In this example, the serial number 006250 is written in EBCDIC on a tape volume at a density of 6250 bpi, and the serial number 001600 is written in EBCDIC on a second volume at a density of 1600 bpi.
  //LABEL6   JOB  ...
  //STEP1    EXEC PGM=IEHINITT
  //SYSPRINT DD  SYSOUT=A
  //DDFIRST  DD  DCB=DEN=4,UNIT=(tape,1,DEFER)
  //DDSECOND DD  DCB=DEN=3,UNIT=(tape,1,DEFER)
  //SYSIN    DD  *
  DDFIRST  INITT  SER=006250
  DDSECOND INITT  SER=001600
  /*
The control statements are as follows:
  • DDFIRST DD defines the first tape volume to be used.
  • DDSECOND DD defines the second tape volume to be used.
  • SYSIN DD defines the control data set, which follows in the input stream.
  • DDFIRST INITT writes the serial number 006250 on the volume defined in DDFIRST DD. DDSECOND INITT writes the serial number 001600 on the volume defined in DDSECOND DD.

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014