//RPGECLG  JOB (001),'RPG HELLO WORLD',                                 00010000
//             CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),REGION=96K
//HELOWRLD EXEC RPGECLG                                                 00020000
//RPG.SYSUT3 DD UNIT=SYSDA                                              00030000
//RPG.SYSUT2 DD UNIT=SYSDA                                              00040000
//RPG.SYSUT1 DD UNIT=SYSDA                                              00050000
//RPG.SYSGO DD  UNIT=SYSDA                                              00060000
//RPG.SYSIN DD  *                                                       00070000
00000H
01010FINPUT   IPE F  80  80            READ40
01020FOUTPUT  O   V 132 132     OF     PRINTER
01010IINPUT   AA  01
01020I                                        1  12 HELLO
02130OOUTPUT  T  2     LR
02140O                         HELLO     12
//GO.OUTPUT DD SYSOUT=A                                                 00150000
//GO.INPUT DD  *                                                        00160000
HELLO, WORLD                                                            00170000
//                                                                      00180000