JCL - IEBPTPCH Example 7: Print a Pre-Formatted Data Set

JCL - IEBPTPCH Example 7: Print a Pre-Formatted Data Set

In this example, the input is a SYSOUT (sequential) data set, which was previously written as the second data set of a standard label tape.
It is printed in SYSOUT format.
Neste exemplo, a entrada é um conjunto de dados SYSOUT (sequencial), que foi gravado anteriormente como o segundo conjunto de dados de uma fita de etiqueta padrão.
É impresso no formato SYSOUT.

  //PTSYSOUT JOB  ...
  //STEP1    EXEC PGM=IEBPTPCH
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  UNIT=tape,LABEL=(2,SL),DSNAME=LISTING,
  //             DISP=(OLD,KEEP),VOL=SER=001234
  //SYSUT2   DD  SYSOUT=A
  //SYSIN    DD  *
      PRINT   PREFORM=A
  /*

The control statements are as follows:
As declarações de controle são as seguintes:

SYSUT1 DD defines the input data set, which was previously written as the second data set of a standard label tape.
The data set has been assigned the name LISTING.
SYSUT2 DD defines the output data set on the system output device (printer assumed).
SYSIN DD defines the control data set, which follows in the input stream.
The PRINT statement begins the print operation and indicates that an ASA control character is provided as the first character of each record to be printed (PREFORM=A).

SYSUT1 DD define o conjunto de dados de entrada, que foi gravado anteriormente como o segundo conjunto de dados de uma fita de etiqueta padrão.
O conjunto de dados recebeu o nome LISTING.
SYSUT2 DD define o conjunto de dados de saída no dispositivo de saída do sistema (impressora assumida).
SYSIN DD define o conjunto de dados de controle, que segue no fluxo de entrada.
A instrução PRINT inicia a operação de impressão e indica que um caractere de controle ASA é fornecido como o primeiro caractere de cada registro a ser impresso (PREFORM = A).

Parent topic: IEBPTPCH Examples