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

-- mejora en globaldt

Browse Source
This commit is contained in:
rrene
2023-02-15 07:36:36 -07:00
parent 0e566d540c
commit 37a83219e8
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
General/SaldosIniciales.aspx.vb
View File

@@ -3273,8 +3273,8 @@ Partial Class General_SaldosIniciales
dtregistrospatronales = ObjRH.DtResultados dtregistrospatronales = ObjRH.DtResultados
dtregistrospatronales.CaseSensitive = False dtregistrospatronales.CaseSensitive = False
dTSubProyectos = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, -1) dTSubProyectos = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, -1)
dTDepartamentos = GlobalDTDepartamentos().FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}") dTDepartamentos = GlobalDTDepartamentos(UsuarioActual.CveEmpresa)
dTTurno = GlobalDTTurno().FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}") dTTurno = GlobalDTTurno(UsuarioActual.CveEmpresa)
dTSubProyectos.CaseSensitive = False dTSubProyectos.CaseSensitive = False
dTDepartamentos.CaseSensitive = False dTDepartamentos.CaseSensitive = False
dTTurno.CaseSensitive = False dTTurno.CaseSensitive = False
@@ -3774,7 +3774,7 @@ Partial Class General_SaldosIniciales
crow = 1 crow = 1
ccol = ccol + 1 ccol = ccol + 1
Catalogos.Cell(crow, ccol).Value = "Departamento" Catalogos.Cell(crow, ccol).Value = "Departamento"
For Each row As DataRow In GlobalDTDepartamentos.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa).Rows For Each row As DataRow In GlobalDTDepartamentos(UsuarioActual.CveEmpresa).Rows
crow = crow + 1 crow = crow + 1
Catalogos.Cell(crow, ccol).Value = String.Format("{0}: {1}", row("CveDepartamento"), row("Departamento")) Catalogos.Cell(crow, ccol).Value = String.Format("{0}: {1}", row("CveDepartamento"), row("Departamento"))
Next Next
@@ -3788,7 +3788,7 @@ Partial Class General_SaldosIniciales
crow = 1 crow = 1
ccol = ccol + 1 ccol = ccol + 1
Catalogos.Cell(crow, ccol).Value = "Turno" Catalogos.Cell(crow, ccol).Value = "Turno"
For Each row As DataRow In GlobalDTTurno.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa).Rows For Each row As DataRow In GlobalDTTurno(UsuarioActual.CveEmpresa).Rows
crow = crow + 1 crow = crow + 1
Catalogos.Cell(crow, ccol).Value = String.Format("{0}: {1}", row("CveTurno"), row("Turno")) Catalogos.Cell(crow, ccol).Value = String.Format("{0}: {1}", row("CveTurno"), row("Turno"))
Next Next