Problemas con un foreign key

[[duilioisola]]

He hecho esta prueba que funciona:

Código SQL [-]
CREATE TABLE TIPOIVA (
    NOMBRE  VARCHAR(30) CHARACTER SET ISO8859_1 NOT NULL COLLATE ES_ES_CI_AI,
    PORIVA  NUMERIC(4,2) DEFAULT 0 /*--->*/ NOT NULL /*<---*/
);
commit work;

/* Debe ser PK para poder ser referenicada por FKs */
ALTER TABLE TIPOIVA ADD CONSTRAINT PK_TIPOIVA PRIMARY KEY (PORIVA);
commit work;

CREATE TABLE ARTICULO (
    CODIGO      INTEGER NOT NULL,
    REFERENCIA  VARCHAR(25) CHARACTER SET ISO8859_1 NOT NULL COLLATE ES_ES_CI_AI,
    CODBAR      VARCHAR(15) CHARACTER SET ISO8859_1 COLLATE ES_ES_CI_AI,
    NOMBRE      VARCHAR(60) CHARACTER SET ISO8859_1 COLLATE ES_ES_CI_AI,
    FAMILIA     INTEGER DEFAULT 1,
    PROVEEDOR   INTEGER DEFAULT 1,
    PRECOSTE    NUMERIC(15,4),
    PREBRUTO    NUMERIC(15,4),
    TIPOIVA     /*--->*/ NUMERIC(4,2) DEFAULT 0 /*<---*/ ,
    PREVENTA    NUMERIC(15,4),
    STOCK       INTEGER,
    MINIMO      INTEGER DEFAULT 0,
    CONTROL     SMALLINT DEFAULT 0
);
commit work;

ALTER TABLE ARTICULO ADD CONSTRAINT FK_ARTIVA FOREIGN KEY (TIPOIVA) REFERENCES TIPOIVA (PORIVA);
commit work;