From 65f2918816806c855efdc17546385e382d51f7de Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 6 Feb 2024 09:41:46 -0700 Subject: [PATCH 1/2] SMS - 2024.02.02 Impresion consola --- App_Code/ClsSisUsuarios.vb | 3 +++ App_Code/wsSIG.vb | 7 ++++++- Compras/PopUpVerFactura.aspx.vb | 27 ++++++++++++++++++++------- Inventarios/EntradasSalidas.aspx.vb | 6 +++++- Inventarios/EntregaAlmacen.aspx.vb | 24 ++++++++++++++++-------- 5 files changed, 50 insertions(+), 17 deletions(-) diff --git a/App_Code/ClsSisUsuarios.vb b/App_Code/ClsSisUsuarios.vb index 464fb1d6b..1c779adf5 100644 --- a/App_Code/ClsSisUsuarios.vb +++ b/App_Code/ClsSisUsuarios.vb @@ -246,6 +246,9 @@ Public Class ClsSisUsuarios Dim autoip As String = Data.Rows(0)("AutorizadoxIP").ToString().ToUpper() Retorno.AutorizadoxIP = (autoip = "1" OrElse autoip = "TRUE") + ' Esto es parta el punto de venta + Retorno.CveSucursal = Data.Rows(0)("CveSubProyecto").ToString().ToEntero + ''Toma la primer letra de cada nombre 'Dim sbr As New StringBuilder 'For Each St As String In Retorno.Nombre.Split(" "c) diff --git a/App_Code/wsSIG.vb b/App_Code/wsSIG.vb index 1991e6c6b..c94a13c60 100644 --- a/App_Code/wsSIG.vb +++ b/App_Code/wsSIG.vb @@ -115,7 +115,12 @@ Public Class wsSIG Retorno.CveEmpresa = ttDato.CveEmpresa 'Retorno.Empresa = ttDato.NombreEmpresa Retorno.CveVendedor = ttDato.CveVendedor - Retorno.CveSucursal = CveSubProyecto + + If CveSubProyecto > 0 Then + Retorno.CveSucursal = CveSubProyecto + Else + Retorno.CveSucursal = ttDato.CveSucursal + End If 'Retorno.Contraseña = ttDato.Contraseña 'Retorno.IMEI = IMEI diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index c29799b52..1745f277d 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -1254,9 +1254,10 @@ Partial Class PopUpVerFactura Dim CveAlmacenTransitorioRecepcion As Integer = If(UrlParametros("CVEALMACENTRANSITORIORECEPCION") Is Nothing, -1, (UrlParametros("CVEALMACENTRANSITORIORECEPCION").ToString.ToEntero)) Dim FolioBusquedaTrasitorio As Integer = If(UrlParametros("FOLIOBUSQUEDATRASITORIO") Is Nothing, -1, (UrlParametros("FOLIOBUSQUEDATRASITORIO").ToString.ToEntero)) + Dim Consola As String = If(UrlParametros("CVEMOVIMIENTO") IsNot Nothing, UrlParametros("CVEMOVIMIENTO").ToString.Trim, "") CargaMovimientosAlmacen(UrlParametros("CVEMOVIMIENTO").ToString.ToEntero, Resumen:=False, EsTransitorio:=EsTransitorio, CveAlmacenRecepcion:=CveAlmacenRecepcion, CveAlmacenTransitorioRecepcion:=CveAlmacenTransitorioRecepcion, - FolioBusquedaTrasitorio:=FolioBusquedaTrasitorio) + FolioBusquedaTrasitorio:=FolioBusquedaTrasitorio, Consola:=Consola) End If End If @@ -2420,7 +2421,7 @@ Partial Class PopUpVerFactura #Region " - OP = 'Alm' - REPORTE ENTRADAS ALMACEN " Private Sub CargaMovimientosAlmacen(CveMovimiento As Integer, Optional Resumen As Boolean = False, - Optional EsTransitorio As Boolean = False, Optional CveAlmacenRecepcion As Integer = -1, Optional CveAlmacenTransitorioRecepcion As Integer = -1, Optional FolioBusquedaTrasitorio As Integer = -1) + Optional EsTransitorio As Boolean = False, Optional CveAlmacenRecepcion As Integer = -1, Optional CveAlmacenTransitorioRecepcion As Integer = -1, Optional FolioBusquedaTrasitorio As Integer = -1, Optional Consola As String = "") Dim ObjInventarios As New ClsInventarios ObjInventarios.GetMovimientos(CveMovimiento, -1, -1, UsuarioActual.CveEmpresa) @@ -2656,7 +2657,7 @@ Partial Class PopUpVerFactura PuestoEnrego, RazonSocial, ResponsableCarga, ResponsableRecibio, NombreCliente, CantidadProductos:=CantidadProductos, CantidadUsados:=CantidadUsados, CveTipoAlmacen:=CveTipoAlmacen, NombreEntrego:=NombreEntrego, CveConceptoMovRelacionado:=CveConceptoMovtoRelacionado, FolioRelacionado:=FolioRelacionado, UsuarioRegistro:=UsuarioCapturo, - Ruta:=Ruta, Supervisor:=Supervisor) + Ruta:=Ruta, Supervisor:=Supervisor, Consola:=Consola) End Sub Private Sub PUanacExtr(CveMoneda As Integer) 'preciounitario a moneda nacional o extranjera @@ -2675,7 +2676,7 @@ Partial Class PopUpVerFactura EstadoDestino As String, PaisDestino As String, CPDestino As String, FechaMovimiento As Date, NombreCapturo As String, PuestoRecibio As String, PuestoEntrego As String, RazonSocial As String, ResponsableCarga As String, ResponsableRecibio As String, NombreCliente As String, Optional CantidadProductos As Decimal = 0, Optional CantidadUsados As Decimal = 0, Optional CveTipoAlmacen As Integer = -1, Optional NombreEntrego As String = "", Optional CveConceptoMovRelacionado As Integer = -1, Optional FolioRelacionado As String = "", Optional UsuarioRegistro As String = "", - Optional Ruta As String = Nothing, Optional Supervisor As String = Nothing) + Optional Ruta As String = Nothing, Optional Supervisor As String = Nothing, Optional Consola As String = "-1") Select Case CveConcepto @@ -3347,6 +3348,8 @@ Partial Class PopUpVerFactura RutaFormato = "{0}Formatos\TrasladoUsado.rdlc" End If + + params.Add(New ReportParameter("CveConcepto", "8")) 'FolioTraspaso.ToString 'params.Add(New ReportParameter("TipoTraslado", "AVISO")) 'FolioTraspaso.ToString params.Add(New ReportParameter("SubProyecto", String.Format("Traslado de: {0} A {1}", Almacen, AlmacenDestino))) 'DdlAlmacenDestino.SelectedItem.ToString @@ -3377,6 +3380,19 @@ Partial Class PopUpVerFactura CveCliente = DtMovimientos.FiltroPrimeroValor("CveCliente").ToEntero DTCliente = GlobalDTCliente(UsuarioActual.CveEmpresa).FiltraParametros($"CveCliente = {CveCliente}") + If CveCliente = 819998 Then + RutaFormato = "{0}Formatos\TrasladoAngeles.rdlc" + + If Consola <> "-1" And Consola.Trim.Length > 0 Then + RutaFormato = "{0}Formatos\Consola.rdlc" + params.Add(New ReportParameter("Consola", Consola)) + End If + + End If + + + + Dim CveVentaConsulta As Integer = DtMovimientos.FiltroPrimeroValor("CveVenta").ToEntero params.Add(New ReportParameter("Documentacion", DTCliente.FiltroPrimeroValor("Documentacion"))) @@ -3409,9 +3425,6 @@ Partial Class PopUpVerFactura - If CveCliente = 819998 Then - RutaFormato = "{0}Formatos\TrasladoAngeles.rdlc" - End If End If If CveContrato > 0 Then diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb index 2d72d8ab5..d82937aea 100644 --- a/Inventarios/EntradasSalidas.aspx.vb +++ b/Inventarios/EntradasSalidas.aspx.vb @@ -529,7 +529,7 @@ Partial Class Inventarios_EntradasSalidas End Property Private Function ValidaUsaConsola() As Boolean - + Consola = "" Dim Respuesta As Boolean = False For Each gvRow As GridViewRow In GvM.Rows @@ -547,6 +547,10 @@ Partial Class Inventarios_EntradasSalidas End If Next + If Respuesta Then + HplImprimirConsola.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=Alm&CveMovimiento={0}&Consola={1}", CveMovimiento, Consola))) + End If + Return Respuesta diff --git a/Inventarios/EntregaAlmacen.aspx.vb b/Inventarios/EntregaAlmacen.aspx.vb index abb8ed213..a0e274ecf 100644 --- a/Inventarios/EntregaAlmacen.aspx.vb +++ b/Inventarios/EntregaAlmacen.aspx.vb @@ -1848,10 +1848,13 @@ Partial Class Inventarios_EntregaAlmacen Private Sub GuardaVenta() - - '' INICIA: VALIDACIONES - - 'Valida el estatus de la Venta, si es = 5 O DevolucionVenta = 2, NO SE SURTE! + ValidaUsaConsola() + + + + '' INICIA: VALIDACIONES + + 'Valida el estatus de la Venta, si es = 5 O DevolucionVenta = 2, NO SE SURTE! Dim ObjVentaInv As New ClsInventarios If ObjVentaInv.GetEstatusVentaPorSurtir(CveVentaSurtir) Then TipoEstatus = ObjVentaInv.TipoEstatus @@ -3113,6 +3116,9 @@ Partial Class Inventarios_EntregaAlmacen Msg.AppendFormat("Movimiento {2}: {1}", CveMovimiento, Folio, If(TipoMovimiento = 1, "Salida", "Entrada")) Msg.AppendFormat("
Imprimir Movimiento ", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimiento))) + If Consola.Trim.Length > 0 Then + Msg.AppendFormat("
Consola ", Encripta(String.Format("OP=Alm&CveMovimiento={0}&Consola={1}", CveMovimiento, Consola))) + End If If CveMovimientoEntrada > 0 Then Msg.AppendFormat("

