Merge branch 'master' of http://192.168.10.111:8383/SIG

App_Code/ClsBancos.vb

@@ -1718,7 +1718,7 @@ Public Class ClsBancos
 
         Return Retorno
     End Function
-    Public Function CancelarBancos_IE(CveUsuario As Integer, CveIE As Integer, MesAnterior As Boolean, IdPoliza As Integer, FolioPoliza As Integer, Optional FechaCancelacion As Date = MinFecha, Optional TipoMovimiento As Integer = 1) As Integer
+    Public Function CancelarBancos_IE(CveUsuario As Integer, CveIE As Integer, MesAnterior As Boolean, IdPoliza As Integer, FolioPoliza As Integer, Optional FechaCancelacion As Date = MinFecha, Optional TipoMovimiento As Integer = 1, Optional CveTipoTransaccionCancelacion As Integer = -1) As Integer
 
         Dim Retorno As Integer = 0
         DataAdapter("PA_Banc_IECancelar")
@@ -1731,6 +1731,7 @@ Public Class ClsBancos
             .Add("@FolioPoliza", SqlDbType.Int).Value = FolioPoliza
             .Add("@FechaCancelacion", SqlDbType.Date).Value = FechaCancelacion
             .Add("@TipoMovimiento", SqlDbType.Int).Value = TipoMovimiento
+            .Add("@CveTipoTransaccionCancelacion", SqlDbType.Int).Value = CveTipoTransaccionCancelacion
             .Add("@CvePrePoliza", SqlDbType.Int).Direction = ParameterDirection.Output
         End With
 

App_Code/Modelos.vb

@@ -382,7 +382,7 @@ Namespace Modelos
             Me.ListaMensajes = New List(Of String)
             Me.FolioFiscal = ""
             Me.GenerarPDFFactura = False
-            IniciaValores()
+            IniciaValores()
 
             Dim ObjVentas As New ClsVentas()
             If ObjVentas.GetVenta(CveVenta, CveEmpresa) Then
@@ -414,49 +414,49 @@ Namespace Modelos
             TmpDTImpuestos.Columns.Add("Importe", GetType(Double))
             TmpDTImpuestos.Columns.Add("Orden", GetType(Integer))
 
-            Dim DR As DataRow = TmpDTImpuestos.NewRow()
+            Dim DR As DataRow = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("SubTotal").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Subtotal" : DR("Importe") = dtVentas(0)("SubTotal").ToString.ToDouble : DR("Orden") = 10 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("SubTotal").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Subtotal" : DR("Importe") = dtVentas(0)("SubTotal").ToString.ToDouble : DR("Orden") = 10 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
+            DR = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("Descuento").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Descuentos" : DR("Importe") = dtVentas(0)("Descuento").ToString.ToDouble : DR("Orden") = 20 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("Descuento").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Descuentos" : DR("Importe") = dtVentas(0)("Descuento").ToString.ToDouble : DR("Orden") = 20 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
+            DR = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("Amortizacion").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Amort.Ant" : DR("Importe") = dtVentas(0)("Amortizacion").ToString.ToDouble : DR("Orden") = 30 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("Amortizacion").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Amort.Ant" : DR("Importe") = dtVentas(0)("Amortizacion").ToString.ToDouble : DR("Orden") = 30 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
+            DR = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("SubTotal").ToString.ToDouble <> (dtVentas(0)("SubTotal").ToString.ToDouble - dtVentas(0)("Descuento").ToString.ToDouble - dtVentas(0)("Amortizacion").ToString.ToDouble) Then DR("ImpuestoLocal") = "SubTotal2" : DR("Importe") = (dtVentas(0)("SubTotal").ToString.ToDouble - dtVentas(0)("Descuento").ToString.ToDouble - dtVentas(0)("Amortizacion").ToString.ToDouble) : DR("Orden") = 40 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("SubTotal").ToString.ToDouble <> (dtVentas(0)("SubTotal").ToString.ToDouble - dtVentas(0)("Descuento").ToString.ToDouble - dtVentas(0)("Amortizacion").ToString.ToDouble) Then DR("ImpuestoLocal") = "SubTotal2" : DR("Importe") = (dtVentas(0)("SubTotal").ToString.ToDouble - dtVentas(0)("Descuento").ToString.ToDouble - dtVentas(0)("Amortizacion").ToString.ToDouble) : DR("Orden") = 40 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
+            DR = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("IVA").ToString.ToDouble >= 0 Then DR("ImpuestoLocal") = "IVA" : DR("Importe") = dtVentas(0)("IVA").ToString.ToDouble : DR("Orden") = 50 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("IVA").ToString.ToDouble >= 0 Then DR("ImpuestoLocal") = "IVA" : DR("Importe") = dtVentas(0)("IVA").ToString.ToDouble : DR("Orden") = 50 : TmpDTImpuestos.Rows.Add(DR)
-
+
-            'solo para eclipse, que muesre un subtotal debajo de IVA
+            'solo para eclipse, que muesre un subtotal debajo de IVA
-            If UsuarioActual.CveEmpresa = 15 Then DR = TmpDTImpuestos.NewRow() : DR("ImpuestoLocal") = "Subtotal2" : DR("Importe") = (dtVentas(0)("SubTotal").ToString.ToDouble - dtVentas(0)("Descuento").ToString.ToDouble - dtVentas(0)("Amortizacion").ToString.ToDouble) + dtVentas(0)("IVA").ToString.ToDouble : DR("Orden") = 51 : TmpDTImpuestos.Rows.Add(DR)
+            If UsuarioActual.CveEmpresa = 15 Then DR = TmpDTImpuestos.NewRow() : DR("ImpuestoLocal") = "Subtotal2" : DR("Importe") = (dtVentas(0)("SubTotal").ToString.ToDouble - dtVentas(0)("Descuento").ToString.ToDouble - dtVentas(0)("Amortizacion").ToString.ToDouble) + dtVentas(0)("IVA").ToString.ToDouble : DR("Orden") = 51 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
+            DR = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("RetIVA").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Ret.IVA" : DR("Importe") = dtVentas(0)("RetIVA").ToString.ToDouble : DR("Orden") = 60 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("RetIVA").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Ret.IVA" : DR("Importe") = dtVentas(0)("RetIVA").ToString.ToDouble : DR("Orden") = 60 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
+            DR = TmpDTImpuestos.NewRow()
-            If dtVentas(0)("RetISR").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Ret.ISR" : DR("Importe") = dtVentas(0)("RetISR").ToString.ToDouble : DR("Orden") = 70 : TmpDTImpuestos.Rows.Add(DR)
+            If dtVentas(0)("RetISR").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Ret.ISR" : DR("Importe") = dtVentas(0)("RetISR").ToString.ToDouble : DR("Orden") = 70 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
-
-            If dtVentas(0)("IEPS").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "IEPS" : DR("Importe") = dtVentas(0)("IEPS").ToString.ToDouble : DR("Orden") = 80 : TmpDTImpuestos.Rows.Add(DR)
-            DR = TmpDTImpuestos.NewRow()
-
-            If dtVentas(0)("Total").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Total" : DR("Importe") = dtVentas(0)("Total").ToString.ToDouble : DR("Orden") = 100 : TmpDTImpuestos.Rows.Add(DR)
             DR = TmpDTImpuestos.NewRow()
 
