Fórum XML aberto pelo clientdataset não mostra casas decimais #559314

Cara que problema difícil, o cliente formatou o pc e mesmo assim não resolveu

Qual versão do Delphi está usando?

Qual o tipo de dados está utilizando nesse campo valor?

Poste aqui o seu código Delphi e também o XML gerado para podermos avaliar.


Eduardo Belo
e-mail: beloelogica@gmail.com

Obrigado pela resposta

Estou usando Delphi 2010

dm.cdsOrigem.Close;
dm.cdsOrigem.LoadFromFile(ltListaArquivo[i]);
dm.cdsOrigem.Open;

<?xml version="1.0" encoding="UTF-8" standalone="yes"?> <DATAPACKET Version="2.0"><METADATA><FIELDS><FIELD attrname="gid" fieldtype="string" WIDTH="18"><PARAM Name="ORIGIN" Value="vendaecf.gid" Roundtrip="True"/></FIELD><FIELD attrname="data" fieldtype="date"><PARAM Name="ORIGIN" Value="vendaecf.data" Roundtrip="True"/></FIELD><FIELD attrname="hora" fieldtype="time"><PARAM Name="ORIGIN" Value="vendaecf.hora" Roundtrip="True"/></FIELD><FIELD attrname="gidpdv" fieldtype="string" WIDTH="18"><PARAM Name="ORIGIN" Value="vendaecf.gidpdv" Roundtrip="True"/></FIELD><FIELD attrname="valortotal" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valortotal" Roundtrip="True"/></FIELD><FIELD attrname="tipo" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.tipo" Roundtrip="True"/></FIELD><FIELD attrname="cancelado" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.cancelado" Roundtrip="True"/></FIELD><FIELD attrname="valorpago" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valorpago" Roundtrip="True"/></FIELD><FIELD attrname="troco" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.troco" Roundtrip="True"/></FIELD><FIELD attrname="codigo" fieldtype="i4" readonly="true" SUBTYPE="Autoinc"><PARAM Name="ORIGIN" Value="vendaecf.codigo" Roundtrip="True"/></FIELD><FIELD attrname="usuario" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.usuario" Roundtrip="True"/></FIELD><FIELD attrname="gidusuariopdv" fieldtype="string" WIDTH="18"><PARAM Name="ORIGIN" Value="vendaecf.gidusuariopdv" Roundtrip="True"/></FIELD><FIELD attrname="numerocupom" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.numerocupom" Roundtrip="True"/></FIELD><FIELD attrname="pronto" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.pronto" Roundtrip="True"/></FIELD><FIELD attrname="cnpj_cpf" fieldtype="string" WIDTH="14"><PARAM Name="ORIGIN" Value="vendaecf.cnpj_cpf" Roundtrip="True"/></FIELD><FIELD attrname="num_ccf" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_ccf" Roundtrip="True"/></FIELD><FIELD attrname="num_cro" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_cro" Roundtrip="True"/></FIELD><FIELD attrname="num_cnf" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_cnf" Roundtrip="True"/></FIELD><FIELD attrname="num_coo" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_coo" Roundtrip="True"/></FIELD><FIELD attrname="num_gnf" fieldtype="string" WIDTH="6"><PARAM Name="ORIGIN" Value="vendaecf.num_gnf" Roundtrip="True"/></FIELD><FIELD attrname="enviado" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.enviado" Roundtrip="True"/></FIELD><FIELD attrname="valor_desconto" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valor_desconto" Roundtrip="True"/></FIELD><FIELD attrname="valor_acrescimo" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valor_acrescimo" Roundtrip="True"/></FIELD><FIELD attrname="valor_liquido" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valor_liquido" Roundtrip="True"/></FIELD><FIELD attrname="nome_cliente" fieldtype="string" WIDTH="40"><PARAM Name="ORIGIN" Value="vendaecf.nome_cliente" Roundtrip="True"/></FIELD><FIELD attrname="fabricacao_ecf" fieldtype="string" WIDTH="30"><PARAM Name="ORIGIN" Value="vendaecf.fabricacao_ecf" Roundtrip="True"/></FIELD><FIELD attrname="endereco_cliente" fieldtype="string" WIDTH="40"><PARAM Name="ORIGIN" Value="vendaecf.endereco_cliente" Roundtrip="True"/></FIELD><FIELD attrname="numero_nota" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.numero_nota" Roundtrip="True"/></FIELD><FIELD attrname="id_lista_ecf" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.id_lista_ecf" Roundtrip="True"/></FIELD><FIELD attrname="md5" fieldtype="string" WIDTH="128"><PARAM Name="ORIGIN" Value="vendaecf.md5" Roundtrip="True"/></FIELD><FIELD attrname="nserie_sat" fieldtype="string" WIDTH="15"><PARAM Name="ORIGIN" Value="vendaecf.nserie_sat" Roundtrip="True"/></FIELD><FIELD attrname="ncfe" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.ncfe" Roundtrip="True"/></FIELD></FIELDS><PARAMS/></METADATA><ROWDATA><ROW gid="7ED49112175D617C00" data="20160711" hora="10:21:54000" gidpdv="0B25120F08B15D0E00" valortotal="38.81" tipo="1" cancelado="0" valorpago="40" troco="1.19" codigo="2617431" gidusuariopdv="7ED49112175DE1D300" numerocupom="216634" pronto="1" cnpj_cpf="" num_ccf="167928" num_cro="0001" num_coo="216634" num_gnf="043493" enviado="0" valor_desconto="0" valor_acrescimo="0" valor_liquido="38.81" nome_cliente="" fabricacao_ecf="BE091310100011325868" endereco_cliente="" numero_nota="0" id_lista_ecf="3" md5="2C685EE41A709CDB67CF5599A5B01186"/></ROWDATA></DATAPACKET>

