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

App_Code/ClsBancos.vb

@@ -1445,7 +1445,7 @@ Public Class ClsBancos
             .Add("@FechaDocumento", SqlDbType.Date).Value = FechaDocumento
             .Add("@Folio", SqlDbType.VarChar).Value = Folio
             .Add("@PagueseA", SqlDbType.VarChar).Value = PagueseA
-            .Add("@Importe", SqlDbType.Money).Value = Importe
+            .Add("@Importe", SqlDbType.Money).Value = Importe.RoundSQL
             .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
             .Add("@TipoCambio", SqlDbType.Float).Value = TipoCambio
             .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones

App_Code/ClsNominas.vb

@@ -174,6 +174,46 @@ Public Class ClsNominas
     End Sub
 #End Region
 
+    Public Function AutorizaCalculoAnual(CveEmpresa As Integer, CveUsuario As Integer, PersonalXml As String) As Boolean
+        Dim retorno As Boolean = False
+        DataAdapter("PA_Nom_AutorizaCalculoAnual", CommandType.StoredProcedure)
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@PersonalXml", SqlDbType.Xml).Value = If(String.IsNullOrEmpty(PersonalXml), DBNull.Value, DirectCast(PersonalXml, Object))
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch Ex1 As SqlException
+
+            Me.OnError("Ocurrió un error al aplicar calculo anual.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los agro departamentos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return retorno
+    End Function
+    Public Function PersonalAplicaCalculoAnual(CveEmpresa As Integer, CveUsuario As Integer, CvePersonal As Integer, Aplica As Integer, motivo As String) As Boolean
+        Dim retorno As Boolean = False
+        DataAdapter("PA_Nom_PersonalAplicaCalculoAnual", CommandType.StoredProcedure)
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@Aplica", SqlDbType.Int).Value = Aplica
+            .Add("@Motivo", SqlDbType.VarChar).Value = motivo
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch Ex1 As SqlException
+
+            Me.OnError("Ocurrió un error al aplicar calculo anual.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los agro departamentos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return retorno
+    End Function
 #Region "ClsNominas_Nominas"
 
     Public Function NominaUpMetododepago(cveEmpresa As Integer, CvePersonal As Integer, CvePeriodo As Integer, MetodoPagoFijo As Boolean,

Ashx/SIGWeb.ashx

@@ -118,12 +118,14 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
                     context.Response.Write(sendMailLPM(context))
                 Case "getSATColomias"
                     getSatColonias(context)
-				Case "GetFilesDirectory"
+                Case "GetFilesDirectory"
                     GetFilesDirectory(context)
                 Case "Getetiquetas"
                     Getetiquetas(context)
-				Case "cancelarRemision"
+                Case "cancelarRemision"
                     cancelarRemision(context)
+                Case "RemoveMovimiento"
+                    RemoveMovimiento(context)
             End Select
         Catch ex As Exception
             ex.GuardaLog(ex.Message)
@@ -1644,4 +1646,66 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
         Return retorno
     End Function
 #End Region
+    Private Function RemoveMovimiento(ByVal context As HttpContext) As String
+        Dim retorno As String = ""
+
+        Dim Borrar As Boolean = False
+        Dim Inv As New ClsInventarios
+        Dim Conta As New ClsContabilidad(Inv.IniciaTransacSQL())
+        Dim ObjGral As New ClsGenerales(Inv.IniciaTransacSQL())
+
+        Dim CveMovimiento As Integer = IfNull(context.Request("CveMovimiento"), "-1").ToString().ToEntero()
+        Dim CveEmpresa As Integer = IfNull(context.Request("CveEmpresa"), "-1").ToString().ToEntero()
+
+        Dim TieneError = False
+
+        CveMovimiento.ToString.GuardaLog
+
+        'Dim ObjConta As ClsContPAQi = Nothing
+        'If UsuarioActual.Empresa.UsaContabilidad Or UsuarioActual.Empresa.UsaAC Then
+        '    ObjConta = New ClsContPAQi(UsuarioActual.Empresa)
+        '    ObjConta.IniciaTransacSQL()
+        'End If
+
+        'If Not ObjGral.AddHistorialBitacora(Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, Nothing, "", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, String.Format("{0}, Informacion = {1}", TxtDescripcion.Text, DescripcionDetalladaEliminar), "Inventarios", TxtFolio.Text + " / " + DdlConcepto.SelectedItem.Text) Then
+        '    TieneError = True
+        'End If
+
+        If Not Inv.MovimientoRemove(CveMovimiento, CveEmpresa) Then
+
+            TieneError = True
+        End If
+
+        'If Not TieneError Then
+        '    If Not Conta.UpdatePrePolizasDetalleBloquear(CvePrePoliza, False) Then
+        '        TieneError = True
+        '    End If
+        'End If
+
+        If Not TieneError Then
+            'If ObjConta IsNot Nothing Then ObjConta.Commit()
+            Inv.Commit()
+
+
+        Else
+            Inv.RollBack()
+
+            Alert("Ocurrió un error al eliminar el movimiento. Por favor vuelva a intentar.", TipoMensaje.MsgError)
+        End If
+        CveMovimiento = 0
+
+        Inv.Dispose()
+        ObjGral.Dispose()
+        Conta.Dispose()
+        If Not String.IsNullOrEmpty(retorno) Then
+            context.Response.Write(retorno)
+        Else
+            context.Response.Write("[]")
+        End If
+
+        Return retorno
+    End Function
+
+
+
 End Class

Bancos/RepIE.aspx

@@ -329,8 +329,8 @@
     </asp:UpdatePanel>
 
     <div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">
-        <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvBitacora.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+        <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
-        <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvBitacora.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+        <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
     </div>
 
     <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">

Compras/Compras.aspx

@@ -4844,13 +4844,17 @@
                                                         </ItemTemplate>
                                                         <ItemStyle HorizontalAlign="Center" Width="10%" />
                                                     </asp:TemplateField>
-                                                    <asp:HyperLinkField HeaderText="SerieFolio" DataTextField="SerieFolio" Target="_blank" DataNavigateUrlFields="CveCompra" DataNavigateUrlFormatString="/Compras/Compras.aspx?={0}" />
+                                                    <asp:HyperLinkField HeaderText="SerieFolio" DataTextField="SerieFolio" Target="_blank" DataNavigateUrlFields="CveCompra" DataNavigateUrlFormatString="/Compras/Compras.aspx?CveCompra={0}" />
                                                     <asp:BoundField HeaderText="Original" DataField="CantidadC" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
                                                     <asp:BoundField HeaderText="Surtido" DataField="CantidadS" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
                                                     <asp:BoundField HeaderText="Pendiente" DataField="CantidadF" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
                                                     <asp:BoundField HeaderText="Unidad" DataField="UM" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="7.5%" />
                                                     <asp:BoundField HeaderText="Producto" DataField="CodigoPS" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="30%" />
-                                                    <asp:BoundField HeaderText="P.U." DataField="PU" DataFormatString="{0:#,##0.####}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%" />
+                                                    <asp:TemplateField HeaderText="P.U." ItemStyle-HorizontalAlign="Right" FooterStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%">
+                                                        <ItemTemplate>
+                                                            <asp:Textbox ID="TxtPU" Width="60px" Text='<%#   Eval("PU", "{0:N2}") %>' CssClass="textaslabel" runat="server"></asp:Textbox>
+                                                        </ItemTemplate>
+                                                    </asp:TemplateField>
                                                     <asp:TemplateField HeaderText="Total" ItemStyle-HorizontalAlign="Right" FooterStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%">
                                                         <ItemTemplate>
                                                             <asp:Label ID="LbTotal" Text='<%# (CDbl(Eval("PU").ToString) * CDbl(Eval("CantidadF").ToString)).ToString("N2") %>' runat="server"></asp:Label>

Compras/Compras.aspx.vb

@@ -6434,7 +6434,7 @@ Partial Class Compras_Compras
                                                         '    End If
                                                         Case 6 'Compra
 
-                                                            Dim AgregaMercanciaInventario As Boolean = UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 119, 140, 141, 152, 153, 154, 159, 160, 161, 162, 163) AndAlso UsuarioActual.Empresa.UsaInventarios AndAlso Not UsuarioActual.Empresa.Funcionalidad(126) = "1"
+                                                            Dim AgregaMercanciaInventario As Boolean = UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 119, 140, 145, 141, 152, 153, 154, 159, 160, 161, 162, 163) AndAlso UsuarioActual.Empresa.UsaInventarios AndAlso Not UsuarioActual.Empresa.Funcionalidad(126) = "1"
 
                                                             Dim RegistraConcepto225 As Boolean = UsuarioActual.Empresa.UsaInventarios AndAlso DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") AndAlso Not UsuarioActual.Empresa.Funcionalidad(126) = "1"
 
@@ -6826,7 +6826,7 @@ Partial Class Compras_Compras
                                                                                     Dim DifTC As Decimal = tipoCambioActual - Gvr.DataKey("TipoCambio").ToDecimal
                                                                                     'diferenciaTransito = DifTC * (Gvr.DataKey("IVA").ToDecimal / Gvr.FCTextBox("TxtCantidadNCInv").Text.ToDecimal)
                                                                                     'diferenciaTransito += DifTC * (Gvr.DataKey("IEPSPS").ToDecimal / Gvr.FCTextBox("TxtCantidadNCInv").Text.ToDecimal)
-                                                                                    importeMNTemp = (Gvr.DataKey("PU").ToDecimal * Gvr.FCTextBox("TxtCantidadNCInv").Text.ToDecimal * Gvr.DataKey("TipoCambio").ToDecimal).RoundSQL
+                                                                                    importeMNTemp = (Gvr.FCTextBox("TxtPU").Text.ToDecimal * Gvr.FCTextBox("TxtCantidadNCInv").Text.ToDecimal * Gvr.DataKey("TipoCambio").ToDecimal).RoundSQL
                                                                                     ImporteTransito += importeMNTemp
                                                                                     'se registra por cada compra relacionada
                                                                                     If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMNTemp, Referencia, ConceptoContabilizacionNC, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveCompraAmortizacion:=Gvr.DataKey("CveCompra").ToEntero, CveProveedor:=CveProveedorConcepto, ImporteMX:=importeMNTemp, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), TipoCambio:=Gvr.DataKey("TipoCambio").ToDecimal, CveMovimientoAlmacen:=CveMovimientoDevolucion, Contabilizable:=SeContabiliza) Then

Compras/PopUpVerFactura.aspx.vb

@@ -194,7 +194,8 @@ Partial Class PopUpVerFactura
                 If UrlParametros("OP") IsNot Nothing AndAlso UrlParametros("OP").ToString <> "" Then
                     SeleccionaReporte(UrlParametros)
                 End If
-            End If
+            End If
+
             If Request("onlyPrint") IsNot Nothing Then
                 If Request("onlyPrint").ToString() = "Pallet" Then
                     imprimirpallet2(Request("CvePallet").ToString.ToEntero())
@@ -216,6 +217,16 @@ Partial Class PopUpVerFactura
         Dim SubProyecto As String = ""
         Dim AgenciaAduanalUSA As String = ""
         Dim AgenciaAduanalMEX As String = ""
