home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1989 / 03 / heimwerk / datdemo.bas < prev    next >
Encoding:
BASIC Source File  |  1988-12-21  |  716 b   |  20 lines
  1. '* ------------------------------------------------------- *
  2. '*                     DATDEMO.BAS                         *
  3. '*                DEMO zum BRD-Generator                   *
  4. '*         zugehörige RANDOM-Datei : BasDatei.Dat          *
  5. '*            Enthält 3 Test-Datensätze 1 - 3              *
  6. '* ------------------------------------------------------- *
  7.  
  8. $INCLUDE "BASDATEI.INC"   ' = das vom BRD-Generator erzeugte
  9.                           '   Inc.-File mit den Routinen für
  10.                           '   das RANDOM-Datei-Handling
  11. CLS
  12.  
  13. CALL PufferDimensionieren
  14. CALL DateiOeffnen
  15. CALL DatenLesen (2)
  16.  
  17. PRINT vorname$, nachname$, plz%, longin&, ereal!, doppelt#
  18.  
  19. CALL DateiSchliessen
  20.