home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / PARASOL / VIDEOSTO.ARK / MEMBER.FIL < prev    next >
Text File  |  1986-07-21  |  1KB  |  47 lines
  1. {-----------------------------------------------
  2. {    Member File
  3. {-----------------------------------------------
  4. record    m.rec;
  5.     field    m.member.num        4;
  6.     field    m.type                1;
  7.     field    m.date.joined        8;
  8.     record m.mail;
  9.         field    m.f.name            12;
  10.         field    m.l.name            20;
  11.         field    m.addr                30;
  12.         field    m.city                20;
  13.         field    m.state                2;
  14.         field    m.zip                9;
  15.     endrec;
  16.     field    m.phone            11;
  17.     field    m.sponser        20;
  18.     record    m.employer.mail;
  19.         field    m.empl.name            20;
  20.         field    m.empl.addr            30;
  21.         field    m.empl.city            20;
  22.         field    m.empl.state        2;
  23.         field    m.empl.zip            9;
  24.     endrec;
  25.     field    m.empl.phone    11;
  26.     field    m.empl.period    12;
  27.     field    m.drivers.lic    10;
  28.     field    m.bank.name        20;
  29.     field    m.bank.card        30;
  30.     field    m.charge.card    30;
  31.     endrec;
  32.  
  33. string    m.file.name        15    value    "MEMBER.VID";
  34.                                         redefine m.file.name;
  35. field                           7;  {MEMBER.}
  36. field   m.file.ext              3;
  37.                                         endredef;
  38.  
  39.  
  40. file member,
  41.     disk,
  42.     random,    key m.key,
  43.     blocked 0,
  44.     record    m.rec,
  45.         no buffer,
  46.     value    m.file.name;
  47.