-            If ObjVentas.GetVentaImpuestosLocales(CveVenta) Then
+            If dtVentas(0)("IEPS").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "IEPS" : DR("Importe") = dtVentas(0)("IEPS").ToString.ToDouble : DR("Orden") = 80 : TmpDTImpuestos.Rows.Add(DR)
-
+            DR = TmpDTImpuestos.NewRow()
-                Dim dtImpuesto As DataTable = ObjVentas.DtResultados
+
-                If dtImpuesto.Rows.Count > 0 Then
+            If dtVentas(0)("Total").ToString.ToDouble <> 0 Then DR("ImpuestoLocal") = "Total" : DR("Importe") = dtVentas(0)("Total").ToString.ToDouble : DR("Orden") = 100 : TmpDTImpuestos.Rows.Add(DR)
-                    For Each Row As DataRow In dtImpuesto.Rows
+            DR = TmpDTImpuestos.NewRow()
-                        Dim Orden = 80
+
-                        If Row("Importe").ToString.ToDouble <> 0 Then
+            If ObjVentas.GetVentaImpuestosLocales(CveVenta) Then
-                            DR("ImpuestoLocal") = Row("ImpuestoLocal").ToString
+
-                            DR("Importe") = Row("Importe").ToString.ToDouble
+                Dim dtImpuesto As DataTable = ObjVentas.DtResultados
-                            DR("Orden") = Orden
+                If dtImpuesto.Rows.Count > 0 Then
-                            TmpDTImpuestos.Rows.Add(DR)
+                    For Each Row As DataRow In dtImpuesto.Rows
-                            DR = TmpDTImpuestos.NewRow()
+                        Dim Orden = 80
-                            Orden = Orden + 1
+                        If Row("Importe").ToString.ToDouble <> 0 Then
-                        End If
+                            DR("ImpuestoLocal") = Row("ImpuestoLocal").ToString
-                    Next
+                            DR("Importe") = Row("Importe").ToString.ToDouble
-                End If
+                            DR("Orden") = Orden
-                Me.DtDeduccion = TmpDTImpuestos.FiltraParametros("", Orderby:="Orden ASC")
+                            TmpDTImpuestos.Rows.Add(DR)
-
+                            DR = TmpDTImpuestos.NewRow()
+                            Orden = Orden + 1
+                        End If
+                    Next
+                End If
+                Me.DtDeduccion = TmpDTImpuestos.FiltraParametros("", Orderby:="Orden ASC")
+
             End If
 
         End Sub
@@ -3952,7 +3952,7 @@ Namespace Modelos
             Dim ContadorMovtosDetalles = 0
 
             'Creamos el movimiento
-            Dim CveMovimientoInventario As Integer = ObjInventario.AddMovimiento(CveAlmacen, ConceptoEntrada, CveMoneda, Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, CveVenta, -1, -1, CveMovimientoRelacionado:=CveMovimientoRelacionado,, Modulo:="Mod/M2")
+            Dim CveMovimientoInventario As Integer = ObjInventario.AddMovimiento(CveAlmacen, ConceptoEntrada, CveMoneda, Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, CveVenta, -1, -1, CveMovimientoRelacionado:=CveMovimientoRelacionado, Modulo:="Mod/M2")
 
             If CveMovimientoInventario > 0 Then
 

Bancos/IE.aspx

@@ -1153,7 +1153,7 @@
     </div>
 
     <div id="DivCancelarIE" class="modal fade">
-        <div class="modal-dialog" style="max-height: 500px; max-width: 500px;">
+        <div class="modal-dialog" style="max-height: 500px; max-width: 700px;">
             <asp:UpdatePanel ID="UpEliminarCotizacion" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
                 <ContentTemplate>
                     <div class="modal-header">
@@ -1182,9 +1182,24 @@
                             <div class="col-md-3">
                                 <asp:CheckBox ID="ChkCancelarNegativo" CssClass="md-checksd2" Text="Falta de fondos" TextAlign="Right" runat="server" Visible="false" />
                             </div>
-                             <div class="col-md-4">
+                             <div class="col-md-3">
-                                <asp:CheckBox ID="ChkGeneraCancelacion" CssClass="md-checksd2" Text="Genera Devolución" TextAlign="Right" runat="server" />
+                                <asp:CheckBox ID="ChkGeneraCancelacion" CssClass="md-checksd2" Text="Genera Devolución" TextAlign="Right" runat="server" AutoPostBack="true" OnCheckedChanged="ChkGeneraCancelacion_CheckedChanged" />
                             </div>
+                            
+                            <div class="col-md-3"  id="DVTipoTransacciónCancelar"  runat="server" visible ="false">
+                                 
+                                Movimiento:
+                                <asp:DropDownList ID="DdlTipoTransaccionCancelacion" CssClass="form-control input-sm select2me" runat="server"    DataTextField="TipoTransaccion" DataValueField="CveTipoTransaccion" ValidationGroup="GrpCancelarIE">
+                                        <asp:ListItem Value="-1">Seleccione uno</asp:ListItem>
+                                    </asp:DropDownList>
+                                    <asp:RequiredFieldValidator ID="RFVDdlTipoTransaccionCancelacion" runat="server" ControlToValidate="DdlTipoTransaccionCancelacion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Transaccion''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpCancelarIE"></asp:RequiredFieldValidator>
+                                    <ajax:ValidatorCalloutExtender ID="VCEDdlTipoTransaccionCancelacion" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlTipoTransaccionCancelacion" Width="300px"></ajax:ValidatorCalloutExtender>
+
+
+
+
+                            </div>
+
                         </div>
                     </div>
                     <div class="modal-footer">

Bancos/IE.aspx.vb

@@ -4436,7 +4436,7 @@ Partial Class Bancos_IE
 
                             'CANCELA IE
                             If Not ErrorCancelar Then
-                                If Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, True, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate) <= 0 Then
+                                If Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, True, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate, CveTipoTransaccionCancelacion:=DdlTipoTransaccionCancelacion.SelectedValue.ToEntero) <= 0 Then
                                     ErrorCancelar = True
                                     MensajeError = "Error al cancelar IE"
                                 End If
@@ -4467,7 +4467,7 @@ Partial Class Bancos_IE
 
                         'CANCELA IE
                         If Not ErrorCancelar Then
-                            If Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, False, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate) <= 0 Then
+                            If Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, False, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate, CveTipoTransaccionCancelacion:=DdlTipoTransaccionCancelacion.SelectedValue.ToEntero) <= 0 Then
                                 ErrorCancelar = True
                                 MensajeError = "Error al cancelar IE"
                             End If
@@ -4500,14 +4500,14 @@ Partial Class Bancos_IE
 
             If Not GeneraCancelacionEnCero Then
                 'CANCELA IE MES ANTERIOR
-                CvePrePolizaCancelacion = Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, True, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate)
+                CvePrePolizaCancelacion = Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, True, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate, CveTipoTransaccionCancelacion:=DdlTipoTransaccionCancelacion.SelectedValue.ToEntero)
                 If CvePrePolizaCancelacion <= 0 Then
                     ErrorCancelar = True
                     MensajeError = "Error al cancelar IE MES ANTERIOR"
                 End If
             Else
                 'CANCELA IE MES ACTUAL
-                CvePrePolizaCancelacion = Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, False, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate)
+                CvePrePolizaCancelacion = Banc.CancelarBancos_IE(UsuarioActual.CveUsuario, CveIE, False, IdPolizaNueva, FolioPolizaNueva, TxtFechaCancelacion.Text.ToDate, CveTipoTransaccionCancelacion:=DdlTipoTransaccionCancelacion.SelectedValue.ToEntero)
                 If CvePrePolizaCancelacion <= 0 Then
                     ErrorCancelar = True
                     MensajeError = "Error al cancelar IE MES ACTUAL"
