[Resolvido] Data como Parâmetro
Bom dia pessoal, estou usando esta quey para uma simples inserção no banco, mas quando executo, ela me retorna o erro
invalid precison value.
pois o problema é o ultimo parâmetro (XDT_VENCIMENTO ) pois se retiro ele do script a query é executada com sucesso,
se coloco me retorna o erro.
with ADOQuery1 do
begin
sql.Clear;
sql.Add(' Insert into TESTE ');
sql.Add(' (XCD_INT_VENDA, XCD_INT_PLANO_PAG, XCD_INT_FORMA_REC, XNUMERO_DOCUMENTO, XDT_ENTRADA )');
sql.Add(' values :XCD_INT_VENDA, :XCD_INT_PLANO_PAG, :XCD_INT_FORMA_REC, :XNUMERO_DOCUMENTO, :XDT_VENCIMENTO )');
Parameters.ParamByName('XCD_INT_VENDA').Value := cVendas.qryVendasEdit.fieldByName('XCD_INT_VENDA').AsInteger;
Parameters.ParamByName('XCD_INT_PLANO_PAG').Value := qryContasReceberEdit.fieldByName('XCD_INT_PLANO_PAG').AsInteger;
Parameters.ParamByName('XCD_INT_FORMA_REC').Value := qryContasReceberEdit.fieldByName('XCD_INT_FORMA_REC').AsInteger;
Parameters.ParamByName('XNUMERO_DOCUMENTO').Value := qryContasReceberEdit.fieldByName('XNUMERO_DOCUMENTO').AsInteger;
Parameters.ParamByName('XDT_VENCIMENTO').Value := FormatdateTime('yyyy"-"mm"-"dd',StrToDate(edtDtVencimento.Text));
ExecSQL;
end;
Já tentei de várias formas formatar esta data mas continua o erro, se alguem puder me dar um help.
Obrigado desde já pessoal
Discussão (9)
Carregando comentários...