+        Dim Temperatura As String = ""
+        Dim Hora As String = ""
+        Dim Chofer As String = ""
+        Dim CamPlaca As String = ""
+        Dim Camion As String = ""
+        Dim Rem1Placa As String = ""
+        Dim Remolque1 As String = ""
+        Dim NoPallets As String = ""
+        Dim NoBultos As String = ""
+        Dim NoKgManifiesto As String = ""
         Dim tablaReporte As New DataTable
 
         'Envase = "1 1/9"
@@ -227,13 +238,34 @@ Partial Class PopUpVerFactura
             If objnom.PA_AGRO_Embarque_ManifiestoGet(-1, -1, -1, cveEmbarqueManifiesto) And objnom.DtResultados.Rows.Count > 0 Then
                 Dim row As DataRow = objnom.DtResultados.Rows(0)
                 NoEmbarque = row("NoEmbarque").ToString()
-                Fecha = row("Fecha").ToString()
+                Fecha = String.Format("{0:dd/MM/yyyy}", row("Fecha"))
                 SubProyecto = row("SubProyecto").ToString()
                 AgenciaAduanalUSA = row("AgenciaAduanalUSA").ToString()
                 AgenciaAduanalMEX = row("AgenciaAduanalMEX").ToString()
+                Temperatura = row("Temperatura").ToString()
+                Hora = String.Format("{0:hh }:{0:mm }:{0:ss tt}:", row("FechaIng"))
+                Chofer = row("Chofer").ToString()
+                CamPlaca = row("CamPlaca").ToString()
+                Camion = String.Format("{0} {1}", row("CamAnio"), row("CamEspecificacion"))
+                Rem1Placa = row("Rem1Placa").ToString()
+                Remolque1 = String.Format("{0} {1}", row("Rem1Anio"), row("Rem1Especificacion"))
+                If row("CveCamionRemolque1").ToString() = "1" Then
+                    Rem1Placa = "12-TF-5E"
+                    Remolque1 = "Remolque 1"
+                Else
+                    Rem1Placa = "15-TF-7f"
+                    Remolque1 = "Remolque 2"
 
+                End If
+
+                If objnom.PA_Agro_Embarque_PalletGet(-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, cveEmbarqueManifiesto, -1) And objnom.DtResultados.Rows.Count > 0 Then
+                    NoPallets = objnom.DtResultados.Rows.Count.ToString()
+                    NoKgManifiesto = objnom.DtResultados.SUM("Peso").ToString("N2")
+                    NoBultos = objnom.DtResultados.SUM("NoCajas").ToString("N0")
+                    tablaReporte = objnom.DtResultados
+                End If
             End If
