ActiveDelphi

[vainqueurbr]

Olá, preciso gravar os dados em uma tabela paradox que possuem campos texto, numérico, memorando e data.

No datamodule criei um componente [Data source] um Componente [Query] e um componente [UpdateSQL]

O que ocorre é:
Quando Crio um registro novo, tudo funciona todos os campos são salvos e o registro gerado.

Quando modifico um registro ou excluo um registro existente é exibido a seguinte mensage: [Type mismatch in expression]

No componente datasource esta setado em dataset a query clientes

No componente [Query] está com os seguinte parâmetros
Active: True
CachedUpdate: True
DatabaseName: Sistest
SQL: Select * from Clientes
UpdateObject: UpdateSQL1

No componente UpdateSQL:
Foi gerado de forma altomatica, através de Generate Sql, sendo:

Modify
update Clientes
set
Codigo = :Codigo,
Nome = :Nome,
Ordem = :Ordem,
Endereco = :Endereco,
Bairro = :Bairro,
Cidade = :Cidade,
UF = :UF,
Fone = :Fone,
Nascimento = :Nascimento,
Comissao = :Comissao,
Preferencial = :Preferencial,
Obs = :Obs
where
Codigo = :OLD_Codigo and
Nome = :OLD_Nome and
Ordem = :OLD_Ordem and
Endereco = :OLD_Endereco and
Bairro = :OLD_Bairro and
Cidade = :OLD_Cidade and
UF = :OLD_UF and
Fone = :OLD_Fone and
Nascimento = :OLD_Nascimento and
Comissao = :OLD_Comissao and
Preferencial = :OLD_Preferencial and
Obs = :OLD_Obs

Insert
insert into Clientes
(Codigo, Nome, Ordem, Endereco, Bairro, Cidade, UF, Fone, Nascimento,
Comissao, Preferencial, Obs)
values
(:Codigo, :Nome, :Ordem, :Endereco, :Bairro, :Cidade, :UF, :Fone,

:Nascimento,
:Comissao, :Preferencial, :Obs)

Delete
delete from Clientes
where
Codigo = :OLD_Codigo and
Nome = :OLD_Nome and
Ordem = :OLD_Ordem and
Endereco = :OLD_Endereco and
Bairro = :OLD_Bairro and
Cidade = :OLD_Cidade and
UF = :OLD_UF and
Fone = :OLD_Fone and
Nascimento = :OLD_Nascimento and
Comissao = :OLD_Comissao and
Preferencial = :OLD_Preferencial and
Obs = :OLD_Obs

Desde já agradeço pelo ajuda.

[carbox]

E como está o código salvar/gravar?

[vainqueurbr]

[vainqueurbr]

[Batera]

Rapaz, eu particularmente não gosto de usar esses componentes igual o UpdateSQL porque o desenvolvedor perde o controle do que ele está tentando fazer no banco de dados.
Eu não sei se dá pra modificar as SQLs geradas por ele, mas se der, experimente alterar a Modify para:

[vainqueurbr]