home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c150 / 5.ddi / TIMS.IMP < prev    next >
Encoding:
Text File  |  1990-12-06  |  883 b   |  53 lines
  1. database tims;
  2.  
  3. foreach "author.txt" {
  4.    record author {
  5.       create on 1;
  6.       field name = 3;
  7.    }
  8.    connect author_list;
  9. }
  10. foreach "info.txt" {
  11.    record info {
  12.       create on 1;
  13.       field id_code = 4;
  14.       field info_title = 5;
  15.       field publisher = 6;
  16.       field pub_date = 7;
  17.       field info_type = 8;
  18.    }
  19.    record author {
  20.       find on 2;
  21.    }
  22.    connect has_published;
  23. }
  24. foreach "text.txt" {
  25.    record text {
  26.       field line = 3;
  27.    }
  28.    record info {
  29.       find on 2;
  30.    }
  31.    connect abstract;
  32. }
  33. foreach "key_word.txt" {
  34.    record key_word {
  35.       create on 1;
  36.       field word = 2;
  37.    }
  38. }
  39. foreach "intersec.txt" {
  40.    record intersect {
  41.       field int_type = 4;
  42.    }
  43.    record info {
  44.       find on 3;
  45.    }
  46.    record key_word {
  47.       find on 2;
  48.    }
  49.    connect info_to_key;
  50.    connect key_to_info;
  51. }
  52. end;
  53.