-- tab auxiliar conta. que se acitive al selecionar el tab

This commit is contained in:
2023-12-26 21:39:25 -07:00
parent 9e774c0aee
commit 3cbec7b22a
2 changed files with 14 additions and 10 deletions

View File

@@ -4804,7 +4804,7 @@ Partial Class Ventas
HLPagar.NavigateUrl = $"/Bancos/PopIEVentas.aspx?CveVenta={CveVenta}&TB_iframe=true&height=500&width=675"
HlCuentaTerminal.Visible = True
End If
'CargarSaldoAuxiliar(CveCliente)
TabAuxiliarConta.Visible = UsuarioActual.TienePermisoProceso(306)
Dim TienePermiso As String = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, -1).FiltroPrimeroValor("CveSubProyecto", String.Format("CveSubProyecto = {0}", DbRowVenta("CveSubProyecto")))
If TienePermiso <> "" Then ' si tiene acceso en el subproyecto
@@ -36261,12 +36261,8 @@ Partial Class Ventas
RegistraScript("$('#ModalAplicarNC').modal('show');", "ModalNC")
End Sub
Protected Sub LnkTabContabilidad_Click(sender As Object, e As EventArgs)
Tab.ActiveTabIndex = 6
Protected Sub BtnCargaAuxiliarConta_Click(sender As Object, e As EventArgs)
CargarSaldoAuxiliar(CveCliente)
End Sub
End Class