@@ -6631,4 +6631,35 @@ Partial Class Bancos_IE
         Return respuesta
     End Function
 
+    Protected Sub ChkGeneraCancelacion_CheckedChanged(sender As Object, e As EventArgs)
+
+        Dim dttemp As DataTable
+        Dim TipoMovto As String
+        dttemp = GlobalDTTipoTransacciones.FiltraParametros($"CveTipoTransaccion ={DdlTipoTransaccion.SelectedValue}")
+
+        TipoMovto = dttemp(0)("Tipo").ToString
+
+
+        If TipoMovto = "Egs" Then
+            TipoMovto = "Ing"
+        Else
+            TipoMovto = "Egs"
+        End If
+
+        GlobalDTTipoTransacciones.FiltraParametros("Tipo='Egs'")
+
+        DdlTipoTransaccionCancelacion.Items.Clear()
+        DdlTipoTransaccionCancelacion.DataSource = GlobalDTTipoTransacciones.FiltraParametros($"Tipo ='{TipoMovto}'")
+        DdlTipoTransaccionCancelacion.DataBind()
+        DdlTipoTransaccionCancelacion.Items.Insert(0, New ListItem("Seleccione una", "-1"))
+
+        If ChkGeneraCancelacion.Checked Then
+            DVTipoTransacciónCancelar.Visible = True
+        Else
+            DVTipoTransacciónCancelar.Visible = False
+        End If
+
+        UpEliminarCotizacion.Update()
+
+    End Sub
 End Class

Bancos/PopIECompras.aspx.vb

@@ -122,6 +122,14 @@ Partial Class Bancos_PopIECompras
         Set(value As Integer)
             ViewState("IdCuentaBancaria") = value
         End Set
+    End Property
+    Private Property IdCuentaBancariaComplementaria As Integer
+        Get
+            Return ViewState("IdCuentaBancariaComplementaria").ToString.ToEntero
+        End Get
+        Set(value As Integer)
+            ViewState("IdCuentaBancariaComplementaria") = value
+        End Set
     End Property
     Private ReadOnly Property IdCtaContMonedaExtranjera As Integer
         Get
@@ -482,6 +490,7 @@ Partial Class Bancos_PopIECompras
                 ViewState("IdCtaContRetIVA") = 0
                 ViewState("IdCtaContRetISR") = 0
                 ViewState("IdCuentaBancaria") = 0
+                ViewState("IdCuentaBancariaComplementaria") = 0
                 ViewState("IdCtaAnticipo") = 0
 
                 ViewState("CveCuentaMonedaExtranjera") = 0
@@ -1107,9 +1116,9 @@ Partial Class Bancos_PopIECompras
                 RegistraScript("CambiaDolaresPesos();")
             End If
 
-            IdCuentaBancaria = dr("IdCtaContable").ToString.ToEntero
+            IdCuentaBancaria = dr("IdCtaContable").ToString.ToEntero
-            CveCuentaBancaria = dr("IdCtaContableSIG").ToString.ToEntero
+            IdCuentaBancariaComplementaria = dr("IdCtaContableComplementaria").ToString.ToEntero
-
+
             If dr("UsaTarjeta").ToString = "True" Then
                 CargaGridTarjetas()
             Else
@@ -2814,15 +2823,13 @@ Partial Class Bancos_PopIECompras
                                                         CveCuenta = CveCuentaCliente
                                                     End If
                                                 Else
-                                                    IdCtaContable = IdCtaContComplementaria
+                                                    IdCtaContable = IdCuentaBancariaComplementaria
-                                                    CveCuenta = CveCuentaComplementaria
                                                     If ImporteMovimiento <> 0 AndAlso (IdCtaContable > 0 Or UsuarioActual.CveEmpresa = 119) Then
                                                         If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, 0, TxtObservaciones.Text, 204, ConceptoMovimiento, Fecha, IdCtaContable, -1, CveIE, -1, CveCompra, -1, -1, CveProveedor:=CveProveedor2, CvePersonal:=CvePersonal, ImporteMX:=ImporteMovimiento * tipoCambioPago - ImporteMovimiento, ImporteME:=ImporteMovimiento, TipoCambio:=tipoCambioPago, CveCuenta:=CveCuenta) Then
                                                             MsgError = "No se pudo insertar la póliza"
                                                         End If
                                                         ImporteMX = ImporteMovimiento
-                                                        IdCtaContable = IdCtaContMonedaExtranjera
+                                                        IdCtaContable = IdCuentaBancaria
-                                                        CveCuenta = CveCuentaMonedaExtranjera
                                                     End If
                                                 End If
 

Compras/eFacturas.aspx.vb

@@ -1686,6 +1686,8 @@ Partial Class Compras_eFacturas
 
         End Using
     End Sub
+
+
     Public Shared Function CargaEmisordeXML(ArchivoXML As String, CampoXML As String, RFCEmpresaActual As String) As String
         Dim Valor As [String] = Nothing
 
@@ -3142,15 +3144,6 @@ Partial Class Compras_eFacturas
 
             If ObjCompras.GetCompararComplementoPago(CveProveedor, -1, "", UsuarioActual.CveEmpresa, HdnCveIE.Value.ToEntero) Then
 
-                'GvVincularPago.DataSource = ObjCompras.DtResultados
-
-                'If ObjCompras.DtResultados.Rows.Count > 0 Then
-                '    SerieFolioIE = ObjCompras.DtResultados.Rows(0)("SerieFolio").ToString
-                'End If
-
-
-                'ImportePago = ObjCompras.DtResultados.SUMD("Monto")
-
                 For Each Drow As DataRow In ObjCompras.DtResultados.Rows
                     For Each GvRow As GridViewRow In GVPDocumentosRelacionadosPagos.Rows
 
@@ -3171,16 +3164,26 @@ Partial Class Compras_eFacturas
 
                 For Each GvRow As GridViewRow In GVPDocumentosRelacionadosPagos.Rows
                     If GvRow.RowType = DataControlRowType.DataRow Then
+
                         If GvRow.FCLabel("LblCveIE").Text.ToEntero > 0 And GvRow.FCLabel("LblCvePrePolizaDetalle").Text.ToEntero > 0 Then
                             ErrorVinculacion = False
-                            Exit For
+
                         Else
-                            ErrorVinculacion = True
+
+                            If ObjCompras.DtResultados.Rows.Count > 0 Then
+                                GvRow.FCLabel("LblCveIE").Text = ObjCompras.DtResultados(0)("CveIE").ToString.ToEntero.ToString
+                                GvRow.FCLabel("LblCvePrePolizaDetalle").Text = ObjCompras.DtResultados(0)("CvePrePolizaDetalle").ToString.ToEntero.ToString
+                            Else
+                                ErrorVinculacion = True
+                                Exit For
+                            End If
 
                         End If
                     End If
+
                 Next
 
+
             Else
                 ErrorVinculacion = True
             End If

Empresas/132/Formatos/Cotizacion.rdlc

