Power-Programmierung/CD1.mdf/basic/library/qb_pds/screen/qbscreen/comdim.bas

BASIC Source File | 1986-12-10 | 335 b | 9 lines

REM   *** COMDIM.BAS ***
REM $STATIC
      DIM ARG$(20),LOCKS$(3),DIS$(100),INP$(100),KEYFLD$(6)
      DIM PRT$(100),FLD$(20),PRM$(42)
      DIM ORFLD$(20),CRFLD$(20),COFLD$(20),PRFLD$(40)
      DIM WRK1%(20),WRK2%(20),RECS%(1000)
      DIM QI$(15),QI%(15),QK%(15),QD$(5),QD%(5),QR%(5),QN$(16,36),QN%(16,29)
REM   *** END ***