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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
Oscar Irigoyen
2023-03-17 18:33:39 -07:00
parent 50e09adb17 d25cad300e
commit f2f019e649
9 changed files with 25 additions and 16 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
If TextoError = "" 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
For Each dr As Data.DataRow In ObjEmpresas.DtResultados.Rows
@@ -665,9 +665,8 @@ Partial Class Sistemas_Empresa
Next
End If
If ObjGral.GetClasificacionPorcentaje(CveEmpresa) Then
GlobalDTClasificacionPorcentaje(CveEmpresa) = ObjGral.DtResultados
End If
GlobalDTClasificacionPorcentaje(CveEmpresa) = Nothing
End If
'AGREGAR FUNCIONALIDADES