@@ -738,43 +738,10 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value>Soluciones en Telemediciones JAR SA de CV</Value>
+                <Value>Soluciones en Telemediciones JAR SA de CV
-                <Style>
+contacto@soteljar.com
-                  <FontFamily>bahnschrift</FontFamily>
+Tel. (662) 2 2162270
-                  <FontSize>8pt</FontSize>
+Hermosillo, Sonora, México.  C.P. 83245</Value>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style />
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Paseo Florido 62A. Col. Nueva Galicia</Value>
-                <Style>
-                  <FontFamily>bahnschrift</FontFamily>
-                  <FontSize>8pt</FontSize>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style />
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Tel. (662) 2 2162270</Value>
-                <Style>
-                  <FontFamily>bahnschrift</FontFamily>
-                  <FontSize>8pt</FontSize>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style />
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Hermosillo, Sonora, México.</Value>
                 <Style>
                   <FontFamily>bahnschrift</FontFamily>
                   <FontSize>8pt</FontSize>
@@ -1678,7 +1645,6 @@
             </Paragraph>
           </Paragraphs>
           <rd:DefaultName>Textbox20</rd:DefaultName>
-          <Top>0cm</Top>
           <Left>10.20038cm</Left>
           <Height>3.01642cm</Height>
           <Width>8.19687cm</Width>

Empresas/132/Formatos/Factura.rdlc

@@ -195,6 +195,20 @@
               <TextAlign>Center</TextAlign>
             </Style>
           </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>contacto@soteljar.com</Value>
+                <Style>
+                  <FontFamily>calibri</FontFamily>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style>
+              <TextAlign>Center</TextAlign>
+            </Style>
+          </Paragraph>
           <Paragraph>
             <TextRuns>
               <TextRun>
@@ -214,7 +228,7 @@
         <rd:DefaultName>Textbox4</rd:DefaultName>
         <Top>0.03532cm</Top>
         <Left>1.48781in</Left>
-        <Height>0.51102in</Height>
+        <Height>0.58046in</Height>
         <Width>4.09641in</Width>
         <ZIndex>4</ZIndex>
         <Style>
@@ -315,106 +329,6 @@
           <PaddingBottom>2pt</PaddingBottom>
         </Style>
       </Textbox>
-      <Textbox Name="Textbox10">
-        <KeepTogether>true</KeepTogether>
-        <Paragraphs>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>DOMICILIO FISCAL</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Bold</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>PASEO FLORIDO No.Ext: 62, No.Int: A, Col: NUEVA GALICIA, CP: 83245, HERMOSILLO,SONORA, MEXICO</Value>
-                <Style>
-                  <FontStyle>Normal</FontStyle>
-                  <FontFamily>calibri</FontFamily>
-                  <FontSize>7.5pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                  <TextDecoration>None</TextDecoration>
-                  <Color>#000000</Color>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-        </Paragraphs>
-        <rd:DefaultName>Textbox10</rd:DefaultName>
-        <Top>0.52493in</Top>
-        <Left>1.48781in</Left>
-        <Height>0.65513in</Height>
-        <Width>2.06754in</Width>
-        <ZIndex>8</ZIndex>
-        <Style>
-          <Border>
-            <Style>None</Style>
-          </Border>
-          <PaddingLeft>2pt</PaddingLeft>
-          <PaddingRight>2pt</PaddingRight>
-          <PaddingTop>2pt</PaddingTop>
-          <PaddingBottom>2pt</PaddingBottom>
-        </Style>
-      </Textbox>
-      <Textbox Name="Textbox11">
-        <KeepTogether>true</KeepTogether>
-        <Paragraphs>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>LUGAR DE EXPEDICIÓN</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Bold</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>=Parameters!DomicilioSucursal.Value</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>7.5pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-        </Paragraphs>
-        <rd:DefaultName>Textbox10</rd:DefaultName>
-        <Top>0.52493in</Top>
-        <Left>3.64748in</Left>
-        <Height>0.65513in</Height>
-        <Width>1.93674in</Width>
-        <ZIndex>9</ZIndex>
-        <Style>
-          <Border>
-            <Style>None</Style>
-          </Border>
-          <VerticalAlign>Top</VerticalAlign>
-        </Style>
-      </Textbox>
       <Textbox Name="Textbox19">
         <CanGrow>true</CanGrow>
         <KeepTogether>true</KeepTogether>
@@ -436,7 +350,7 @@
         <Left>0.14361cm</Left>
         <Height>0.22222in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>10</ZIndex>
+        <ZIndex>8</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -478,7 +392,7 @@
         <Left>0.86782in</Left>
         <Height>0.22222in</Height>
         <Width>4.79418in</Width>
-        <ZIndex>11</ZIndex>
+        <ZIndex>9</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -521,7 +435,7 @@
         <Left>0.05654in</Left>
         <Height>0.23611in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>12</ZIndex>
+        <ZIndex>10</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -564,7 +478,7 @@
         <Left>0.86782in</Left>
         <Height>0.2309in</Height>
         <Width>7.0427in</Width>
-        <ZIndex>13</ZIndex>
+        <ZIndex>11</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -607,7 +521,7 @@
         <Left>0.05654in</Left>
         <Height>0.23611in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>14</ZIndex>
+        <ZIndex>12</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -649,7 +563,7 @@
         <Left>0.86782in</Left>
         <Height>0.23611in</Height>
         <Width>4.79418in</Width>
-        <ZIndex>15</ZIndex>
+        <ZIndex>13</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -695,7 +609,7 @@
         <Left>1.62474in</Left>
         <Height>0.18056in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>16</ZIndex>
+        <ZIndex>14</ZIndex>
         <Style>
           <Border>
             <Color>#4f81bd</Color>
@@ -745,7 +659,7 @@
         <Left>1.62474in</Left>
         <Height>0.18056in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>17</ZIndex>
+        <ZIndex>15</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -783,7 +697,7 @@
         <Left>1.62474in</Left>
         <Height>0.19444in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>18</ZIndex>
+        <ZIndex>16</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -821,7 +735,7 @@
         <Left>1.62474in</Left>
         <Height>0.19445in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>19</ZIndex>
+        <ZIndex>17</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -857,7 +771,7 @@
         <Left>5.68204in</Left>
         <Height>0.18056in</Height>
         <Width>2.22448in</Width>
-        <ZIndex>20</ZIndex>
+        <ZIndex>18</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -891,7 +805,7 @@
         <Left>5.67684in</Left>
         <Height>0.16667in</Height>
         <Width>2.22969in</Width>
-        <ZIndex>21</ZIndex>
+        <ZIndex>19</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -924,7 +838,7 @@
         <Left>5.67684in</Left>
         <Height>0.16939in</Height>
         <Width>2.22714in</Width>
-        <ZIndex>22</ZIndex>
+        <ZIndex>20</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -957,7 +871,7 @@
         <Left>5.68204in</Left>
         <Height>0.17784in</Height>
         <Width>2.22193in</Width>
-        <ZIndex>23</ZIndex>
+        <ZIndex>21</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1016,6 +930,13 @@
                   <FontSize>7pt</FontSize>
                 </Style>
               </TextRun>
+              <TextRun>
+                <Value>, lugar de expedición  C.P. 83245 Hermosillo, Sonora, México.</Value>
+                <Style>
+                  <FontFamily>calibri</FontFamily>
+                  <FontSize>7pt</FontSize>
+                </Style>
+              </TextRun>
             </TextRuns>
             <Style />
           </Paragraph>
@@ -1025,7 +946,7 @@
         <Left>1.51843in</Left>
         <Height>0.29498in</Height>
         <Width>6.38809in</Width>
