In this example, each segment of a library character set is printed. The scan pattern of each of the characters in the module is printed.

  //LIBMOD1  JOB  ...
  //STEP1    EXEC PGM=IEBIMAGE
  //SYSUT1   DD  DSNAME=SYS1.IMAGELIB,DISP=SHR
  //SYSPRINT DD  SYSOUT=A
  //SYSIN    DD  *
      CHARSET
      NAME    83
  /*

The control statements are discussed below:

• NAME specifies the name of the library character set (83).