JCL - IEBPTPCH Convert to Hexadecimal and Print Partitioned Data



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

JCL - IEBPTPCH Example 10: Convert to Hexadecimal and Print Partitioned Data

In this example, two partitioned members are printed according to the default format.
The printed output is converted to hexadecimal.
Neste exemplo, dois membros particionados são impressos de acordo com o formato padrão.
A saída impressa é convertida em hexadecimal.

  //PRNTMEMS JOB  ...
  //STEP1    EXEC PGM=IEBPTPCH
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  DSNAME=BROWN.MAIN.LIB,DISP=SHR
  //SYSUT2   DD  SYSOUT=A
  //SYSIN    DD  *
         PRINT   TYPORG=PO,TOTCONV=XE,MAXNAME=2
         TITLE   ITEM=('PRINT TWO MEMBS WITH CONV TO HEX',10)
         MEMBER  NAME=MEMBER1
         MEMBER  NAME=MEMBER2
  /*

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

  • SYSUT1 DD defines the input data set, called BROWN.MAIN.LIB, on a disk volume.
  • 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.
  • PRINT begins the print operation, indicates that the input data set is partitioned, specifies conversion from alphanumeric to hexadecimal representation, and indicates that two MEMBER statements appear in the control data set (MAXNAME=2).
  • TITLE specifies a title to be placed beginning in column 10 of the printed output. The title is not converted to hexadecimal.
  • MEMBER specifies the member names of the members to be printed (MEMBER1 and MEMBER2).

  • SYSUT1 DD define o conjunto de dados de entrada, denominado BROWN.MAIN.LIB, em um volume de disco.
  • 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.
  • PRINT começa a operação de impressão, indica que o conjunto de dados de entrada está particionado, especifica a conversão da representação alfanumérica para hexadecimal e indica que duas instruções MEMBER aparecem no conjunto de dados de controle (MAXNAME = 2).
  • 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.
  • MEMBER especifica os nomes dos membros a serem impressos (MEMBER1 e MEMBER2).

Parent topic: IEBPTPCH Examples



© Copyright IBM Corp.