-        <ZIndex>24</ZIndex>
+        <ZIndex>22</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1053,11 +974,11 @@
           </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox63</rd:DefaultName>
-        <Top>6.72543in</Top>
+        <Top>6.81293in</Top>
         <Left>2.52292in</Left>
         <Height>0.25in</Height>
         <Width>3.69856in</Width>
-        <ZIndex>25</ZIndex>
+        <ZIndex>23</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1860,7 +1781,7 @@
         <Left>0.08093cm</Left>
         <Height>4.04843cm</Height>
         <Width>20.06179cm</Width>
-        <ZIndex>26</ZIndex>
+        <ZIndex>24</ZIndex>
         <Visibility>
           <Hidden>= (Parameters!AplicaPagare.Value="0" ORelse Parameters!AplicaPagare.Value="")</Hidden>
         </Visibility>
@@ -2496,7 +2417,7 @@
         <Left>0.11468cm</Left>
         <Height>1.01949cm</Height>
         <Width>20.01064cm</Width>
-        <ZIndex>27</ZIndex>
+        <ZIndex>25</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -2535,7 +2456,7 @@
         <Left>5.662in</Left>
         <Height>0.20317in</Height>
         <Width>2.26391in</Width>
-        <ZIndex>28</ZIndex>
+        <ZIndex>26</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -2821,7 +2742,7 @@
         <Left>5.73412in</Left>
         <Height>0.34081in</Height>
         <Width>2.19818in</Width>
-        <ZIndex>29</ZIndex>
+        <ZIndex>27</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -2937,7 +2858,7 @@
         <Left>14.56464cm</Left>
         <Height>0.6cm</Height>
         <Width>5.58343cm</Width>
-        <ZIndex>30</ZIndex>
+        <ZIndex>28</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3553,7 +3474,7 @@
         <Left>0.11468cm</Left>
         <Height>5.76188cm</Height>
         <Width>14.34413cm</Width>
-        <ZIndex>31</ZIndex>
+        <ZIndex>29</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3596,7 +3517,7 @@
         <Left>0.04404in</Left>
         <Height>0.36457in</Height>
         <Width>7.87931in</Width>
-        <ZIndex>32</ZIndex>
+        <ZIndex>30</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3615,7 +3536,7 @@
         <Left>0.13016cm</Left>
         <Height>2.85467cm</Height>
         <Width>3.50777cm</Width>
-        <ZIndex>33</ZIndex>
+        <ZIndex>31</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3736,7 +3657,7 @@
         <Left>0.08093cm</Left>
         <Height>2.03294cm</Height>
         <Width>9.97751cm</Width>
-        <ZIndex>34</ZIndex>
+        <ZIndex>32</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3822,7 +3743,7 @@
         <Left>10.05844cm</Left>
         <Height>2.03294cm</Height>
         <Width>10.08428cm</Width>
-        <ZIndex>35</ZIndex>
+        <ZIndex>33</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>

Empresas/132/Formatos/NotaDevolucion.rdlc

@@ -195,6 +195,20 @@
               <TextAlign>Center</TextAlign>
             </Style>
           </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>contacto@soteljar.com</Value>
+                <Style>
+                  <FontFamily>calibri</FontFamily>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style>
+              <TextAlign>Center</TextAlign>
+            </Style>
+          </Paragraph>
           <Paragraph>
             <TextRuns>
               <TextRun>
@@ -214,7 +228,7 @@
         <rd:DefaultName>Textbox4</rd:DefaultName>
         <Top>0.03532cm</Top>
         <Left>1.48781in</Left>
-        <Height>0.51102in</Height>
+        <Height>0.66099in</Height>
         <Width>4.09641in</Width>
         <ZIndex>4</ZIndex>
         <Style>
@@ -315,106 +329,6 @@
           <PaddingBottom>2pt</PaddingBottom>
         </Style>
       </Textbox>
-      <Textbox Name="Textbox10">
-        <KeepTogether>true</KeepTogether>
-        <Paragraphs>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Domicilio Fiscal</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Bold</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Paseo Florido, 62-A, Col.: Nueva Galicia, C.P.: 83245, Hermosillo, Sonora, México.</Value>
-                <Style>
-                  <FontStyle>Normal</FontStyle>
-                  <FontFamily>calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                  <TextDecoration>None</TextDecoration>
-                  <Color>#000000</Color>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-        </Paragraphs>
-        <rd:DefaultName>Textbox10</rd:DefaultName>
-        <Top>0.52493in</Top>
-        <Left>1.48781in</Left>
-        <Height>0.65513in</Height>
-        <Width>2.06754in</Width>
-        <ZIndex>8</ZIndex>
-        <Style>
-          <Border>
-            <Style>None</Style>
-          </Border>
-          <PaddingLeft>2pt</PaddingLeft>
-          <PaddingRight>2pt</PaddingRight>
-          <PaddingTop>2pt</PaddingTop>
-          <PaddingBottom>2pt</PaddingBottom>
-        </Style>
-      </Textbox>
-      <Textbox Name="Textbox11">
-        <KeepTogether>true</KeepTogether>
-        <Paragraphs>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Lugar de Expedición</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Bold</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>=Parameters!DomicilioSucursal.Value</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>7.5pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-        </Paragraphs>
-        <rd:DefaultName>Textbox10</rd:DefaultName>
-        <Top>0.52493in</Top>
-        <Left>3.64748in</Left>
-        <Height>0.65513in</Height>
-        <Width>1.93674in</Width>
-        <ZIndex>9</ZIndex>
-        <Style>
-          <Border>
-            <Style>None</Style>
-          </Border>
-          <VerticalAlign>Top</VerticalAlign>
-        </Style>
-      </Textbox>
       <Textbox Name="Textbox19">
         <CanGrow>true</CanGrow>
         <KeepTogether>true</KeepTogether>
@@ -436,7 +350,7 @@
         <Left>0.14361cm</Left>
         <Height>0.22222in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>10</ZIndex>
+        <ZIndex>8</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -478,7 +392,7 @@
         <Left>0.86782in</Left>
         <Height>0.22222in</Height>
         <Width>4.79418in</Width>
-        <ZIndex>11</ZIndex>
+        <ZIndex>9</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -521,7 +435,7 @@
         <Left>0.05654in</Left>
         <Height>0.23611in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>12</ZIndex>
+        <ZIndex>10</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -564,7 +478,7 @@
         <Left>0.86782in</Left>
         <Height>0.2309in</Height>
         <Width>7.0427in</Width>
-        <ZIndex>13</ZIndex>
+        <ZIndex>11</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -607,7 +521,7 @@
         <Left>0.05654in</Left>
         <Height>0.23611in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>14</ZIndex>
+        <ZIndex>12</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -649,7 +563,7 @@
         <Left>0.86782in</Left>
         <Height>0.23611in</Height>
         <Width>4.79418in</Width>
-        <ZIndex>15</ZIndex>
+        <ZIndex>13</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -695,7 +609,7 @@
         <Left>1.64412in</Left>
         <Height>0.18056in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>16</ZIndex>
+        <ZIndex>14</ZIndex>
         <Style>
           <Border>
             <Color>#4f81bd</Color>
@@ -745,7 +659,7 @@
         <Left>1.64412in</Left>
         <Height>0.18056in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>17</ZIndex>
+        <ZIndex>15</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -783,7 +697,7 @@
         <Left>1.64412in</Left>
         <Height>0.19444in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>18</ZIndex>
