gistfile1.sql

       IDENTIFICATION DIVISION.
       PROGRAM-ID. 'helloworld'.
       ENVIRONMENT DIVISION.
       INPUT-OUTPUT SECTION.
       FILE-CONTROL.
       DATA DIVISION.
       FILE SECTION.

       WORKING-STORAGE SECTION.

       01  MSG       PIC X(80).

       LINKAGE SECTION.

       PROCEDURE DIVISION.

       MAIN SECTION.
            MOVE "Hello World from COBOL!" TO MSG
            DISPLAY MSG
            ACCEPT  MSG
            EXIT PROGRAM.