From c0573c6ce9e73f92a9472c24eaca5e1e3f0314f9 Mon Sep 17 00:00:00 2001 From: rrene Date: Fri, 5 Mar 2021 13:06:09 -0700 Subject: [PATCH] =?UTF-8?q?--=20liga=20a=20p=C3=B3liza?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- General/SaldosIniciales.aspx.vb | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/General/SaldosIniciales.aspx.vb b/General/SaldosIniciales.aspx.vb index 1b696dca2..4191ec709 100644 --- a/General/SaldosIniciales.aspx.vb +++ b/General/SaldosIniciales.aspx.vb @@ -2021,7 +2021,7 @@ Partial Class General_SaldosIniciales If YaExiste = False Then If IdCuenta > 0 Then - If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovto, Importe, "", 95, Concepto, Now.toDate, -1, -1, CveSubProyecto:=CveSubProyecto) Then + If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovto, Importe, "", 95, Concepto, Now.toDate, -1, -1, ImporteMX:=Importe, CveSubProyecto:=CveSubProyecto) Then TieneError = True Exit For End If @@ -2035,7 +2035,9 @@ Partial Class General_SaldosIniciales If Not TieneError Then ObjConta.Commit() - Alert($"Se agregó la póliza {CvePrePoliza}") + Alert(String.Format("

Prepóliza: {1}", CvePrePoliza, ObjConta.ContaFolio)) + + Alert($"Se agregó la póliza {ObjConta.ContaFolio}") Else Alert($"No encontraron las siguientes cuentas: {Reporte.ToString} ", TipoMensaje.MsgError)