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

- cambio globaldt

Browse Source
This commit is contained in:
rrene
2024-01-08 19:33:06 -07:00
parent b152383560
commit e0e946c761
1 changed files with 3 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
General/SaldosIniciales.aspx.vb
View File

@@ -682,13 +682,9 @@ Partial Class General_SaldosIniciales
DtMarcas = ObjPS.DtResultados.Copy
End If
If ObjGral.GetMedidas(UsuarioActual.CveEmpresa) Then
DtMedidas = ObjGral.DtResultados.Copy
End If
DtMedidas = GlobalDTPSMedidas(UsuarioActual.CveEmpresa)
DtRinTamaño = GlobalDTPSRinTamaños(UsuarioActual.CveEmpresa)
If ObjGral.GetRimTamanios(UsuarioActual.CveEmpresa) Then
DtRinTamaño = ObjGral.DtResultados.Copy
End If
If ObjGral.GetModelos(UsuarioActual.CveEmpresa) Then
DtModelos = ObjGral.DtResultados.Copy
@@ -782,7 +778,7 @@ Partial Class General_SaldosIniciales
CveRinTamaño = DtRinTamaño.FiltroPrimeroValor("CveRinTamaño", $"RinTamaño = '{RinTamaño}'").ToString().ToEntero()
If Not CveRinTamaño > 0 Then
If ObjGral.AddRimTamanios(CveClasificacion, "", RinTamaño, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
If ObjGral.GetRimTamanios(UsuarioActual.CveEmpresa) Then
If ObjGral.GetRinTamanios(UsuarioActual.CveEmpresa) Then
DtRinTamaño = ObjGral.DtResultados.Copy
CveRinTamaño = DtRinTamaño.FiltroPrimeroValor("CveRinTamaño", $"RinTamaño = '{RinTamaño}'").ToString().ToEntero()
End If