home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1993 #2 / Image.iso / finance / tas515dm.zip / TAS514.EXE / lha / AIO.TAS < prev    next >
Text File  |  1993-04-08  |  175b  |  13 lines

  1. t : string;
  2. pe: number;
  3. Prolog Begin
  4.     hdl = AOpen('AIO.DTA','R');
  5. End;
  6. if ASeek(hdl,Ticker) then
  7. Begin
  8.     AGet(hdl,t,pe);
  9.     Writeln(t,pe);
  10. End;
  11. EpiLog  AClose(hdl);
  12.  
  13.