Movimiento Entrada (Traspaso): {1}", CveMovimientoEntrada, FolioEntrada) @@ -3161,8 +3167,10 @@ Partial Class Inventarios_EntregaAlmacen 'SI NO ES GARANTIA MANDA A RECIBIR AL USADO If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso TipoDocto.Contiene("Rem", "Ped") AndAlso CveMovimientoGarantia <= 0 Then Msg.AppendFormat("

Recibir Usado: Ir a Recepción de Usados", CveVentaSurtir) - End If - + End If + + + Alert(Msg.ToString(), TipoMensaje.MsgInformacion) Limpia() @@ -4423,8 +4431,8 @@ Partial Class Inventarios_EntregaAlmacen End Set End Property - Private Function UsaConsola() As Boolean - + Private Function ValidaUsaConsola() As Boolean + Consola = "" Dim Respuesta As Boolean = False For Each gvRow As GridViewRow In GvDatos.Rows From 1ef3fb33ef32ef77dce11d167ce6e58d0a60a892 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Tue, 6 Feb 2024 09:43:30 -0700 Subject: [PATCH 2/2] SMS - 2024.02.02 Archivo Consola rdlc --- Empresas/186/Formatos/Consola.rdlc | 3073 ++++++++++++++++++++++++++++ 1 file changed, 3073 insertions(+) create mode 100644 Empresas/186/Formatos/Consola.rdlc diff --git a/Empresas/186/Formatos/Consola.rdlc b/Empresas/186/Formatos/Consola.rdlc new file mode 100644 index 000000000..39b8cb463 --- /dev/null +++ b/Empresas/186/Formatos/Consola.rdlc @@ -0,0 +1,3073 @@ + + + 0 + + + + System.Data.DataSet + /* Local Connection */ + + 457ddefa-843b-4fae-8b02-70764606cb28 + + + + + + DsInventarios + /* Local Query */ + + + + Codigo + System.String + + + NumeroParte + System.String + + + PS + System.String + + + UnidadMedida + System.String + + + PU + System.Decimal + + + Cantidad + System.Decimal + + + Total + System.Decimal + + + Descuento + System.Decimal + + + CodigoAF + System.String + + + Almacen + System.String + + + SerieLote + System.String + + + Observaciones + System.String + + + Lote + System.String + + + FechaCaducidad + System.Date + + + PUVenta + System.Decimal + + + IVAVenta + System.Decimal + + + SubTotalVenta + System.Decimal + + + Marca + System.String + + + CodigoAlterno + System.String + + + PSAlterno + System.String + + + + DsInventarios + C:\inetpub\wwwVentas\App_Code\DsInventarios.xsd + DtMovimientos + + + + + + + + + + + + + + + 2.42399cm + + + 12.657cm + + + 5.2437cm + + + 5.43555cm + + + + + 0.43377cm + + + + + true + + + + + Cantidad + + + + + + + Textbox1 + + + + Black + + 1pt + + + Black + + 1pt + + #9cc3e5 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + + + + + Descripción del Equipo + + + + + + + Textbox3 + + + + Black + + 1pt + + + Black + + 1pt + + #9cc3e5 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + + + + + Serie + + + + + + + Textbox5 + + + + + + + + + #9cc3e5 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Modelo + + + + + + + Textbox7 + + + + Black + + 1pt + + + Black + + 1pt + + #9cc3e5 + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.46771cm + + + + + true + true + + + + + + + + + + + + Textbox19 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + FechaCaducidad + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox23 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox84 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.49417cm + + + + + true + true + + + + + 1 + + + + + + + Textbox44 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + CONSOLA DE RADIO FRECUENCIA BONSS ORTHOPEDIC + + + + + + + Textbox45 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox46 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + =Parameters!Consola.Value + + + + + + + Textbox85 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.44125cm + + + + + true + true + + + + + + + + + + + + Textbox51 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox52 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox53 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox86 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.6cm + + + + + true + true + + + + + 1 + + + + + + + Textbox87 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + PEDALES PARA RADIO FRECUENCIA BONSS + + + + + + + Textbox88 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox89 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox90 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + + + + Textbox91 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox92 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox93 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox94 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.52062cm + + + + + true + true + + + + + 2 + + + + + + + Textbox95 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + CABLE DE ALIMENTACION CON ADAPTADOR + + + + + + + Textbox96 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox97 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox98 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.44125cm + + + + + true + true + + + + + + + + + + + + Textbox99 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox100 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox101 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox102 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.6cm + + + + + true + true + + + + + 1 + + + + + + + Textbox103 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + MALETA TRANSPORTADORA MARCA BONSS + + + + + + + Textbox104 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox105 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox106 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + + + + Textbox107 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox108 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox109 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox110 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + 0.6cm + + + + + true + true + + + + + + + + + + + + Textbox111 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + EQUIOP A PRESTAMO PARA CIRUGÍA + + + + + + + Textbox112 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox113 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + true + true + + + + + + + + + + + + Textbox114 + + + Bottom + 2pt + 2pt + =IIf(rownumber(nothing) = 1, "2pt", "0pt") + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + DsInventarios + 0.14111cm + 0.10068cm + 5.79878cm + 25.76024cm + + + + + + 2.45176in + + + + + + true + true + + + + + SMS SMART MEDICAL SOLUTIONS + + + + + + + Textbox2 + 0.07163cm + 8.55215cm + 0.38833cm + 8.54466cm + 1 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + SSM1908213A0 +NEBRASKA 157, Col. NAPOLES +BENITO JUAREZ + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Microsoft.VisualBasic.Interaction.iif(Parameters!CveConcepto.Value = 8, "REMISIÓN", "ENTRADA DE TRASLADO") + + + + + + + Textbox2 + 0.07163cm + 18.69141cm + 0.38833cm + 6.81397cm + 3 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + REMISION + + + + + + + Textbox12 + 1.89684cm + 21.17549cm + 0.44478cm + 4.32987cm + 4 + + + #9cc3e5 + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!Folio.Value + + + + + + + Textbox12 + 2.34162cm + 21.17549cm + 0.44478cm + 4.32987cm + 5 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Fecha + + + + + + + Textbox12 + 0.91315cm + 21.1755cm + 0.44478cm + 4.32987cm + 6 + + + #9cc3e5 + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!FechaImpresion.Value + + + + + + + Textbox12 + 1.35793cm + 21.17549cm + 0.44478cm + 4.32987cm + 7 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =iif(Parameters!CveConcepto.Value = 8, "Carga Privada", " ") + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Cliente: + + + + =Parameters!ClienteCodigo.Value + + + + - + + + + =Parameters!ClienteNombre.Value + + + + . + + + + + =IIF(LEN(Parameters!ClienteSucursal.Value)> 0,"Sucursal: ","") + + + + =IIF(LEN(Parameters!ClienteSucursal.Value)>0, Parameters!ClienteSucursal.Value & " ","") + + + + RFC: + + + + =Parameters!ClienteRFC.Value + + + + +Calle: + + + + =Parameters!ClienteCalle.Value + + + + + + + + =Parameters!ClienteNoExt.Value + + + + . Colonia: + + + + =Parameters!ClienteColonia.Value + + + + Ciudad: + + + + =Parameters!ClienteCiudad.Value + + + + . +Estado: + + + + =Parameters!ClienteEstado.Value + + + + . +Municipio y/o Delegación: + + + + =Parameters!ClienteMunicipio.Value + + + + . CP: + + + + =Parameters!ClienteCP.Value + + + + . + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!Observaciones.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + + 3.8269cm + true + true + + + true + true + + + + + =Parameters!ResponsableCarga.Value + + + + + + + Textbox21 + 1.37766cm + 5.68986cm + 0.50243cm + 5.79375cm + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!ResponsableRecibio.Value + + + + + + + Textbox21 + 1.37766cm + 14.40467cm + 0.50243cm + 5.78664cm + 1 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + ___________________________ + + + + + + + + + Nombre y Firma + + + + + + + Textbox21 + 1.66375cm + 5.69781cm + 1.2cm + 5.78664cm + 2 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + ___________________________ + + + + + + + + + Nombre y Firma + + + + + + + Textbox21 + 1.6632cm + 14.41177cm + 1.2cm + 5.78664cm + 3 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Envió + + + + + + + Textbox22 + 0.07331cm + 5.69781cm + 0.6cm + 5.78664cm + 4 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!Accion.Value + + + + + + + Textbox22 + 0.07331cm + 14.41177cm + 0.6cm + 5.78664cm + 5 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =IIF(Parameters!NombreAccion.Value = "","",Parameters!NombreAccion.Value) + + + + Textbox21 + 0.45106cm + 10.04017cm + 0.63528cm + 5.78664cm + 6 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + ___________________________ + + + + + + + + + Nombre y Firma + + + + + + + Textbox21 + 1.6632cm + 10.04727cm + 1.2cm + 5.78664cm + 7 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + =Parameters!Accion.Value + + + + + + + Textbox22 + 0.07331cm + 10.04727cm + 0.6cm + 5.78664cm + 8 + + true + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Usuario: + + + + + + + + =Parameters!UsuarioImprimio.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Fecha Impresión: + + + + =Parameters!FechaImpresion.Value + + + + + + 2pt + 2pt + 2pt + 2pt + + + + 0.13678cm + 0cm + 20.28859cm + 11 + + + + + + 0.13678cm + 0cm + 25.72414cm + 12 + + + + + + 3.26597cm + 0.10068cm + 0cm + 25.76024cm + 13 + + true + + + + + + + true + true + + + + + ="Página " & Globals.PageNumber & " de " & Globals.TotalPages + + + + + + + Textbox10 + 3.40709cm + 23.00537cm + 0.41981cm + 2.55292cm + 14 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 21.59cm + 27.94cm + 1cm + 1cm + 0.5cm + 0.5cm + 0.13cm +