Monster Media 1993 #2/Image.iso/finance/tas515dm.zip/TAS514.EXE/lha/AIO.TAS

Text File | 1993-04-08 | 175b | 13 lines

t : string;
pe: number;
Prolog Begin
    hdl = AOpen('AIO.DTA','R');
End;
if ASeek(hdl,Ticker) then
Begin
    AGet(hdl,t,pe);
    Writeln(t,pe);
End;
EpiLog  AClose(hdl);