You are supposed to type COBOL to compile. But COBOL didn’t work. So I found C81.CMD on a DU1: directory listing.
>TYPE WORLD.CBL
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
ENVIRONMENT DIVISION.
PROCEDURE DIVISION.
000-BEGIN.
DISPLAY "HELLO WORLD".
STOP RUN.
>
>@DU1:[006022]C81 DU0:WORLD
C81 DU0:WORLD,DU0:WORLD=DU0:WORLD/BLD
TKB @DU0:WORLD.CMD
PIP DU0:WORLD.CMD,.SKL,.OBJ,.ODL,.LST,.TSK/PU
>
>DIR WORLD.*
Directory DU0:[USER]
19-NOV-2023 07:48
WORLD.OBJ;1 3. 19-NOV-2023 07:48
WORLD.LST;1 2. 19-NOV-2023 07:48
WORLD.CBL;1 1. 19-NOV-2023 07:23
WORLD.SKL;1 1. 19-NOV-2023 07:48
WORLD.ODL;1 1. 19-NOV-2023 07:48
WORLD.CMD;1 1. 19-NOV-2023 07:48
WORLD.TSK;1 17. C 19-NOV-2023 07:48
Total of 26./44. blocks in 7. files
>RUN WORLD
HELLO WORLD
>
Glad the compile included the link, because my link wasn’t working DU1:[005004]LINK.
Below was before I renamed HELLO2 to WORLD
>@DU1:[005004]LINK/C81 HELLO2
AT.T0 -- Syntax error
@DU1:[005004]LINK/C81 HELLO2
>
BTW. This is the command file…
>TYPE DU1:[006022]C81.CMD
.ENABLE SUBSTITUTION
.DISABLE DISPLAY
.PARSE P1 "." PRG EXT
.SETS TSK PRG[1:3]
C81 'PRG','PRG'='PRG'/BLD
.IF <EXSTAT> <> 1 .EXIT <EXSTAT>
TKB @'PRG'.CMD
.IF <EXSTAT> <> 1 .EXIT <EXSTAT>
PIP 'PRG'.CMD,.SKL,.OBJ,.ODL,.LST,.TSK/PU
>
So, actually, the C81.CMD file includes C81 and a TKB step, which apparently is the Linker.
So manually…
COPY WORLD1.CBL WORLD.CBL for my own safety
C81 WORLD,WORLD=WORLD/BLD
TKB @WORLD.CMD
PIP WORLD.CMD,.SKL,.OBJ,.ODL,.LST,.TSK/PU delete old versions