This commit is contained in:
Raúl Pimienta
2021-12-31 02:55:15 -07:00
20 changed files with 1095 additions and 416 deletions

View File

@@ -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

View File

@@ -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,

View File

@@ -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

View File

@@ -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;" />
<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>
<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}')", 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">

Binary file not shown.

View File

@@ -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>

View File

@@ -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

View File

@@ -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)

View File

@@ -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>
<Width>1.39456in</Width>
<Height>2.38455cm</Height>
<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>
<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>
<FontSize>8pt</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>
<FontWeight>SemiBold</FontWeight>
<FontSize>8pt</FontSize>
<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>
<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>
<FontSize>8pt</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>
<Left>11.9387cm</Left>
<Top>8.35197cm</Top>
<Left>6.8587cm</Left>
<Height>0cm</Height>
<Width>5.19875cm</Width>
<ZIndex>8</ZIndex>
<Width>6.65396cm</Width>
<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>
<Left>11.9387cm</Left>
<Top>8.52836cm</Top>
<Left>6.8587cm</Left>
<Height>0.6cm</Height>
<Width>5.19875cm</Width>
<ZIndex>9</ZIndex>
<Width>6.65396cm</Width>
<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>
<Left>0.17767in</Left>
<Height>4.422in</Height>
<Width>7.87128in</Width>
<Top>7.49312in</Top>
<Left>0.20879in</Left>
<Height>3.59384in</Height>
<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>
<Height>1.62208in</Height>
<Left>4.36025cm</Left>
<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>
<Left>0.03589in</Left>
<Top>3.82538in</Top>
<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>
<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>
<Value>= IIF(Parameters!Tipo.Value = "INGRESO","FACTURA","NOTA DE CRÉDITO")</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>
<Left>0.10282cm</Left>
<Top>9.51148cm</Top>
<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>
<Left>0.13457cm</Left>
<Top>12.974cm</Top>
<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>
<Left>0.09116cm</Left>
<Top>15.53176cm</Top>
<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>
<Left>0.13457cm</Left>
<Height>0.34219cm</Height>
<Top>8.39473cm</Top>
<Height>1.07794cm</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>
<Left>0.08425cm</Left>
<Height>2.5433cm</Height>
<Width>4.13cm</Width>
<Top>0.12756cm</Top>
<Left>0.15969cm</Left>
<Height>2.38455cm</Height>
<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>

View File

@@ -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>
<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>
<rd:DefaultName>Envase</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">
<DataField>TipoTransaccionAbrev</DataField>
<Field Name="NoPallets">
<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">
<DataField>Folio</DataField>
<Field Name="Envase">
<DataField>Envase</DataField>
<rd:TypeName>System.String</rd:TypeName>
</Field>
<Field Name="FechaDocumento">
<DataField>FechaDocumento</DataField>
<Field Name="Cultivo">
<DataField>Cultivo</DataField>
<rd:TypeName>System.String</rd:TypeName>
</Field>
<Field Name="PagueseA">
<DataField>PagueseA</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>
<Field Name="CultivoVariedad">
<DataField>CultivoVariedad</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">

View File

@@ -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

View File

@@ -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>

View File

@@ -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

View File

@@ -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

View File

@@ -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
})
For Each oc In resultsOC
If oc.Cantidad < oc.CantidadOC Then
MensajeOC.AppendFormat("- {0}</br>", oc.PS)
If Not ObjOC.UpdateOrdenCompraDetalleDivideCantidad(CveOCSurtir, oc.CveOCDetalle, oc.Cantidad, UsuarioActual.CveUsuario) Then
ErrorMovInv = True
End If
End If
Next
'comentado para subir versión, dividirOC
'For Each oc In resultsOC
' If oc.Cantidad < oc.CantidadOC Then
' MensajeOC.AppendFormat("- {0}</br>", oc.PS)
' If Not ObjOC.UpdateOrdenCompraDetalleDivideCantidad(CveOCSurtir, oc.CveOCDetalle, oc.Cantidad, UsuarioActual.CveUsuario) Then
' ErrorMovInv = True
' End If
' End If
'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

View File

@@ -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%" />

View File

@@ -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
If UsuarioActual.CveEmpresa = 140 Then
Dim CveSubProyecto As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero
''codigo temporal
'If UsuarioActual.CveEmpresa = 140 Then
' Dim CveSubProyecto As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen = {DdlAlmacenOrigen.SelectedValue}").ToEntero
If Not CveSubProyecto.Contiene(11793, 11993, 11794, 11795) Then
AplicaSerie = False
End If
' If Not CveSubProyecto.Contiene(11793, 11993, 11794, 11795, 12010, 12011) Then
' AplicaSerie = False
' 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,
CveMovimientoAlmacen:=CveMovimientoSalidaTransitorio, ImporteMX:=ImporteDecimal, Contabilizable:=False) Then
ErrorMovInv = True
TextoError = "Ocurrió un erro al cancelar el traspaso"
If CveMovimientoSalidaTransitorio > 0 Then
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteDecimal, TxtObservaciones.Text, 68, TxtObservaciones.Text, Fecha, IdCtaContable, -1,
CveMovimientoAlmacen:=CveMovimientoSalidaTransitorio, ImporteMX:=ImporteDecimal, Contabilizable:=False) Then
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

View File

@@ -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">
<style >
.GVCalculoISRAnual tr td:nth-child(n+4){
text-align :right;
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.GVCalculoISRAnual tr td:nth-child(n+6) {
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: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" >
<asp:UpdatePanel ID="UpdatePanel1" 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">
<li>
<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>

View File

@@ -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));
}
}

View File

@@ -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)))
{
}