-
+            'Remolque 1  12-TF-5E' }, { cveCamion: 2, placa: 'Remolque 2  15-TF-7f
         End Using
         Dim params As New List(Of ReportParameter)
         params.Add(New ReportParameter("NoEmbarque", NoEmbarque))
@@ -241,9 +273,18 @@ Partial Class PopUpVerFactura
         params.Add(New ReportParameter("SubProyecto", SubProyecto))
         params.Add(New ReportParameter("AgenciaAduanalUSA", AgenciaAduanalUSA))
         params.Add(New ReportParameter("AgenciaAduanalMEX", AgenciaAduanalMEX))
-        params.Add(New ReportParameter("Temperatura", "45"))
+        params.Add(New ReportParameter("Temperatura", Temperatura))
+        params.Add(New ReportParameter("Hora", Hora))
+        params.Add(New ReportParameter("Chofer", Chofer))
+        params.Add(New ReportParameter("CamPlaca", CamPlaca))
+        params.Add(New ReportParameter("Camion", Camion))
+        params.Add(New ReportParameter("Rem1Placa", Rem1Placa))
+        params.Add(New ReportParameter("Remolque1", Remolque1))
 
 
+        params.Add(New ReportParameter("NoBultos", NoBultos))
+        params.Add(New ReportParameter("NoPallets", NoPallets))
+        params.Add(New ReportParameter("NoKgManifiesto", NoKgManifiesto))
 
 
 
@@ -1609,7 +1650,7 @@ Partial Class PopUpVerFactura
         Timbre.Comprobante.FormadePago = Obj.FormaPagoSAT33
         Timbre.Comprobante.CondicionesdePago = Obj.FormaPago33
         Timbre.Comprobante.MetodoPago = Obj.ClaveMetodoPagoSAT
-        Timbre.Comprobante.Subtotal = Obj.SubTotal
+        Timbre.Comprobante.SubTotal = Obj.SubTotal
         Timbre.Comprobante.Descuentos = Obj.Descuento
         Timbre.Comprobante.Moneda = Obj.MonedaSAT
         Timbre.Comprobante.TipoCambio = If(Obj.CveMoneda = 1, "1", Obj.TipoCambio.ToString)

Empresas/140/Formatos/Factura.rdlc

@@ -66,9 +66,9 @@
             </Paragraphs>
             <rd:DefaultName>Textbox81</rd:DefaultName>
             <Top>0.36804in</Top>
-            <Left>5.50529in</Left>
+            <Left>4.70028in</Left>
             <Height>0.18682in</Height>
-            <Width>2.05349in</Width>
+            <Width>2.8585in</Width>
             <Style>
               <Border>
                 <Style>None</Style>
@@ -84,8 +84,8 @@
             <Value>Logo</Value>
             <Sizing>Fit</Sizing>
             <Left>0.23694in</Left>
-            <Height>0.8541in</Height>
+            <Height>2.38455cm</Height>
-            <Width>1.39456in</Width>
+            <Width>3.48217cm</Width>
             <ZIndex>1</ZIndex>
             <Style>
               <Border>
@@ -100,7 +100,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>      Cliente:   </Value>
+                    <Value>    Cliente:  </Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
                       <FontSize>9pt</FontSize>
@@ -131,6 +131,22 @@
                       <FontWeight>SemiBold</FontWeight>
                     </Style>
                   </TextRun>
+                  <TextRun>
+                    <Value> - </Value>
+                    <Style>
+                      <FontFamily>Myriad Pro</FontFamily>
+                      <FontSize>9pt</FontSize>
+                      <FontWeight>SemiBold</FontWeight>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>=Parameters!ClienteRFC.Value</Value>
+                    <Style>
+                      <FontFamily>Myriad Pro</FontFamily>
+                      <FontSize>9pt</FontSize>
+                      <FontWeight>SemiBold</FontWeight>
+                    </Style>
+                  </TextRun>
                 </TextRuns>
                 <Style>
                   <TextAlign>Left</TextAlign>
@@ -227,79 +243,88 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value xml:space="preserve">      </Value>
+                    <Value>POR ESTE PAGARÉ PROMETO(EMOS), Y ME (NOS) OBLIGO (AMOS) A PAGAR INCONDICIONALMENTE A LA ORDEN DE </Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>8.64pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>Normal</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>POR ESTE PAGARE ME(NO) OBLIGO(AMOS) INCONDICIONALMENTE A PAGAR A LA ORDEN DE  </Value>
+                    <Value>BDH BATERIAS DISTRIBUCIONES DE HERMOSILLO SA DE CV</Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
-                      <FontWeight>Normal</FontWeight>
-                      <TextDecoration>None</TextDecoration>
-                      <Color>#000000</Color>
-                    </Style>
-                  </TextRun>
-                  <TextRun>
-                    <Value>BDH BATERIAS DISTRIBUCIONES DE HERMOSILLO, SA DE CV.</Value>
-                    <Style>
-                      <FontStyle>Normal</FontStyle>
-                      <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
                       <FontWeight>Bold</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>  AL VENCIMIENTO ABAJO INDICADO. EN LA CIUDAD DE HERMOSILLO, SONORA O EN CUALQUIER OTRO LUGAR QUE SE ME REQUIERA DE PAGO, RENUNCIANDO EXPRESAMENTE AL FUERO DE MI DOMICILIO. LA CANTIDAD DE </Value>
+                    <Value>, EN LA CIUDAD DE HERMOSILLO, SONORA, O CUALQUIER OTRA CIUDAD QUE DESIGNE EL TITULAR DEL DOCUMENTO, LA CANTIDAD DE </Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>Normal</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>$ </Value>
+                    <Value>$</Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>Bold</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
+                  <TextRun>
+                    <Value xml:space="preserve"> </Value>
+                    <Style>
+                      <FontStyle>Normal</FontStyle>
+                      <FontFamily>Myriad Pro</FontFamily>
+                      <FontSize>8pt</FontSize>
+                      <FontWeight>Normal</FontWeight>
+                      <TextDecoration>None</TextDecoration>
+                      <Color>#000000</Color>
+                    </Style>
+                  </TextRun>
                   <TextRun>
                     <Value>=Parameters!Total.Value</Value>
                     <Style>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>SemiBold</FontWeight>
                     </Style>
                   </TextRun>
-                </TextRuns>
-                <Style />
-              </Paragraph>
-              <Paragraph>
-                <TextRuns>
                   <TextRun>
-                    <Value>SON:  </Value>
+                    <Value>  ***</Value>
                     <Style>
+                      <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
-                      <FontWeight>SemiBold</FontWeight>
+                      <FontWeight>Normal</FontWeight>
+                      <TextDecoration>None</TextDecoration>
+                      <Color>#000000</Color>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>SON </Value>
+                    <Style>
+                      <FontStyle>Normal</FontStyle>
+                      <FontFamily>Myriad Pro</FontFamily>
+                      <FontSize>8pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                      <TextDecoration>None</TextDecoration>
+                      <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
@@ -307,56 +332,40 @@
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
-                      <FontWeight>SemiBold</FontWeight>
-                      <TextDecoration>None</TextDecoration>
-                      <Color>#000000</Color>
-                    </Style>
-                  </TextRun>
-                </TextRuns>
-                <Style />
-              </Paragraph>
-              <Paragraph>
-                <TextRuns>
-                  <TextRun>
-                    <Value xml:space="preserve">        </Value>
-                    <Style>
-                      <FontStyle>Normal</FontStyle>
-                      <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
                       <FontWeight>SemiBold</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>LA SUMA ANTERIOR SI NO FUERA CUBIERTA A SU VENCIMIENTO, CAUSARA INTERES MORATORIO A RAZON DEL </Value>
+                    <Value>*** VALOR QUE RECONOZCO (EMOS) ADEUDARLE OBLIGÁNDOME (NOS) A CUBRIR A SU VENCIMIENTO  </Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>Normal</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>3.00% MENSUAL </Value>
+                    <Value>=Parameters!Vencimiento.Value</Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>Bold</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>Y EN CASO DEL COBRO JUDICIAL SE CARGARAN LOS GASTOS QUE ESTOS GENEREN.</Value>
+                    <Value>, DE NO PAGARSE CAUSARÍA UN INTERÉS MORATORIO DEL 10% POR CIENTO MENSUAL, POR EL TIEMPO QUE PERMANEZCA INSOLUTO EL ADEUDO EXISTENTE, QUEDANDO EXPRESAMENTE CONVENIDO QUE LA FALTA DE PAGO OPORTUNO OCASIONA AL DEUDOR GASTOS DE COBRO JUDICIALES O EXTRAJUDICIALES Y LOS QUE SE OCASIONEN, RENUNCIANDO EL DEUDOR AL FUERO DE SU DOMICILIO QUE PUDIERA CORRESPONDERLE, ESTE PAGARÉ ES MERCANTIL Y ESTÁ PROTEGIDO POR LA LEY GENERAL DE TÍTULOS Y OPERACIONES DE CRÉDITO.</Value>
                     <Style>
                       <FontStyle>Normal</FontStyle>
                       <FontFamily>Myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                       <FontWeight>Normal</FontWeight>
                       <TextDecoration>None</TextDecoration>
                       <Color>#000000</Color>
@@ -367,9 +376,9 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox75</rd:DefaultName>
-            <Top>1.53269in</Top>
+            <Top>1.35769in</Top>
             <Left>0.25in</Left>
-            <Height>1.45797in</Height>
+            <Height>1.27047in</Height>
             <Width>7.30878in</Width>
             <ZIndex>4</ZIndex>
             <Style>
@@ -380,132 +389,12 @@
               <PaddingBottom>2pt</PaddingBottom>
             </Style>
           </Textbox>
-          <Textbox Name="Textbox38">
-            <CanGrow>true</CanGrow>
-            <KeepTogether>true</KeepTogether>
-            <Paragraphs>
-              <Paragraph>
-                <TextRuns>
-                  <TextRun>
-                    <Value>a </Value>
-                    <Style>
-                      <FontFamily>myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
-                      <Format>d' de 'MMMM' de 'yyyy</Format>
-                    </Style>
-                  </TextRun>
-                  <TextRun>
-                    <Value>=cdate(Parameters!Fecha.Value)</Value>
-                    <Style>
-                      <FontFamily>myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
-                      <Format>d' de 'MMMM' de 'yyyy</Format>
-                      <Language>es-MX</Language>
-                    </Style>
-                  </TextRun>
-                </TextRuns>
-                <Style>
-                  <TextAlign>Center</TextAlign>
-                </Style>
-              </Paragraph>
-              <Paragraph>
-                <TextRuns>
-                  <TextRun>
-                    <Value>Vencimiento el </Value>
-                    <Style>
-                      <FontFamily>myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
-                      <Format>d' de 'MMMM' de 'yyyy</Format>
-                    </Style>
-                  </TextRun>
-                  <TextRun>
-                    <Value>=Parameters!Vencimiento.Value</Value>
-                    <Style>
-                      <FontStyle>Normal</FontStyle>
-                      <FontFamily>myriad Pro</FontFamily>
-                      <FontSize>10.5pt</FontSize>
-                      <FontWeight>Normal</FontWeight>
-                      <Format>d' de 'MMMM' de 'yyyy</Format>
-                      <TextDecoration>None</TextDecoration>
-                      <Color>#000000</Color>
-                      <Language>es-MX</Language>
-                    </Style>
-                  </TextRun>
-                </TextRuns>
-                <Style>
-                  <TextAlign>Center</TextAlign>
-                </Style>
-              </Paragraph>
-            </Paragraphs>
-            <rd:DefaultName>Textbox38</rd:DefaultName>
-            <Top>8.17569cm</Top>
-            <Left>3.93558cm</Left>
-            <Height>1.07625cm</Height>
-            <Width>5.19875cm</Width>
-            <ZIndex>5</ZIndex>
-            <Style>
-              <Border>
-                <Style>None</Style>
-              </Border>
-              <PaddingLeft>2pt</PaddingLeft>
-              <PaddingRight>2pt</PaddingRight>
-              <PaddingTop>2pt</PaddingTop>
-              <PaddingBottom>2pt</PaddingBottom>
-            </Style>
-          </Textbox>
-          <Line Name="Line2">
-            <Top>10.25697cm</Top>
-            <Left>3.93558cm</Left>
-            <Height>0cm</Height>
-            <Width>5.19875cm</Width>
-            <ZIndex>6</ZIndex>
-            <Style>
-              <Border>
-                <Style>Solid</Style>
-              </Border>
-            </Style>
-          </Line>
-          <Textbox Name="Textbox39">
-            <CanGrow>true</CanGrow>
-            <KeepTogether>true</KeepTogether>
-            <Paragraphs>
-              <Paragraph>
-                <TextRuns>
-                  <TextRun>
-                    <Value>S U S C R I P T O R</Value>
-                    <Style>
-                      <FontFamily>MYRIAD PRO</FontFamily>
-                      <FontSize>10.5pt</FontSize>
-                    </Style>
-                  </TextRun>
-                </TextRuns>
-                <Style>
-                  <TextAlign>Center</TextAlign>
-                </Style>
-              </Paragraph>
-            </Paragraphs>
-            <rd:DefaultName>Textbox39</rd:DefaultName>
-            <Top>10.43336cm</Top>
-            <Left>3.93558cm</Left>
-            <Height>0.6cm</Height>
-            <Width>5.19875cm</Width>
-            <ZIndex>7</ZIndex>
-            <Style>
-              <Border>
-                <Style>None</Style>
-              </Border>
-              <PaddingLeft>2pt</PaddingLeft>
-              <PaddingRight>2pt</PaddingRight>
-              <PaddingTop>2pt</PaddingTop>
-              <PaddingBottom>2pt</PaddingBottom>
-            </Style>
-          </Textbox>
           <Line Name="Line3">
-            <Top>10.25697cm</Top>
+            <Top>8.35197cm</Top>
-            <Left>11.9387cm</Left>
+            <Left>6.8587cm</Left>
             <Height>0cm</Height>
-            <Width>5.19875cm</Width>
+            <Width>6.65396cm</Width>
-            <ZIndex>8</ZIndex>
+            <ZIndex>5</ZIndex>
             <Style>
               <Border>
                 <Style>Solid</Style>
@@ -519,10 +408,10 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>NOMBRE Y FIRMA DEL AVAL</Value>
+                    <Value>ACEPTO (AMOS) DE CONFORMIDAD</Value>
                     <Style>
                       <FontFamily>MYRIAD PRO</FontFamily>
-                      <FontSize>10.5pt</FontSize>
+                      <FontSize>8pt</FontSize>
                     </Style>
                   </TextRun>
                 </TextRuns>
@@ -532,11 +421,50 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox39</rd:DefaultName>
-            <Top>10.43336cm</Top>
+            <Top>8.52836cm</Top>
-            <Left>11.9387cm</Left>
+            <Left>6.8587cm</Left>
             <Height>0.6cm</Height>
-            <Width>5.19875cm</Width>
+            <Width>6.65396cm</Width>
-            <ZIndex>9</ZIndex>
+            <ZIndex>6</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="Textbox44">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>Obligado</Value>
+                    <Style>
+                      <FontStyle>Normal</FontStyle>
+                      <FontFamily>Myriad Pro</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>Textbox38</rd:DefaultName>
+            <Top>6.90569cm</Top>
+            <Left>6.8587cm</Left>
+            <Height>0.67938cm</Height>
+            <Width>6.65396cm</Width>
+            <ZIndex>7</ZIndex>
             <Style>
               <Border>
                 <Style>None</Style>
@@ -552,10 +480,10 @@
           <BreakLocation>Start</BreakLocation>
         </PageBreak>
         <KeepTogether>true</KeepTogether>
-        <Top>7.01812in</Top>
+        <Top>7.49312in</Top>
-        <Left>0.17767in</Left>
+        <Left>0.20879in</Left>
-        <Height>4.422in</Height>
+        <Height>3.59384in</Height>
-        <Width>7.87128in</Width>
+        <Width>7.78795in</Width>
         <Visibility>
           <Hidden>=iif(Parameters!AplicaPagare.Value="0",True,False)</Hidden>
         </Visibility>
@@ -849,8 +777,8 @@
         </Paragraphs>
         <rd:DefaultName>Textbox2</rd:DefaultName>
         <Top>0.05159in</Top>
-        <Left>4.31439cm</Left>
+        <Left>4.36025cm</Left>
-        <Height>1.62208in</Height>
+        <Height>1.28875in</Height>
         <Width>3.20861in</Width>
         <ZIndex>1</ZIndex>
         <Style>
@@ -1086,8 +1014,8 @@
           </Image>
         </ReportItems>
         <KeepTogether>true</KeepTogether>
-        <Top>3.53788in</Top>
+        <Top>3.82538in</Top>
-        <Left>0.03589in</Left>
+        <Left>0.05395in</Left>
         <Height>1.21305in</Height>
         <Width>8.22763in</Width>
         <ZIndex>2</ZIndex>
@@ -1182,7 +1110,7 @@
         </Paragraphs>
         <rd:DefaultName>Textbox32</rd:DefaultName>
         <Top>2.84726cm</Top>
-        <Left>0.08425cm</Left>
+        <Left>0.13011cm</Left>
         <Height>2.1447cm</Height>
         <Width>4.08234cm</Width>
         <ZIndex>3</ZIndex>
@@ -1203,23 +1131,7 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value xml:space="preserve">     </Value>
+                <Value>= IIF(Parameters!Tipo.Value = "INGRESO","FACTURA","NOTA DE CRÉDITO")</Value>
-                <Style>
-                  <FontFamily>Myriad Pro</FontFamily>
-                  <FontSize>9.16pt</FontSize>
-                  <FontWeight>SemiBold</FontWeight>
-                </Style>
-              </TextRun>
-              <TextRun>
-                <Value>TIPO DE DOCUMENTO: </Value>
-                <Style>
-                  <FontFamily>Myriad Pro</FontFamily>
-                  <FontSize>11pt</FontSize>
-                  <FontWeight>SemiBold</FontWeight>
-                </Style>
-              </TextRun>
-              <TextRun>
-                <Value>=Parameters!Tipo.Value</Value>
                 <Style>
                   <FontFamily>Myriad Pro</FontFamily>
                   <FontSize>11pt</FontSize>
@@ -1364,6 +1276,7 @@
                 <Style>
                   <FontFamily>Myriad Pro</FontFamily>
                   <FontSize>9.64pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
                 </Style>
               </TextRun>
               <TextRun>
@@ -1490,9 +1403,9 @@
         </Paragraphs>
         <rd:DefaultName>Textbox4</rd:DefaultName>
         <Top>0.05022in</Top>
-        <Left>4.90719in</Left>
+        <Left>5.03983in</Left>
         <Height>1.62345in</Height>
-        <Width>3.35633in</Width>
+        <Width>3.24175in</Width>
         <ZIndex>4</ZIndex>
         <Style>
           <Border>
@@ -1602,7 +1515,7 @@
         </Paragraphs>
         <rd:DefaultName>Textbox40</rd:DefaultName>
         <Top>4.25cm</Top>
-        <Left>13.26812cm</Left>
+        <Left>13.31398cm</Left>
         <Height>1.42163cm</Height>
         <Width>7.72123cm</Width>
         <ZIndex>5</ZIndex>
@@ -2261,7 +2174,7 @@
         </TablixRowHierarchy>
         <DataSetName>DsOC</DataSetName>
         <Top>2.25503in</Top>
-        <Left>0.04048in</Left>
+        <Left>0.05854in</Left>
         <Height>0.34081in</Height>
         <Width>8.22304in</Width>
         <ZIndex>6</ZIndex>
@@ -2287,7 +2200,7 @@
         </Paragraphs>
         <rd:DefaultName>Textbox5</rd:DefaultName>
         <Top>6.77831cm</Top>
-        <Left>0.10282cm</Left>
+        <Left>0.14868cm</Left>
         <Height>0.14316cm</Height>
         <Width>20.88652cm</Width>
         <ZIndex>7</ZIndex>
@@ -2318,7 +2231,7 @@
         </Paragraphs>
         <rd:DefaultName>Textbox5</rd:DefaultName>
         <Top>7.54968cm</Top>
-        <Left>15.05252cm</Left>
+        <Left>15.09838cm</Left>
         <Height>0.14316cm</Height>
         <Width>5.93682cm</Width>
         <ZIndex>8</ZIndex>
@@ -2355,7 +2268,7 @@
         </Paragraphs>
         <rd:DefaultName>ImporteLetra</rd:DefaultName>
         <Top>3.05676in</Top>
-        <Left>2.28431in</Left>
+        <Left>2.30237in</Left>
         <Height>0.18861in</Height>
         <Width>5.97921in</Width>
         <ZIndex>9</ZIndex>
@@ -2384,8 +2297,8 @@
           </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox5</rd:DefaultName>
-        <Top>8.85041cm</Top>
+        <Top>9.51148cm</Top>
-        <Left>0.10282cm</Left>
+        <Left>0.13011cm</Left>
         <Height>0.1cm</Height>
         <Width>20.88652cm</Width>
         <ZIndex>10</ZIndex>
@@ -2415,8 +2328,8 @@
           </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox5</rd:DefaultName>
-        <Top>12.24375cm</Top>
+        <Top>12.974cm</Top>
-        <Left>0.13457cm</Left>
+        <Left>0.18043cm</Left>
         <Height>0.14316cm</Height>
         <Width>20.85477cm</Width>
         <ZIndex>11</ZIndex>
@@ -2450,7 +2363,7 @@
         </Paragraphs>
         <rd:DefaultName>Textbox1</rd:DefaultName>
         <Top>7.0273cm</Top>
-        <Left>5.57617cm</Left>
+        <Left>5.62203cm</Left>
         <Height>0.34219cm</Height>
         <Width>9.30316cm</Width>
         <ZIndex>12</ZIndex>
@@ -2568,7 +2481,7 @@
         </TablixRowHierarchy>
         <DataSetName>DataSet1</DataSetName>
         <Top>6.99203cm</Top>
-        <Left>15.05252cm</Left>
+        <Left>15.09838cm</Left>
         <Height>0.48004cm</Height>
         <Width>5.93682cm</Width>
         <ZIndex>13</ZIndex>
@@ -3065,8 +2978,8 @@
           </Textbox>
         </ReportItems>
         <KeepTogether>true</KeepTogether>
-        <Top>12.89651cm</Top>
+        <Top>15.53176cm</Top>
-        <Left>0.09116cm</Left>
+        <Left>0.13702cm</Left>
         <Height>2.97096cm</Height>
         <Width>20.89818cm</Width>
         <ZIndex>14</ZIndex>
@@ -3341,7 +3254,7 @@
         </TablixRowHierarchy>
         <DataSetName>DataSet3</DataSetName>
         <Top>2.75704in</Top>
-        <Left>0.04048in</Left>
+        <Left>0.05854in</Left>
         <Height>0.34081in</Height>
         <Width>2.08542in</Width>
         <ZIndex>15</ZIndex>
@@ -3365,13 +3278,6 @@
                   <FontWeight>Bold</FontWeight>
                 </Style>
               </TextRun>
-            </TextRuns>
-            <Style>
-              <TextAlign>Center</TextAlign>
-            </Style>
-          </Paragraph>
-          <Paragraph>
-            <TextRuns>
               <TextRun>
                 <Value>72 HORAS</Value>
                 <Style>
@@ -3381,7 +3287,22 @@
                 </Style>
               </TextRun>
               <TextRun>
-                <Value> POSTERIORES A LA FECHA DE ELABORACIÓN"</Value>
+                <Value> POSTERIORES A LA FECHA DE ELABORACIÓN,</Value>
+                <Style>
+                  <FontFamily>myriad pro</FontFamily>
+                  <FontSize>6.5pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style>
+              <TextAlign>Center</TextAlign>
+            </Style>
+          </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>TODA DEVOLUCIÓN NO REALIZADA EL DÍA DE LA COMPRA CAUSARÁ EL 10% DE CARGO"</Value>
                 <Style>
                   <FontFamily>myriad pro</FontFamily>
                   <FontSize>6.5pt</FontSize>
@@ -3395,9 +3316,8 @@
           </Paragraph>
         </Paragraphs>
         <rd:DefaultName>Textbox1</rd:DefaultName>
-        <Top>8.4794cm</Top>
+        <Top>8.39473cm</Top>
-        <Left>0.13457cm</Left>
+        <Height>1.07794cm</Height>
-        <Height>0.34219cm</Height>
         <Width>20.85477cm</Width>
         <ZIndex>16</ZIndex>
         <Style>
@@ -3414,10 +3334,10 @@
         <Source>Embedded</Source>
         <Value>Logo</Value>
         <Sizing>FitProportional</Sizing>
-        <Top>0.13104cm</Top>
+        <Top>0.12756cm</Top>
-        <Left>0.08425cm</Left>
+        <Left>0.15969cm</Left>
-        <Height>2.5433cm</Height>
+        <Height>2.38455cm</Height>
-        <Width>4.13cm</Width>
+        <Width>3.48217cm</Width>
         <ZIndex>17</ZIndex>
         <Style>
           <Border>
@@ -3425,15 +3345,212 @@
           </Border>
         </Style>
       </Image>
+      <Textbox Name="Textbox4">
+        <CanGrow>true</CanGrow>
+        <KeepTogether>true</KeepTogether>
+        <Paragraphs>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Banco:</Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
+                </Style>
+              </TextRun>
+              <TextRun>
+                <Value> BBVA BANCOMER SA </Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Cuenta:</Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
+                </Style>
+              </TextRun>
+              <TextRun>
+                <Value> 0160660639  </Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Suc:</Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
+                </Style>
+              </TextRun>
+              <TextRun>
+                <Value> 5803 </Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Clave Interbancaria:</Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
+                </Style>
+              </TextRun>
+              <TextRun>
+                <Value> 012760001606606397   </Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Correo:</Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                  <FontWeight>Bold</FontWeight>
+                </Style>
+              </TextRun>
+              <TextRun>
+                <Value> pagos:@bdhbaterias.com</Value>
+                <Style>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
+        </Paragraphs>
+        <rd:DefaultName>Textbox4</rd:DefaultName>
+        <Top>3.49237cm</Top>
+        <Left>4.38884cm</Left>
+        <Height>2.05902cm</Height>
+        <Width>8.12128cm</Width>
+        <ZIndex>18</ZIndex>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+          <PaddingLeft>2pt</PaddingLeft>
+          <PaddingRight>2pt</PaddingRight>
+          <PaddingTop>2pt</PaddingTop>
+          <PaddingBottom>2pt</PaddingBottom>
+        </Style>
+      </Textbox>
+      <Line Name="Line4">
+        <Top>14.70114cm</Top>
+        <Left>14.38124cm</Left>
+        <Height>0cm</Height>
+        <Width>6.65396cm</Width>
+        <ZIndex>19</ZIndex>
+        <Style>
+          <Border>
+            <Style>Solid</Style>
+          </Border>
+        </Style>
+      </Line>
+      <Textbox Name="Textbox48">
+        <CanGrow>true</CanGrow>
+        <KeepTogether>true</KeepTogether>
+        <Paragraphs>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Nombre</Value>
+                <Style>
+                  <FontFamily>MYRIAD PRO</FontFamily>
+                  <FontSize>8pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style>
+              <TextAlign>Center</TextAlign>
+            </Style>
+          </Paragraph>
+        </Paragraphs>
+        <rd:DefaultName>Textbox39</rd:DefaultName>
+        <Top>14.87753cm</Top>
+        <Left>14.38124cm</Left>
+        <Height>0.6cm</Height>
+        <Width>6.65396cm</Width>
+        <ZIndex>20</ZIndex>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+          <PaddingLeft>2pt</PaddingLeft>
+          <PaddingRight>2pt</PaddingRight>
+          <PaddingTop>2pt</PaddingTop>
+          <PaddingBottom>2pt</PaddingBottom>
+        </Style>
+      </Textbox>
+      <Textbox Name="Textbox46">
+        <CanGrow>true</CanGrow>
+        <KeepTogether>true</KeepTogether>
+        <Paragraphs>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>Recibí Producto</Value>
+                <Style>
+                  <FontStyle>Normal</FontStyle>
+                  <FontFamily>Myriad Pro</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>Textbox38</rd:DefaultName>
+        <Top>13.25486cm</Top>
+        <Left>14.38124cm</Left>
+        <Height>0.67938cm</Height>
+        <Width>6.65396cm</Width>
+        <ZIndex>21</ZIndex>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+          <PaddingLeft>2pt</PaddingLeft>
+          <PaddingRight>2pt</PaddingRight>
+          <PaddingTop>2pt</PaddingTop>
+          <PaddingBottom>2pt</PaddingBottom>
+        </Style>
+      </Textbox>
     </ReportItems>
-    <Height>29.14037cm</Height>
+    <Height>28.16088cm</Height>
     <Style>
       <Border>
         <Style>None</Style>
       </Border>
     </Style>
   </Body>
-  <Width>21.12144cm</Width>
+  <Width>21.1673cm</Width>
   <Page>
     <PageFooter>
       <Height>0.63499cm</Height>
@@ -3466,7 +3583,7 @@
           </Paragraphs>
           <rd:DefaultName>Textbox31</rd:DefaultName>
           <Top>0.11289cm</Top>
-          <Left>8.85735cm</Left>
+          <Left>8.90321cm</Left>
           <Height>0.41981cm</Height>
           <Width>6.02198cm</Width>
           <Style>
@@ -3500,7 +3617,7 @@
           </Paragraphs>
           <rd:DefaultName>Textbox35</rd:DefaultName>
           <Top>0.11289cm</Top>
-          <Left>18.37079cm</Left>
+          <Left>18.41665cm</Left>
           <Height>0.41981cm</Height>
           <Width>2.5cm</Width>
           <ZIndex>1</ZIndex>

GPS/EmbarqueManifiesto.rdlc

@@ -303,7 +303,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>06:44:07 p. m.</Value>
+                              <Value>=Parameters!Hora.Value</Value>
                               <Style />
                             </TextRun>
                           </TextRuns>
@@ -488,14 +488,14 @@
               <TablixCells>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox496">
+                    <Textbox Name="Textbox4">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>826</Value>
+                              <Value>=Parameters!NoBultos.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -506,7 +506,7 @@
                           </Style>
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox496</rd:DefaultName>
+                      <rd:DefaultName>Textbox4</rd:DefaultName>
                       <Style>
                         <Border>
                           <Style>None</Style>
@@ -614,14 +614,14 @@
                 </TablixCell>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox499">
+                    <Textbox Name="Textbox8">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>18,172.00</Value>
+                              <Value>=Parameters!NoKgManifiesto.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -632,7 +632,7 @@
                           </Style>
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox499</rd:DefaultName>
+                      <rd:DefaultName>Textbox8</rd:DefaultName>
                       <Style>
                         <Border>
                           <Style>None</Style>
@@ -874,14 +874,14 @@
               <TablixCells>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox508">
+                    <Textbox Name="Textbox6">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>20</Value>
+                              <Value>=Parameters!NoPallets.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -892,7 +892,7 @@
                           </Style>
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox508</rd:DefaultName>
+                      <rd:DefaultName>Textbox6</rd:DefaultName>
                       <Style>
                         <Border>
                           <Style>None</Style>
@@ -2768,7 +2768,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value />
+                              <Value>=Parameters!Chofer.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -3188,7 +3188,13 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>45 °F</Value>
+                              <Value>=Parameters!Temperatura.Value</Value>
+                              <Style>
+                                <FontSize>8pt</FontSize>
+                              </Style>
+                            </TextRun>
+                            <TextRun>
+                              <Value>°F</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -3327,7 +3333,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value />
+                              <Value>=Parameters!CamPlaca.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -3389,7 +3395,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value />
+                              <Value>=Parameters!Camion.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -3475,14 +3481,14 @@
                 </TablixCell>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox157">
+                    <Textbox Name="Textbox9">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>LCT-03</Value>
+                              <Value>=Parameters!Remolque1.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -3493,7 +3499,7 @@
                           </Style>
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox157</rd:DefaultName>
+                      <rd:DefaultName>Textbox9</rd:DefaultName>
                       <Style>
                         <Border>
                           <Style>None</Style>
@@ -3541,14 +3547,14 @@
                 </TablixCell>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox222">
+                    <Textbox Name="Textbox10">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>67-UA-1Z</Value>
+                              <Value>=Parameters!Rem1Placa.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -3559,7 +3565,7 @@
                           </Style>
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox222</rd:DefaultName>
+                      <rd:DefaultName>Textbox10</rd:DefaultName>
                       <Style>
                         <Border>
                           <Style>None</Style>
@@ -5364,7 +5370,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>=Parameters!AgenciaAduanalUSA.Value</Value>
+                              <Value>=Parameters!AgenciaAduanalMEX.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -5470,7 +5476,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>=Parameters!AgenciaAduanalMEX.Value</Value>
+                              <Value>=Parameters!AgenciaAduanalUSA.Value</Value>
                               <Style>
                                 <FontSize>8pt</FontSize>
                               </Style>
@@ -7167,21 +7173,21 @@
               <TablixCells>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox527">
+                    <Textbox Name="NoPallets">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value />
+                              <Value>=Fields!NoPallets.Value</Value>
                               <Style />
                             </TextRun>
                           </TextRuns>
                           <Style />
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox527</rd:DefaultName>
+                      <rd:DefaultName>NoPallets</rd:DefaultName>
                       <Style>
                         <Border>
                           <Color>LightGrey</Color>
@@ -7197,21 +7203,21 @@
                 </TablixCell>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox529">
+                    <Textbox Name="NoCajas">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value />
+                              <Value>=Fields!NoCajas.Value</Value>
                               <Style />
                             </TextRun>
                           </TextRuns>
                           <Style />
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox529</rd:DefaultName>
+                      <rd:DefaultName>NoCajas</rd:DefaultName>
                       <Style>
                         <Border>
                           <Color>LightGrey</Color>
@@ -7227,21 +7233,52 @@
                 </TablixCell>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox531">
+                    <Textbox Name="Cultivo">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value />
+                              <Value>=Fields!Cultivo.Value &amp; " " &amp; Fields!CultivoVariedad.Value</Value>
                               <Style />
                             </TextRun>
                           </TextRuns>
                           <Style />
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox531</rd:DefaultName>
+                      <rd:DefaultName>Cultivo</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Color>LightGrey</Color>
+                          <Style>Solid</Style>
+                        </Border>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                    <rd:Selected>true</rd:Selected>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Etiqueta">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=Fields!Etiqueta.Value</Value>
+                              <Style />
+                            </TextRun>
+                          </TextRuns>
+                          <Style />
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Etiqueta</rd:DefaultName>
                       <Style>
                         <Border>
                           <Color>LightGrey</Color>
@@ -7257,51 +7294,21 @@
                 </TablixCell>
                 <TablixCell>
                   <CellContents>
-                    <Textbox Name="Textbox3">
+                    <Textbox Name="Envase">
                       <CanGrow>true</CanGrow>
                       <KeepTogether>true</KeepTogether>
                       <Paragraphs>
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>GROWER</Value>
+                              <Value>=Fields!Envase.Value</Value>
                               <Style />
                             </TextRun>
                           </TextRuns>
                           <Style />
                         </Paragraph>
                       </Paragraphs>
-                      <rd:DefaultName>Textbox3</rd:DefaultName>
+                      <rd:DefaultName>Envase</rd:DefaultName>
-                      <Style>
-                        <Border>
-                          <Color>LightGrey</Color>
-                          <Style>Solid</Style>
-                        </Border>
-                        <PaddingLeft>2pt</PaddingLeft>
-                        <PaddingRight>2pt</PaddingRight>
-                        <PaddingTop>2pt</PaddingTop>
-                        <PaddingBottom>2pt</PaddingBottom>
-                      </Style>
-                    </Textbox>
-                  </CellContents>
-                </TablixCell>
-                <TablixCell>
-                  <CellContents>
-                    <Textbox Name="Textbox533">
-                      <CanGrow>true</CanGrow>
-                      <KeepTogether>true</KeepTogether>
-                      <Paragraphs>
-                        <Paragraph>
-                          <TextRuns>
-                            <TextRun>
-                              <Value>1 1/9 GROWER</Value>
-                              <Style />
-                            </TextRun>
-                          </TextRuns>
-                          <Style />
-                        </Paragraph>
-                      </Paragraphs>
-                      <rd:DefaultName>Textbox533</rd:DefaultName>
                       <Style>
                         <Border>
                           <Color>LightGrey</Color>
@@ -7338,6 +7345,7 @@
             </TablixMember>
           </TablixMembers>
         </TablixRowHierarchy>
+        <DataSetName>DataSet1</DataSetName>
         <Top>17.30058cm</Top>
         <Left>0.25008cm</Left>
         <Height>1.2cm</Height>
@@ -7381,40 +7389,32 @@
         <CommandText>/* Local Query */</CommandText>
       </Query>
       <Fields>
-        <Field Name="TipoTransaccionAbrev">
+        <Field Name="NoPallets">
-          <DataField>TipoTransaccionAbrev</DataField>
+          <DataField>NoPallets</DataField>
+          <rd:TypeName>System.Int</rd:TypeName>
+        </Field>
+        <Field Name="NoCajas">
+          <DataField>NoCajas</DataField>
+          <rd:TypeName>System.Int</rd:TypeName>
+        </Field>
+        <Field Name="Peso">
+          <DataField>Peso</DataField>
+          <rd:TypeName>System.Decimal</rd:TypeName>
+        </Field>
+        <Field Name="Etiqueta">
+          <DataField>Etiqueta</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
-        <Field Name="Folio">
+        <Field Name="Envase">
-          <DataField>Folio</DataField>
+          <DataField>Envase</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
-        <Field Name="FechaDocumento">
+        <Field Name="Cultivo">
-          <DataField>FechaDocumento</DataField>
+          <DataField>Cultivo</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
-        <Field Name="PagueseA">
+        <Field Name="CultivoVariedad">
-          <DataField>PagueseA</DataField>
+          <DataField>CultivoVariedad</DataField>
-          <rd:TypeName>System.String</rd:TypeName>
-        </Field>
-        <Field Name="Observaciones">
-          <DataField>Observaciones</DataField>
-          <rd:TypeName>System.String</rd:TypeName>
-        </Field>
-        <Field Name="Cargo">
-          <DataField>Cargo</DataField>
-          <rd:TypeName>System.String</rd:TypeName>
-        </Field>
-        <Field Name="Abono">
-          <DataField>Abono</DataField>
-          <rd:TypeName>System.String</rd:TypeName>
-        </Field>
-        <Field Name="EstatusIE">
-          <DataField>EstatusIE</DataField>
-          <rd:TypeName>System.String</rd:TypeName>
-        </Field>
-        <Field Name="Acumulado">
-          <DataField>Acumulado</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
       </Fields>
@@ -7441,6 +7441,12 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="Hora">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
     <ReportParameter Name="SubProyecto">
       <DataType>String</DataType>
       <Nullable>true</Nullable>
@@ -7465,6 +7471,54 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="Chofer">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="CamPlaca">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="Camion">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="Rem1Placa">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="Remolque1">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="NoPallets">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="NoBultos">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="NoKgManifiesto">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <EmbeddedImages>
     <EmbeddedImage Name="logojam">

General/SaldosIniciales.aspx.vb

@@ -1837,7 +1837,7 @@ Partial Class General_SaldosIniciales
                     Next
                 Catch ex As Exception
                     If mensajeError = "" Then
-                        mensajeError = "Error técnico, informar a soporte"
+                        mensajeError = "Error técnico, informar a soporte" & ex.Message
                     End If
                     ObjMovimientos.RollBack()
                 End Try

Inventarios/CatUnidades.aspx

@@ -177,7 +177,6 @@
                             <div class="form-group form-md-line-input input-iconright">
                                 <asp:TextBox ID="TxtNombreAseguradoraCarga" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
                                 <label for="<%= TxtNombreAseguradoraCarga.ClientID.ToString()%>">Aseguradora Carga:</label>
-                                <asp:RequiredFieldValidator runat="server" ID="RequiredFieldValidator3" ControlToValidate="TxtNombreAseguradoraCarga" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Aseguradora Carga''</b> es necesario, por favor ingréselo." ValidationGroup="GrpUnidad"></asp:RequiredFieldValidator>
                                 <i></i>
                             </div>
                                   </div>
@@ -185,7 +184,6 @@
                             <div class="form-group form-md-line-input input-iconright"  >
                                 <asp:TextBox ID="TxtNumPolizaSeguroCarga" CssClass="form-control" runat="server" MaxLength="25"></asp:TextBox>
                                 <label for="<%= TxtNumPolizaSeguroCarga.ClientID.ToString()%>">Número Póliza Seguro:</label>
-                                <asp:RequiredFieldValidator runat="server" ID="RequiredFieldValidator4" ControlToValidate="TxtNumPolizaSeguroCarga" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Póliza Seguro Carga''</b> es necesario, por favor ingréselo." ValidationGroup="GrpUnidad"></asp:RequiredFieldValidator>
                                 <i></i>
                             </div>
                                   </div>

Inventarios/CatUnidades.aspx.vb

@@ -141,6 +141,7 @@ Partial Class Inventarios_CatUnidades
         ObjInventarios.Dispose()
 
         If Not ErrorAlElimiar Then
+            GlobalDTInvCamiones(UsuarioActual.CveEmpresa) = Nothing
             CargaDatos()
         End If
 
@@ -170,6 +171,7 @@ Partial Class Inventarios_CatUnidades
 
 
         If Not ErrorPrceso Then
+            GlobalDTInvCamiones(UsuarioActual.CveEmpresa) = Nothing
             CargaDatos()
         End If
 

Inventarios/EntregaAlmacen.aspx.vb

@@ -933,7 +933,7 @@ Partial Class Inventarios_EntregaAlmacen
 
             'código temporal
             Dim AplicaSerie As Boolean = CBool(e.Row.DBCampo("AplicaSerie"))
-            If UsuarioActual.CveEmpresa = 140 AndAlso Not CveSubProyecto.Contiene(11793, 11993, 11794, 11795) Then
+            If UsuarioActual.CveEmpresa = 140 AndAlso Not CveSubProyecto.Contiene(11791, 11793, 11993, 11994, 11794, 11797, 11795, 12010, 12011) Then
                 AplicaSerie = False
             End If
 

Inventarios/RecepcionAlmacen.aspx.vb

@@ -704,7 +704,7 @@ Partial Class Inventarios_RecepcionAlmacen
         Dim ObjInventarios As New ClsInventarios
         If ddlProveedor.SelectedValue.ToEntero > 0 Then
             If ObjInventarios.ComprasPendientesAlmacenGet(ddlProveedor.SelectedValue.ToEntero, MinFecha.ToShortDateString.ToDate, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
-                Dim FiltroTemporal = If(UsuarioActual.CveEmpresa = 119, "AND TipoDocto IN ('Fac','NC','DEV')", "AND TipoDocto IN ('Fac')")
+                Dim FiltroTemporal = " AND TipoDocto IN ('Fac','NC','DEV')"
                 DdlFolio.DataSource = ObjInventarios.DtResultados.FiltraParametros($"CantOC >= 0 {FiltroTemporal}")
             Else
                 Alert("Ocurrió un error al obtener las Compras pendientes de recibir del proveedor. Por favor vuelva a intentar", TipoMensaje.MsgError)
@@ -981,7 +981,7 @@ Partial Class Inventarios_RecepcionAlmacen
                 ElseIf CveTipoCompra = 10 Then
                     CargaAlmacenes(-1, CveTipoCompra:=CveTipoCompra)
                 ElseIf TipoMovimiento = 3 Then 'devolucion al proveedor
-                    CargaAlmacenes(-1, "21,2,27", CveTipoCompra)
+                    CargaAlmacenes(-1, "1,21,2,27", CveTipoCompra)
                 Else
                     CargaAlmacenes(-1)
                 End If
@@ -2775,15 +2775,15 @@ Partial Class Inventarios_RecepcionAlmacen
                                    .Data = group
                                    })
 
