--merge Saldos iniciales

This commit is contained in:
2023-11-25 18:48:38 -07:00
20 changed files with 429 additions and 545 deletions

View File

@@ -1252,8 +1252,6 @@ Partial Class General_SaldosIniciales
End If
ObjClientes.IniciaTransacSQL()
For Each Row As DataRow In dt.FiltraParametros("RFC <> ''").Rows
NumRow = NumRow + 1
@@ -1389,13 +1387,8 @@ Partial Class General_SaldosIniciales
Exit Select
Case Else
CveFormaPago33 = 99
End Select
'Dim RazonSocial As String = Row("RazonSocial").ToString()
'Contacto
If CveCliente > 0 Then
@@ -1422,16 +1415,10 @@ Partial Class General_SaldosIniciales
CveTipoGasto:=-1, RegeneraCuenta:=False) Then
ErrorClientes = True
End If
End If
End If
Next
If Not ErrorClientes Then
ObjClientes.Commit()
'If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, -1) Then Application("GlobalDTCliente") = ObjClientes.DtResultados