EXECUTE BLOCK (
   T    TYPE OF COLUMN TARIF.TARN    = ?T
  ,N    TYPE OF COLUMN TARIF.NUMB    = ?N
  ,DTR1 TYPE OF COLUMN TARIF.DATA_TR = ?DTR1
  ,DR1  TYPE OF COLUMN TARIF.DATA_R  = ?DR1
  ,DTR  TYPE OF COLUMN TARIF.DATA_TR = ?DTR
  ,DR   TYPE OF COLUMN TARIF.DATA_R  = ?DR
  ,DE   TYPE OF COLUMN TARIF.DATA_E  = ?DE
)AS
BEGIN

  INSERT INTO TARIF(DATA_TR, DATA_R
    ,MARK, NUMB, TARN, COD_POSL, COD_RIZN, NORM_US
    ,NORM_USD, CODE_NN, CODE_NDN, CODE_UNIT, COST_UNIT
    ,NORM, NORM_DOP, NORM_MAX, OPAL_TIP, CODE_FROG
  )

  SELECT CAST(:DTR1 AS DATE) AS DATA_TR, CAST(:DR1 AS DATE) AS DATA_R
        ,T1.MARK, T1.NUMB, T1.TARN, T1.COD_POSL, T1.COD_RIZN, T1.NORM_US
        ,T1.NORM_USD, T1.CODE_NN, T1.CODE_NDN, T1.CODE_UNIT, T1.COST_UNIT
        ,T1.NORM, T1.NORM_DOP, T1.NORM_MAX, T1.OPAL_TIP, T1.CODE_FROG
  FROM  TARIF T1
  WHERE (T1.TARN = :T)
    AND (T1.NUMB = :N)
    AND ( CAST(T1.DATA_TR AS DATE) = CAST(:DTR  AS DATE) )
    AND ( CAST(T1.DATA_R  AS DATE) = CAST(:DR   AS DATE) )
    AND ( CAST(T1.DATA_E  AS DATE) = CAST(:DE-1 AS DATE) )
  ;
END