Obrigado

Obrigado pela resposta

Estou usando Delphi 2010

dm.cdsOrigem.Close;
dm.cdsOrigem.LoadFromFile(ltListaArquivo[i]);
dm.cdsOrigem.Open;

<?xml version="1.0" encoding="UTF-8" standalone="yes"?> <DATAPACKET Version="2.0"><METADATA><FIELDS><FIELD attrname="gid" fieldtype="string" WIDTH="18"><PARAM Name="ORIGIN" Value="vendaecf.gid" Roundtrip="True"/></FIELD><FIELD attrname="data" fieldtype="date"><PARAM Name="ORIGIN" Value="vendaecf.data" Roundtrip="True"/></FIELD><FIELD attrname="hora" fieldtype="time"><PARAM Name="ORIGIN" Value="vendaecf.hora" Roundtrip="True"/></FIELD><FIELD attrname="gidpdv" fieldtype="string" WIDTH="18"><PARAM Name="ORIGIN" Value="vendaecf.gidpdv" Roundtrip="True"/></FIELD><FIELD attrname="valortotal" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valortotal" Roundtrip="True"/></FIELD><FIELD attrname="tipo" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.tipo" Roundtrip="True"/></FIELD><FIELD attrname="cancelado" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.cancelado" Roundtrip="True"/></FIELD><FIELD attrname="valorpago" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valorpago" Roundtrip="True"/></FIELD><FIELD attrname="troco" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.troco" Roundtrip="True"/></FIELD><FIELD attrname="codigo" fieldtype="i4" readonly="true" SUBTYPE="Autoinc"><PARAM Name="ORIGIN" Value="vendaecf.codigo" Roundtrip="True"/></FIELD><FIELD attrname="usuario" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.usuario" Roundtrip="True"/></FIELD><FIELD attrname="gidusuariopdv" fieldtype="string" WIDTH="18"><PARAM Name="ORIGIN" Value="vendaecf.gidusuariopdv" Roundtrip="True"/></FIELD><FIELD attrname="numerocupom" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.numerocupom" Roundtrip="True"/></FIELD><FIELD attrname="pronto" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.pronto" Roundtrip="True"/></FIELD><FIELD attrname="cnpj_cpf" fieldtype="string" WIDTH="14"><PARAM Name="ORIGIN" Value="vendaecf.cnpj_cpf" Roundtrip="True"/></FIELD><FIELD attrname="num_ccf" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_ccf" Roundtrip="True"/></FIELD><FIELD attrname="num_cro" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_cro" Roundtrip="True"/></FIELD><FIELD attrname="num_cnf" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_cnf" Roundtrip="True"/></FIELD><FIELD attrname="num_coo" fieldtype="string" WIDTH="10"><PARAM Name="ORIGIN" Value="vendaecf.num_coo" Roundtrip="True"/></FIELD><FIELD attrname="num_gnf" fieldtype="string" WIDTH="6"><PARAM Name="ORIGIN" Value="vendaecf.num_gnf" Roundtrip="True"/></FIELD><FIELD attrname="enviado" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.enviado" Roundtrip="True"/></FIELD><FIELD attrname="valor_desconto" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valor_desconto" Roundtrip="True"/></FIELD><FIELD attrname="valor_acrescimo" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valor_acrescimo" Roundtrip="True"/></FIELD><FIELD attrname="valor_liquido" fieldtype="r8"><PARAM Name="ORIGIN" Value="vendaecf.valor_liquido" Roundtrip="True"/></FIELD><FIELD attrname="nome_cliente" fieldtype="string" WIDTH="40"><PARAM Name="ORIGIN" Value="vendaecf.nome_cliente" Roundtrip="True"/></FIELD><FIELD attrname="fabricacao_ecf" fieldtype="string" WIDTH="30"><PARAM Name="ORIGIN" Value="vendaecf.fabricacao_ecf" Roundtrip="True"/></FIELD><FIELD attrname="endereco_cliente" fieldtype="string" WIDTH="40"><PARAM Name="ORIGIN" Value="vendaecf.endereco_cliente" Roundtrip="True"/></FIELD><FIELD attrname="numero_nota" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.numero_nota" Roundtrip="True"/></FIELD><FIELD attrname="id_lista_ecf" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.id_lista_ecf" Roundtrip="True"/></FIELD><FIELD attrname="md5" fieldtype="string" WIDTH="128"><PARAM Name="ORIGIN" Value="vendaecf.md5" Roundtrip="True"/></FIELD><FIELD attrname="nserie_sat" fieldtype="string" WIDTH="15"><PARAM Name="ORIGIN" Value="vendaecf.nserie_sat" Roundtrip="True"/></FIELD><FIELD attrname="ncfe" fieldtype="i4"><PARAM Name="ORIGIN" Value="vendaecf.ncfe" Roundtrip="True"/></FIELD></FIELDS><PARAMS/></METADATA><ROWDATA><ROW gid="7ED49112175D617C00" data="20160711" hora="10:21:54000" gidpdv="0B25120F08B15D0E00" valortotal="38.81" tipo="1" cancelado="0" valorpago="40" troco="1.19" codigo="2617431" gidusuariopdv="7ED49112175DE1D300" numerocupom="216634" pronto="1" cnpj_cpf="" num_ccf="167928" num_cro="0001" num_coo="216634" num_gnf="043493" enviado="0" valor_desconto="0" valor_acrescimo="0" valor_liquido="38.81" nome_cliente="" fabricacao_ecf="BE091310100011325868" endereco_cliente="" numero_nota="0" id_lista_ecf="3" md5="2C685EE41A709CDB67CF5599A5B01186"/></ROWDATA></DATAPACKET>

Obrigado

Fiz um teste aqui com o Delphi 10 Seatle e está tudo ok.

Se você não formata os campos TFloatFields com ''##,#0.00'' não vai aparecer as casas decimais para valores sem centavos.

Veja o exemplo na imagem abaixo para o campo pago.


[img:descricao=Teste XML Delphi 10 Seatle]http://screenshot.net/ox2wga6.jpg[/img]


Eduardo Belo
e-mail: beloelogica@gmail.com

Eduardo

No meu caso não é no campo no valor pago = 40 e sim no valortotal=38.81, quando ele abre o xml ele abre com 38.00.

Obrigado

Eduardo

No meu caso não é no campo no valor pago = 40 e sim no valortotal=38.81, quando ele abre o xml ele abre com 38.00.

Obrigado