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/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
+
+
+ 10.19535in
+
+
+ 4.44499cm
+ true
+ true
+
+
+ Embedded
+ Logo
+ FitProportional
+ 0.07163cm
+ 0.13191cm
+ 2.14355cm
+ 4.20283cm
+
+
+
+
+
+ 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
+
+
+
+
+
+
+
+
+ C.P. 03810
+CIUDAD DE MEXICO
+
+
+
+
+
+
+
+
+ Teléfono: +52 551 563 3271 Correo:support@smsmedicalsolutions.com
+
+
+
+
+
+
+ Textbox6
+ 0.60107cm
+ 6.91174cm
+ 1.61411cm
+ 11.48154cm
+ 2
+
+
+ 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", " ")
+
+
+
+
+
+
+ CveConcepto
+ 0.50379cm
+ 23.00538cm
+ 0.2384cm
+ 2.5cm
+ 8
+
+ true
+
+
+
+ 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
+
+
+
+ .
+
+
+
+
+
+
+ Textbox7
+ 2.32101cm
+ 16.46891cm
+ 2.12398cm
+ 4.60075cm
+ 9
+
+ true
+
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =Parameters!Observaciones.Value
+
+
+
+
+
+
+ Textbox31
+ 2.39157cm
+ 0.13678cm
+ 1.87703cm
+ 16.26157cm
+ 10
+
+
+ 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
+
+
+
+
+
+
+ Textbox29
+ 3.40709cm
+ 0.10068cm
+ 0.41981cm
+ 5.78083cm
+ 9
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Fecha Impresión:
+
+
+
+ =Parameters!FechaImpresion.Value
+
+
+
+
+
+
+ Textbox31
+ 3.40709cm
+ 11.33129cm
+ 0.41981cm
+ 5.13762cm
+ 10
+
+
+ 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
+
+
+
+
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ DateTime
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ Integer
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+
+
+ image/png
+ iVBORw0KGgoAAAANSUhEUgAAAS4AAAC3CAYAAACsXrN8AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAACxIAAAsSAdLdfvwAAB0CSURBVHhe7Z3djyXHWcaHG4S4sYU0s0qi4AjHIEXIu5sYLJDWWisXsGtHtjeeGaMIsUKQSNx4d7O7xt4Zz1o2/oDYWWMbGzlCi1AswwUziYlswOvdoAiZD6EVDmCHC+8fkItxUOByqae63jPVdd7qrj5d/XFmnp/0aqarq6urq6ueft/qOucsEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCJlH7rlh48bVxbXjK4trW6tLa1dWFtcvrO47d9jtJoSQcbG8uHHACNW11aX169O2dtFlI4SQcWA9raX17WnB8mxx/bzLTggh/XH0wc0Dd3118zDs6KnN40dObp6H3ferz7+lilVgd3/lr56WY3w7enLzgpZ+5NTmvXI+VwVCCJlmIk4nN09UCcmvPbj5KXfIAuazNKGasobzXb5Q+vVA3cI6EEL2CBj4oSiION3z4OaNLlstqcK1srR+wh3SCtQNdfS9PtSbQkbILkQGvHhTGPjYdrtnpniLqItVyTp8wwjvTIQMf7HtdhFC5hHxqiTEauJNpYAlEKpQlW3bZe8ceF7wwETE6IkRMidgsIoHksOrqsMI09VAqMpmxM1l7ZWwHYo3oDuhLdaauayEkKGwE9rGs+rb0/jCFy/eunLT4++XxAq2b/3HQ4lWCITr/p9/crqOXKpByDCIYCFEyh0K1oHzQSjx1y5EXVo/ATGAYN31u68/3Hd9qpgSLWtrV9xuQkgfTEKhAQRLwLljk+FIx363OTja6v7lTz522e0mhHSNFYyeQ8KQFGGCJzgWr2v5lidPh8J1751/
+siYeo8tGCGmLm1C+iJAGSw+O3f7sUTuPFfFy+kK8PbcZZSxel9T3i59+8u77f/GZ7658fONphLaybwxtSsiuwXgF5Td2+x7932N3vniT2z0I8E6aeClDe10QJF9k8ZbR/VtCvFh6X4S0AB5BSbTEBn5Th8HdJEQd0uvSzh0TLiCeWZPrI4R4xITLhDqPuiy9Y72SGUKqIbyumGBWCRcQj5LiRcgMYAAtf+L8h75orSytfXTXb7/+pcmiyh7FQLwRt9mIvr2uqvPVCZeAa51FpAnZs0CQMPCwuNOfnJcJZQDhspPKPXgH4oW0Ecq+vC60S5VIpgoXQDkoz20SQmKIaKWKkXhC4oW55KzkEMc+vK46obFi37CNZjmGkD1HG5HAAIOANRG+OlBWrpCpS68rpZ6zilDONiBk15FrgKAMCKANJRuUd3n/Q4dhbjO7l5S7PCG13dp4TxQvQhS6GNQSdooXFvN2Lh08c/6dA2e23zl49rrYm7c9/DSEz2XJRm6vq4mgNJnf0sgRMhOya5B5KrfZCRjc1gMz5/EH+qWDZy/4guXb3/zyI3/msmUjp0A3ES3QVrgguGi/rsJdQuaKLud+QiCS4oV99Tf+9AFNsHwzoWN2DyPH9YYCnEJb4QJ9PGQIGT1NvYacvPr5p57WxMq3tz97Nnu42MbrEq9nlpAth3CBnF4jIXPH0E9viJImVr5h/stlz8osXhfyQzBmES2QS7jArOJJyNwzdOe/vP/0AU2sfLu8/0wnnkVTr6WtaOF4iKXbbE3u8giZC8YSbrxz8MxVTbCsHTh7zWXrhFSvq61ogTZLIWIwZCR7jhwT1DnA5LsmXm9+7uEf/sUdjx1y2TohZeCjjXJ4pl0IF2DISPYMY3pSY9BBRP/88OOPXjp45iIMc1+nH3j11j4GZZWAi2jlEPiurgV1Y8hI9gRj8bYgoFXCgPS2IVodr37+qZPfue2RD4vQ9Mw2hPPy/gdvxDlziRbIOTEfgjZC
+W7pNQnYfMiDd5iCIIKV4fciL+nYxMC/vP308DFFhf/+53//P3/rKN7+US7RAl8IFui6fkEEZ+ukswtm0DqlCl0oxtzYtWmJ/e9vDL7usWehaWLqaQyNkFAz5ZK4LDesIj/+vlxc+9eHXF2YqK+ZtiV06eDbrbx720e70usiuBAM/p9eSioR7Oc4tHtt/vPCTr/3gpYXrsA9eWmg8YGsXv2ZeitGHqNDrIrsSDPguJ7o1RGhynvft5245JKIl5nYlU7f49dLBM1sua2v6fGDQ6yK7jr47ddvQMMYHLy4caCtcENI3bn/k+5powfzvBWtLn54QBBLt7jYJmW/E83GbnZIzNNTAwHz72U//s4iWEbILblcS0haPH3vxJsxllUTrwNmPnj/ytW/kFNs+hQv15rousmvo60ncRWgo2JDLeI24FgxQeF6YoHe7kxAv0G1aEDbCwxIvC3WXc9gMLel73VxX7U9I7/QRJooo5B6k8FZEsFzSTNhyEssQAXabreg7RM9Zd0IGpcvBA6HCQGkrLCEiWDnCLNStaTnWw8twTX0LF+jhnPDocA4sG8Ecoxjexl40ltLWiABwfGhNQV20cppEGOGxTaYf8JAIj9cM7YI2q6qXdlxT2x0PLQiLNu/x3y8sHP7gpYUtzBHNuh5Knu45Q5OcggUgPrOGyW2OFQYRrgz1rgDX44tVzDCIqvoF7q92XNOHBfq2Vk5q/0E7hcduG0sltT18g8Br9dPyNrXe+1snQABCEcDckP9WzogXOlkj7ODIGBrmFizxBFsLT0sRGEK4Yg+rDMBr0AZLzCAAsbaLCRfO0YSrxrRyUvsRPBTt+NSH8SzCJRZ6R1qeprY7hEsbePC2fOGCuV1RjLgdx2LPf7jw8btzCALAAEP9cgoWkHJzeYJtvMohhGtlae3elU9sbK8urV/Hr5Cv7tvI0Q4xz6bOIF7awy0mXE28HVyXVgYstT/FxDg15GojXDDfw9T2N7VdIlzKwIHH
+ZYRoW0SrzuOCYPki981n7jjqds2ECAu8gtwhTRfhq3hv+OuSktC83a5Z3XfuMAQrMHglbcB1Q1C0gZJimhcVEy5YqmhUiWlqu8c8ttR5rrbC5Qu7tr+p7V7hAvC6/uXCz3z70nM3v1E3xwVh84Vrlo/ZgC4FC0CsUH5TgUlhlrIHEa7F9fOKcF1fXtxo095VAoGHHvoDBjrmbrQ8sLDdqoQr9ZMLMdGBpbQ76qQdC0sV+5hwId23qrqKUIfHiGnHSLuH1mt/64y6UCUllAk9LiNkjQZB14IFUO4sXlETxJtzm7Xgmru63hjLNz/xiiZcLcNFDBJt8IRtgbaPDdAwb5VwweruY1WYCEsZwHV1SAHjJ/VYtIGWt06otWNqx+1ck0O4wA9eWDgBAXv/Jf2tD9LNfvuWUhaGQkQw0LsULICyIRJus1OanCu1bdsi3iDO94Xli19e3bf+o7JwrTV++RKgDZzYYEPbaPnDtqgTjboHBDw87TixFOFCnbRjxdqUEUMT9rp5vTA/rJe+NRi1wpXBKzBidbzskf3Ej37zzEu/B8HKOdekgVCsL9ESUtusS+HCQ8FeuzkHHg5+fRAWYlJ++ZPnr97/C09dvOeGjTZeaMyzqWpzLX/YFnXCVeeFVIWlsBTRiXmSYin3D3m0Y2PEwu4qtPyd9a1RUDd4cngr4RwYbOuPDj7gdncG6t33HJKQIl5dCBfOiQeCtZprbxraRogJTNW5tfxhW8TK9S0muGh3Lb9vKf2i7oVDylxbU+Hqqj13B5On7s1PXDOhQuVTt+0A04QLk/9udyeEXsYQoA5VHmUu4fJDQfxtMo+XoQ5dDbRYub7FRLcuTITV9b8U8UtZmoHr0o6N0VV7zj8QqdWldbuOx7PoW5K2nRvzW4Fwpb6RaYzMm3UdgqYgdYkJSZt2rQoFm5BBuGIDvG14niJcsX5UFybC6oRLC9m0cuvancKVi9XFteOBaBW275zaODmEwH2E6Dwm8Wf9
+CFEdGMzwOMYgWoJ4Q6F4IR3t6jaTgVilhoIpoJyYsDZAGzhNPs+nERvAoYX3OsVTgtW1nbbwVPPk6u4hhSsXTYXLDpYMg6RLRAjGJFqCL1L4Pnt8z9d3fumRq9++/dz3sG0zVSDHwzvCfcggNBMy3duYh9OmXByrlRkaPCOflDARVle38JoQFmp1qvsIUlPh4uR8DKzZMUIVhorbXc5zdQkGdtO5nb5BKDf5jcbA8HuNLtsE8R4lFOxKkDMJV+xjMTDsmyWMTRWuMFysm1AXq7pm9KMwvywZCdPrpj2aChfKC/NCRKsI88N2n3ABTM4bsboK0bKT9DUrp8cqXBAEDOwxixYw4nReEy0x8byskLhQsI+XC2g3nMttzkpKeIYBiWtMvU8x4dIGtoi6tkYsJmRVwqWVI/1fO3/VNTURrpi3WOfVacfsTuFqSqa5kKxgYMMrcZujBr8MpAmW2LduP/d+F6FgCpkeSlVel28QEuSt8yBjwqWFUlJ/rQ6xelUJlyY20s+wBCLc17QsGNLF4M1VvVCoKh9ox6BccuTUX99tPYEBBpaGDaPmRLSAJla+vXXbQ++6rL2TSbjQJ7RBXWVV540JFwQvTJNQSvOuNO8JViUG2sJT8X5R53Bf1XVo+ZtYyqcatONy3NP5BgJhwrGPjp7aum7t5NZ2H2FMDFufAc8/C+8cOLOtCZZY7h+ZbULmaQB4RKnzTLDYuWPCBbRwTRMICGmsnCrh0vILWnlV966NcOE6U5wE7VgKlxUqES1nR05u1U0YtgbLJrCMwl8+gfmseRMtgAl4TbDE8CO0LmvvdDB/ifuF66kKf3zTPOcq4Up9c4g5tabCpc3X+cKEawv3Q6hjzCpcOGeKaAHt+L0tXAgNQ9ESy/A2Kgo+32hs8p1g7/3xT73c5du1rrm8/8Eb417XmavY77L2TgfC5QNRqgshtYdglXBp4qIZ2rSpcGlzaOGaNE2QYw/TWYSrSgg1tDIoXJpowY6c
+2noFnT5mONa3VNHRvoEV9t3nfva0yzKX4Lca//LQ+e8Z7+p/IFh/99mH/u+1Ox57Y0jRArhX7t8uwb2vErCwb1QJF6jz5nAu0FS4tMn8cK2ddh2x9Xgx4cL5YbE5uCbzt9rxe1u4gBGoq4pw1c7JhMIFjykUt9DwAuDNZz/zuiZc//j1j11DGShr7MsfQmQRaSje9s0orttck0vqHZzf/dsHsbd84UCNCY5QFy6KkMTKibV3ijeliRGuSyMmXD7anF2sPI3wWBiFC4MLQuWLVlvhwPG2zJObJTcc6ZeevfmiJlz4Pi8MfCuERuAmgndquG+BSKFov+q1ZnJNQ8zf9SxcEO6UgVYnXHXhorR1E+HCMbG8vmnhJMRHI0W4NBFuEi6Gx8IoXF2AyX0RwlB0YqEi5r1clhIY7ChjImQjEjPrUSUu24Cw2XobAetzLq9n4QIpAw33TsvnEwsXJUwEsXK0vhEL21JNezClCFdMhFPDRe1YClcX2CUNRrRMGPrDu05sHnLJE/zJefzFB7TdriQ0McN2nx4NrjFVtHwKb3TzuBZadsEcC1csXPQfcE2EKyYyqdakzBBNhFPDxfA4WN/3dO+Agfnrp791K/66pE6xQgYxESFzC2pzi8NEeFqKJOqFclDnqjCzLS2FC/cO852hVZEy0FKEK+ap+G3VRLhQby1vqmntmCpcbcLF8DgYhatrmoRTOYEYWC8M4uDEDP8jrUoo7A/mvrhw0XiCVzDv5n8poohNTjG03iPm9Dpqo5bClTowfbT8YR1ShAuEnoofJoImwqXla2KaYKe2TyxMTbnn2nEUrj7AoOwzjIsBwYFwxSb/sRjWiNW1cP4N4oX6Q7S68o6swENcM7aTCK3bnIXYwKyqo5Z/VuEKPZXwWlKFK+a9NTHNQ0oVLoDjw3wp4WJ4DIzC1Re5PZVcWI/HCBdE45U/uGcrFC3YuxcW/6kvr9EKaaY3kFaknSjPCIRCGzilt8UeqUISyxcS
+Ck740Eg9n/amEN5cDPTTMD8svCdNhEtbKpISLobHwChcfWFDNzMg3eYosd/iqgjXv7/w0//qsvQC2koErI3YZxCumKeCQR+KCLa1NUuw8BpShQsgr1hIrJwwryYaYdgZonlIocfXRLhmDRe1YyhcfWLDoZ48l1moWKoR8zA6BQIGT3XWEBXClyG0jS1LwMBGu2AQQQRi+TTPJiY4TUkVLq1udYNfm8wPQ7smwoX7oOWtCxe1YyhcfQPhyjmPkxtMzAfCdbWr79FPxc7NYV7OtF0TIWo5MS/EwsVU07zsPoUrJhihuIVoohQuRG0iXED7OFFduBjmh1G4hmCs812C8bAOYIX/a88cWnNJo8DOxxkBSw3/MgkXmHUpgRZSgj6FKxai1T0AUo5rKlyxh0AYgvpo+SlcQyAhUIYwpjMyzA91BuqV8gYyo3DhPsXmr2IGTyJWvz6FSxMXLXwNiU3Q15UNi4F21PJXzbdp+SlcQ5HhVX2njFm4hKo3kB3UH4NOW0ipGUSuSlRjgtOUWDn+dWveYt3EvKBN0Pui0VS4QOwBEHuIa3kpXEMy5vmueRAuAK/VtqMLv1cW1y/gV53wQynLH9t4t+rXnWYEnggELBQEDEhMNKe8fME9x/GhNSVWjt+ntP2pD0y5Tt/8FzUoJ9wPqyJ2TGwcaHlH+8DfM4x1vmtehEtAG973K89/A4JVtjV0dEJITsY63zVvwgUgUtPCtQ5viBCSmzHOd82jcOE3NClchPQIvv7GiNf37dfhnNy6hnkbt2sQMPc2dB2asrK0dm8oWpjzcrtnpk7Etf14GEm6ZuJh46+2PzZ9YJeEmP0xDx33DG9T6+6d1C92HqnXWOdgyUgwHe2ifPmgtZNbdQvzsoAObs6Hb4A1Vvb6Mi4n6I3lzzz15eWfe+LfbNi4uJ6l/nJPtEGOgS37XZLFLtdw6ZpBFJDPioOy31rwDbrApNtv65XjBdy70rHG7BdaRoTH3Pctm8f0O5dU
+wqsX5whJHHQQ11F2Op7pVPL0REcKLfa0TAVlhOfE8gK3ey6FCwO4bbuESNtogxxpst8lWTzhumLvYWBSR7kH1ss26RAr/yfzkGYLdKA8pOM4lyQPH1dH+xsKk76EbZdtArwp2R97QHp9g8JF4thOK50p6FASHoSGQSoDIdkQSjghNIPlrdI5C5t0VOR3/84FEIPQa8zBpG3MPfFDtJIAGHPJFrQd0urasLiP5Xa35ULA7PHl3/hEPqTjOJdkhKv4wRdfWH1PEPfbJVvs2je3T9sPtHoRMgU6KzoeBoftiB3NLfgiuNuEqwtvC/jt43ukoQC4ZEsb4QKFeDnPy+sLyIc0X7jc8VOhrNzrMH0idFJHxZOM1YuQwfE658TmNVTEINU8hxz47eN7QPjf3+eSLb4ooJ1987027x5MCQTSsA95XFKlcLnNSgqvdOc6RBz9OoGqehEyOOigZnBhotYMiGI9mfMkrqBzF/vG+9Ek0FWIKLgBbAe7/evC7eL/nd/ldNktIlya+aJTJRBIC/NH0my5brOSiZfoJv4hrMXx5farqhcho8J6LYEXIQYBc9lGhYhW6DHkZKcdJm/urhSCXkqLhIq2PSE2O+aFfn0L1+T+ujrsCHD5/lK4yNzgew+qKa/nhwSihYHXpWgBuX6cZzLvZNujeIEi2zazY0e4ZpvjAnI/cgkXxEryGrMi6t9zvx0pXGQukCdvnXUtEqkUA6ufj0rJteN/00476+2ckPv7hbbCJXNRYbnIh7SScDkxxT10SRZXV3iHNl3eVMas9OKBwkXGAgaD7ZBeqCLIQKszf8AMAc6PuvZZD7l2/O8LCv4P9wuzCheE2B6749mVhAPbSPevfyKm5hiIlA35PYGVekqYCIHC8WKTuhrvyxZoCOtFyCD4czFFJy2/ApfOW2f+gOmLYhAVa9aGOL9cu9ss6uOJf7gf1LWnXEdxbXoeCEnoUZr0KeGyYhcL88UrlDDRhbc+OF7yi8hV1Qvm
+n5+QzvCe4J7tvEkKhS1mXYZm4hFi0PuGNBlQQyDX7jan0Pa3ES7zUNmCV6S1tdk/JVwAeXGMCFjxd+f+igcWPrAEnNOW68JFrV6+hecnJDuxTojB5bK4EEV/oygW6/RtsOc14U0x0Itf2na7CCF7nTqPC9hwQs1XPMFze1sQLDzhtTk3QgiZCgURGrhdJRCSwbMSAYMXBm8op2jZkHAOBQveoPVeE+ptQ7cK71HC4roQuCqf1MdtTrZjJvcw5dzY7/6dQq5Na4eqfQDp2F9VPiElbIe18yCbv+OSegd1gKeVUwi7BvWd8kTNtiboGJiliXLkMw+CMJ/MgfnhukZVPjmH25xsx0zEIlYm6mjq6hbWFobtUOCsMGG/ubbovvBtaNguztA2VQJKiGXIpx06KDy/eRItW2dPtMLB5w86DM5SXm/OEAPUZbNUCZJPVT4p223KxH1hrh6uvkWa84K0MgvR2rm2ct3L0wSeOOG6klbcl8rD/6U27eYzpmQXUTz5+u8odlAHc2rzgA1pMcAC78K+SHBv4AQM4mIg7gx0tLU2QKsEyacqn5TrNkuYdPXtI9DK9K9TBM72FSc4/rX6wmXL8a5LE67i3hd5/frg/7rrJ2RC351lKLHMgQxoiJJLiqINTmCOLZYieO2uiYdGVT45n9ssYdIbCZfkD8/jzY1OhMgTJ2sQNxFqb990fiOKLomQ5miDYFbQYdExbed0T2oB2xj48ypaoAhvi0FnB3xwjT5uwE4JiSYUWppGVb7Y+YBJn0m4wvwT0dGFy36DCP6XsrT8YJLPiLhWJ0Jq0QbBLECQIEzoiEWH3flGVqzYxn5/bmReMddRmrB2VvqWByD73OYE2x4m3W93LU2jKl/sfMCk9yJc3v/2Gye0/EDO6RtC6nl+qJGe0QZBEyBGNoSo8D52Gxhg/uS1tSD0kXS3OUETCi1Noypf7HzApPciXNg2bSOfi/SFrCRcAPvUh8Ae6kekBXWDpQp5M+hP
+VO81MNBExHyPQQai25ygCYWWpiH5tK8Uip0PmPTehMs+yDCpjzI9EbOZI6D/TPIq10bIFHWDJYZ4Wrsh/GuLNmnvDd5S+IM8Nt1rd008NHbylX80A+dAOswllTDpMwlXWB/Ji/0uSRcz1x6eVQoX0MohJMosHtNeFS37csGIhi9GRVtMD/SJQBlvTNrXhtQymL2QSBMPDRwjxyOvPXfJ45v++TFg9jUSronwGPGVY6ywODHGfpvREBMcbLv00j57DSjXlOH3H9NeSd4ZIRZ0PK1DV7FXw0MZuDHz21EGqJYPg9Rls4h4xKxUblkQovl8zL5GwgVBmZrDc4Z0X3BQpttXFi5PZP19+N9LV2z+1veRAUDHi3V4DRuWmE7pNvcUxYA2nkEgSKEXJhTekPG8XH6bzxMIoYlwWS8r+PbS2PkFk6eRcAG5VpRtz2OuAdu+aIGYcAGvnqV9ONekXDGUr7QNISpNhMsNxOgA2UvA40S7pXqeXXioTc7fhq7OARHs6xrILiTlSWef9HtwXosQMlJShGuvzmsRQkZKnXAxRCSEjI4q4bLzEN7rb0IIGQVVwgVPa6++RSSEjJiYcDFEJISMlphwhaubCSFkNGhrubQ0QggZDaFIcUKeEDJ6QuHihDwhZPRgYal8uNX/nxBCRo1M0HOFPCFkboBwcfkDIWSuOHbgD9+979ALr3H5AyFkLlhdWruyurR+fXXf+o9X920wTCSEjJ+VpbV7rXAtrb+3vLjBt4mEkPGDpRDHDnztabdJCCHjp+pD1oQQMjrCxaeEEDJ66G0RQuYKeluEkLmD3hYhZK7gKnlCyFzg1mtdxZqt+2954r1jd754k9tFCCHjAyvijWBtu4Wmztamfn2YEEJGw8rS+omyaBXmdhNCyPjwPtZD4SKEzA9GqOz8ltjK4voFt4sQQsbJPTds3GhDxsX186uLa/yWU0IIIYQQQgghhBBCCCGEEEIIIYQQQgghhBBCCCGEEEIIIYQQ
+QgghhBBCyJ5lYeH/Aev8eE4+mU6OAAAAAElFTkSuQmCC
+
+
+ Cm
+ 859971a9-970d-45f5-be4a-0f05a1eb9a33
+
\ No newline at end of file
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