diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index ed0ba1c6a..bb6ac059f 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -15936,15 +15936,15 @@ Partial Class Compras_Compras End If For Each Dr As DataRow In TmpDT.Rows - Dr("PU") = Dr("PU").ToString.ToDouble * TipoCambioTemp - Dr("IVA") = Dr("IVA").ToString.ToDouble * TipoCambioTemp - Dr("RetIVA") = Dr("RetIVA").ToString.ToDouble * TipoCambioTemp - Dr("RetISR") = Dr("RetISR").ToString.ToDouble * TipoCambioTemp - Dr("IEPSPS") = Dr("IEPSPS").ToString.ToDouble * TipoCambioTemp - Dr("Descuento") = Dr("Descuento").ToString.ToDouble * TipoCambioTemp - Dr("OtrosGastos") = Dr("OtrosGastos").ToString.ToDouble * TipoCambioTemp + Dr("PU") = Dr("PU").ToString.ToDecimal * TipoCambioTemp + Dr("IVA") = Dr("IVA").ToString.ToDecimal * TipoCambioTemp + Dr("RetIVA") = Dr("RetIVA").ToString.ToDecimal * TipoCambioTemp + Dr("RetISR") = Dr("RetISR").ToString.ToDecimal * TipoCambioTemp + Dr("IEPSPS") = Dr("IEPSPS").ToString.ToDecimal * TipoCambioTemp + Dr("Descuento") = Dr("Descuento").ToString.ToDecimal * TipoCambioTemp + Dr("OtrosGastos") = Dr("OtrosGastos").ToString.ToDecimal * TipoCambioTemp - Dim Total = (Dr("Cantidad").ToString.ToDouble * Dr("PU").ToString.ToDouble) - Dr("Descuento").ToString.ToDouble + Dr("OtrosGastos").ToString.ToDouble + Dim Total = (Dr("Cantidad").ToString.ToDecimal * Dr("PU").ToString.ToDecimal) - Dr("Descuento").ToString.ToDecimal + Dr("OtrosGastos").ToString.ToDecimal Dr("Total") = Total Next @@ -15953,22 +15953,23 @@ Partial Class Compras_Compras UpPS.Update() - TxtSubTotal.Text = (TxtSubTotal.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") - TxtSubTotal2.Text = (TxtSubTotal2.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") - TxtIVA.Text = (TxtIVA.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") + TxtSubTotal.Text = (TmpDT.SUMD("Total") + TmpDT.SUMD("Descuento")).FormatoNumero + TxtSubTotal2.Text = TmpDT.SUMD("Total").FormatoNumero() + TxtIVA.Text = TmpDT.SUMD("IVA").FormatoNumero() 'IPP CAMBIADO - 5 DICIEMBRE 2016 'TxtTotal.Text = (TxtSubTotal2.Text.ToDouble + TxtIVA.Text.ToDouble).ToString.FormatoNumero.Replace(","c, "") - TxtTotal.Text = (TxtTotal.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") + TxtTotal.Text = (TmpDT.SUMD("Total") + TmpDT.SUMD("IVA") + TmpDT.SUMD("IEPSPS") - TmpDT.SUMD("RetIVA") - TmpDT.SUMD("RetISR")).FormatoNumero + SubTotalOriginal = TxtSubTotal.Text.ToDouble SubTotal2Original = TxtSubTotal2.Text.ToDouble - If TrDescuento.Visible Then TxtDescuento.Text = (TxtDescuento.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") - If TrRetIVA.Visible Then TxtRetIVA.Text = (TxtRetIVA.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") - If TrRetISR.Visible Then TxtRetISR.Text = (TxtRetISR.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") - If TrIEPS.Visible Then TxtIEPS.Text = (TxtIEPS.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") - If TrOtrosImpuestos.Visible Then TxtOtrosImpuestos.Text = (TxtOtrosImpuestos.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") + If TrDescuento.Visible Then TxtDescuento.Text = (TmpDT.SUMD("Descuento")).ToString.FormatoNumero + If TrRetIVA.Visible Then TxtRetIVA.Text = (TmpDT.SUMD("RetIVA")).ToString.FormatoNumero + If TrRetISR.Visible Then TxtRetISR.Text = (TmpDT.SUMD("RetISR")).ToString.FormatoNumero + If TrIEPS.Visible Then TxtIEPS.Text = (TmpDT.SUMD("IEPSPS")).ToString.FormatoNumero + If TrOtrosImpuestos.Visible Then TxtOtrosImpuestos.Text = (TmpDT.SUMD("OtrosGastos")).ToString.FormatoNumero If TrRedondeo.Visible Then TxtRedondeo.Text = (TxtRedondeo.Text.ToDouble * TipoCambioTemp).ToString.FormatoNumero.Replace(","c, "") diff --git a/Empresas/132/Formatos/Cotizacion.rdlc b/Empresas/132/Formatos/Cotizacion.rdlc index 78a8da821..dfb898aac 100644 --- a/Empresas/132/Formatos/Cotizacion.rdlc +++ b/Empresas/132/Formatos/Cotizacion.rdlc @@ -1,2595 +1,2595 @@ - - - - - - - - - 0.55143in - - - 0.69922in - - - 2.73895in - - - 1.30851in - - - 0.82226in - - - 0.98893in - - - - - 0.25in - - - - - true - true - - - - - CANT. - - - - - - - Textbox1 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - UNIDAD - - - - - - - Textbox15 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - DESCRIPCIÓN - - - - - - - Textbox9 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - OBSERVACIONES - - - - - - - Textbox17 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - P.U. - - - - - - - Textbox13 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - IMPORTE - - - - - - - Textbox5 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.25in - - - - - true - true - - - - - =Fields!Cantidad.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!UM.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!PS.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Obs.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!PU.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - =Fields!Cantidad.Value*Fields!PU.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - - - - - - - - - - - - - - - After - - - - - - - DsOC - 3.50398in - 0.13746in - 0.5in - 7.1093in - - - - - - true - true - - - - - Atención a: - - - - =Parameters!ClienteContacto.Value - - - - - - - - - Empresa: - - - - =Parameters!ClienteNombre.Value - - - - - - - - - Teléfono: - - - - =Parameters!ClienteTelefono.Value - - - - - - - Textbox4 - 5.55633cm - 3.76464in - 2.00758cm - 8.84471cm - 1 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Fecha: - - - - =Parameters!FechaSolicitud.Value - - - - - - - - - No.Cotización: - - - - - - - - =Parameters!Folio.Value - - - - - - - - - - - Textbox4 - 2.15054cm - 12.26628cm - 1.47842cm - 6.14066cm - 2 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - CLIENTE - - - - - - - Textbox2 - 5.03951cm - 9.56206cm - 0.51682cm - 8.84471cm - 3 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - COTIZACIÓN - - - - - - - Textbox12 - 1.63372cm - 12.26624cm - 0.51682cm - 6.14066cm - 4 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Soluciones en Telemediciones JAR SA de CV - - - - - - - - - - - - - - - 2pt - 2pt - 2pt - 2pt - - - - Embedded - LOGO - FitProportional - 0.41889in - 2.11597in - 4.12706in - 6 - - - - - - Embedded - VISTAPREVIA22 - FitProportional - 6.37722in - 7.53738in - 7 - - =IIf(Parameters!CveVenta.Value > 0, True,False) - - - - - - - - - true - true - - - - - I.V.A. - - - - - - - Textbox20 - 1.60474cm - 13.3038cm - 0.45183cm - 2.5cm - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - TOTAL: - - - - - - - Textbox20 - 2.05658cm - 13.3038cm - 0.45183cm - 2.5cm - 1 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - SUB-TOTAL 2: - - - - - - - Textbox20 - 1.15291cm - 13.3038cm - 0.45183cm - 2.5cm - 2 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!IVA.Value - - - - - - - Textbox20 - 1.60474cm - 15.8038cm - 0.45183cm - 2.5cm - 3 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Total.Value - - - - - - - Textbox20 - 2.05658cm - 15.8038cm - 0.45183cm - 2.5cm - 4 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!SubTotal2.Value - - - - - - - Textbox20 - 1.15291cm - 15.8038cm - 0.45183cm - 2.5cm - 5 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - DESCUENTOS - - - - : - - - - - - - Textbox20 - 0.70108cm - 13.3038cm - 0.45183cm - 2.5cm - 6 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!Descuento.Value - - - - - - - Textbox20 - 0.70108cm - 15.8038cm - 0.45183cm - 2.5cm - 7 - - - 2pt - 2pt - 2pt - 2pt - - - - true - - - - - Son: - - - - =Parameters!ImporteLetra.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - 0.06944in - 0.09691in - 0in - 7.10935in - 9 - - 2pt - - - - - true - true - - - - - SUB-TOTAL: - - - - - - - Textbox20 - 0.24695cm - 13.3038cm - 0.45183cm - 2.5cm - 10 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!SubTotal.Value - - - - - - - Textbox20 - 0.24695cm - 15.8039cm - 0.45183cm - 2.5cm - 11 - - - 2pt - 2pt - 2pt - 2pt - - - - 2.77813cm - 5.23772in - 0cm - 5.00022cm - 12 - - 2pt - - - - - true - 10.31122cm - 0.09346cm - 2.95451cm - 19.05149cm - 8 - - - - - - 6.44697in - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!UsuarioImprimio.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - I - - - - mpresión: - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Globals!ExecutionTime - - - - - - - Textbox23 - 2.0474in - 3.76454in - 0.25in - 1.67093in - 3 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - ="Página " & Globals.PageNumber & " de " & Globals.TotalPages - - - - - - - Textbox24 - 2.0474in - 6.37365in - 0.25in - 1in - 4 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - NOMBRE Y FIRMA DE AUTORIZACIÓN - - - - - - - Textbox2 - 2.4996cm - 0.34902cm - 0.51682cm - 8.84471cm - 5 - - - #a21b1f - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - - - - - - - - Textbox4 - 3.01642cm - 0.13746in - 2.00758cm - 8.84471cm - 6 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Precios unitarios, no incluyen IVA - - - - - - - - - No devolución, no cancelación una vez hecho el pedido - - - - - - - - - Todo pedido requiere Orden de Compra o mail de confirmación - - - - - - - - - Precios sujetos a cambio sin previo aviso - - - - - - - - - Cotización sujeta a disponibilidad - - - - - - - - - Vigencia de cotización: - - - - =Parameters!Vigencia.Value - - - - - - - - - Condiciones de pago: - - - - =Parameters!CondicionPago.Value - - - - - - - Textbox20 - 0cm - 10.20038cm - 3.01642cm - 8.19687cm - 7 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - =Parameters!VendedorNombre.Value - - - - - - - -Celular: - - - - ="(" & Parameters!VendedorCelular.Value.ToString().Substring(0,3) & ") " & Parameters!VendedorCelular.Value.ToString().Substring(3) - - - - - - - =Parameters!VendedorMail.Value - - - - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - 11.69in - 8.27in - 0.25in - 0.25in - 0.25in - 0.5in - + + + + + + Textbox1 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + UNIDAD + + + + + + + Textbox15 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + DESCRIPCIÓN + + + + + + + Textbox9 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + OBSERVACIONES + + + + + + + Textbox17 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + P.U. + + + + + + + Textbox13 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + IMPORTE + + + + + + + Textbox5 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.25in + + + + + true + true + + + + + =Fields!Cantidad.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!UM.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!PS.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!Obs.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!PU.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + =Fields!Cantidad.Value*Fields!PU.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + + + + + + + + + + + + + + + After + + + + + + + DsOC + 2.87898in + 0.13746in + 0.5in + 7.1093in + + + + + + true + true + + + + + Atención a: + + + + =Parameters!ClienteContacto.Value + + + + + + + + + Empresa: + + + + =Parameters!ClienteNombre.Value + + + + + + + + + Teléfono: + + + + =Parameters!ClienteTelefono.Value + + + + + + + Textbox4 + 4.00467cm + 3.76084in + 1.50487cm + 8.84471cm + 1 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Fecha: + + + + =Parameters!FechaSolicitud.Value + + + + + + + + + No.Cotización: + + + + + + + + =Parameters!Folio.Value + + + + + + + + + + + Textbox4 + 2.15054cm + 12.26628cm + 1.16092cm + 6.14066cm + 2 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + CLIENTE + + + + + + + Textbox2 + 3.48785cm + 9.55241cm + 0.51682cm + 8.84471cm + 3 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + COTIZACIÓN + + + + + + + Textbox12 + 1.63372cm + 12.26624cm + 0.51682cm + 6.14066cm + 4 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Soluciones en Telemediciones JAR SA de CV + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + Embedded + LOGO + FitProportional + 0.41889in + 2.11597in + 4.12706in + 6 + + + + + + Embedded + VISTAPREVIA22 + FitProportional + 6.37722in + 7.53738in + 7 + + =IIf(Parameters!CveVenta.Value > 0, True,False) + + + + + + + + + true + true + + + + + I.V.A. + + + + + + + Textbox20 + 1.60474cm + 13.3038cm + 0.45183cm + 2.5cm + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + TOTAL: + + + + + + + Textbox20 + 2.05658cm + 13.3038cm + 0.45183cm + 2.5cm + 1 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + SUB-TOTAL 2: + + + + + + + Textbox20 + 1.15291cm + 13.3038cm + 0.45183cm + 2.5cm + 2 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!IVA.Value + + + + + + + Textbox20 + 1.60474cm + 15.8038cm + 0.45183cm + 2.5cm + 3 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!Total.Value + + + + + + + Textbox20 + 2.05658cm + 15.8038cm + 0.45183cm + 2.5cm + 4 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!SubTotal2.Value + + + + + + + Textbox20 + 1.15291cm + 15.8038cm + 0.45183cm + 2.5cm + 5 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + DESCUENTOS + + + + : + + + + + + + Textbox20 + 0.70108cm + 13.3038cm + 0.45183cm + 2.5cm + 6 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!Descuento.Value + + + + + + + Textbox20 + 0.70108cm + 15.8038cm + 0.45183cm + 2.5cm + 7 + + + 2pt + 2pt + 2pt + 2pt + + + + true + + + + + Son: + + + + =Parameters!ImporteLetra.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + 0.06944in + 0.09691in + 0in + 7.10935in + 9 + + 2pt + + + + + true + true + + + + + SUB-TOTAL: + + + + + + + Textbox20 + 0.24695cm + 13.3038cm + 0.45183cm + 2.5cm + 10 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!SubTotal.Value + + + + + + + Textbox20 + 0.24695cm + 15.8039cm + 0.45183cm + 2.5cm + 11 + + + 2pt + 2pt + 2pt + 2pt + + + + 2.77813cm + 5.23772in + 0cm + 5.00022cm + 12 + + 2pt + + + + + true + 8.72373cm + 0.09346cm + 2.95451cm + 19.05149cm + 8 + + + + + + 6.44697in + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!UsuarioImprimio.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + I + + + + mpresión: + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Globals!ExecutionTime + + + + + + + Textbox23 + 2.0474in + 3.76454in + 0.25in + 1.67093in + 3 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + ="Página " & Globals.PageNumber & " de " & Globals.TotalPages + + + + + + + Textbox24 + 2.0474in + 6.37365in + 0.25in + 1in + 4 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + NOMBRE Y FIRMA DE AUTORIZACIÓN + + + + + + + Textbox2 + 2.4996cm + 0.34902cm + 0.51682cm + 8.84471cm + 5 + + + #a21b1f + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + + + + + + + + Textbox4 + 3.01642cm + 0.13746in + 2.00758cm + 8.84471cm + 6 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Precios unitarios, no incluyen IVA + + + + + + + + + No devolución, no cancelación una vez hecho el pedido + + + + + + + + + Todo pedido requiere Orden de Compra o mail de confirmación + + + + + + + + + Precios sujetos a cambio sin previo aviso + + + + + + + + + Cotización sujeta a disponibilidad + + + + + + + + + Vigencia de cotización: + + + + =Parameters!Vigencia.Value + + + + + + + + + Condiciones de pago: + + + + =Parameters!CondicionPago.Value + + + + + + + Textbox20 + 0cm + 10.20038cm + 3.01642cm + 8.19687cm + 7 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!VendedorNombre.Value + + + + + + + +Celular: + + + + ="(" & Parameters!VendedorCelular.Value.ToString().Substring(0,3) & ") " & Parameters!VendedorCelular.Value.ToString().Substring(3) + + + + + + + =Parameters!VendedorMail.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 11.69in + 8.27in + 0.25in + 0.25in + 0.25in + 0.5in +