From 26170bd223ce1b6019273171355f8b9fb42aa1b5 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 7 Jul 2023 16:11:26 -0700
Subject: [PATCH] -- cambio en mejora en formato de valor unitario PAC 3

---
 App_Code/Timbrado.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb
index daf80962c..b60300a57 100644
--- a/App_Code/Timbrado.vb
+++ b/App_Code/Timbrado.vb
@@ -1472,8 +1472,8 @@ Public Class Timbrado
                 If concep.Unidad <> "" Then comprobante.Conceptos(i).Unidad = concep.Unidad
                 comprobante.Conceptos(i).ClaveUnidad = concep.ClaveUnidad
                 comprobante.Conceptos(i).Descripcion = concep.Descripcion
-                comprobante.Conceptos(i).ValorUnitario = concep.ValorUnitario.RoundSQL(6)
-                comprobante.Conceptos(i).Importe = concep.Importe.RoundSQL(NumDecimalesImporte)
+                comprobante.Conceptos(i).ValorUnitario = Decimal.Parse(concep.ValorUnitario.ToString("0.00####"))  ' formateo forzoso, ej,2543.1
+                comprobante.Conceptos(i).Importe = Decimal.Parse(concep.Importe.RoundSQL(NumDecimalesImporte).ToString("0.00")) ' formateo forzoso, ej,2543.1
                 comprobante.Conceptos(i).ClaveProdServ = concep.ClaveProdServ
                 comprobante.Conceptos(i).ObjetoImp = concep.ObjetoImpuesto