execute ibeblock
as
declare variable cmd varchar(4096);
declare variable ClientID integer;
declare variable ClientName varchar(300);
declare variable SpecID integer;
declare variable Name varchar(80);
declare variable TaxesID integer;
declare variable Stavka decimal(15, 4);
declare variable OrderID intefger;
begin
   cmd = 'select c.id as ClientID, c.clientname, s.id as SpecID, s.name, ct.id as TaxesID, ct.stavka, o.id as OrderID ' ||
      'from clietns c ' ||
         'inner join orders o on o.client_id = c.id ' ||
         'inner join client_taxes ct on (ct.client_id = c.id) and (ct.order_id = o.id) ' ||
         'inner join specs s on s.id = ct.spec_id ' ||
      'order by 1';
   for
      execute statement :cmd
      on external '192.168.234.7/3050:old_homsan'
      with autonomous transaction
      as user current_user
      into :ClientID, :ClientName, :SpecID, :Name, :TaxesID, :Stavka, :OrderID
   do
      suspend;
end