ortografia

2021-08-17 21:00:03 -07:00
parent 180886251f
commit 9a485ed6d2
2 changed files with 2 additions and 2 deletions
--- a/OC/CatEstatus.aspx.vb
+++ b/OC/CatEstatus.aspx.vb
@@ -99,7 +99,7 @@ Partial Class OC_CatEstatus
        Dim ObjEstatus As New ClsOC
        If ObjEstatus.GetEstatus() Then
            ViewState("DTOCEstatus") = ObjEstatus.DtResultados.FiltraParametros(String.Format("CveEmpresa = {0}", UsuarioActual.CveEmpresa))
-            GlobalDTOCEstatus(-1) = ObjEstatus.DtResultados
+            GlobalDTOCEstatus(UsuarioActual.CveEmpresa) = ObjEstatus.DtResultados
        Else
            GvDatos.DataSource = Nothing
        End If