From 505207ab95643c845204b893a409c8eb86e1ac00 Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Mon, 31 Jul 2023 10:28:24 -0700
Subject: [PATCH] ClsPaginas correcion

---
 App_Code/ClsPaginas.vb              |  6 +++---
 Inventarios/TraspasoAlmacen.aspx.vb | 11 +++++++++++
 2 files changed, 14 insertions(+), 3 deletions(-)

diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 3bbcf579c..cad37fe3c 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -9325,15 +9325,15 @@ Public Class ClsPaginas
             PaginaDict.Add("/Ventas/RepCancelacionesVentas.aspx".ToUpper(), 1325)
             PaginaDict.Add("/Ventas/RepLineasAdicionales.aspx".ToUpper(), 1331)
             PaginaDict.Add("/Ventas/RepLineasAdicionales.aspx?OP=OP".ToUpper(), 1332)
-<<<<<<< HEAD
+
             PaginaDict.Add("/Ventas/FacturacionAcarreos.aspx".ToUpper(), 774)
 
-=======
+
             PaginaDict.Add("/Ventas/RepIndicadoresPorProyecto.aspx".ToUpper(), 617)
 
 
 
->>>>>>> Indicadores por Proyecto
+
 #End Region
 #Region "Varios"
             'Portal Cliente/Proveedor
diff --git a/Inventarios/TraspasoAlmacen.aspx.vb b/Inventarios/TraspasoAlmacen.aspx.vb
index cc9d42df5..3a2c26cbd 100644
--- a/Inventarios/TraspasoAlmacen.aspx.vb
+++ b/Inventarios/TraspasoAlmacen.aspx.vb
@@ -1586,6 +1586,16 @@ Partial Class Inventarios_TraspasoAlmacen
                 End If
             End If
 
+
+            If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
+                e.Row.FCTextBox("TxtCantidad").Enabled = False
+                e.Row.FCTextBox("TxtCantidad").Text = e.Row.DataKey("Cantidad")
+                e.Row.FCCheckBox("Chk").Enabled = False
+                e.Row.FCCheckBox("Chk").Checked = True
+            End If
+
+
+
         End If
     End Sub
 
@@ -3388,3 +3398,4 @@ End Class
 
 
 
+