From b245084425e7ef01eebe990de39d76eed8d3fee0 Mon Sep 17 00:00:00 2001 From: Antonio Gonzalez Date: Thu, 29 Aug 2019 15:27:47 -0500 Subject: [PATCH] =?UTF-8?q?ahora=20se=20les=20puede=20reestablecer=20a=20l?= =?UTF-8?q?os=20proveedores=20su=20contrase=C3=B1a=20en=20Compras/Proveedo?= =?UTF-8?q?res.aspx?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Bancos/CuentasBancariasDetalle.aspx.vb | 2 -- General/SaldosIniciales.aspx.vb | 1 + Sistemas/PopUpAddUsuario.aspx | 1 - Sistemas/PopUpAddUsuario.aspx.vb | 2 ++ 4 files changed, 3 insertions(+), 3 deletions(-) diff --git a/Bancos/CuentasBancariasDetalle.aspx.vb b/Bancos/CuentasBancariasDetalle.aspx.vb index beab9c9ec..aa6c11579 100644 --- a/Bancos/CuentasBancariasDetalle.aspx.vb +++ b/Bancos/CuentasBancariasDetalle.aspx.vb @@ -36,8 +36,6 @@ Partial Class Bancos_CuentasBancariasDetalle DdlUsuarios.DataSource = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros("", "Nombre") DdlUsuarios.DataBind() - - If Request("CveCuenta") IsNot Nothing AndAlso IsNumeric(Request("CveCuenta")) AndAlso Request("CveCuenta").ToEntero > 0 Then ViewState("CveCuenta") = Request("CveCuenta") diff --git a/General/SaldosIniciales.aspx.vb b/General/SaldosIniciales.aspx.vb index 7ffc1911c..be0979ef5 100644 --- a/General/SaldosIniciales.aspx.vb +++ b/General/SaldosIniciales.aspx.vb @@ -1561,6 +1561,7 @@ Partial Class General_SaldosIniciales End If Else mensajeError = $"No se encontró el producto o servicio con código ""{nuevaEntrada("CodigoPS")}""" + Throw New Exception() End If Next Else diff --git a/Sistemas/PopUpAddUsuario.aspx b/Sistemas/PopUpAddUsuario.aspx index 7dd9651a7..9d685feb4 100644 --- a/Sistemas/PopUpAddUsuario.aspx +++ b/Sistemas/PopUpAddUsuario.aspx @@ -69,7 +69,6 @@
-
diff --git a/Sistemas/PopUpAddUsuario.aspx.vb b/Sistemas/PopUpAddUsuario.aspx.vb index 110869def..c99a8cbf3 100644 --- a/Sistemas/PopUpAddUsuario.aspx.vb +++ b/Sistemas/PopUpAddUsuario.aspx.vb @@ -716,6 +716,7 @@ Partial Class Sistemas_PopUpAddUsuario GvModulosPermiso.DataSource = ObjProcesos.DtResultados.FiltraParametros($"CvePlataforma = 6") ElseIf UsuarioActual.Empresa.CvePlataforma = 1 And CveProveedor > 0 Then GvModulosPermiso.DataSource = ObjProcesos.DtResultados.FiltraParametros($"CvePlataforma = 7") + BtnDefaultPWD.Visible = True ElseIf UsuarioActual.Empresa.CvePlataforma = 3 Then GvModulosPermiso.DataSource = ObjProcesos.DtResultados.FiltraParametros("CveModulo = 433") End If @@ -855,4 +856,5 @@ Partial Class Sistemas_PopUpAddUsuario CargaComandos() UpDatos.Update() End Sub + End Class