diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 83cb1872b..d66ba6161 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -6326,6 +6326,10 @@ Public Class ClsPaginas
             Dim rds4 As New ReportDataSource With {.Name = "DataSet4", .Value = If(Vta.DtDocumentosRelacionados IsNot Nothing, Vta.DtDocumentosRelacionados, New DataTable)} ' sino esta creado el objeto, lo creamos, para que no truene el reporte
             lrds.Add(rds4)
             If UsuarioActual.Empresa.Funcionalidad(707) = "1" OrElse UsarStimulsoft Then
+                If Vta.Cliente.CodigoRegimenFiscal.ToString.Length > 0 Then
+                    params.Add(New ReportParameter("ClienteRegimenFiscal", $"{Vta.Cliente.CodigoRegimenFiscal}-{Vta.Cliente.RegimenFiscal}"))
+                End If
+
                 If Vta.DtDocumentosRelacionados IsNot Nothing AndAlso Vta.DtDocumentosRelacionados.Rows.Count > 0 Then
                     params.Add(New ReportParameter("TieneDocumentosRelacionados", "True"))
                 Else
diff --git a/Ashx/E141.ashx b/Ashx/E141.ashx
index 0bfb003be..7f6bf47cb 100644
--- a/Ashx/E141.ashx
+++ b/Ashx/E141.ashx
@@ -1851,7 +1851,8 @@ Public Class E141 : Implements IHttpHandler
                 New JProperty("short_description", ""),
                 New JProperty("description", ""),
                 New JProperty("currency", 1),
-                New JProperty("promo_price", RowPS("PrecioPromocion"))
+                New JProperty("promo_price", RowPS("PrecioPromocion")),
+                New JProperty("product_related", RowPS("CodigosRelacionados"))
             )
 
             ArrayPS.Add(producto)
diff --git a/Bancos/PrestamoPersonal.aspx b/Bancos/PrestamoPersonal.aspx
index 332b6e4ad..10daa5b36 100644
--- a/Bancos/PrestamoPersonal.aspx
+++ b/Bancos/PrestamoPersonal.aspx
@@ -115,18 +115,18 @@
                                         </div>
                                         <div class="col-md-4" id="DivMovtoPermanente" runat="server" visible="false">
                                             <div class="row">
-                                                <div class="col-md-3">
+                                                <div class="col-md-4 control-label">
                                                     <asp:Label runat="server" Text="Concep. Nom:"></asp:Label>
                                                 </div>
-                                                <div class="col-md-9">
+                                                <div class="col-md-8">
                                                     <asp:DropDownList ID="DdlConcepto" runat="server" DataTextField="CodigoConcepto" DataValueField="CveConcepto" Class="form-control input-sm select2me" Width="100%" ValidationGroup="GrpGuardar"></asp:DropDownList>
                                                 </div>
                                             </div>
                                             <div class="row">
-                                                <div class="col-md-3">
+                                                <div class="col-md-4 control-label">
                                                     <asp:Label runat="server" Text="Tipo Desc.:"></asp:Label>
                                                 </div>
-                                                <div class="col-md-9">
+                                                <div class="col-md-8">
                                                     <asp:DropDownList ID="DdlTipoDescto" runat="server" DataTextField="CodigoConcepto" DataValueField="CveConcepto" Class="form-control input-sm select2me" Width="100%" ValidationGroup="GrpGuardarPrestamo">
                                                         <asp:ListItem Value="-1" Text="Seleccione" Enabled="true"></asp:ListItem>
                                                         <%--                                                        <asp:ListItem Value="1" Text="Importe"></asp:ListItem>
@@ -137,18 +137,18 @@
                                                 </div>
                                             </div>
                                             <div class="row" id="DivImportePrestamo" runat="server" visible="false">
-                                                <div class="col-md-3">
+                                                <div class="col-md-4 control-label">
                                                     <asp:Label runat="server" Text="Importe prestamo:"></asp:Label>
                                                 </div>
-                                                <div class="col-md-9">
+                                                <div class="col-md-8">
                                                     <asp:Label runat="server" Text="" ID="LblPrestamo" ClientIDMode="Static"></asp:Label>
                                                 </div>
                                             </div>
                                             <div class="row" id="DivValor" runat="server">
-                                                <div class="col-md-3">
+                                                <div class="col-md-4 control-label">
                                                     <asp:Label runat="server" Text="Valor:"></asp:Label>
                                                 </div>
-                                                <div class="col-md-9">
+                                                <div class="col-md-8">
                                                     <asp:TextBox ID="TxtValor" CssClass="form-control input-sm" runat="server" Style="text-align: right;" onkeyup="FormatoMoneda(this)" AutoComplete="off"></asp:TextBox>
                                                     <ajax:FilteredTextBoxExtender ID="FTVValor" runat="server" TargetControlID="TxtValor" FilterType="Custom, Numbers" ValidChars="+-.," />
                                                     <asp:RequiredFieldValidator ID="RfvMontoLimite" runat="server" Display="None" ControlToValidate="TxtValor" CssClass="help-block errorimput"
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 8de097b71..fd99ebfa2 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -9365,10 +9365,13 @@ Partial Class Ventas
         If (Archivo.Exists Or Archivo2.Exists Or ArchivoSti.Exists Or ArchivoSti2.Exists Or ArchivoSti3.Exists) And IfNull(CveVenta, 0).ToString().ToEntero() > 0 Then
             HplDownPDF.Visible = True
             HplDownPDF.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=VTA&CVEVENTA={0}&PAG=1&GUARDAR=1", CveVenta)))
-            If UsuarioActual.CveRol = 1 Then
+
+            If UsuarioActual.TienePermisoProceso(359) Then
                 HplRenerarPDF.Visible = True
                 HplRenerarPDF.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=VTA&CVEVENTA={0}&PAG=1&GUARDAR=1&REGENERAR=1", CveVenta)))
+            End If
 
+            If UsuarioActual.CveRol = 1 Then
                 HplImprimirPDFStimulsoft.Visible = True
                 HplImprimirPDFStimulsoft.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=VTA&CVEVENTA={0}&PAG=1&GUARDAR=0&STIMULSOFT=1", CveVenta)))
             End If
@@ -25278,9 +25281,9 @@ Partial Class Ventas
 
                     ObjFacturaCancelacion.CveAlmacenDevolucion = CveAlmacenDevolucion
 
-                    'If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso ObjFacturaCancelacion.TipoDocto.Contiene("Rem", "Dev") Then
-                    '    ChkDevAlm.Checked = True
-                    'End If
+                    If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso ObjFacturaCancelacion.TipoDocto.Contiene("Rem", "Dev") Then
+                        ChkDevAlm.Checked = True
+                    End If
 
                     If UsuarioActual.Empresa.Funcionalidad(567) = "1" AndAlso ObjFacturaCancelacion.TipoDocto = "Rem" Then
                         ChkDevAlm.Checked = True
@@ -33429,6 +33432,9 @@ Partial Class Ventas
 
                     Dim Cargo As Decimal = DTTamanios.FiltroPrimeroValor("Cargo", $" CveTamaño = { CveTamanioTemp  }").ToDecimal
 
+                    If DtUsadosDevolucion IsNot Nothing Then
+                        Cargo = DtUsadosDevolucion.FiltroPrimeroValor("PU", $"CvePS = {CvePsTemp}").ToString().ToDecimal()
+                    End If
 
                     If DTPSTemp.FiltraParametros($"CvePs = { CvePsTemp }").Rows.Count > 0 Then