ActiveDelphi

[esb.batista]

Estou tentando realizar a seguinte consulta:
o cod_setor criado no postgres é numeric.
CREATE TABLE setor
(
cod_setor numeric(10),
descricao character varying(50)
)
WITHOUT OIDS;
ALTER TABLE setor OWNER TO postgres;


mas lanca a seguinte mensagem: could not convert of type (null) into to (integer).
.
.
con:=TZReadOnlyQuery.Create(nil);
con.Connection:=dmcon.ZConexao;
con.Close;
con.SQL.Clear;
con.SQL.Add('select p.nome as "NOME PACIENTE", s.descricao as "SETOR" from paciente p, leito l, setor s '+
'where p.cod_leito=l.cod_leito and l.cod_setor=s.cod_setor and s.cod_setor='+IntToStr(dblkA.KeyValue)+'');
con.Open;
dsA.DataSet:=con;
.
.
Aguardo resposta.

[cyberdisk]