COBOL program to display a welcome message.

jfarrell423 · Jun 24, 2019 · 15b6ded · 15b6ded
1 parent 2cf95f9
commit 15b6ded
Showing 1 changed file with 11 additions and 0 deletions.
diff --git a/welcome.cbl b/welcome.cbl
@@ -0,0 +1,11 @@
+000010 IDENTIFICATION DIVISION.
+000020 PROGRAM-ID. WELCOME.
+000030 ENVIRONMENT DIVISION.
+000040 DATA DIVISION.
+000050 PROCEDURE DIVISION.
+000060
+000070 PROGRAM-BEGIN.
+000080     DISPLAY "Welcome to GNU COBOL".
+000090
+000100 PROGRAM-DONE.
+000110     STOP RUN.