Export CSV data 1

execute ibeblock
as
begin
 txt='';
 for
  select firstname, lastname
  from customer
  into :fn,:ln
  do
  begin
     txt=txt+fn+';'+ln+ibec_crlf();
  end;
  ibec_SaveToFile('C:\txt.csv',txt,__stfOverwrite);
end