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

-- espacios en blanco

Browse Source
This commit is contained in:
rrene
2022-10-11 10:30:45 -07:00
parent 52f59e7625
commit 5754858c6d
1 changed files with 0 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
General/SaldosIniciales.aspx.vb
View File

@@ -898,11 +898,6 @@ Partial Class General_SaldosIniciales
Dim Contador As Integer = 0 Dim Contador As Integer = 0
Dim ExisteProveedor As Boolean = False Dim ExisteProveedor As Boolean = False
If Not dt.Columns.Contains("CveCuentaContable") Then If Not dt.Columns.Contains("CveCuentaContable") Then
dt.Columns.Add("CveCuentaContable", GetType(Integer)) dt.Columns.Add("CveCuentaContable", GetType(Integer))
End If End If
@@ -943,11 +938,6 @@ Partial Class General_SaldosIniciales
Exit Sub Exit Sub
End If End If
ObjProv.IniciaTransacSQL() ObjProv.IniciaTransacSQL()
For Each Row As DataRow In dt.Rows For Each Row As DataRow In dt.Rows
@@ -992,8 +982,6 @@ Partial Class General_SaldosIniciales
CveProveedor3 = GlobalDTCompProveedores(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveProveedor", $"Codigo = '{Codigo}'").ToString.ToEntero CveProveedor3 = GlobalDTCompProveedores(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveProveedor", $"Codigo = '{Codigo}'").ToString.ToEntero
End If End If
' If CveProveedor > 0 Or CveProveedor2 > 0 Or CveProveedor3 > 0 Then ' If CveProveedor > 0 Or CveProveedor2 > 0 Or CveProveedor3 > 0 Then
If CveProveedor > 0 Or CveProveedor2 > 0 Or CveProveedor3 > 0 Then If CveProveedor > 0 Or CveProveedor2 > 0 Or CveProveedor3 > 0 Then
Contador = Contador + 1 Contador = Contador + 1