JCL - IEBPTPCH Print Sequential Data Set According to Default Format



Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

JCL - IEBPTPCH Example 4: Print Sequential Data Set According to Default Format

In this example, a sequential data set is printed according to the default format.
The printed output is converted to hexadecimal.
Neste exemplo, um conjunto de dados sequenciais é impresso de acordo com o formato padrão.
A saída impressa é convertida em hexadecimal.

  //PRINT    JOB  ...
  //STEP1    EXEC PGM=IEBPTPCH
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  DSNAME=INSET,UNIT=tape,
  //             LABEL=(,NL),VOLUME=SER=001234,
  //             DISP=(OLD,KEEP),DCB=(RECFM=U,BLKSIZE=2000)
  //SYSUT2   DD  SYSOUT=A
  //SYSIN    DD  *
       PRINT   TOTCONV=XE
       TITLE   ITEM=('PRINT SEQ DATA SET WITH CONV TO HEX',10)
  /*

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

  • SYSUT1 DD defines the input data set on a tape volume.
    The data set contains undefined records; no record is larger than 2,000 bytes.
  • SYSUT2 DD defines the output data set.
    The data set is written to the system output device (printer assumed).
  • SYSIN DD defines the control data set, which follows in the input stream.
  • PRINT begins the print operation and specifies conversion from alphanumeric to hexadecimal representation.
  • TITLE specifies a title to be placed beginning in column 10 of the printed output. The title is not converted to hexadecimal.

  • SYSUT1 DD define o conjunto de dados de entrada em um volume de fita.
    O conjunto de dados contém registros indefinidos; nenhum registro é maior que 2.000 bytes.
  • SYSUT2 DD define o conjunto de dados de saída.
    O conjunto de dados é gravado no dispositivo de saída do sistema (impressora assumida).
  • SYSIN DD define o conjunto de dados de controle, que segue no fluxo de entrada.
  • PRINT inicia a operação de impressão e especifica a conversão da representação alfanumérica para hexadecimal.
  • TITLE especifica um título a ser colocado no início da coluna 10 da saída impressa.
    O título não é convertido em hexadecimal.

Parent topic: IEBPTPCH Examples



© Copyright IBM Corp.