From 0e566d540c7f12d1c9a7aaaabfd02779279642b3 Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 15 Feb 2023 07:36:22 -0700 Subject: [PATCH] =?UTF-8?q?--=20proceso=20para=20visualizar=20la=20p=C3=B3?= =?UTF-8?q?liza=20al=20registrar?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Compras/Compras.aspx.vb | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index 5710ba58f..aa2a73f8c 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -1582,8 +1582,6 @@ Partial Class Compras_Compras CargaFletesAgregados() End If - - InicializaOC() 'Valida si el IVA del XML es está bien calculado @@ -3210,6 +3208,10 @@ Partial Class Compras_Compras InventarioMov() HabilitaNCInv() + If Request("RG") IsNot Nothing Then + BtnRegenerarPrePolizaAlmacen_Click(Nothing, Nothing) + End If + Else Alert("La compra solicitada no se encontró. Por favor rectifique y vuelva a intentar.", TipoMensaje.MsgAdvertencia) End If @@ -8108,6 +8110,10 @@ Partial Class Compras_Compras Msg.AppendFormat("

Ver Póliza", IdPoliza) End If + If UsuarioActual.TienePermisoProceso(354) Then 'visualizar la póliza al registros + Msg.AppendFormat("

Ver Póliza", CvePrePoliza) + End If + If CveMovimientoInventario > 0 Then Dim TempParametros = Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoInventario)) Msg.AppendFormat("
Ver Movimiento de Almacen", CveMovimientoInventario)