home *** CD-ROM | disk | FTP | other *** search
/ Enciclopedia Rizzoli Larousse 2001 / rizzolilarousse2001cd1.iso / Erl / FulText / ErlAct.act next >
Text File  |  1998-12-01  |  3KB  |  138 lines
  1. -- --------------------------------------------------------------------------------------------
  2. -- Erl.act
  3.  
  4. -- Data ultimo aggiornamento: 1 Dicembre 1998
  5. -- --------------------------------------------------------------------------------------------
  6.  
  7. GlobalSection 
  8.  
  9. begin
  10.     Id "Erl.act";  
  11.     Version "1";
  12. end
  13.  
  14. -- -------------------------------------------------------------------------------------------
  15.  
  16. PatternSection 
  17.  
  18. begin
  19.  
  20.   pattern "@00", EndData = "@*00"; -- codice identificativo lemma
  21.     begin
  22.       store "120";
  23.       ZoneData "200";
  24.     end
  25.  
  26.   pattern "@01", EndData = "@*01"; -- titolo lemma
  27.     begin
  28.       store "121";
  29.       ZoneData "201";
  30.     end
  31.  
  32.   pattern "@02", EndData = "@*02"; -- presenza su CD tematici
  33.     begin
  34.       store "122";
  35.       ZoneData "202";
  36.     end
  37.  
  38.   pattern "@04", KeepAlive; -- indicatori tematici lemma
  39.     begin
  40.         ReadDataN 2;
  41.         InsertBeforeData "LevA";
  42.         InsertAfterData " ";
  43.         Zone "204";
  44.         Outputdata;
  45.  
  46.         ReadDataN 2;
  47.         InsertBeforeData "LevB";
  48.         InsertAfterData " ";
  49.         Outputdata;
  50.  
  51.         ReadDataN 2;
  52.         InsertBeforeData "LevC";
  53.         InsertAfterData " ";
  54.         Outputdata;
  55.  
  56.         Zone "32";
  57.     end
  58.  
  59.   pattern "@10",KeepAlive; -- indicatori tematici capitoli
  60.     begin
  61.         ReadDataN 2;
  62.         InsertBeforeData "LevA";
  63.         InsertAfterData " ";
  64.         Zone "204";
  65.         Outputdata;
  66.  
  67.         ReadDataN 2;
  68.         InsertBeforeData "LevB";
  69.         InsertAfterData " ";
  70.         Outputdata;
  71.  
  72.         ReadDataN 2;
  73.         InsertBeforeData "LevC";
  74.         InsertAfterData " ";
  75.         Outputdata;
  76.  
  77.         Zone "32";
  78.     end
  79.  
  80.   pattern "@12",KeepAlive; -- indicatori tematici sottocapitoli
  81.     begin
  82.         ReadDataN 2;
  83.         InsertBeforeData "LevA";
  84.         InsertAfterData " ";
  85.         Zone "204";
  86.         Outputdata;
  87.  
  88.         ReadDataN 2;
  89.         InsertBeforeData "LevB";
  90.         InsertAfterData " ";
  91.         Outputdata;
  92.  
  93.         ReadDataN 2;
  94.         InsertBeforeData "LevC";
  95.         InsertAfterData " ";
  96.         Outputdata;
  97.  
  98.         Zone "32";
  99.     end
  100.  
  101.   pattern "@14",KeepAlive; -- indicatori tematici paragrafi
  102.     begin
  103.         ReadDataN 2;
  104.         InsertBeforeData "LevA";
  105.         InsertAfterData " ";
  106.         Zone "204";
  107.         Outputdata;
  108.  
  109.         ReadDataN 2;
  110.         InsertBeforeData "LevB";
  111.         InsertAfterData " ";
  112.         Outputdata;
  113.  
  114.         ReadDataN 2;
  115.         InsertBeforeData "LevC";
  116.         InsertAfterData " ";
  117.         Outputdata;
  118.  
  119.         Zone "32";
  120.     end
  121.  
  122.   pattern "@15",KeepAlive; -- indicatori presenza media (n per lemma)
  123.     begin
  124.           ReadDataN 1;            
  125.           ReplaceData "ZZZ";        
  126.           Zone "215";                   
  127.           Outputdata;            
  128.           ReadDataN 1;
  129.           InsertAfterData " ";          
  130.           Outputdata;
  131.           ReadDataTo "@*15";        
  132.           OutputData;            
  133.           Zone "32";            
  134.     end
  135.  
  136. end  -- PatternSection
  137.  
  138.