home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #1 / monster.zip / monster / SPITFIRE / SFROM13G.ZIP / RECORDS.TXT < prev    next >
Text File  |  1994-01-31  |  1KB  |  43 lines
  1. { SF-ROM 1.30    Jan 31, 1994                  }
  2. { Turbo Pascal Record Structures               }
  3. { As used by SFROM.EXE, EZREQ.EXE, EZUSER.EXE  }
  4. { Copyright 1994  Mike Robinson                }
  5.  
  6. CONST
  7.   Request = 2;      { These used for RequestRecord.Status }
  8.   Send    = 1;
  9.   Done    = 0;
  10.  
  11. TYPE
  12.  
  13.   { SFROM.REC is a File of RequestRecord }
  14.   RequestRecord = Record
  15.                     Status      : Byte;
  16.                     Date        : String[8];
  17.                     UserName    : String[30];
  18.                     DiskName    : String[30];
  19.                     CDPath      : String[79];
  20.                     RequestDir  : String[79];
  21.                     Description : String[60];
  22.                     Extra       : String[30];
  23.                   End;
  24.  
  25.   { SFROM.DAT is a File of EzUser }
  26.   EzUser = Record
  27.              UserName        : String[30];
  28.              EnterDate       : String[8];
  29.              ReqFilesToday   : LongInt;
  30.              ReqBytesToday   : LongInt;
  31.              ReqFilesTotal   : LongInt;
  32.              ReqKBytesTotal  : LongInt;
  33.              DoorFilesToday  : LongInt;
  34.              DoorBytesToday  : LongInt;
  35.              DoorFilesTotal  : LongInt;
  36.              DoorKBytesTotal : LongInt;
  37.              FlagForDelete   : Boolean;
  38.              Extra           : String[30];
  39.            End;
  40.  
  41.   { Extra records are reserved for future expansion }
  42.  
  43.