+        <ZIndex>16</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -821,7 +735,7 @@
         <Left>1.64412in</Left>
         <Height>0.19445in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>19</ZIndex>
+        <ZIndex>17</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -857,7 +771,7 @@
         <Left>5.70142in</Left>
         <Height>0.18056in</Height>
         <Width>2.22448in</Width>
-        <ZIndex>20</ZIndex>
+        <ZIndex>18</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -891,7 +805,7 @@
         <Left>5.69622in</Left>
         <Height>0.16667in</Height>
         <Width>2.22969in</Width>
-        <ZIndex>21</ZIndex>
+        <ZIndex>19</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -924,7 +838,7 @@
         <Left>5.69622in</Left>
         <Height>0.16939in</Height>
         <Width>2.22714in</Width>
-        <ZIndex>22</ZIndex>
+        <ZIndex>20</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -957,7 +871,7 @@
         <Left>5.70142in</Left>
         <Height>0.17784in</Height>
         <Width>2.22193in</Width>
-        <ZIndex>23</ZIndex>
+        <ZIndex>21</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1016,6 +930,13 @@
                   <FontSize>7pt</FontSize>
                 </Style>
               </TextRun>
+              <TextRun>
+                <Value> , lugar de expedición  C.P. 83245 Hermosillo, Sonora, México.</Value>
+                <Style>
+                  <FontFamily>calibri</FontFamily>
+                  <FontSize>7pt</FontSize>
+                </Style>
+              </TextRun>
             </TextRuns>
             <Style />
           </Paragraph>
@@ -1025,7 +946,7 @@
         <Left>1.53781in</Left>
         <Height>0.29498in</Height>
         <Width>6.38809in</Width>
-        <ZIndex>24</ZIndex>
+        <ZIndex>22</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1053,11 +974,11 @@
           </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox63</rd:DefaultName>
-        <Top>5.98585in</Top>
+        <Top>6.09835in</Top>
         <Left>2.5423in</Left>
         <Height>0.25in</Height>
         <Width>3.69856in</Width>
-        <ZIndex>25</ZIndex>
+        <ZIndex>23</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1860,7 +1781,7 @@
         <Left>0.13016cm</Left>
         <Height>4.04843cm</Height>
         <Width>20.06179cm</Width>
-        <ZIndex>26</ZIndex>
+        <ZIndex>24</ZIndex>
         <Visibility>
           <Hidden>= (Parameters!AplicaPagare.Value="0" ORelse Parameters!AplicaPagare.Value="")</Hidden>
         </Visibility>
@@ -2496,7 +2417,7 @@
         <Left>0.11468cm</Left>
         <Height>1.01949cm</Height>
         <Width>20.01064cm</Width>
-        <ZIndex>27</ZIndex>
+        <ZIndex>25</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -2535,7 +2456,7 @@
         <Left>5.662in</Left>
         <Height>0.20317in</Height>
         <Width>2.26391in</Width>
-        <ZIndex>28</ZIndex>
+        <ZIndex>26</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -2821,7 +2742,7 @@
         <Left>5.73412in</Left>
         <Height>0.34081in</Height>
         <Width>2.19818in</Width>
-        <ZIndex>29</ZIndex>
+        <ZIndex>27</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -2937,7 +2858,7 @@
         <Left>14.56464cm</Left>
         <Height>0.6cm</Height>
         <Width>5.58343cm</Width>
-        <ZIndex>30</ZIndex>
+        <ZIndex>28</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3553,7 +3474,7 @@
         <Left>0.11468cm</Left>
         <Height>5.76188cm</Height>
         <Width>14.34413cm</Width>
-        <ZIndex>31</ZIndex>
+        <ZIndex>29</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3596,7 +3517,7 @@
         <Left>0.04404in</Left>
         <Height>0.36457in</Height>
         <Width>7.87931in</Width>
-        <ZIndex>32</ZIndex>
+        <ZIndex>30</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3615,7 +3536,7 @@
         <Left>0.13016cm</Left>
         <Height>2.85467cm</Height>
         <Width>3.50777cm</Width>
-        <ZIndex>33</ZIndex>
+        <ZIndex>31</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>

Empresas/132/Formatos/OC.rdlc

@@ -55,34 +55,6 @@
             </TextRuns>
             <Style />
           </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>PASEO FLORIDO 62-A</Value>
-                <Style>
-                  <FontSize>7pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                </Style>
-              </TextRun>
-              <TextRun>
-                <Value xml:space="preserve"> </Value>
-                <Style>
-                  <FontSize>7.5pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                </Style>
-              </TextRun>
-              <TextRun>
-                <Value>NUEVA GALICIA </Value>
-                <Style>
-                  <FontSize>7pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Left</TextAlign>
-            </Style>
-          </Paragraph>
           <Paragraph>
             <TextRuns>
               <TextRun>
@@ -93,7 +65,9 @@
                 </Style>
               </TextRun>
             </TextRuns>
-            <Style />
+            <Style>
+              <TextAlign>Left</TextAlign>
+            </Style>
           </Paragraph>
           <Paragraph>
             <TextRuns>
@@ -115,6 +89,18 @@
             </TextRuns>
             <Style />
           </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>contacto@soteljar.com</Value>
+                <Style>
+                  <FontFamily>calibri</FontFamily>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox4</rd:DefaultName>
         <Left>4.05739cm</Left>

Empresas/132/Formatos/ReciboDePago.rdlc

@@ -2852,7 +2852,7 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value>Regímen: Regímen General de Ley Personas Morales</Value>
+                <Value>Regímen: Regímen General de Ley Personas Morales, lugar de expedición  C.P. 83245 Hermosillo, Sonora, México.</Value>
                 <Style>
                   <FontFamily>calibri</FontFamily>
                   <FontSize>7pt</FontSize>
@@ -3571,7 +3571,7 @@
   <Width>20.54984cm</Width>
   <Page>
     <PageHeader>
-      <Height>3.26147cm</Height>
+      <Height>2.27561cm</Height>
       <PrintOnFirstPage>true</PrintOnFirstPage>
       <PrintOnLastPage>true</PrintOnLastPage>
       <ReportItems>
@@ -3778,8 +3778,8 @@
           <Source>Embedded</Source>
           <Value>Logo</Value>
           <Sizing>FitProportional</Sizing>
-          <Height>2.88998cm</Height>
+          <Height>2.27561cm</Height>
-          <Width>3.14425cm</Width>
+          <Width>2.55292cm</Width>
           <ZIndex>4</ZIndex>
           <Style>
             <Border>
@@ -3830,10 +3830,24 @@
                 <TextAlign>Center</TextAlign>
               </Style>
             </Paragraph>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>contacto@soteljar.com</Value>
+                  <Style>
+                    <FontFamily>calibri</FontFamily>
+                    <FontSize>8pt</FontSize>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style>
+                <TextAlign>Center</TextAlign>
+              </Style>
+            </Paragraph>
           </Paragraphs>
           <rd:DefaultName>Textbox4</rd:DefaultName>
           <Left>1.77165in</Left>
-          <Height>0.50583in</Height>
+          <Height>0.57533in</Height>
           <Width>4.00199in</Width>
           <ZIndex>5</ZIndex>
           <Style>
@@ -3852,7 +3866,7 @@
             <Paragraph>
               <TextRuns>
                 <TextRun>
