Valor total indo com vírgula

[jackson Lima]

Pessoal, analisando o xml de pagamento percebi que o acbr está enviando o valor da venda com vírgula, sendo que os outros valores são com ponto.

Parametro.GerarParametro('IcmsBase'         , EnviarPagamento.IcmsBase, tcDe2);
if EnviarPagamento.ChaveAcessoValidador = cChaveAcessoIntegrador then
  Parametro.GerarParametro('ValorTotalVenda'  ,FloatToString( EnviarPagamento.ValorTotalVenda, ',' ), tcStr)
else
  Parametro.GerarParametro('ValorTotalVenda'  , EnviarPagamento.ValorTotalVenda, tcDe2);

Esse código colocar a virgula no valor total, função: function TEnviarPagamentoW.GerarXml(): boolean; na unit: pcnVFPeW

Qual a razão desse código? Obrigado

[Amarildo de Matos]

bom dia..

realmente todos os valores tem de ser com ponto..

voce esta com os fontes atualizados?

 

[jackson Lima]

Agora, Amarildo de Matos disse:

bom dia..

realmente todos os valores tem de ser com ponto..

voce esta com os fontes atualizados?

 

Estão atualizados. 

O estranho que tem a verificação no código de enviar com vírgula ou não, de acordo com a chave acesso validador

[Amarildo de Matos]

faça um debug no programa e veja se realmente esta passando por esse ponto. e tambem gere o xml, e mande para analisar.. 

 

[jackson Lima]

Agora, Amarildo de Matos disse:

faça um debug no programa e veja se realmente esta passando por esse ponto. e tambem gere o xml, e mande para analisar.. 

 

Ele sempre entra nesse ponto e adiciona o valor com a virgula.

Xml:

<Integrador>
	<Identificador>
		<Valor>795880</Valor>
	</Identificador>
	<Componente Nome="VFP-e">
		<Metodo Nome="EnviarPagamento">
			<Construtor>
				<Parametros>
					<Parametro>
						<Nome>chaveAcessoValidador</Nome>
						<Valor>25CFE38D-3B92-46C0-91CA-CFF751A82D3D</Valor>
					</Parametro>
				</Parametros>
			</Construtor>
			<Parametros>
				<Parametro>
					<Nome>ChaveRequisicao</Nome>
					<Valor>26359854-5698-1365-9856-965478231456</Valor>
				</Parametro>
				<Parametro>
					<Nome>Estabelecimento</Nome>
					<Valor/>
				</Parametro>
				<Parametro>
					<Nome>SerialPos</Nome>
					<Valor>TEF</Valor>
				</Parametro>
				<Parametro>
					<Nome>Cnpj</Nome>
					<Valor>14200166000166</Valor>
				</Parametro>
				<Parametro>
					<Nome>IcmsBase</Nome>
					<Valor>99.99</Valor>
				</Parametro>
				<Parametro>
					<Nome>ValorTotalVenda</Nome>
					<Valor>99,99</Valor>
				</Parametro>
				<Parametro>
					<Nome>HabilitarMultiplosPagamentos</Nome>
					<Valor>true</Valor>
				</Parametro>
				<Parametro>
					<Nome>HabilitarControleAntiFraude</Nome>
					<Valor>false</Valor>
				</Parametro>
				<Parametro>
					<Nome>CodigoMoeda</Nome>
					<Valor>BRL</Valor>
				</Parametro>
				<Parametro>
					<Nome>EmitirCupomNFCE</Nome>
					<Valor>false</Valor>
				</Parametro>
				<Parametro>
					<Nome>OrigemPagamento</Nome>
					<Valor>0000933 Venda para consumidor final.</Valor>
				</Parametro>
			</Parametros>
		</Metodo>
	</Componente>
</Integrador>

 

[Amarildo de Matos]

entao tu tera de alterar realmente, em vez de virgua colocar o ponto..

altere o fonte.. 

[jackson Lima]

Agora, Amarildo de Matos disse:

entao tu tera de alterar realmente, em vez de virgua colocar o ponto..

altere o fonte.. 

Mas não posso alterar se tem uma verificação que as vezes vem ponto e outras vem virgula

Queria saber o motivo de ter aquele código.

@André Ferreira de Moraes tu lembra por que tu colocou essa verificação?

[André Ferreira de Moraes]

Pq em homologação funciona apenas informando o campo com vírgula e a chave de acesso q está na constante cChaveAcessoIntegrador é a que deve ser usada para testes do Integrador.

[Amarildo de Matos]

opa..andre.. valeu ai. realmente esse detalhe eu nao sabia. que tinha de ser..