-
+                    'comentado para subir versión, dividirOC
-                    For Each oc In resultsOC
+                    'For Each oc In resultsOC
-                        If oc.Cantidad < oc.CantidadOC Then
+                    '    If oc.Cantidad < oc.CantidadOC Then
-                            MensajeOC.AppendFormat("- {0}</br>", oc.PS)
+                    '        MensajeOC.AppendFormat("- {0}</br>", oc.PS)
-                            If Not ObjOC.UpdateOrdenCompraDetalleDivideCantidad(CveOCSurtir, oc.CveOCDetalle, oc.Cantidad, UsuarioActual.CveUsuario) Then
+                    '        If Not ObjOC.UpdateOrdenCompraDetalleDivideCantidad(CveOCSurtir, oc.CveOCDetalle, oc.Cantidad, UsuarioActual.CveUsuario) Then
-                                ErrorMovInv = True
+                    '            ErrorMovInv = True
-                            End If
+                    '        End If
-                        End If
+                    '    End If
-                    Next
+                    'Next
 
                 End If
             Else
@@ -3145,7 +3145,7 @@ Partial Class Inventarios_RecepcionAlmacen
 
                         Dim CveAlmacenVirtual As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacen).FiltroPrimeroValor("CveAlmacenVirtual").ToEntero()
 