-                  <Value>Domicilio Fiscal</Value>
+                  <Value />
                   <Style>
                     <FontFamily>Calibri</FontFamily>
                     <FontSize>8pt</FontSize>
@@ -3864,56 +3878,11 @@
                 <TextAlign>Center</TextAlign>
               </Style>
             </Paragraph>
-            <Paragraph>
-              <TextRuns>
-                <TextRun>
-                  <Value>Paseo Florido, #62-A,</Value>
-                  <Style>
-                    <FontFamily>Calibri</FontFamily>
-                    <FontSize>7.5pt</FontSize>
-                    <FontWeight>Normal</FontWeight>
-                  </Style>
-                </TextRun>
-              </TextRuns>
-              <Style>
-                <TextAlign>Center</TextAlign>
-              </Style>
-            </Paragraph>
-            <Paragraph>
-              <TextRuns>
-                <TextRun>
-                  <Value>Col.: Nueva Galicia Son, C.P. 83245 Hermosillo,</Value>
-                  <Style>
-                    <FontFamily>Calibri</FontFamily>
-                    <FontSize>7.5pt</FontSize>
-                    <FontWeight>Normal</FontWeight>
-                  </Style>
-                </TextRun>
-              </TextRuns>
-              <Style>
-                <TextAlign>Center</TextAlign>
-              </Style>
-            </Paragraph>
-            <Paragraph>
-              <TextRuns>
-                <TextRun>
-                  <Value>Sonora, México</Value>
-                  <Style>
-                    <FontFamily>Calibri</FontFamily>
-                    <FontSize>7.5pt</FontSize>
-                    <FontWeight>Normal</FontWeight>
-                  </Style>
-                </TextRun>
-              </TextRuns>
-              <Style>
-                <TextAlign>Center</TextAlign>
-              </Style>
-            </Paragraph>
           </Paragraphs>
           <rd:DefaultName>Textbox10</rd:DefaultName>
-          <Top>0.50583in</Top>
+          <Top>0.64477in</Top>
-          <Left>2.84624in</Left>
+          <Left>2.84635in</Left>
-          <Height>0.75234in</Height>
+          <Height>0.25114in</Height>
           <Width>1.93508in</Width>
           <ZIndex>6</ZIndex>
           <Style>

Empresas/132/Formatos/Remision.rdlc

@@ -198,11 +198,10 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value />
+                <Value>contacto@soteljar.com</Value>
                 <Style>
-                  <FontFamily>Calibri</FontFamily>
+                  <FontFamily>calibri</FontFamily>
                   <FontSize>8pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
                 </Style>
               </TextRun>
             </TextRuns>
@@ -213,8 +212,8 @@
         </Paragraphs>
         <rd:DefaultName>Textbox4</rd:DefaultName>
         <Top>0.03532cm</Top>
-        <Left>1.48781in</Left>
+        <Left>1.49615in</Left>
-        <Height>0.51102in</Height>
+        <Height>0.66099in</Height>
         <Width>4.09641in</Width>
         <ZIndex>4</ZIndex>
         <Style>
@@ -315,106 +314,6 @@
           <PaddingBottom>2pt</PaddingBottom>
         </Style>
       </Textbox>
-      <Textbox Name="Textbox10">
-        <KeepTogether>true</KeepTogether>
-        <Paragraphs>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Domicilio Fiscal</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Bold</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Paseo Florido, 62-A, Col.: Nueva Galicia, C.P.: 83245, Hermosillo, Sonora, México.</Value>
-                <Style>
-                  <FontStyle>Normal</FontStyle>
-                  <FontFamily>calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                  <TextDecoration>None</TextDecoration>
-                  <Color>#000000</Color>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-        </Paragraphs>
-        <rd:DefaultName>Textbox10</rd:DefaultName>
-        <Top>0.52493in</Top>
-        <Left>1.48781in</Left>
-        <Height>0.65513in</Height>
-        <Width>2.06754in</Width>
-        <ZIndex>8</ZIndex>
-        <Style>
-          <Border>
-            <Style>None</Style>
-          </Border>
-          <PaddingLeft>2pt</PaddingLeft>
-          <PaddingRight>2pt</PaddingRight>
-          <PaddingTop>2pt</PaddingTop>
-          <PaddingBottom>2pt</PaddingBottom>
-        </Style>
-      </Textbox>
-      <Textbox Name="Textbox11">
-        <KeepTogether>true</KeepTogether>
-        <Paragraphs>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>Lugar de Expedición</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>8pt</FontSize>
-                  <FontWeight>Bold</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
-              <TextRun>
-                <Value>=Parameters!DomicilioSucursal.Value</Value>
-                <Style>
-                  <FontFamily>Calibri</FontFamily>
-                  <FontSize>7.5pt</FontSize>
-                  <FontWeight>Normal</FontWeight>
-                </Style>
-              </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-        </Paragraphs>
-        <rd:DefaultName>Textbox10</rd:DefaultName>
-        <Top>0.52493in</Top>
-        <Left>3.64748in</Left>
-        <Height>0.65513in</Height>
-        <Width>1.93674in</Width>
-        <ZIndex>9</ZIndex>
-        <Style>
-          <Border>
-            <Style>None</Style>
-          </Border>
-          <VerticalAlign>Top</VerticalAlign>
-        </Style>
-      </Textbox>
       <Textbox Name="Textbox19">
         <CanGrow>true</CanGrow>
         <KeepTogether>true</KeepTogether>
@@ -436,7 +335,7 @@
         <Left>0.14361cm</Left>
         <Height>0.22222in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>10</ZIndex>
+        <ZIndex>8</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -478,7 +377,7 @@
         <Left>0.86782in</Left>
         <Height>0.22222in</Height>
         <Width>4.79418in</Width>
-        <ZIndex>11</ZIndex>
+        <ZIndex>9</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -521,7 +420,7 @@
         <Left>0.05654in</Left>
         <Height>0.23611in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>12</ZIndex>
+        <ZIndex>10</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -564,7 +463,7 @@
         <Left>0.86782in</Left>
         <Height>0.2309in</Height>
         <Width>7.0427in</Width>
-        <ZIndex>13</ZIndex>
+        <ZIndex>11</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -607,7 +506,7 @@
         <Left>0.05654in</Left>
         <Height>0.23611in</Height>
         <Width>0.81128in</Width>
-        <ZIndex>14</ZIndex>
+        <ZIndex>12</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -649,7 +548,7 @@
         <Left>0.86782in</Left>
         <Height>0.23611in</Height>
         <Width>4.79418in</Width>
-        <ZIndex>15</ZIndex>
+        <ZIndex>13</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -695,7 +594,7 @@
         <Left>1.64412in</Left>
         <Height>0.18056in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>16</ZIndex>
+        <ZIndex>14</ZIndex>
         <Style>
           <Border>
             <Color>#4f81bd</Color>
@@ -745,7 +644,7 @@
         <Left>1.64412in</Left>
         <Height>0.18056in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>17</ZIndex>
+        <ZIndex>15</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -783,7 +682,7 @@
         <Left>1.64412in</Left>
         <Height>0.19444in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>18</ZIndex>
+        <ZIndex>16</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -821,7 +720,7 @@
         <Left>1.64412in</Left>
         <Height>0.19445in</Height>
         <Width>4.03672in</Width>
-        <ZIndex>19</ZIndex>
+        <ZIndex>17</ZIndex>
         <Style>
           <Border>
             <Color>White</Color>
