CREATE TABLE TMP_TBL (
    CODE     INTEGER,
    ENDDATE  DATE
);

COMMIT;

SET TERM ^ ;

create or alter procedure Tmp_Test
as
declare variable Meterenddate   date;

declare variable Offset_Enddate integer;
begin

  delete from Tmp_Tbl
    where Code = 1;
  insert into Tmp_Tbl (Code)
    values (1);

  Offset_Enddate = 0;

  Meterenddate = date '01.01.2016';

  -- Вот здесь и скажет все что думает
  update Tmp_Tbl
    set Enddate = :Meterenddate - :Offset_Enddate
    where Code = 1;
end^

SET TERM ; ^

/* Следующие операторы GRANT сгенерированы автоматически */

GRANT SELECT,INSERT,DELETE,UPDATE ON TMP_TBL TO PROCEDURE TMP_TEST;

/* Существующие привилегии на эту процедуру */

GRANT EXECUTE ON PROCEDURE TMP_TEST TO SYSDBA;
COMMIT;