-                        CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirtual, If(TipoMovimiento > 1, 13, 2), 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/G5")
+                        CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirtual, If(TipoMovimiento > 1, 37, 36), 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/G5")
                         FolioVirtual = ObjInventario.Folio
 
                         For Each RowUsado As DataRow In DtPSVirtual.Rows

Inventarios/TraspasoAlmacen.aspx

@@ -640,7 +640,7 @@
                                                 <ajax:FilteredTextBoxExtender ID="SoloNumeros2" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." />
                                             </ItemTemplate>
                                         </asp:TemplateField>
-                                        <asp:BoundField HeaderText="Disponible" DataField="Cantidad" DataFormatString="{0:#,##0.00####}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="10%" />
+                                        <asp:BoundField HeaderText="Disponible" DataField="Cantidad" DataFormatString="{0:#,###.######}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="10%" />
                                         <asp:BoundField HeaderText="Unidad" DataField="UnidadMedida" ItemStyle-Width="10%" />
                                         <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-Width="10%" />
                                         <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-Width="40%" />

Inventarios/TraspasoAlmacen.aspx.vb

@@ -575,7 +575,18 @@ Partial Class Inventarios_TraspasoAlmacen
                         tCaducidad = MinFecha
                     End If
 
-                    Dim Valido = ValidaExistencia(Cantidad, CveProducto, DdlUnidad.SelectedValue.ToEntero, DdlSeccionAlmacen.SelectedValue.ToEntero, If(TxtnSerie.Visible, TxtnSerie.Text, "-1"), tLote, tCaducidad)
+                    Dim tSerie As String = If(TxtnSerie.Visible, TxtnSerie.Text, "-1")
+
+                    If UsuarioActual.CveEmpresa = 140 Then
+                        Dim CveSubProyecto As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero
+
+                        If Not CveSubProyecto.Contiene(11791, 11793, 11993, 11994, 11794, 11797, 11795, 12010, 12011) Then
+                            tSerie = "-1"
+                        End If
+
+                    End If
+
+                    Dim Valido = ValidaExistencia(Cantidad, CveProducto, DdlUnidad.SelectedValue.ToEntero, DdlSeccionAlmacen.SelectedValue.ToEntero, tSerie, tLote, tCaducidad)
 
                     If Valido Then
                         AgregarPS(Cantidad, CveProducto, DdlUnidad.SelectedValue.ToEntero, TxtnObservaciones.Text, CveSeccionAlmacen:=DdlSeccionAlmacen.SelectedValue.ToEntero, SeccionAlmacen:=DdlSeccionAlmacen.SelectedItem.Text, Serie:=If(TxtnSerie.Visible, TxtnSerie.Text, ""), Lote:=If(tLote = "-1", "", tLote), FechaCaducidad:=tCaducidad, CveSeccionAlmacenDestino:=DdlSeccionAlmacenDestino.SelectedValue.ToEntero, Limpia:=FuncionalidadSinSerie)
