         IDENTIFICATION DIVISION.
         PROGRAM-ID. MIJN-EERSTE-COBOL-PROGRAMMA.
         AUTHOR. IKKE.
         DATE-WRITTEN. 28-SEPTEMBER-2000.
         ENVIRONMENT DIVISION.
         CONFIGURATION SECTION.
         SOURCE-COMPUTER. PC.
         OBJECT-COMPUTER. PC.
         DATA DIVISION.
         WORKING-STORAGE SECTION.
         01 SCHERM-1.
           03 LIJN-11 PIC X(11) VALUE "Levy De Vos".
           03 LIJN-12 PIC X(14) VALUE "Kortestraat 63".
           03 LIJN-13 PIC X(10) VALUE "9473 Welle".
           03 LIJN-14 PIC X(21) VALUE "DRUK OP EEN TOETS".
         01 TOETS PIC X.
         PROCEDURE DIVISION.
       HOOFDPROGRAMMA.
         DISPLAY SPACES UPON CRT
         DISPLAY LIJN-11 AT 0101
         DISPLAY LIJN-12 AT 0201
         DISPLAY LIJN-13 AT 0301
         DISPLAY LIJN-11 AT 0169
         DISPLAY LIJN-12 AT 0266
         DISPLAY LIJN-13 AT 0370
         DISPLAY LIJN-11 AT 2101
         DISPLAY LIJN-12 AT 2201
         DISPLAY LIJN-13 AT 2301
         DISPLAY LIJN-11 AT 2169
         DISPLAY LIJN-12 AT 2266
         DISPLAY LIJN-13 AT 2370
         DISPLAY LIJN-14 AT 1030
         ACCEPT TOETS AT 2030
         STOP RUN.
