Hello world in the mainframe RPG language on MVS - M126

Our discord channel: :   / discord  


Here is the program:

//HERC01T JOB (SETUP),
// 'HELLO WORLD',
// CLASS=A,
// MSGCLASS=H,
// MSGLEVEL=(1,1)
//HELOWRLD EXEC RPGECLG
//RPG.SYSUT3 DD UNIT=SYSDA
//RPG.SYSUT2 DD UNIT=SYSDA
//RPG.SYSUT1 DD UNIT=SYSDA
//RPG.SYSGO DD UNIT=SYSDA
//RPG.SYSIN DD *
00000H
01010FINPUT IPE F 80 80 READ40
01020FOUTPUT O V 132 132 OF PRINTER
01010IINPUT AA 01
01020I 1 20 HELLO
02130OOUTPUT T 2 LR
02140O HELLO 20
//GO.OUTPUT DD SYSOUT=A
//GO.INPUT DD *
HELLO, WORLD YOUTUBE
//