diff --git a/General/SaldosIniciales.aspx.vb b/General/SaldosIniciales.aspx.vb
index dd3da1c97..25f946837 100644
--- a/General/SaldosIniciales.aspx.vb
+++ b/General/SaldosIniciales.aspx.vb
@@ -3189,13 +3189,13 @@ Partial Class General_SaldosIniciales
                 If Not ErrorProceso Then
                     DTAnticipoCliente.AcceptChanges()
                 End If
-            End If
 
+                If Not AsignacionCuenta(ObjConta, 66, CveCuentaContable, -1, -1, CveCliente, -1, UsuarioActual.CveEmpresa, -1) Then
+                    ErrorProceso = True
+                    Alert("Se presento un error al guardar en asignaciones", TipoMensaje.MsgAdvertencia)
+                    Exit For
+                End If
 
-            If Not AsignacionCuenta(ObjConta, 66, CveCuentaContable, -1, -1, CveCliente, -1, UsuarioActual.CveEmpresa, -1) Then
-                ErrorProceso = True
-                Alert("Se presento un error al guardar en asignaciones", TipoMensaje.MsgAdvertencia)
-                Exit For
             End If
 
             Dim CvePrePoliza As Integer = ObjConta.AddPrePolizas("Anticipo/Cliente/SaldoInicial", 24, Importe, Importe, CveMoneda, Fecha, FolioStr, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)