@@ -859,6 +870,16 @@ Partial Class Inventarios_TraspasoAlmacen
                 Dim tLote As String = If(Lote <> "-1", String.Format("AND Lote = '{0}' ", Lote), "")
                 Dim tFechaCaducidad As String = If(FechaCaducidad > MinFecha, String.Format("AND FechaCaducidad = '{0}' ", FechaCaducidad), "")
 
+                If UsuarioActual.CveEmpresa = 140 Then
+                    Dim CveSubProyecto As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero
+
+                    If Not CveSubProyecto.Contiene(11791, 11793, 11993, 11994, 11794, 11797, 11795, 12010, 12011) Then
+                        Serie = "-1"
+                    End If
+
+                End If
+
+
                 Dim ExistenciaEspecificada As Decimal = 0
                 CantidadenGrid = DtMovimientos.SUMD("Cantidad", String.Format("CvePS = {0} AND CveUM = {1} {2} {3} {4} ", dr("CvePS"), dr("CveUM"), If(Not dr("Serie").ToString.Contiene("-1", ""), $" AND Serie = '{dr("Serie")}'", ""), tLote, tFechaCaducidad))
                 If ObjInventario.GetExistenciasProducto(dr("CvePS").ToString.ToEntero, dr("CveUM").ToString.ToEntero, UsuarioActual.CveEmpresa, DdlAlmacenOrigen.SelectedValue.ToEntero, FechaMovto:=TxtFecha.Text.ToDateTime.ToString("yyyy/MM/dd HH:mm"), CveSeccionAlmacen:=CveSeccionAlmacen, Serie:=Serie, Lote:=Lote, Caducidad:=FechaCaducidad) Then
@@ -1383,15 +1404,15 @@ Partial Class Inventarios_TraspasoAlmacen
 
                 Dim AplicaSerie As Boolean = CBool(drP("AplicaSerie"))
 
-                'codigo temporal
+                ''codigo temporal
-                If UsuarioActual.CveEmpresa = 140 Then
+                'If UsuarioActual.CveEmpresa = 140 Then
-                    Dim CveSubProyecto As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero
+                '    Dim CveSubProyecto As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero
 
-                    If Not CveSubProyecto.Contiene(11793, 11993, 11794, 11795) Then
+                '    If Not CveSubProyecto.Contiene(11793, 11993, 11794, 11795, 12010, 12011) Then
-                        AplicaSerie = False
+                '        AplicaSerie = False
-                    End If
+                '    End If
 
-                End If
+                'End If
 
                 ThSerie.Visible = AplicaSerie
                 TdSerie.Visible = AplicaSerie
@@ -1928,11 +1949,14 @@ Partial Class Inventarios_TraspasoAlmacen
                         TextoError = "Ocurrió un error al cancelar el traspaso"
                     End If
 
-                    If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteDecimal, TxtObservaciones.Text, 68, TxtObservaciones.Text, Fecha, IdCtaContable, -1,
+                    If CveMovimientoSalidaTransitorio > 0 Then
-                                                     CveMovimientoAlmacen:=CveMovimientoSalidaTransitorio, ImporteMX:=ImporteDecimal, Contabilizable:=False) Then
+                        If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteDecimal, TxtObservaciones.Text, 68, TxtObservaciones.Text, Fecha, IdCtaContable, -1,
-                        ErrorMovInv = True
+                                                    CveMovimientoAlmacen:=CveMovimientoSalidaTransitorio, ImporteMX:=ImporteDecimal, Contabilizable:=False) Then
-                        TextoError = "Ocurrió un erro al cancelar el traspaso"
+                            ErrorMovInv = True
+                            TextoError = "Ocurrió un error al cancelar el traspaso"
+                        End If
                     End If
+
                 End If
 
             End If
@@ -1956,7 +1980,7 @@ Partial Class Inventarios_TraspasoAlmacen
             If CveMovimientoVirtualEntrada > 0 Then Mensaje.AppendFormat("<br/>Folio Virtual: <b><a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}"" target=""_blank"">{2}</a></b>&nbsp;<br/><a target='_blank' href='/Compras/PopUpVerFactura.aspx?P={0}'>Imprimir Entrada Virtual</a>", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoVirtualEntrada)), CveMovimientoVirtualEntrada, FolioVirtualEntrada)
 
             Alert(Mensaje.ToString, TipoMensaje.MsgInformacion)
-
+            CargaRecepcion()
             DivCodigoSeriePSRecepcion.Visible = False
 
             GvDatosRecepcion.DataBind()
@@ -1971,7 +1995,7 @@ Partial Class Inventarios_TraspasoAlmacen
         ObjConta.Dispose()
         ObjInventario.Dispose()
 
-        CargaRecepcion()
+
     End Sub
 
     Protected Sub BtnRecibir_Click(sender As Object, e As EventArgs)
@@ -2251,13 +2275,14 @@ Partial Class Inventarios_TraspasoAlmacen
                 GvDatosRecepcion.DataBind()
                 UpDatosRecepcion.Update()
                 UPDatosAlmacen.Update()
+                CargaRecepcion()
             Else
                 ObjInventario.RollBack()
                 Alert(TextoError, TipoMensaje.MsgError)
             End If
             ObjInventario.Dispose()
             ObjConta.Dispose()
-            CargaRecepcion()
+
         Else
             Alert("No hay movimientos para el traspaso", TipoMensaje.MsgAdvertencia)
             If ChkTransitorio.Checked Then DivResponsable.Visible = True : DivTransitorio2.Visible = True

Nomina/CalculoISRAnual.aspx

@@ -1,33 +1,87 @@
 <%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="CalculoISRAnual.aspx.cs" Inherits="Nomina_CalculoISRAnual" %>
 
-<asp:Content ID="Content1" ContentPlaceHolderID="CP" Runat="Server">
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
 </asp:Content>