@@ -857,7 +756,7 @@
         <Left>5.70142in</Left>
         <Height>0.18056in</Height>
         <Width>2.22448in</Width>
-        <ZIndex>20</ZIndex>
+        <ZIndex>18</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -891,7 +790,7 @@
         <Left>5.69622in</Left>
         <Height>0.16667in</Height>
         <Width>2.22969in</Width>
-        <ZIndex>21</ZIndex>
+        <ZIndex>19</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -924,7 +823,7 @@
         <Left>5.69622in</Left>
         <Height>0.16939in</Height>
         <Width>2.22714in</Width>
-        <ZIndex>22</ZIndex>
+        <ZIndex>20</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -957,7 +856,7 @@
         <Left>5.70142in</Left>
         <Height>0.17784in</Height>
         <Width>2.22193in</Width>
-        <ZIndex>23</ZIndex>
+        <ZIndex>21</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1016,6 +915,13 @@
                   <FontSize>7pt</FontSize>
                 </Style>
               </TextRun>
+              <TextRun>
+                <Value>, lugar de expedición  C.P. 83245 Hermosillo, Sonora, México.</Value>
+                <Style>
+                  <FontFamily>calibri</FontFamily>
+                  <FontSize>7pt</FontSize>
+                </Style>
+              </TextRun>
             </TextRuns>
             <Style />
           </Paragraph>
@@ -1025,7 +931,7 @@
         <Left>1.53781in</Left>
         <Height>0.29498in</Height>
         <Width>6.38809in</Width>
-        <ZIndex>24</ZIndex>
+        <ZIndex>22</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1053,11 +959,11 @@
           </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox63</rd:DefaultName>
-        <Top>5.98585in</Top>
+        <Top>6.11085in</Top>
         <Left>2.5423in</Left>
         <Height>0.25in</Height>
         <Width>3.69856in</Width>
-        <ZIndex>25</ZIndex>
+        <ZIndex>23</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -1860,7 +1766,7 @@
         <Left>0.13016cm</Left>
         <Height>4.04843cm</Height>
         <Width>20.06179cm</Width>
-        <ZIndex>26</ZIndex>
+        <ZIndex>24</ZIndex>
         <Visibility>
           <Hidden>= (Parameters!AplicaPagare.Value="0" ORelse Parameters!AplicaPagare.Value="")</Hidden>
         </Visibility>
@@ -2496,7 +2402,7 @@
         <Left>0.11468cm</Left>
         <Height>1.01949cm</Height>
         <Width>20.01064cm</Width>
-        <ZIndex>27</ZIndex>
+        <ZIndex>25</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -2535,7 +2441,7 @@
         <Left>5.662in</Left>
         <Height>0.20317in</Height>
         <Width>2.26391in</Width>
-        <ZIndex>28</ZIndex>
+        <ZIndex>26</ZIndex>
         <Style>
           <Border>
             <Color>#2c2e42</Color>
@@ -2821,7 +2727,7 @@
         <Left>5.73412in</Left>
         <Height>0.34081in</Height>
         <Width>2.19818in</Width>
-        <ZIndex>29</ZIndex>
+        <ZIndex>27</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -2937,7 +2843,7 @@
         <Left>14.56464cm</Left>
         <Height>0.6cm</Height>
         <Width>5.58343cm</Width>
-        <ZIndex>30</ZIndex>
+        <ZIndex>28</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3553,7 +3459,7 @@
         <Left>0.11468cm</Left>
         <Height>5.76188cm</Height>
         <Width>14.34413cm</Width>
-        <ZIndex>31</ZIndex>
+        <ZIndex>29</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3596,7 +3502,7 @@
         <Left>0.04404in</Left>
         <Height>0.36457in</Height>
         <Width>7.87931in</Width>
-        <ZIndex>32</ZIndex>
+        <ZIndex>30</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>
@@ -3615,7 +3521,7 @@
         <Left>0.13016cm</Left>
         <Height>2.85467cm</Height>
         <Width>3.50777cm</Width>
-        <ZIndex>33</ZIndex>
+        <ZIndex>31</ZIndex>
         <Style>
           <Border>
             <Style>None</Style>

Inventarios/RecepcionAlmacen.aspx.vb

@@ -1021,6 +1021,7 @@ Partial Class Inventarios_RecepcionAlmacen
 
                     If UsuarioActual.Empresa.Funcionalidad(594) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(314) Then
                         DivDocumentos.Visible = True
+                        UpDocumentos.Update()
                     End If
 
                     DtDatosDetalle = Nothing
@@ -1184,6 +1185,11 @@ Partial Class Inventarios_RecepcionAlmacen
                     DivCodigoSeriePS.Visible = False
                 End If
 
+                If UsuarioActual.Empresa.Funcionalidad(594) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(314) Then
+                    DivDocumentos.Visible = True
+                    UpDocumentos.Update()
+                End If
+
             End If
         Else
             BtnGuardar.Visible = False
@@ -1235,6 +1241,11 @@ Partial Class Inventarios_RecepcionAlmacen
                     DivCodigoSeriePS.Visible = False
                 End If
 
+                If UsuarioActual.Empresa.Funcionalidad(594) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(314) Then
+                    DivDocumentos.Visible = True
+                    UpDocumentos.Update()
+                End If
+
             End If
         Else
             BtnGuardar.Visible = False
@@ -4072,6 +4083,13 @@ Partial Class Inventarios_RecepcionAlmacen
                     Else
                         DivCodigoSeriePS.Visible = False
                     End If
+
+                    If UsuarioActual.Empresa.Funcionalidad(594) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(314) Then
+                        DivDocumentos.Visible = True
+                        UpDocumentos.Update()
+                    End If
+
+
                     CargaGVInv()
 
                 Else

TareasProgramadas/Tareas119.ashx

@@ -29,7 +29,9 @@ public class TareasJam : IHttpHandler
                 retorno  = PruebaConexionFTP("ftp://us2.hostedftp.com/", "agrojam", "A12345678");
                 break;
             case "EjecutaThalamus":
-                retorno =EjecutaThalamus(CveEmpresa);
+
+                retorno = EjecutaThalamus(CveEmpresa, context);
+
                 break;
             default:
                 break;
@@ -46,10 +48,12 @@ public class TareasJam : IHttpHandler
         context.Response.End();
 
     }
-    private bool EjecutaThalamus(int CveEmpresa)
+    private bool EjecutaThalamus(int CveEmpresa, HttpContext context)
     {
 
 
+
+
         this.GuardaLog("EjecutaThalamus: Inicio. ");
 
         bool Respuesta = false;
@@ -371,6 +375,7 @@ public class TareasJam : IHttpHandler
                 ErrorProceso = true;
                 Respuesta = false;
             }
+           
 
             if (!ErrorProceso)
             {
@@ -494,7 +499,13 @@ public class TareasJam : IHttpHandler
 
 
         this.GuardaLog($"EjecutaThalamus: Enviado correo. ");
-        MandaCorreo(Cuerpo, Respuesta, RutaProductos, RutaVentas, RutaClientes, RutaAlmacenes);
+
+
+        if (Respuesta)
+        {
+            MandaCorreo(Cuerpo, Respuesta, RutaProductos, RutaVentas, RutaClientes, RutaAlmacenes);
+        }
+
 
         this.GuardaLog($"EjecutaThalamus: Tarea terminada se regresa respuesta {Respuesta.ToString()}. ");
         return Respuesta;