- mejora, por sino viene el dato del RFC

Ashx/E119.ashx

@@ -427,8 +427,14 @@ Public Class E119 : Implements IHttpHandler
                         If Not String.IsNullOrEmpty(UsoCFDI) Then
                             CveUsoCFDI = ClsPaginas.GlobalDTSATUsosCFDI().FiltroPrimeroValor("CveUsoCFDI", $"UsoCFDI = '{UsoCFDI.Trim}'").ToEntero()
                         End If
+                    Else
+                        TieneError = True
+                        Resp.Mensajes.Add("no existe cliente definido")
                     End If
 
+                    If Not TieneError Then
+
+
                         'BUSCAR SI ESTÁ REGISTRADO EL CLIENTE
                         If ObjClientes.GetClientes(-1, "-1", "-1", "-1", RFC, "-1", "-1", -1, CveEmpresa, 1, TipoCliente:=-1, TopSelect:=1) Then
                             If ObjClientes.DtResultados.Rows.Count > 0 Then
@@ -437,7 +443,7 @@ Public Class E119 : Implements IHttpHandler
                                 'Resp.Mensajes.Add("El RFC ya existe en el sistema")
                             End If
                         End If
-                    MsgLog.AppendLine("1.4 verificar cliente")
+                        MsgLog.AppendLine("1.4 verificar cliente.")
 
 
                         If CveCliente = 0 Then
@@ -478,7 +484,7 @@ Public Class E119 : Implements IHttpHandler
                             Else
                                 MsgLog.AppendLine("1.5.9 sin datos cliente")
                                 TieneError = True
-                            Resp.Mensajes.Add("no existen datos del cliente")
+                                Resp.Mensajes.Add("no existen datos del cliente.")
                             End If
 
                         End If
@@ -562,7 +568,6 @@ Public Class E119 : Implements IHttpHandler
                             Resp.Mensajes.Add("no existen productos definidos")
                         End If
 
-
                         If ObjFactura IsNot Nothing AndAlso Not TieneError Then
                             MsgLog.AppendLine("1.7 agregar la remision")
                             Resp = ObjFactura.EmitirFactura(False, Transac:=ObjClientes.IniciaTransacSQL())
@@ -578,7 +583,7 @@ Public Class E119 : Implements IHttpHandler
                                 Respuesta.status = "success"
                                 Respuesta.data = data
                             Else
-                            MsgLog.AppendLine("1.8 error al agregar la remision")
+                                MsgLog.AppendLine("1.8 error al agregar la remision.")
                                 TieneError = True
                             End If
 
@@ -597,6 +602,7 @@ Public Class E119 : Implements IHttpHandler
                             Next
                             RespuestaError.message = sb.ToString()
                         End If
+                    End If
 
                     If TieneError Then
                         ObjClientes.RollBack()