JCL - IEBIMAGE Example 15: Build a Graphic Character Modification Module from the Character Modification Module World Trade GRAFMOD

JCL - IEBIMAGE Example 15: Build a Graphic Character Modification Module from the Character Modification Module World Trade GRAFMOD

3800 Model 3

In this example, a graphic character modification module is built.
Its characters are segments copied from the World Trade National Use Graphics graphic character modification module.
(See the IBM 3800 Printing Subsystem Programmer's Guide for the EBCDIC assignments for the characters.)
The new module is stored in the SYS1.IMAGELIB system data set.

Neste exemplo, um módulo de modificação de caractere gráfico é construído.
Seus caracteres são segmentos copiados do módulo de modificação de caracteres gráficos da World Trade National Use Graphics.
(Consulte o IBM 3800 Printing Subsystem Programmer's Guide para obter as atribuições EBCDIC dos caracteres.)
O novo módulo é armazenado no conjunto de dados do sistema SYS1.IMAGELIB.

  //GRAFMOD2 JOB  ...
  //STEP1    EXEC PGM=IEBIMAGE
  //SYSUT1   DD  DSNAME=SYS1.IMAGELIB,DISP=OLD
  //SYSPRINT DD  SYSOUT=A
  //SYSIN    DD  *
     OPTION DEVICE=3800M3
     GRAPHIC REF=((24),(25),(26),(27),(28),(31),(33),(35),(38),(40))
     NAME   CSTW
  /*

The control statements are discussed as follows:
As declarações de controle são discutidas a seguir:

The SYSUT1 DD statement includes DISP=OLD to ensure that no other job can modify the data set while this job is executing.
DEVICE=3800M3 in the OPTION statement specifies 3800 Model 3 compatibility mode module format.
By not specifying the GCM keyword, the GRAPHIC statement identifies the World Trade National Use Graphics graphic character modification module.
Ten of its segments are to be copied and used with the new module.
The name of the graphic character modification module is CSTW; it is stored as a new module in the SYS1.IMAGELIB data set.

A instrução SYSUT1 DD inclui DISP = OLD para garantir que nenhum outro trabalho possa modificar o conjunto de dados durante a execução deste trabalho.
DEVICE = 3800M3 na instrução OPTION especifica o formato do módulo do modo de compatibilidade do Modelo 3 de 3800.
Ao não especificar a palavra-chave GCM, a instrução GRAPHIC identifica o módulo de modificação de caractere gráfico do World Trade National Use Graphics.
Dez de seus segmentos devem ser copiados e usados com o novo módulo.
O nome do módulo de modificação de caractere gráfico é CSTW; ele é armazenado como um novo módulo no conjunto de dados SYS1.IMAGELIB.

Parent topic: IEBIMAGE Examples