|
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.
Neste exemplo, o número de série 006250 é escrito em EBCDIC em um volume de fita a uma densidade de 6250 bpi e o número de série 001600 é
escrito em EBCDIC em um segundo volume a uma densidade de 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:
As declarações de controle são as seguintes:
- 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.
- DDFIRST DD define o primeiro volume de fita a ser usado.
- DDSECOND DD define o segundo volume de fita a ser usado.
- SYSIN DD define o conjunto de dados de controle, que segue no fluxo de entrada.
- DDFIRST INITT grava o número de série 006250 no volume definido em DDFIRST DD.
DDSECOND INITT grava o número de série 001600 no volume definido em DDSECOND DD.
Parent topic: IEHINITT Examples
© Copyright IBM Corp.
|
