From 4e761c52345366c2287a71365ed28a25efbe8976 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 7 May 2024 12:33:22 -0700 Subject: [PATCH] -- mejora visual --- Contabilidad/RegPrePolizaS.aspx | 6 +++--- Contabilidad/RegPrePolizaS.aspx.vb | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Contabilidad/RegPrePolizaS.aspx b/Contabilidad/RegPrePolizaS.aspx index b460ad4ee..23a848b8a 100644 --- a/Contabilidad/RegPrePolizaS.aspx +++ b/Contabilidad/RegPrePolizaS.aspx @@ -318,7 +318,7 @@ Cuenta -
+
@@ -379,7 +379,7 @@ - + @@ -621,7 +621,7 @@
- +
diff --git a/Contabilidad/RegPrePolizaS.aspx.vb b/Contabilidad/RegPrePolizaS.aspx.vb index 28a9814bb..2908f46f6 100644 --- a/Contabilidad/RegPrePolizaS.aspx.vb +++ b/Contabilidad/RegPrePolizaS.aspx.vb @@ -768,7 +768,7 @@ Partial Class ContabilidadC_RegPrePolizaS Dim dr As DataRow = DtMovimientos.NewRow dr("CodigoNombreCuenta") = drt("Codigo").ToString & "
" & drt("Nombre").ToString - 'dr("Cuenta") = drt("ConceptoContable").ToString + dr("ConceptoContable") = drt("ConceptoContable").ToString dr("Referencia") = If(drt("CveConceptoContable").ToString.Contiene("29", "130"), drt("Personal"), drt("RazonSocial")) dr("Concepto") = TxtConcepto.Text dr("TipoMovto") = If(drt("TipoMovto").ToString = "False", 0, 1)