CREATE TABLE TEST (
    ID         INTEGER NOT NULL,
    NAME       VARCHAR(32) NOT NULL
);

ALTER TABLE TEST ADD CONSTRAINT PK_TEST PRIMARY KEY (ID);

EXECUTE IBEBLOCK
AS
BEGIN
  sql = '
    MERGE INTO
      test t
    USING (
      SELECT
        CAST(:id AS TYPE OF COLUMN test.id) AS "ID"
      FROM
        rdb$database
    ) sel
    ON (
      t."ID" = sel."ID"
    )
    WHEN NOT MATCHED THEN
      INSERT (
        a."ID",
        a."NAME"
      ) VALUES (
        sel."ID",
        :name
      );
  ';
  vals = 1;
  vals[1] = 'Test';
  EXECUTE STATEMENT :sql VALUES :vals;
END