Dificuldade para Encontrar erro do Delphi
Bom dia a todos, estou tendo uma grande dificuldade para encontrar a causa de erro que esta dando quando mando salvar as informações de uma tela, o erro é: Conversion erro for String, este erro ocorre no seguinte código:
with spIUCompra do
begin
Params[0].AsInteger := cdsCompraID_COMPRA.AsInteger;
Params[1].AsString := cdsCompraNF_COMPRA.AsString;
Params[2].AsInteger := cdsCompraID_FORNECEDOR.AsInteger;
Params[3].AsBCD := cdsCompraVL_TOTALCOMPRA.AsCurrency;
Params[4].AsInteger := cdsCompraID_SOLICITACAOCOMPRA.AsInteger;
Params[5].AsInteger := cdsCompraID_FUNCIONARIO.AsInteger;
Params[6].AsInteger := cdsCompraCFOP.AsInteger;
Params[7].AsDateTime := cdsCompraDT_COMPRA.AsDateTime;
ExecProc; O erro está ocorrendo nesta linha.
Comit;
idCompra := Params[9].AsInteger;
end;
with spIUCompra do
begin
Params[0].AsInteger := cdsCompraID_COMPRA.AsInteger;
Params[1].AsString := cdsCompraNF_COMPRA.AsString;
Params[2].AsInteger := cdsCompraID_FORNECEDOR.AsInteger;
Params[3].AsBCD := cdsCompraVL_TOTALCOMPRA.AsCurrency;
Params[4].AsInteger := cdsCompraID_SOLICITACAOCOMPRA.AsInteger;
Params[5].AsInteger := cdsCompraID_FUNCIONARIO.AsInteger;
Params[6].AsInteger := cdsCompraCFOP.AsInteger;
Params[7].AsDateTime := cdsCompraDT_COMPRA.AsDateTime;
ExecProc; O erro está ocorrendo nesta linha.
Comit;
idCompra := Params[9].AsInteger;
end;
George Medeiros
Curtidas 0
Respostas
José Silva
13/05/2010
aparentemente deve estar na linha params[3].asBCD
GOSTEI 0
George Medeiros
13/05/2010
Mas no Delphi quando estou passando para um Param um valor Currency(monetario) ele recebe no formato BCD.
GOSTEI 0
Rogerio
13/05/2010
Verifique na estrutura da sua tabela se o tipo dos campos é o mesmo dos parametros.
GOSTEI 0