      *        ############# OPBOUWEN VAN HET SCHERM ##############
               accept datum from date
               display spaces upon crt
               display lijn-dubbel at 0206 with foreground-color 2
               display lijn-dubbel at 0241 with foreground-color 2
               display lijn-info-top at 0308 with foreground-color 3
               display datum at 0366 with foreground-color 3
               display lijn-dubbelpunt at 0306 with foreground-color 2
               display lijn-dubbelpunt at 0375 with foreground-color 2
               display lijn-dubbel at 0406 with foreground-color 2
               display lijn-dubbel at 0441 with foreground-color 2
               display lijn-dubbelpunt at 0506 with foreground-color 2
               display lijn-dubbelpunt at 0575 with foreground-color 2
               display lijn-dubbelpunt at 0606 with foreground-color 2
               display lijn-dubbelpunt at 0675 with foreground-color 2
               display lijn-info-midden-1 at 0610
               display lijn-dubbelpunt at 0706 with foreground-color 2
               display lijn-dubbelpunt at 0775 with foreground-color 2
               display lijn-dubbelpunt at 0806 with foreground-color 2
               display lijn-dubbelpunt at 0875 with foreground-color 2
               display lijn-dubbelpunt at 0906 with foreground-color 2
               display lijn-dubbelpunt at 0975 with foreground-color 2
               display lijn-dubbelpunt at 1006 with foreground-color 2
               display lijn-dubbelpunt at 1075 with foreground-color 2
               display lijn-dubbelpunt at 1106 with foreground-color 2
               display lijn-dubbelpunt at 1175 with foreground-color 2
               display lijn-dubbelpunt at 1206 with foreground-color 2
               display lijn-dubbelpunt at 1275 with foreground-color 2
               display lijn-dubbelpunt at 1306 with foreground-color 2
               display lijn-dubbelpunt at 1375 with foreground-color 2
               display lijn-dubbelpunt at 1406 with foreground-color 2
               display lijn-dubbelpunt at 1475 with foreground-color 2
               display lijn-dubbelpunt at 1506 with foreground-color 2
               display lijn-dubbelpunt at 1575 with foreground-color 2
               display lijn-dubbelpunt at 1606 with foreground-color 2
               display lijn-dubbelpunt at 1675 with foreground-color 2
               display lijn-dubbelpunt at 1706 with foreground-color 2
               display lijn-dubbelpunt at 1775 with foreground-color 2
               display lijn-dubbelpunt at 1806 with foreground-color 2
               display lijn-dubbelpunt at 1875 with foreground-color 2
               display lijn-dubbelpunt at 1906 with foreground-color 2
               display lijn-dubbelpunt at 1975 with foreground-color 2
               display lijn-dubbelpunt at 2006 with foreground-color 2
               display lijn-dubbelpunt at 2075 with foreground-color 2
               display lijn-dubbel at 2106 with foreground-color 2
               display lijn-dubbel at 2141 with foreground-color 2
               display lijn-info-bottom at 2234 with foreground-color 3
               display lijn-dubbelpunt at 2206 with foreground-color 2
               display lijn-dubbelpunt at 2275 with foreground-color 2
               display lijn-dubbel at 2306 with foreground-color 2
               display lijn-dubbel at 2341 with foreground-color 2
               display "Titel: " at 1015 with foreground-color 8
               display "Uitvoerder: " at 1215 with foreground-color 8
               display "Genre: " at 1415 with foreground-color 8
               display "Prijs: " at 1615 with foreground-color 8
               display "Druk op een toets op verder te gaan...    (J/N)"
                   at 1815 with foreground-color 8
