-- en el listado de cuentas, no mostrar las cuentas que inician con _global, _activo....

This commit is contained in:
2023-07-10 13:16:53 -07:00
parent 0bfb139462
commit f5a60aa736
3 changed files with 17 additions and 75 deletions

View File

@@ -182,10 +182,9 @@ Partial Class AC2_RepAnexoCatalogo
Dim strGlobal As String = ""
If ObjTipoCuenta.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
Dim dr As DataRow = ObjTipoCuenta.DtResultados.FiltroPrimero("Codigo IN ('_GLOBAL')")
If dr IsNot Nothing Then strGlobal = dr.Item(0).ToString
'DTCuentas = ObjTipoCuenta.DtResultados '.FiltraParametros("Afectable = 1")
DdlCuentas.DataSource = ObjTipoCuenta.DtResultados
DdlCuentas.DataSource = ObjTipoCuenta.DtResultados.FiltraParametros("Codigo NOT IN ('_ACTIVO', '_PASIVO', '_CAPITAL', '_CUADRE', '_ESTADISTICAS', '_ORDEN', '_RACREEDOR', '_RDEUDOR', '_UTILIDAD')")
' DdlCuentas.DataSource = ObjTipoCuenta.DtResultados
End If
ObjTipoCuenta.Dispose()