Skip to content

Instantly share code, notes, and snippets.

@plavjanik
Last active February 7, 2020 21:49
Show Gist options
  • Select an option

  • Save plavjanik/af1e07a45aef9f0239a41b825a5b73cd to your computer and use it in GitHub Desktop.

Select an option

Save plavjanik/af1e07a45aef9f0239a41b825a5b73cd to your computer and use it in GitHub Desktop.
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID. HELLO
000300 PROCEDURE DIVISION.
000400 DISPLAY "HELLO, WORLD!"
000500 STOP RUN.
//HELLOCOB JOB (HCL),'IBMUSER',
// CLASS=A,MSGCLASS=H,NOTIFY=&SYSUID
// JCLLIB ORDER=(IGY610.SIGYPROC)
//CBLRUN EXEC IGYWCLG,LNGPRFX='IGY610',
// PARM.COBOL='LIST,MAP,SOURCE,XREF(SHORT)',
// PARM.GO='/TRAP(ON),TER(UADUMP),ABTER(RETCODE)',
// GOPGM=HELLO
//COBOL.SYSIN DD DISP=SHR,DSN=IBMUSER.TEST.COBOL(HELLO)
//COBOL.SYSPRINT DD SYSOUT=*
//LKED.SYSIN DD *
NAME HELLO(R)
/*
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment