SET TERM ^ ;
ALTER PROCEDURE SP_AKTUALIZACJATRASY_
RETURNS (
    TRASA Integer,
    NAZWA Varchar(40) )
AS
DECLARE VARIABLE VTRASA Integer;
DECLARE VARIABLE VNAZWA Varchar(40);

DECLARE zap   varchar(100) = 'select trasa, nazwa from TRASY';
DECLARE baza1 varchar(100) = '192.168.0.22/3050:/home/services/firebird/PIB.GDB';

BEGIN

  for execute statement (:zap)
      on external :baza1 as user 'SYSDBA' password 'kukuruku'
     
      
  INTO VTRASA, VNAZWA DO 
  BEGIN
    TRASA=VTRASA;
    NAZWA=VNAZWA;
    SUSPEND;
  END
END^
SET TERM ; ^


GRANT EXECUTE
 ON PROCEDURE SP_AKTUALIZACJATRASY_ TO  "PUBLIC";

GRANT EXECUTE
 ON PROCEDURE SP_AKTUALIZACJATRASY_ TO  SYSDBA;