RPG source code

Note:

Read the Code disclaimer information for important legal information.

5738PW1 V2R2M0  920615                  SEU SOURCE LISTING
SOURCE FILE . . . . . . .  FONTSAMPLE/SOURCE
MEMBER  . . . . . . . . .  RPGCODE
SEQNBR*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 ...+... 0
100      FFONT    O   E                    PRINTER
200      C                     WRITEREC1
300      C                     SETON                     LR
* * * *  E N D  O F  S O U R C E  * * * *