A problem with inconsistent datatypes

Question

Whenever I try inserting a new record of type t_cliente_societa in my Cliente table, I get ORA-00932 inconsistent datatypes error and I'm not able to find the reason.
Could anyone help me? Thanks in advance.
I'll post my SQL code here. please ignore member functions for I havent' included the code necessary to create the needed tables.
I defined some types useful for storing informations about the entities I have to deal with.
The main type is t_cliente and its subtypes are t_cliente_pers and t_cliente_soc.
I use polymorphism to insert records based on subtypes instancies into a table based on supertype.
When I would add a new t_cliente_pers record, first I add it into Persona table and then into Cliente table.
The latter contains a REF to Persona for I have several "persons" who aren't "clients" and I use a single table to store them all.
create or replace TYPE t_indirizzo AS OBJECT (
via VARCHAR(45),
numero NUMBER(4),
cap INTEGER(5),
citta VARCHAR(30),
provincia VARCHAR(30),
regione VARCHAR(30),
MEMBER FUNCTION indirizzoCompleto RETURN VARCHAR
create or replace TYPE t_telefono AS OBJECT (
num_tel NUMBER(15)
create or replace TYPE t_telefono_array IS VARRAY(3) OF t_telefono
create or replace TYPE t_anagrafica AS OBJECT (
nome VARCHAR(45),
cognome VARCHAR(45),
sesso CHAR(1),
cod_fiscale VARCHAR(16),
data_nascita DATE
create or replace TYPE t_ragioneSociale AS OBJECT (
nome_soc VARCHAR(45),
data_cost DATE,
part_iva NUMBER(11)
create or replace TYPE t_persona AS OBJECT (
dati_anagrafici t_anagrafica,
indirizzo t_indirizzo,
email VARCHAR(45),
telefono t_telefono_array
create or replace TYPE t_societa AS OBJECT (
ragione_sociale t_ragioneSociale,
indirizzo t_indirizzo,
email VARCHAR(45),
telefono t_telefono_array,
persona_rif t_persona
create or replace TYPE t_cliente AS OBJECT (
cod_cliente NUMBER(8),
MEMBER FUNCTION incFatti RETURN NUMBER,
MEMBER FUNCTION incSubiti RETURN NUMBER,
MEMBER FUNCTION incFattiPeriodo RETURN NUMBER,
MEMBER FUNCTION incSubitiPeriodo RETURN NUMBER,
MEMBER FUNCTION nomeCliente RETURN VARCHAR,
MEMBER FUNCTION tipoCliente RETURN VARCHAR
) NOT FINAL
CREATE OR REPLACE TYPE BODY t_cliente AS
MEMBER FUNCTION incFatti RETURN NUMBER
IS incidenti NUMBER;
BEGIN
SELECT count(i. cod_incidente) INTO incidenti
FROM Incidenti i, Mezzi m
WHERE SELF.cod_cliente = m.possessore.cod_cliente AND m.num_targa = i.mezzo. num_targa AND i. responsabilita = ‘c’;
RETURN (incidenti);
END;
MEMBER FUNCTION incSubiti RETURN NUMBER
IS incidenti NUMBER;
BEGIN
SELECT count(i. cod_incidente) INTO incidenti
FROM Incidenti i, Mezzi m
WHERE SELF.cod_cliente = m.possessore.cod_cliente AND m.num_targa = i.mezzo. num_targa AND i. responsabilita = ‘s’;
RETURN (incidenti);
END;
MEMBER FUNCTION incFattiPeriodo (da DATE, a DATE) RETURN NUMBER
IS incidenti NUMBER;
BEGIN
SELECT count(i. cod_incidente) INTO incidenti
FROM Incidenti i ,Mezzi m
WHERE SELF. cod_cliente = m.possessore.cod_cliente AND m. num_targa = i.mezzo. num_targa AND i. responsabilita = ‘c’ AND (i.data BETWEEN da and a);
RETURN (incidenti);
END;
MEMBER FUNCTION incSubitiPeriodo (da DATE, a DATE) RETURN NUMBER
IS incidenti NUMBER;
BEGIN
SELECT count(i. cod_incidente) INTO incidenti
FROM Incidenti i ,Mezzi m
WHERE SELF. cod_cliente = m.possessore.cod_cliente AND m. num_targa = i.mezzo. num_targa AND i. responsabilita = ‘s’ AND (i.data BETWEEN da and a);
RETURN (incidenti);
END;
MEMBER FUNCTION nomeCliente RETURN VARCHAR
IS
BEGIN
RETURN TO_CHAR(cod_cliente);
END;
MEMBER FUNCTION tipoCliente RETURN VARCHAR
IS
BEGIN
RETURN (‘u’);
END;
END ;
create or replace TYPE t_cliente_pers UNDER t_cliente (
persona REF t_persona,
OVERRIDING MEMBER FUNCTION nomeCliente RETURN VARCHAR,
OVERRIDING MEMBER FUNCTION tipoCliente RETURN VARCHAR
) NOT FINAL
CREATE OR REPLACE TYPE BODY t_cliente_pers AS
MEMBER FUNCTION nomeCliente RETURN VARCHAR
IS nc VARCHAR(90) ;
BEGIN
SELECT concat(p.dati_anagrafici.nome, concat(' ',p.dati_anagrafici.cognome)) INTO nc
FROM d;
RETURN (nc);
END;
MEMBER FUNCTION tipoCliente RETURN VARCHAR
IS
BEGIN
RETURN (‘p’);
END;
END ;
create or replace TYPE t_cliente_soc UNDER t_cliente (
societa t_societa,
OVERRIDING MEMBER FUNCTION nomeCliente RETURN VARCHAR,
OVERRIDING MEMBER FUNCTION tipoCliente RETURN VARCHAR
) NOT FINAL
CREATE OR REPLACE TYPE BODY t_cliente_soc AS
MEMBER FUNCTION nomeCliente RETURN VARCHAR
IS
BEGIN
RETURN (ragione_sociale.nome_soc);
END;
MEMBER FUNCTION tipoCliente RETURN VARCHAR
IS
BEGIN
RETURN (‘s’);
END;
END ;
CREATE TABLE persona OF t_persona(
dati_anagrafici NOT NULL,
indirizzo NOT NULL,
email NOT NULL,
telefono NOT NULL,
PRIMARY KEY (dati_anagrafici.cod_fiscale)
CREATE TABLE cliente OF t_cliente(
PRIMARY KEY (cod_cliente)
CREATE SEQUENCE seqCliente
START WITH 1
INCREMENT BY 1
MINVALUE 1
NOMAXVALUE
NOCYCLE;
And finally this is the instruction that gives me problems.*
INSERT INTO cliente VALUES(
t_cliente_soc(
seqCliente.NEXTVAL,
t_societa(
t_ragioneSociale('Adecco', '01-gen-1999', '12345678901'),
t_indirizzo('Milano', '18', '21100', 'Varese', 'Varese', 'Lombardia'),
'[email protected]',
t_telefono_array(t_telefono('0332563214')),
t_persona(
t_anagrafica('Giulia', 'Macchi', 'f', 'MCCGLA80C23L682L', '23-gen-1980'),
t_indirizzo('Tofane', '2', '23026', 'Arona', 'Novara', 'Piemonte'),
'[email protected]',
t_telefono_array(t_telefono('0322123456'), t_telefono('3337894561'))
/

Answer 1

I eliminated the entire database and recreated everything. Now it works... Thanks anyway.