diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb index 5a6526ea1..4899c1242 100644 --- a/App_Code/ClsContPAQi.vb +++ b/App_Code/ClsContPAQi.vb @@ -1162,6 +1162,8 @@ Public Class ClsContPAQi StrSQL.AppendLine("") StrSQL.AppendLine(" BEGIN TRY") StrSQL.AppendLine("") + StrSQL.AppendLine(" SET ARITHABORT ON; ") + StrSQL.AppendLine("") StrSQL.AppendLine(" CREATE TABLE #TablaContable (") StrSQL.AppendLine(" Id INT,") StrSQL.AppendLine(" IdPoliza INT,") diff --git a/App_Code/ClsMovimientos.vb b/App_Code/ClsMovimientos.vb index 03ccd11b5..813d87af3 100644 --- a/App_Code/ClsMovimientos.vb +++ b/App_Code/ClsMovimientos.vb @@ -723,7 +723,8 @@ Public Class ClsMovimientos Public Function GetCxPPeriodo(CveProveedor As Integer, CveSubProyecto As Integer, CveClasificacion As Integer, CveUsuarioResponsable As Integer, CveUsuarioRegistro As Integer, CveEstatus As Integer, CveEmpresa As Integer, Gpo As Integer, CveSucursal As Integer, - TipoCambio As Integer, TCEspecifico As Double, FechaCorte As Date, CveUsuarioConsulta As Integer, CveTipoProveedor As Integer) As Boolean + TipoCambio As Integer, TCEspecifico As Double, FechaCorte As Date, CveUsuarioConsulta As Integer, CveTipoProveedor As Integer, + Optional TipoDocto As String = "-1", Optional CveMoneda As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Comp_RepCxPPeriodo") With SqlAdapter.SelectCommand.Parameters @@ -740,6 +741,8 @@ Public Class ClsMovimientos .Add("@FechaCorte", SqlDbType.Date).Value = FechaCorte .Add("@CveUsuarioConsulta", SqlDbType.Int).Value = CveUsuarioConsulta .Add("@CveTipoProveedor", SqlDbType.Int).Value = CveTipoProveedor + .Add("@TipoDocto", SqlDbType.VarChar).Value = TipoDocto + .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda End With Try SqlAdapter.Fill(Data) diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 73bf24f1a..aa5b2d3d0 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -3238,6 +3238,27 @@ Public Class ClsNominas End Function #End Region #End Region + + + + Public Function GetLayoutAltaBanorte(CvePeriodo As Integer, CveEmpresa As Integer) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_Nom_Dispersionnomina", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CvePeriodo", SqlDbType.Int).Value = CvePeriodo + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + End With + Try + SqlAdapter.Fill(Data) + retorno = True + Catch ex As Exception + OnError("Ocurrió un error al obtener el layout de nominas.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function + + + #Region "IDisposable Support" ' IDisposable Protected Overridable Sub Dispose(ByVal disposing As Boolean) diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index d1103d1dc..928349284 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -7153,8 +7153,11 @@ Public Class ClsPaginas 'DATOS GENERALES + If UsuarioActual.CveEmpresa.Contiene(15) Then + params.Add(New ReportParameter("CP", UsuarioActual.Empresa.CP.ToString)) + End If + - 'params.Add(New ReportParameter("CP", UsuarioActual.Empresa.CP.ToString)) params.Add(New ReportParameter("Observaciones", Vta.Observaciones)) params.Add(New ReportParameter("CveVendedor", Vta.CveVendedor.ToString)) params.Add(New ReportParameter("Status", Vta.EstatusFactura)) diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx index 248704414..6a595d10c 100644 --- a/Ashx/SIGWeb.ashx +++ b/Ashx/SIGWeb.ashx @@ -761,6 +761,8 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState Dim EsDistribuidor As Integer = IfNull(context.Request("esdistribuidor"), "-1").ToString.ToEntero + Dim cveclienteclasificacion = IfNull(context.Request("cveclienteclasificacion"), "-1").ToString.ToEntero + Dim usuario As Usuario = UsuarioActual(context) Dim CveEmpresa As String If IsNothing(usuario) Then @@ -772,7 +774,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState 'sino existe, recarga los datos If context.Application(AppNombre) Is Nothing Then Dim ObjClientes As New ClsClientes - If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, CveEmpresa, Estatus:=-1) Then + If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, CveEmpresa, Estatus:=-1, CveClienteClasificacion:=cveclienteclasificacion) Then context.Application(AppNombre) = ObjClientes.DtResultados End If ObjClientes.Dispose() diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx index b1b59b727..028df676e 100644 --- a/Bancos/DepositosCaja.aspx +++ b/Bancos/DepositosCaja.aspx @@ -104,7 +104,8 @@ - + + @@ -281,9 +282,10 @@ + - + @@ -653,6 +655,32 @@ ComisionIntermediario = 0; } + + + function SelectorNotas(Chk) { + + + $(`.CssSelector input[type=checkbox]`).each(function () { + + if (Chk.checked) { + + if (! $(this).prop('checked')) { + $(this).click(); + } + + + } else { + + if ($(this).prop('checked')) { + $(this).click(); + } + } + + + }); + + } + diff --git a/Bancos/IE.aspx b/Bancos/IE.aspx index 4ed0fa810..60a92a6c8 100644 --- a/Bancos/IE.aspx +++ b/Bancos/IE.aspx @@ -215,6 +215,19 @@ + + +
+ + + + + +
+ + + +
diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb index 03f75a6a1..eb50c7db8 100644 --- a/Bancos/IE.aspx.vb +++ b/Bancos/IE.aspx.vb @@ -843,6 +843,9 @@ Partial Class Bancos_IE DdlMotivoCancelacion.DataBind() DdlMotivoCancelacion.Items.Insert(0, New ListItem("Seleccione uno", "-1")) + If UsuarioActual.Empresa.UsaAC Then + DvFolioACCondiciones.Visible = True + End If End If End Sub @@ -861,6 +864,8 @@ Partial Class Bancos_IE End Try + + CveIEDeposito = ObjIE.DtResultados(0)("CveIEDepositoPadre").ToString.ToEntero CuentaDepositoPadre = ObjIE.DtResultados(0)("CuentaDepositoPadre").ToString Cuenta = ObjIE.DtResultados(0)("NumCuenta").ToString diff --git a/Bancos/RepIngresosPorComprobar.aspx b/Bancos/RepIngresosPorComprobar.aspx index 3bbaeab4d..f3f6b3b13 100644 --- a/Bancos/RepIngresosPorComprobar.aspx +++ b/Bancos/RepIngresosPorComprobar.aspx @@ -32,9 +32,10 @@
  • Cliente: - + <%-- - + --%> +
  •  F.I.: diff --git a/Bancos/RepIngresosPorComprobar.aspx.vb b/Bancos/RepIngresosPorComprobar.aspx.vb index fbafecc6f..ad3c68233 100644 --- a/Bancos/RepIngresosPorComprobar.aspx.vb +++ b/Bancos/RepIngresosPorComprobar.aspx.vb @@ -27,8 +27,17 @@ Partial Class Bancos_RepIngresosPorComprobar Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load If Not Page.IsPostBack Then - 'DdlProveedores.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa) - 'DdlProveedores.DataBind() + + + Dim EsWS = If(UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1", True, False) + If EsWS Then + DdlClientes.setEsWebService(True) + Else + DdlClientes.setEsWebService(False) + DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1) + DdlClientes.DataBind() + DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1")) + End If If UsuarioActual.TienePermisoProceso(91) Then @@ -58,15 +67,16 @@ Partial Class Bancos_RepIngresosPorComprobar If txtFechaI.Text <> "" Then FechaI = txtFechaI.Text Else FechaI = "-1" If txtFechaF.Text <> "" Then FechaF = txtFechaF.Text Else FechaF = "-1" + Dim CveCliente As Integer = If(DdlClientes.SelectedValue = "", -1, DdlClientes.SelectedValue.ToEntero) - If Mov.GetIngresosPorComprobar(FechaI, FechaF, DdlClientes.SelectedValue.ToEntero, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlMoneda.SelectedValue.ToEntero, If(ChkSaldo.Checked, 1, 0), UsuarioActual.CveEmpresa) Then + If Mov.GetIngresosPorComprobar(FechaI, FechaF, CveCliente, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlMoneda.SelectedValue.ToEntero, If(ChkSaldo.Checked, 1, 0), UsuarioActual.CveEmpresa) Then DtDatos = Mov.DtResultados CargaGrid("") UPDatos.Update() End If - If Mov.GetIngresosAnticiposPorComprobar(FechaI, FechaF, DdlClientes.SelectedValue.ToEntero, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlMoneda.SelectedValue.ToEntero, If(ChkSaldo.Checked, 1, 0), UsuarioActual.CveEmpresa) Then + If Mov.GetIngresosAnticiposPorComprobar(FechaI, FechaF, CveCliente, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlMoneda.SelectedValue.ToEntero, If(ChkSaldo.Checked, 1, 0), UsuarioActual.CveEmpresa) Then DtAnticipos = Mov.DtResultados CargaGrid("") UpAnt.Update() @@ -77,13 +87,26 @@ Partial Class Bancos_RepIngresosPorComprobar End Sub Protected Sub BtnCargarProveedores_Click(sender As Object, e As System.EventArgs) Handles BtnCargarClientes.Click - DdlClientes.CssClass += " select2me" - DdlClientes.Items.Clear() - DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa) - DdlClientes.DataBind() - DdlClientes.Items.Insert(0, New ListItem("Todos", "-1")) - DdlClientes.Attributes.Remove("onclick") + + Dim EsWS = If(UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1", True, False) + If EsWS Then + DdlClientes.setEsWebService(True) + Else + DdlClientes.setEsWebService(False) + DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1) + DdlClientes.DataBind() + DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1")) + End If + + + 'DdlClientes.CssClass += " select2me" + 'DdlClientes.Items.Clear() + 'DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa) + + 'DdlClientes.DataBind() + 'DdlClientes.Items.Insert(0, New ListItem("Todos", "-1")) + 'DdlClientes.Attributes.Remove("onclick") End Sub diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index 8a0a810b3..3c67875f7 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -3367,6 +3367,47 @@ Partial Class Compras_Compras DdlRetIVAConcepto.SelectedValueExist("2") ' flete pf DdlRetIVAConcepto.SelectedValueExist("3") ' fletes pm DdlRetISRConcepto.SelectedValueExist("1") ' honorarios + ElseIf ObjProveedor.DIOTCveTipoOperacion = 0 Then + + + If CveFactura > 0 Then + + If RetIVAOriginal > 0 Then + Dim CalRetIVAPor As Decimal = (RetIVAOriginal * 1 / SubTotal2Original).RoundAD(6).ToDecimal + + If (CalRetIVAPor).RoundAD(6) = 0.106667 Then + DdlRetIVAConcepto.SelectedValueExist("1") '10.66 servicios profecionales + End If + + If (CalRetIVAPor).RoundAD(2) = 0.04 Then '4 Fletes + + If RFCProv.Length = 13 Then + DdlRetIVAConcepto.SelectedValueExist("2") + Else + DdlRetIVAConcepto.SelectedValueExist("3") + End If + + + End If + + End If + + If RetISROriginal > 0 Then + + Dim CalRetISRPor As Decimal = (RetISROriginal * 1 / SubTotal2Original).RoundAD(5).ToDecimal + + If (CalRetISRPor).RoundAD(1) = 0.1 Then '10 Sercviios profecionales + DdlRetISRConcepto.SelectedValueExist("1") + End If + + If (CalRetISRPor).RoundAD(4) = 0.0125 Then '1.25 Recico regimen simplificado confianza + DdlRetISRConcepto.SelectedValueExist("3") + End If + + End If + + End If + End If LbAgregar.Enabled = True @@ -10762,7 +10803,7 @@ Partial Class Compras_Compras 'End If 'AGREGA MOVIMIENTO - If importeMovimiento <> 0 Then + If importeMovimiento <> 0 AndAlso Not DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV", "Ant") Then Concepto = $"{NombreProveedor} {TxtSerie.Text} - {TxtFolio.Text}" If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, 6, Concepto, FechaMovimiento, IdCtaContable, IdSegmentoNegocio, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, CveIE:=CveIE, CveCreditoDetalle:=CveCreditoDetalle, CveClasificacion:=Row2("CveClasificacion").ToString.ToEntero, CveSubProyecto:=Row2("CveSubProyecto").ToString.ToEntero, ImporteMX:=importeMN, ImporteME:=If(tipoCambioActual = 1, 0, importeMovimiento), CveTipoGasto:=Row2("CveTipoGasto").ToString.ToEntero) Then ErrorPrepoliza = True diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index 156070172..70fed873b 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -205,9 +205,13 @@ Partial Class PopUpVerFactura If Request("onlyPrint").ToString() = "PalletCaja" Then imprimirpallet(Request("CvePallet").ToString.ToEntero()) End If + If Request("onlyPrint").ToString() = "manifiesto" Then imprimirManifiesto(Request("cveEmbarqueManifiesto").ToString.ToEntero()) End If + If Request("onlyPrint").ToString() = "manifiestoRemision" Then + imprimirManifiestoRemision(Request("cveEmbarqueManifiesto").ToString.ToEntero()) + End If End If End If @@ -330,6 +334,150 @@ Partial Class PopUpVerFactura '"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc" ImprimirPDF("GPS/EmbarqueManifiesto.rdlc", lrds, params, "Manifesto") End Sub + + + Private Sub imprimirManifiestoRemisionRemision(cveEmbarqueManifiesto As Integer) + Dim NoEmbarque As String = "" + Dim Fecha As String = "" + 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 Mercado As String = "" + Dim NoFactura As String = "" + Dim DivisoresdeCarton As String = "" + Dim BolsasdePlastico As String = "" + Dim TapaderasdeCarton As String = "" + Dim CAJASDECARTON As String = "" + Dim RPC As String = "" + Dim BINSDECARTON As String = "" + Dim TotalDlls As String = "" + + + + Dim LongitudCaja As String = "" + Dim LineaTransportacion As String = "" + Dim SCAC As String = "" + Dim CAAT As String = "" + Dim NumeroTrailer As String = "" + + + Dim tablaReporte As New DataTable + + 'Envase = "1 1/9" + 'Tamano = "Small" + 'Cultivo = "Tomate" + 'noPallet = "000001" + 'Variedad = "Golden" + Using objnom As New ClsNominas + 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 = String.Format("{0:dd/MM/yyyy}", row("Fecha")) + DivisoresdeCarton = String.Format("{0:N0}", row("DivisoresdeCarton")) + BolsasdePlastico = String.Format("{0:N0}", row("BolsasdePlastico")) + TapaderasdeCarton = String.Format("{0:N0}", row("TapaderasdeCarton")) + CAJASDECARTON = String.Format("{0:N0}", row("CAJASDECARTON")) + RPC = String.Format("{0:N0}", row("RPC")) + BINSDECARTON = String.Format("{0:N0}", row("BINSDECARTON")) + + + + 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("CamEspecificacion"), row("CamAnio")) + Rem1Placa = row("Rem1Placa").ToString() + NoFactura = row("NoFactura").ToString() + Remolque1 = String.Format("{0} ", row("NumeroTrailer"), row("Rem1Anio")) + Mercado = If(row("CveDestino").ToString() = "2", "Extranjero", "Nacional") + + NumeroTrailer = String.Format("No. {0}", row("NumeroTrailer").ToString()) + + LongitudCaja = row("LongitudCaja").ToString() + LineaTransportacion = row("LineaTransportacion").ToString() + SCAC = row("SCAC").ToString() + CAAT = row("CAAT").ToString() + + '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)) + params.Add(New ReportParameter("Fecha", Fecha)) + params.Add(New ReportParameter("SubProyecto", SubProyecto)) + params.Add(New ReportParameter("AgenciaAduanalUSA", AgenciaAduanalUSA)) + params.Add(New ReportParameter("AgenciaAduanalMEX", AgenciaAduanalMEX)) + 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("LongitudCaja", LongitudCaja)) + params.Add(New ReportParameter("LineaTransportacion", LineaTransportacion)) + params.Add(New ReportParameter("SCAC", SCAC)) + params.Add(New ReportParameter("CAAT", CAAT)) + params.Add(New ReportParameter("NumeroTrailer", NumeroTrailer)) + + + params.Add(New ReportParameter("NoFactura", NoFactura)) + params.Add(New ReportParameter("Mercado", Mercado)) + params.Add(New ReportParameter("NoBultos", NoBultos)) + params.Add(New ReportParameter("NoPallets", NoPallets)) + params.Add(New ReportParameter("NoKgManifiesto", NoKgManifiesto)) + + + params.Add(New ReportParameter("DivisoresdeCarton", DivisoresdeCarton)) + params.Add(New ReportParameter("BolsasdePlastico", BolsasdePlastico)) + params.Add(New ReportParameter("TapaderasdeCarton", TapaderasdeCarton)) + params.Add(New ReportParameter("CAJASDECARTON", CAJASDECARTON)) + params.Add(New ReportParameter("RPC", RPC)) + params.Add(New ReportParameter("BINSDECARTON", BINSDECARTON)) + params.Add(New ReportParameter("TotalDlls", TotalDlls)) + + + + + + Dim lrds As New List(Of ReportDataSource) + Dim rds As New ReportDataSource With {.Name = "DataSet1", .Value = tablaReporte} + lrds.Add(rds) + '"Empresas/Grales/Formatos/EquiposGPS.rdlc" + '"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc" + ImprimirPDF("GPS/EmbarqueManifiestoRemision.rdlc", lrds, params, "Manifesto") + End Sub Private Sub imprimirpallet2(cvePallet As Integer) Dim Envase As String = "" Dim Tamano As String = "" diff --git a/Compras/RepCxPPeriodo.aspx b/Compras/RepCxPPeriodo.aspx index 397894da3..0f4881bb5 100644 --- a/Compras/RepCxPPeriodo.aspx +++ b/Compras/RepCxPPeriodo.aspx @@ -48,9 +48,7 @@
    Proveedor:
    - - - +
    Clasificación:
    @@ -126,6 +124,16 @@
    +
    Tipo Docto:
    +
    + + + + + + + +
