AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- Corrección regeneracion globaldtempresas

Browse Source
This commit is contained in:
rrene
2023-03-17 14:16:30 -07:00
parent 33ba51c8fc
commit b06f2aa25a
1 changed files with 3 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Sistemas/Empresa.aspx.vb
View File

@@ -655,7 +655,7 @@ Partial Class Sistemas_Empresa
'RECARGA EMPRESA 'RECARGA EMPRESA
If TextoError = "" Then If TextoError = "" Then
If ObjEmpresas.GetEmpresas(CveEmpresa, "-1", "-1", "-1", "-1") Then If ObjEmpresas.GetEmpresas(CveEmpresa, "-1", "-1", "-1", "-1") Then
GlobalDTEmpresas(CveEmpresa) = ObjEmpresas.DtResultados GlobalDTEmpresas(CveEmpresa) = Nothing
'verifico si existe la carpeta de la empresa, sino la crea 'verifico si existe la carpeta de la empresa, sino la crea
For Each dr As Data.DataRow In ObjEmpresas.DtResultados.Rows For Each dr As Data.DataRow In ObjEmpresas.DtResultados.Rows
@@ -665,9 +665,8 @@ Partial Class Sistemas_Empresa
Next Next
End If End If
If ObjGral.GetClasificacionPorcentaje(CveEmpresa) Then GlobalDTClasificacionPorcentaje(CveEmpresa) = Nothing
GlobalDTClasificacionPorcentaje(CveEmpresa) = ObjGral.DtResultados
End If
End If End If
'AGREGAR FUNCIONALIDADES 'AGREGAR FUNCIONALIDADES