Problema com IF em procedure - Firebird

[andreizortea]

Opa.

Galera, eu to tentando montar aqui uma procedure no IBExpert usando um banco Firebird com a seguinte finalidade:

eu tenho duas tabelas, a PAIS e a X_PAIS

na tabela X_PAIS tem alguns paises que nao tem na tabela PAIS, e também a sigla dos paises da tabela X_PAIS é diferente da tabela PAIS

eu teria que alterar a sigla dos paises da tabela PAIS pra que fiquem igual aos da tabela X_PAIS, e ainda cadastrar os paises que nao existirem na tabela PAIS

pra isso, eu fiz isso

CREATE PROCEDURE UPD_PAIS(
  IDPAIS ID,
  DESCPAIS descricao,
  SIGLPAIS SIGLA,
  CODUSUARIO CODIGO
  )
RETURNS (
  IDPAIS ID,
  DESCPAIS DESCRICAO,
  SIGLPAIS SIGLA,
  CODUSUARIO CODIGO
  )
  AS
  BEGIN
    SELECT * FROM PAIS
    INNER JOIN X_PAIS ON PAIS.IDPAIS <> X_PAIS.IDPAIS
    /*INTO :IDPAIS, :DESCPAIS, :SIGLPAIS, :CODUSUARIO
      */
    IF (PAIS.IDPAIS = X_PAIS.IDPAIS) then
      UPDATE PAIS SET PAIS.SIGLPAIS = X_PAIS.SIGLPAIS;

    else
      BEGIN
        INSERT INTO PAIS(IDPAIS, DESCPAIS, SIGLPAIS, CODIUSUARIO)
          VALUES(X_PAIS.IDPAIS,X_PAIS.DESCPAIS, X_PAIS.SIGLPAIS, X_PAIS.CODUSUARIO);
      END

  END
;

E ta me retornando isso:

Invalid token.

Dynamic SQL Error.

SQL error code = -104.

Token unknown - line 19, column 5.

IF.

Eu nao to conseguindo achar aonde esta o erro, se é algo na sintaxe ou se esta faltando algum comando.

Se alguem tiver alguma ideia do que pode estar acontecendo, fico muito agradecido.

t+