diff --git a/Compras/RepCxPPeriodo.aspx.cs b/Compras/RepCxPPeriodo.aspx.cs index 5b9f2a458..49054ae32 100644 --- a/Compras/RepCxPPeriodo.aspx.cs +++ b/Compras/RepCxPPeriodo.aspx.cs @@ -44,8 +44,28 @@ public partial class Compras_RepCxPPeriodo : ClsPaginas TipoCambio = 1; TCEspecifico = -1; - DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa); - DdlProveedor.DataBind(); + + + + //DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa); + //DdlProveedor.DataBind(); + + + + if (UsuarioActual.Empresa.Funcionalidad(105) == "1") { + DdlProveedor.setEsWebService(true); + DdlProveedor.Attributes.Add("data-metodo", "getproveedores"); + DdlProveedor.SelectedText = "Todos"; + DdlProveedor.SelectedValue = "-1"; + } + else { + DdlProveedor.setEsWebService(false); + DdlProveedor.ddl.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa); + DdlProveedor.ddl.DataBind(); + DdlProveedor.ddl.Items.Insert(0, new ListItem("Todos", "-1")); + } + + DdlUsuarioResponsable.DataSource = GlobalDTUsuarioResponsable.FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}").FiltraParametros("ProveedoresResponsables > 0"); DdlUsuarioResponsable.DataBind(); @@ -72,10 +92,16 @@ public partial class Compras_RepCxPPeriodo : ClsPaginas { if (RblTipoCambio.SelectedValue.ToEntero() == 3 && TxtEspecifico.Text != "") { TCEspecifico = TxtEspecifico.Text.ToDouble(); } else { TCEspecifico = -1; } + + int CveProveedor = DdlProveedor.SelectedValue.ToEntero() > 0 ? DdlProveedor.SelectedValue.ToEntero() : -1; + + string TipoDocto = (DdlTipoDocto.GetSelectedValuesM() == "") ? "-1" : DdlTipoDocto.GetSelectedValuesM(); + ClsMovimientos ObjMov = new ClsMovimientos(); - if (ObjMov.GetCxPPeriodo(DdlProveedor.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),DdlProveedoresClasificaciones.SelectedValue.ToEntero(), + if (ObjMov.GetCxPPeriodo(CveProveedor, DdlSubProyecto.SelectedValue.ToEntero(),DdlProveedoresClasificaciones.SelectedValue.ToEntero(), DdlUsuarioResponsable.SelectedValue.ToEntero(),DdlUsuarioRegistro.SelectedValue.ToEntero(),DdlEstatusCompra.SelectedValue.ToEntero(),UsuarioActual.CveEmpresa, - DdlGrupo.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),TipoCambio,TCEspecifico,txtCorteA.Text.ToDate(),UsuarioActual.CveUsuario,DdlTipoProveedor.SelectedValue.ToEntero())) + DdlGrupo.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),TipoCambio,TCEspecifico,txtCorteA.Text.ToDate(),UsuarioActual.CveUsuario, + DdlTipoProveedor.SelectedValue.ToEntero(), TipoDocto: TipoDocto)) { GvDatos.DataSource = ObjMov.DtResultados; DtDatos = ObjMov.DtResultados; @@ -234,7 +260,7 @@ public partial class Compras_RepCxPPeriodo : ClsPaginas if (DdlGrupo.SelectedValue != "-1") StrFiltro.AppendFormat(" Grupo: {0}", DdlGrupo.SelectedItem.Text); if (DdlProveedor.SelectedValue != "-1") - StrFiltro.AppendFormat(" Proveedor: {0}", DdlProveedor.SelectedItem.Text); + StrFiltro.AppendFormat(" Proveedor: {0}", DdlProveedor.ddl.SelectedItem.Text); if (DdlProveedoresClasificaciones.SelectedValue != "-1") StrFiltro.AppendFormat(" Clasificación Proveedor: {0}", DdlProveedoresClasificaciones.SelectedItem.Text); if (DdlTipoProveedor.SelectedValue != "-1") diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb index bb3a00671..ca77c2250 100644 --- a/Compras/eFacturas.aspx.vb +++ b/Compras/eFacturas.aspx.vb @@ -1581,7 +1581,10 @@ Partial Class Compras_eFacturas swTiempo.AppendFormat("espera: ({0}) {1} ", sw.ElapsedMilliseconds - swmili, sw.ElapsedMilliseconds) swmili = sw.ElapsedMilliseconds sw.Start() - VerificaCorreo(True) + + If VerificaCorreo(True) Then + CargaDatos() + End If sw.Stop() swTiempo.AppendFormat("Verifica En la app: ({0}) {1} ", sw.ElapsedMilliseconds - swmili, sw.ElapsedMilliseconds) @@ -1695,6 +1698,9 @@ Partial Class Compras_eFacturas RegistraScript(String.Format("$('#{0}').modal('hide');", "ModalFacturas")) + + + asdasd 'Alert(String.Format("Se cargaron {0} Facturas", Arreglo.Count), TipoMensaje.MsgInformacion) End Sub @@ -2847,6 +2853,37 @@ Partial Class Compras_eFacturas Dim Archivo As String = String.Format("{0}Compras\{1}\{2}", UsuarioActual.Empresa.Ruta, gvRow.DataKey("RFCDe"), gvRow.DataKey("XML")) Dim Prefijo As String = "" + + + + + Dim DTDocumentosRelacionados As New DataTable + DTDocumentosRelacionados.Columns.Add("Serie") + DTDocumentosRelacionados.Columns.Add("SerieFolio") + + DTDocumentosRelacionados.Columns.Add("IdDocumento") + DTDocumentosRelacionados.Columns.Add("Folio", GetType(Integer)) + DTDocumentosRelacionados.Columns.Add("MonedaDR") + DTDocumentosRelacionados.Columns.Add("MetodoDePagoDR") + DTDocumentosRelacionados.Columns.Add("ImpPagado", GetType(Decimal)) + + DTDocumentosRelacionados.Columns.Add("CveFactura", GetType(Integer)) + DTDocumentosRelacionados.Columns.Add("CveCompra", GetType(Integer)) + DTDocumentosRelacionados.Columns.Add("CveIE", GetType(Integer)) + DTDocumentosRelacionados.Columns.Add("Fecha", GetType(Date)) + + DTDocumentosRelacionados.Columns.Add("FolioPago") + DTDocumentosRelacionados.Columns.Add("ImportePago", GetType(Decimal)) + DTDocumentosRelacionados.Columns.Add("FechaPago", GetType(Date)) + DTDocumentosRelacionados.Columns.Add("CveMetodoPago", GetType(Integer)) + DTDocumentosRelacionados.Columns.Add("SerieFolioCompra") + DTDocumentosRelacionados.Columns.Add("CvePrePolizaDetalle", GetType(Integer)) + + DTDocumentosRelacionados.Columns.Add("Tipo", GetType(String)) + DTDocumentosRelacionados.Columns.Add("Manual", GetType(Boolean)) + + + If IO.File.Exists(Archivo) Then @@ -2913,30 +2950,7 @@ Partial Class Compras_eFacturas UUIDPago = ValorXML(nodeTFD, "UUID") LblUUID.Text = UUIDPago - Dim DTDocumentosRelacionados As New DataTable - DTDocumentosRelacionados.Columns.Add("Serie") - DTDocumentosRelacionados.Columns.Add("SerieFolio") - DTDocumentosRelacionados.Columns.Add("IdDocumento") - DTDocumentosRelacionados.Columns.Add("Folio", GetType(Integer)) - DTDocumentosRelacionados.Columns.Add("MonedaDR") - DTDocumentosRelacionados.Columns.Add("MetodoDePagoDR") - DTDocumentosRelacionados.Columns.Add("ImpPagado", GetType(Decimal)) - - DTDocumentosRelacionados.Columns.Add("CveFactura", GetType(Integer)) - DTDocumentosRelacionados.Columns.Add("CveCompra", GetType(Integer)) - DTDocumentosRelacionados.Columns.Add("CveIE", GetType(Integer)) - DTDocumentosRelacionados.Columns.Add("Fecha", GetType(Date)) - - DTDocumentosRelacionados.Columns.Add("FolioPago") - DTDocumentosRelacionados.Columns.Add("ImportePago", GetType(Decimal)) - DTDocumentosRelacionados.Columns.Add("FechaPago", GetType(Date)) - DTDocumentosRelacionados.Columns.Add("CveMetodoPago", GetType(Integer)) - DTDocumentosRelacionados.Columns.Add("SerieFolioCompra") - DTDocumentosRelacionados.Columns.Add("CvePrePolizaDetalle", GetType(Integer)) - - DTDocumentosRelacionados.Columns.Add("Tipo", GetType(String)) - DTDocumentosRelacionados.Columns.Add("Manual", GetType(Boolean)) Dim nodePagosN As XmlNodeList @@ -3140,7 +3154,9 @@ Partial Class Compras_eFacturas 'saco la información de lo vinculado en el ie - ImporteIES = ObjCompras.DtResultados.FiltraParametros("CveIE > 0").SUM("Importe") + 'ImporteIES = ObjCompras.DtResultados.FiltraParametros("CveIE > 0").SUM("Importe") + ImporteIES = DTDocumentosRelacionados.FiltraParametros("CveIE > 0").SUM("ImportePago") + DiferenciaImportes = Monto - ImporteIES ObjCompras.Dispose() diff --git a/Contabilidad/RepBalanzaComprobacion.aspx b/Contabilidad/RepBalanzaComprobacion.aspx index 9d91861d0..5986fd478 100644 --- a/Contabilidad/RepBalanzaComprobacion.aspx +++ b/Contabilidad/RepBalanzaComprobacion.aspx @@ -3,16 +3,28 @@ -
  • - Exporta Excel - <%--   --%> -
  • -
  • - Imprimir - <%--  --%> -
  • -
    + + + + +
  • + Exporta Excel + <%--   --%> +
  • +
  • + Imprimir + <%--  --%> +
  • +
    + + + + +
    + + + Balanza de Comprobación diff --git a/Contabilidad/RepBalanzaComprobacion.aspx.vb b/Contabilidad/RepBalanzaComprobacion.aspx.vb index 04f9191b3..f9bbddfb3 100644 --- a/Contabilidad/RepBalanzaComprobacion.aspx.vb +++ b/Contabilidad/RepBalanzaComprobacion.aspx.vb @@ -228,10 +228,15 @@ Partial Class Contabilidad_RepBalanzaComprobacion GenerarPDFCrystal("EXCEL") End Sub Private Sub GenerarPDFCrystal(Optional Formato As String = "PDF") - Dim Archivo As New System.IO.FileInfo(String.Format("{0}Contabilidad/Reportes/RepBalanzaComprobacion.rpt", UsuarioActual.Empresa.Ruta)) + Dim Archivo As New System.IO.FileInfo(String.Format("{0}Contabilidad/Reportes/RepBalanzaComprobacion.rpt", Server.MapPath("~"))) Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta)) Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa) + 'If UsuarioActual.CveUsuario = 100 Then + ' Alert(String.Format("{0}Contabilidad/Reportes/RepBalanzaComprobacion.rpt", Server.MapPath("~"))) + ' End If + ' Exit Sub + If Not IsNothing(DtDatos) Then 'Dim dr As DataRow = DtCxC.Rows(0) Dim lista = New List(Of CrystalParametro) @@ -245,7 +250,9 @@ Partial Class Contabilidad_RepBalanzaComprobacion lista.Add(New CrystalParametro("pImg", "")) End If - ImprimirbytesPDF(ImprimirPDFCrystal(Server.MapPath("~/Contabilidad/Reportes/RepBalanzaComprobacion.rpt"), DtDatos, lista, "Balanza de Comprobación", Formato), "Balanza de Comprobación", Formato) + Dim DTTemp As DataTable = DtDatos.Copy + + ImprimirbytesPDF(ImprimirPDFCrystal(Server.MapPath("~/Contabilidad/Reportes/RepBalanzaComprobacion.rpt"), DTTemp, lista, "Balanza de Comprobación", Formato), "Balanza de Comprobación", Formato) Else Alert("No se tienen registrados movimientos", TipoMensaje.MsgAdvertencia) diff --git a/Contabilidad/Reportes/RepBalanzaComprobacion.rpt b/Contabilidad/Reportes/RepBalanzaComprobacion.rpt index 2b98edb34..b9c06261a 100644 Binary files a/Contabilidad/Reportes/RepBalanzaComprobacion.rpt and b/Contabilidad/Reportes/RepBalanzaComprobacion.rpt differ diff --git a/CxC/RepCxCPeriodo.aspx b/CxC/RepCxCPeriodo.aspx index e210ecc1b..a7089fb86 100644 --- a/CxC/RepCxCPeriodo.aspx +++ b/CxC/RepCxCPeriodo.aspx @@ -117,7 +117,8 @@ - + +
    diff --git a/CxC/RepCxCPeriodo.aspx.cs b/CxC/RepCxCPeriodo.aspx.cs index 35de41dd3..d0d2003d1 100644 --- a/CxC/RepCxCPeriodo.aspx.cs +++ b/CxC/RepCxCPeriodo.aspx.cs @@ -39,13 +39,18 @@ public partial class CxC_RepCxCPeriodo : ClsPaginas } } + + + + private void InicializaValores() { TipoCambio = 1; TCEspecifico = -1; //CargaClientes - if (UsuarioActual.CveEmpresa == 119) { + if (UsuarioActual.Empresa.Funcionalidad(105) == "1") + { DdlClientesWS.setEsWebService(true); } else @@ -93,8 +98,11 @@ public partial class CxC_RepCxCPeriodo : ClsPaginas if (RblTipoCambio.SelectedValue.ToEntero() == 3 && TxtEspecifico.Text != "") { TCEspecifico = TxtEspecifico.Text.ToDouble(); } else { TCEspecifico = -1; } + + int CveCliente = DdlClientesWS.SelectedValue.ToEntero() > 0 ? DdlClientesWS.SelectedValue.ToEntero() : -1; + ClsMovimientos ObjMov = new ClsMovimientos(); - if (ObjMov.GetCxCPeriodo(DdlClientesWS.SelectedValue.ToEntero(),DdlSubProyecto.SelectedValue.ToEntero(),DdlVendedor.SelectedValue.ToEntero(),DdlUsuario.SelectedValue.ToEntero(), + if (ObjMov.GetCxCPeriodo(CveCliente, DdlSubProyecto.SelectedValue.ToEntero(),DdlVendedor.SelectedValue.ToEntero(),DdlUsuario.SelectedValue.ToEntero(), -1,"-1",UsuarioActual.CveEmpresa,DdlGrupo.SelectedValue.ToEntero(),DdlResponsable.SelectedValue.ToEntero(),TipoCambio,TCEspecifico, TipoDocto,txtCorteA.Text.ToDate(), DdlEstatusCliente.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, DdlCobranzaEstatus.SelectedValue.ToEntero(), DdlClienteClasificacion.SelectedValue.ToEntero())){ GvDatos.DataSource = ObjMov.DtResultados; @@ -107,13 +115,34 @@ public partial class CxC_RepCxCPeriodo : ClsPaginas private void CargaClientes() { - if (UsuarioActual.CveEmpresa != 119) + + if (UsuarioActual.Empresa.Funcionalidad(105) == "1") + { + DdlClientesWS.setEsWebService(true); + + if( DdlClienteClasificacion.SelectedValue.ToEntero() > 0) + { + DdlClientesWS.ddlWS.Attributes.Add("data-cveclienteclasificacion", DdlClienteClasificacion.SelectedValue); + DdlClientesWS.txtValue.Value = ""; + DdlClientesWS.txtText.Value = ""; + + } + else + { + DdlClientesWS.ddlWS.Attributes.Add("data-cveclienteclasificacion", "-1"); + } + + } + else { DdlClientesWS.ddl.Items.Clear(); DdlClientesWS.DataSource = get_GlobalDTCliente(UsuarioActual.CveEmpresa, -1).FiltraParametros($"CveClienteClasificacion = {DdlClienteClasificacion.SelectedValue.ToEntero()} OR {DdlClienteClasificacion.SelectedValue.ToEntero()} = -1"); DdlClientesWS.DataBind(); DdlClientesWS.ddl.Items.Insert(0, new ListItem("Todos", "-1")); } + + UPFiltros.Update(); + } protected void DdlClienteClasificacion_SelectedIndexChanged(object sender, EventArgs e) diff --git a/Empresas/119/Formatos/RepIVA.rpt b/Empresas/119/Formatos/RepIVA.rpt index a324e45bd..c09e9e811 100644 Binary files a/Empresas/119/Formatos/RepIVA.rpt and b/Empresas/119/Formatos/RepIVA.rpt differ diff --git a/Empresas/119/Formatos/RepIVAAcreditable.rpt b/Empresas/119/Formatos/RepIVAAcreditable.rpt index 5caea88e1..33999cb6e 100644 Binary files a/Empresas/119/Formatos/RepIVAAcreditable.rpt and b/Empresas/119/Formatos/RepIVAAcreditable.rpt differ diff --git a/Empresas/15/Formatos/Factura.rdlc b/Empresas/15/Formatos/Factura.rdlc index 077ad259e..ec17632f6 100644 --- a/Empresas/15/Formatos/Factura.rdlc +++ b/Empresas/15/Formatos/Factura.rdlc @@ -768,15 +768,7 @@ - - - - - 83140 + =Parameters!CP.Value + + + + + - =IIF(Parameters!NumCta.Value="0" Orelse Parameters!NumCta.Value="","No Identificado",Parameters!NumCta.Value) + =Parameters!FormaPago.Value - true @@ -4074,13 +4082,13 @@ - 0.74104in + 0.73688in - 0.57756in + 0.5734in - 0.67516in + 0.671in @@ -4329,9 +4337,9 @@ DataSet3 0.26817in - 5.86887in + 5.88134in 0.34081in - 1.99376in + 1.98129in 3 + + + Textbox20 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + Textbox22 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Fecha + + + + Textbox24 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!Fecha.Value + + + + Textbox26 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + Cliente + + + + Textbox11 + + + + Black + + 2pt + + + Black + + 2pt + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + 4 + + + + + + + + + 0.6cm + + + + + true + true + + + + + Nombre: + + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + GROWER ALLIANCE + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + 0.6cm + + + + + true + true + + + + + Direccion: + + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + 12 Ave. Acaponeta + +Rio Rico, AZ 85648 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + REM: + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!NoEmbarque.Value + + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + Black + + 2pt + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + + + + + Textbox35 + + + + Black + + 2pt + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + + + + + + + + + + + + + + + + + + + + 4.15396cm + 2.00862cm + 3.6cm + 14.9871cm + + + + + + Embedded + logojam + FitProportional + 0.20354cm + 0.19717cm + 2.79646cm + 4.89479cm + 1 + + + + + + true + true + + + + + AGROPECUARIA JAM S.A DE C.V +CARRETERA A BAHIA DE KINO KM 12 +R.F.C. AJA-980926-4V2 + + + + + Tel:01 662 268-1007 + + + + +Hermosillo, Sonora, Mexico + + + + + + + + Textbox2 + 0.57438cm + 7.32675cm + 2.42562cm + 6.73333cm + 2 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + 2.45401cm + + + 8.081cm + + + 2.75797cm + + + 2.75797cm + + + + + 0.6cm + + + + + true + true + + + + + CANTIDAD + + + + + + + Textbox63 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + DESCRIPCIÓN + + + + + + + Textbox64 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Precio Uni. + + + + + + + Textbox65 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + VALOR + + + + + + + Textbox66 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Parameters!CAJASDECARTON.Value + + + + Textbox67 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + CAJAS DE CARTON + + + + Textbox68 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + $1.00 + + + + Textbox69 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!CAJASDECARTON.Value + + + + Textbox67 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Parameters!DivisoresdeCarton.Value + + + + Textbox71 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + DIVISORES DE CARTON + + + + Textbox72 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + $1.00 + + + + Textbox69 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!DivisoresdeCarton.Value + + + + Textbox71 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Parameters!RPC.Value + + + + Textbox75 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + RPC + + + + Textbox76 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + $1.00 + + + + Textbox69 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!RPC.Value + + + + Textbox75 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Parameters!BolsasdePlastico.Value + + + + Textbox79 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + BOLSAS DE PLASTICO + + + + + Textbox80 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + $1.00 + + + + Textbox69 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!BolsasdePlastico.Value + + + + Textbox79 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Parameters!TapaderasdeCarton.Value + + + + Textbox83 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + TAPADERAS DE CARTON + + + + Textbox84 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + $1.00 + + + + Textbox69 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!TapaderasdeCarton.Value + + + + Textbox83 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Parameters!BINSDECARTON.Value + + + + Textbox87 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + BINS DE CARTON + + + + Textbox88 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + $1.00 + + + + Textbox69 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Parameters!BINSDECARTON.Value + + + + Textbox87 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + Textbox95 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + CAAT: 32VU + + + + + Textbox96 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + + Textbox98 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + Textbox99 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + LCT-03 + + + + Textbox100 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + + + + + Textbox102 + + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + + Black + + 1pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + Textbox103 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + TOTAL US DLLS: + + + + + Textbox104 + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + true + true + + + + + =Parameters!TotalDlls.Value + + + + Textbox106 + + 2pt + + + Black + + 2pt + + + Black + + 2pt + + + Black + + 2pt + + + Black + + 2pt + + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 9.57248cm + 1.44748cm + 6cm + 16.05095cm + 3 + + + + + + 8.9547in +