-<asp:Content ID="Content2" ContentPlaceHolderID="Css" Runat="Server">
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
-    <style >
+    <style>
-        .GVCalculoISRAnual tr td:nth-child(n+4){
+        .GVCalculoISRAnual tr td:nth-child(n+6) {
-            text-align :right;
+            text-align: right;
+        }
 
+        .btn.btn-circle.btn-sm {
+            font-size: 9px;
         }
     </style>
 </asp:Content>
-<asp:Content ID="Content3" ContentPlaceHolderID="E" Runat="Server">
+<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
     Calculo ISR anual
 </asp:Content>
-<asp:Content ID="Content4" ContentPlaceHolderID="HB" Runat="Server">
+<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
 </asp:Content>
-<asp:Content ID="Content5" ContentPlaceHolderID="H" Runat="Server">
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
     <li>
-                <asp:LinkButton ID="LnkdownExcel" OnClick="LnkdownExcel_Click" runat="server"><i class="fa fa-download" aria-hidden="true"></i>Excel</asp:LinkButton>
+        <asp:LinkButton ID="LnkdownExcel" OnClick="LnkdownExcel_Click" runat="server"><i class="fa fa-download" aria-hidden="true"></i>Excel</asp:LinkButton>
     </li>
-</asp:Content>
+    <asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
-<asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
-</asp:Content>
-<asp:Content ID="Content7" ContentPlaceHolderID="C" Runat="Server">
-    <asp:UpdatePanel ID="upDatos" runat ="server" UpdateMode="Conditional" >
         <ContentTemplate>
-            <asp:GridView ID="GVCalculoISRAnual" runat="server" GridLines="None" CssClass ="table table-hover table-striped ScrollAD GVCalculoISRAnual Widthall" AutoGenerateColumns="False"
+            <li>
-                datakeynames="CvePersonal,Codigo,NombreCompleto,TipoIngreso,FechaInicio,IngresosTotales,BaseGravada,Deducciones,ISRRetenido,Art152,SubsCorrespondiente,LimiteInferior,LimiteSuperior,CuotaFija,Porcentaje,ImpuestoAnual,Acargo,Acompensar">
+                <asp:LinkButton ID="LnkOpenModalAutoriza" OnClick="LnkOpenModalAutoriza_Click" runat="server"><i class="fa fa-check" aria-hidden="true"></i> Autoriza</asp:LinkButton>
+            </li>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
+
+    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+
+            <div class="portlet solid  grey-cascade portlet-filter">
+                <div class="portlet-title portlet-filterT smalltitle">
+                    <div class="titlefiltros  caption">
+                        <div class="row">
+                            <label class="col-md-1">Ejercicio: </label>
+                            <div class="col-md-1">
+                                <asp:DropDownList ID="DdlEjercicios" runat="server" Style="width: 100% !important;" CssClass="select2me" DataValueField="Ejercicio" DataTextField="Ejercicio"></asp:DropDownList>
+                            </div>
+                            <div class="col-md-1">
+                                <asp:LinkButton ID="LnkConsultar" OnClick="LnkConsultar_Click" runat="server" Text="Calcular" class="btn btn-primary" />
+
+                            </div>
+
+                        </div>
+                    </div>
+                    <div class="tools">
+                        <%--<a href="javascript:;" class="expand" data-original-title="" title=""></a>--%>
+                    </div>
+                </div>
+                <div class="portlet-body" style="display: none">
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+    <asp:UpdatePanel ID="upDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:GridView ID="GVCalculoISRAnual" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD GVCalculoISRAnual Widthall" AutoGenerateColumns="False"
+                DataKeyNames="CvePersonal,Codigo,NombreCompleto,TipoIngreso,FechaInicio,IngresosTotales,BaseGravada,Deducciones,ISRRetenido,Art152,SubsCorrespondiente,LimiteInferior,LimiteSuperior,CuotaFija,Porcentaje,ImpuestoAnual,Acargo,Acompensar">
                 <Columns>
+                    <asp:TemplateField HeaderText="Aplica">
+                        <ItemTemplate>
+                            <%# Eval("Aplica").ToString() =="1" ?"✓" :"✘" %>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField HeaderText="">
+                        <ItemTemplate>
+                            <asp:LinkButton ID="LnkAplicar" Visible='<%# Eval("Aplica").ToString() =="0"%>' OnClick="LnkAplicar_Click" CssClass="btn btn-circle btn-sm green " runat="server" data-toggle="confirmation" data-popout="true" data-original-title="AgregarEmpleado al calculo anual" data-btn-ok-label="si"> +</asp:LinkButton>
+                            <asp:LinkButton ID="LnkCancelar" Visible='<%# Eval("Aplica").ToString() =="1"%>' OnClick="LnkCancelar_Click" CssClass="btn btn-circle btn-sm red " runat="server"> -</asp:LinkButton>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField HeaderText="Causa">
+                        <ItemTemplate>
+                            <asp:Label runat="server" Text='<%# Eval("Causa")%>'> </asp:Label>
+                        </ItemTemplate>
+                    </asp:TemplateField>
                     <asp:TemplateField HeaderText="Código">
                         <ItemTemplate>
                             <asp:Label ID="lblcodigo" runat="server" Text='<%# Eval("Codigo")%>'> </asp:Label>
@@ -38,47 +92,52 @@
                             <asp:Label ID="lblnombreCompleto" runat="server" Text='<%# Eval("NombreCompleto")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Tipo Ingreso">
+                    <asp:TemplateField HeaderText="Tipo ingreso">
                         <ItemTemplate>
                             <asp:Label ID="lblfechaInicio" runat="server" Text='<%# string.Format("{0} - {1:dd/MM/yyyy}",Eval("TipoIngreso"), Eval("FechaInicio"))%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Ingresos Totales">
+                    <asp:TemplateField HeaderText="Ingresos totales">
                         <ItemTemplate>
                             <asp:Label ID="lblingresosTotales" runat="server" Text='<%# Eval("IngresosTotales","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Base Gravada">
+                    <asp:TemplateField HeaderText="Base gravada">
                         <ItemTemplate>
-                            <asp:Label ID="lblbaseGravada" runat="server" Text='<%# Eval("BaseGravada","{0:N2}")%>'> </asp:Label>
+                            <asp:Label runat="server" Text='<%# Eval("BaseGravada","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="ISRRetenido">
+                    <asp:TemplateField HeaderText="Base exenta">
+                        <ItemTemplate>
+                            <asp:Label runat="server" Text='<%# Eval("BaseExcenta","{0:N2}")%>'> </asp:Label>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField HeaderText="ISR retenido">
                         <ItemTemplate>
                             <asp:Label ID="lbliSRRetenido" runat="server" Text='<%# Eval("ISRRetenido","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Art152">
+                    <asp:TemplateField HeaderText="Art 152">
                         <ItemTemplate>
                             <asp:Label ID="lblart152" runat="server" Text='<%# Eval("Art152","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Subs Correspondiente">
+                    <asp:TemplateField HeaderText="Subs. correspondiente">
                         <ItemTemplate>
                             <asp:Label ID="lblsubsCorrespondiente" runat="server" Text='<%# Eval("SubsCorrespondiente","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Impuesto Anual">
+                    <asp:TemplateField HeaderText="Impuesto anual">
                         <ItemTemplate>
                             <asp:Label ID="lblimpuestoAnual" runat="server" Text='<%# Eval("ImpuestoAnual","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Acargo">
+                    <asp:TemplateField HeaderText="A cargo">
                         <ItemTemplate>
                             <asp:Label ID="lblacargo" runat="server" Text='<%# Eval("Acargo","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField HeaderText="Acompensar">
+                    <asp:TemplateField HeaderText="A compensar">
                         <ItemTemplate>
                             <asp:Label ID="lblacompensar" runat="server" Text='<%# Eval("Acompensar","{0:N2}")%>'> </asp:Label>
                         </ItemTemplate>
@@ -89,7 +148,72 @@
     </asp:UpdatePanel>
 
 
+    <div id="DModalcancelarEmpleado" class="modal ADS fade" role="dialog">
+        <asp:UpdatePanel ID="UpModalPersonalAplica" class="modal-dialog" tabindex="-1" runat="server" UpdateMode="Conditional">
+            <ContentTemplate>
+                <div class="modal-content rowpadding">
+                    <div class="modal-header">
+                        <button type="button" class="close" data-dismiss="modal" aria-label="Close">
+                            <span aria-hidden="true">&times;</span>
+                        </button>
+                        <h4 class="modal-title" runat="server" style="text-align: left">Omitir empleado</h4>
+                    </div>
+                    <div class="modal-body">
+
+                        <div class="form-group form-md-line-input input-iconright">
+                            <asp:TextBox CssClass="form-control" ID="TxtMotivo" runat="server" Text=""></asp:TextBox>
+                            <asp:Label runat="server" AssociatedControlID="TxtMotivo" Text="Motivo"></asp:Label>
+                        </div>
+                    </div>
+
+                    <div class="modal-footer">
+                        <asp:UpdatePanel runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>
+                                <asp:LinkButton ID="LnkGuardarCancelarAplica" OnClick="LnkGuardarCancelarAplica_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+                    </div>
+                </div>
+            </ContentTemplate>
+        </asp:UpdatePanel>
+    </div>
+
+    <div id="DModalAutoriza" class="modal ADS fade" role="dialog">
+        <asp:UpdatePanel ID="UpAutorizaCalculo" class="modal-dialog" tabindex="-1" runat="server" UpdateMode="Conditional">
+            <ContentTemplate>
+                <div class="modal-content rowpadding">
+                    <div class="modal-header">
+                        <button type="button" class="close" data-dismiss="modal" aria-label="Close">
+                            <span aria-hidden="true">&times;</span>
+                        </button>
+                        <h4 class="modal-title" runat="server" style="text-align: left">Autoriza calculo anual</h4>
+                    </div>
+                    <div class="modal-body">
+
+                        <div class="form-group form-md-line-input input-iconright">
+                            <asp:Label runat="server" Text="Concepto a cargo:" AssociatedControlID=""></asp:Label>
+                            <asp:DropDownList ID="DdlConceptoCargo" runat="server" DataTextField="CodigoConcepto" DataValueField="CveConcepto" Class="form-control input-sm select2me" Width="100%" ValidationGroup="GrpGuardar"></asp:DropDownList>
+                        </div>
+                        <div class="form-group form-md-line-input input-iconright">
+                            <asp:Label runat="server" Text="Concepto a compensar:" AssociatedControlID=""></asp:Label>
+                            <asp:DropDownList ID="DdlConceptoCompensar" runat="server" DataTextField="CodigoConcepto" DataValueField="CveConcepto" Class="form-control input-sm select2me" Width="100%" ValidationGroup="GrpGuardar"></asp:DropDownList>
+                        </div>
+                    </div>
+
+                    <div class="modal-footer">
+                        <asp:UpdatePanel runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>
+                                <asp:LinkButton ID="LnkAutoriza" OnClick="LnkAutoriza_Click" CssClass="btn btn-primary" runat="server">Autorizar</asp:LinkButton>
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+                    </div>
+                </div>
+            </ContentTemplate>
+        </asp:UpdatePanel>
+    </div>
+
+
 </asp:Content>
-<asp:Content ID="Content8" ContentPlaceHolderID="JS" Runat="Server">
+<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
 </asp:Content>
 

Nomina/CalculoISRAnual.aspx.cs

@@ -1,25 +1,57 @@
 using System;
 using System.Collections.Generic;
+using System.Data;
 using System.Linq;
 using System.Web;
 using System.Web.UI;
 using System.Web.UI.WebControls;
+using System.Xml.Linq;
+using Extensiones;
 
 public partial class Nomina_CalculoISRAnual : ClsPaginas
 {
+
+    protected int CvePersonal
+    {
+        get
+        {
+            if (ViewState["CvePersonal"] == null) { return 0; }
+            else { return ViewState["CvePersonal"].ToString().ToEntero(); }
+        }
+
+        set { ViewState["CvePersonal"] = value; }
+    }
+
     protected void Page_Load(object sender, EventArgs e)
     {
         if (!IsPostBack)
         {
+            cargaddls();
             CargaCalculoISRAnual();
         }
     }
+    public void cargaddls()
+    {
+
+        DataTable dtejercicio = new DataTable();
+        using (ClsNominas objnom = new ClsNominas())
+        {
+            if (objnom.GetEjercicios(UsuarioActual.CveEmpresa))
+            {
+                dtejercicio = objnom.DtResultados;
+            }
+        }
+        DdlEjercicios.DataSource = dtejercicio;
+        DdlEjercicios.DataBind();
+        string anio = DateTime.Now.Year.ToString();
+        DdlEjercicios.SelectedValueExistInsert(anio, anio);
+    }
 
     protected void CargaCalculoISRAnual()
     {
         using (ClsNominas onom = new ClsNominas())
         {
-            onom.CalculoISRAnual(2021, UsuarioActual.Empresa.CveEmpresa);
+            onom.CalculoISRAnual(DdlEjercicios.SelectedValue.ToEntero(), UsuarioActual.Empresa.CveEmpresa);
             GVCalculoISRAnual.DataSource = onom.DtResultados;
 
         }
@@ -27,8 +59,185 @@ public partial class Nomina_CalculoISRAnual : ClsPaginas
         upDatos.Update();
     }
 
+    protected void LnkConsultar_Click(object sender, EventArgs e)
+    {
+        CargaCalculoISRAnual();
+    }
     protected void LnkdownExcel_Click(object sender, EventArgs e)
     {
 
+
+        //DataTable dtCon = generateTable("\r\n");
+
+
+        ClosedXML.Excel.XLWorkbook wb = new ClosedXML.Excel.XLWorkbook();
+        var libro = wb.AddWorksheet("Asistencia");
+        int column = 1;
+
+        int row = 1;
+
+        libro.Cell(row, column++).Value = "Aplica";
+        libro.Cell(row, column++).Value = "Causa";
+        libro.Cell(row, column++).Value = "Código";
+        libro.Cell(row, column++).Value = "Nombre";
+        libro.Cell(row, column++).Value = "Tipo ingreso";
+        libro.Cell(row, column++).Value = "Ingresos totales";
+        libro.Cell(row, column++).Value = "Base gravada";
+        libro.Cell(row, column++).Value = "Base exenta";
+        libro.Cell(row, column++).Value = "ISR retenido";
+        libro.Cell(row, column++).Value = "Art 152";
+        libro.Cell(row, column++).Value = "Subs. Correspondiente";
+        libro.Cell(row, column++).Value = "Impuesto anual";
+        libro.Cell(row, column++).Value = "A cargo";
+        libro.Cell(row, column++).Value = "A compensar";
+        libro.Range(row, 1, row, column - 1).CellsUsed().Style.Font.FontColor = ClosedXML.Excel.XLColor.White;
+        libro.Range(row, 1, row, column - 1).CellsUsed().Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(79, 129, 189));
+        row++;
+        using (ClsNominas onom = new ClsNominas())
+        {
+            if (onom.CalculoISRAnual(DdlEjercicios.SelectedValue.ToEntero(), UsuarioActual.Empresa.CveEmpresa) && onom.DtResultados.Rows.Count > 0)
+            {
+                foreach (DataRow drow in onom.DtResultados.Rows)
+                {
+
+                    column = 1;
+                    libro.Cell(row, column++).Value = drow["Aplica"].ToString()=="1"?"Si":"No";
+                    libro.Cell(row, column++).Value = drow["causa"];
+                    libro.Cell(row, column++).Value = drow["Codigo"];
+                    libro.Cell(row, column++).Value = drow["NombreCompleto"];
+                    libro.Cell(row, column++).Value = string.Format("{0} - {1:dd/MM/yyyy}", drow["TipoIngreso"], drow["FechaInicio"]);
+                    libro.Cell(row, column++).Value = drow["IngresosTotales"];
+                    libro.Cell(row, column++).Value = drow["BaseGravada"];
+                    libro.Cell(row, column++).Value = drow["BaseExcenta"];
+                    libro.Cell(row, column++).Value = drow["ISRRetenido"];
+                    libro.Cell(row, column++).Value = drow["Art152"];
+                    libro.Cell(row, column++).Value = drow["SubsCorrespondiente"];
+                    libro.Cell(row, column++).Value = drow["ImpuestoAnual"];
+                    libro.Cell(row, column++).Value = drow["Acargo"];
+                    libro.Cell(row, column++).Value = drow["Acompensar"];
+                    row++;
+                }
+            }
+        }
+
+        libro.SheetView.Freeze(1, 4);
+        libro.ColumnsUsed().AdjustToContents();
+        libro.Range(1, 6, 1, column).Style.Alignment.Horizontal = ClosedXML.Excel.XLAlignmentHorizontalValues.Center;
+        libro.Range(2, 6, row, column).Style.Alignment.Horizontal = ClosedXML.Excel.XLAlignmentHorizontalValues.Right;
+        libro.Range(2, 6, row, column).SetDataType(ClosedXML.Excel.XLDataType.Number);
+        libro.Range(2, 6, row, column).Style.NumberFormat.Format = "$#,###,###,###,###,###,0.00";
+
+
+        System.IO.Stream fs = new System.IO.MemoryStream();
+        wb.SaveAs(fs);
+        fs.Position = 0;
+        System.IO.MemoryStream memoryStream = new System.IO.MemoryStream();
+        using (System.IO.Stream input = fs)
+
+        {
+            input.CopyTo(memoryStream);
+        }
+        memoryStream.Position = 0;
+
+        Response.Clear();
+        Response.Buffer = true;
+
+        Response.ContentType = "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet";
+        Response.AddHeader("content-disposition", string.Format("attachment;filename={0}.xlsx", "Calculo Anual"));
+        Response.BinaryWrite(memoryStream.ToArray());
+        Response.End();
+    }
+
+
+    protected void LnkAplicar_Click(object sender, EventArgs e)
+    {
+        GridViewRow gvrow = (GridViewRow)(((LinkButton)sender).NamingContainer);
+        CvePersonal = gvrow.DataKey("CvePersonal").ToString().ToEntero();
+        using (ClsNominas onom = new ClsNominas())
+        {
+            if (onom.PersonalAplicaCalculoAnual(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, CvePersonal, 1, ""))
+            {
+                Alert("El empleado sera incluido al calculo anual");
+                CargaCalculoISRAnual();
+            }
+        }
+    }
+
+    protected void LnkCancelar_Click(object sender, EventArgs e)
+    {
+        GridViewRow gvrow = (GridViewRow)(((LinkButton)sender).NamingContainer);
+        CvePersonal = gvrow.DataKey("CvePersonal").ToString().ToEntero();
+        RegistraScript("$('#DModalcancelarEmpleado').modal();");
+    }
+
+    protected void LnkGuardarCancelarAplica_Click(object sender, EventArgs e)
+    {
+        using (ClsNominas onom = new ClsNominas())
+        {
+            if(onom.PersonalAplicaCalculoAnual(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, CvePersonal, 0, TxtMotivo.Text))
+            {
+                Alert("El empleado sera omitido del calculo anual");
+                RegistraScript("$('#DModalcancelarEmpleado').modal('hide');");
+                CargaCalculoISRAnual();
+            }
+        }
+    }
+
+    protected void LnkOpenModalAutoriza_Click(object sender, EventArgs e)
+    {
+        using(ClsNominas onom = new ClsNominas())
+        {
+            if (onom.GetConceptos(UsuarioActual.CveEmpresa, "-1", -1, -1, -1))
+            {
+                DdlConceptoCargo.DataSource = onom.DtResultados;
+                DdlConceptoCompensar.DataSource = onom.DtResultados;
+                DdlConceptoCargo.DataBind();
+                DdlConceptoCompensar.DataBind(); 
+                DataRow drow = onom.DtResultados.FiltroPrimero(string.Format("CveSistema ={0}",46));
+                if (drow != null)
+                {
+                    DdlConceptoCargo.SelectedValueExist(drow["CveConcepto"]);
+                }
+                drow = null; drow = onom.DtResultados.FiltroPrimero(string.Format("CveSistema ={0}", 49));
+                if (drow != null)
+                {
+                    DdlConceptoCompensar.SelectedValueExist(drow["CveConcepto"]);
+                } 
+            }
+        }
+        RegistraScript("$('#DModalAutoriza').modal();");
+        UpAutorizaCalculo.Update();
+    }
+
+    protected void LnkAutoriza_Click(object sender, EventArgs e)
+    {
+        bool continuar = true;
+
+
+        System.Xml.Linq.XDocument xmlarchivos = new System.Xml.Linq.XDocument();
+        XElement xfolder = new XElement("personal");
+        foreach (GridViewRow item in GVCalculoISRAnual.Rows )
+        {
+            XElement xempleado = new XElement("empleado");
+            xempleado.SetAttributeValue("CvePersonal", item.DataKey("CvePersonal"));
+            xempleado.SetAttributeValue("ACarago", item.DataKey("Acargo"));
+            xempleado.SetAttributeValue("ACompensar", item.DataKey("Acompensar"));
+
+            xfolder.Add(xempleado);
+        }
+        xmlarchivos.Add(xfolder); 
+        string xmlpeople= xmlarchivos.ToString();
+
+        using (ClsNominas onom = new ClsNominas())
+        {
+            continuar = onom.AutorizaCalculoAnual(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, xmlpeople);
+        }
+        if (continuar)
+        {
+            Alert("El calculo a sido autorizado");
+            RegistraScript("$('#DModalAutoriza').modal('hide');");
+        }
+
+        RegistraScript(string.Format("console.log('{0}');debugger", xmlpeople));
     }
 }

RH/CalculoSBC.aspx.cs

@@ -154,7 +154,8 @@ public partial class RH_CalculoSBC : ClsPaginas
                 double SalarioDiarioSSNuevo = Math.Round(item.DataKey("SalarioDiarioSSNuevo").ToDouble(), 2);
                 double SalarioVariableNuevo = item.DataKey("SalarioVariableNuevo").ToDouble();
                 double SalarioDiarioSS = Math.Round(item.DataKey("SalarioDiarioSS").ToDouble(), 2);
-                if (continuar && SalarioDiarioSSNuevo != SalarioDiarioSS && (continuar = objrh.UpdateSalarios(CvePersonal, fecha, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, SalarioDiario, SDINuevo, SalarioDiarioSSNuevo, SalarioDiario)))
+                if (continuar && SalarioDiarioSSNuevo != SalarioDiarioSS && 
+                    (continuar = objrh.UpdateSalarios(CvePersonal, fecha, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, SalarioDiario, SDINuevo, SalarioDiarioSSNuevo, SalarioDiario)))
                 {
 
                 }