home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / parasol / videosto.ark / TAPE.FIL < prev    next >
Encoding:
Text File  |  1986-07-21  |  840 b   |  34 lines
  1. {-----------------------------------
  2. {    Tape Information File
  3. {-----------------------------------
  4. record    t.rec;
  5.     field    t.stock.num            4;
  6.     field    t.title                45;
  7.     field    t.star.1            20;
  8.     field    t.star.2            20;
  9.     field    t.rating            2;
  10.     field    t.category            7;
  11.     field    t.purchase.price    6;
  12.     field    t.retail.price        6;
  13.     field    t.purchased.from    20;
  14.     field    t.date.in.stock        8;
  15.     field    t.date.out.stock    8;
  16.     record t.chk.rec;
  17.         field    t.member.num        4;
  18.         field    t.out.date            8;
  19.         field    t.due.date            8;
  20.     endrec;
  21.     field    t.count                3;
  22. endrec;
  23.  
  24. string  t.file.name 15  value   "TAPE.VID";
  25.                                         redefine t.file.name;
  26. field               5;  {TAPE.}
  27. field   t.file.ext  3;
  28.                                         endredef;
  29.  
  30. file    tape,
  31.     disk,    random,    key    t.key,
  32.     blocked    0,    record    t.rec,
  33.     value    t.file.name;
  34.