diff --git a/Ventas/Promociones.aspx b/Ventas/Promociones.aspx
index 0fba64e78..eef11b484 100644
--- a/Ventas/Promociones.aspx
+++ b/Ventas/Promociones.aspx
@@ -9,7 +9,7 @@
                 <asp:LinkButton ID="ImgAddFolio" runat="server" Visible="True" OnClick="BtnGenerarAPartir_Click"> Generar a partir de</asp:LinkButton>
             </li>
               <li>
-                <asp:LinkButton ID="LnkAgrgarPlantillaPS" runat="server" Visible="True" OnClick="LnkAgrgarPlantillaPS_Click"> Agregar Productos desde plantilla</asp:LinkButton>
+                <asp:LinkButton ID="LnkAgrgarPlantillaPS" runat="server" Visible="True" OnClick="LnkAgrgarPlantillaPS_Click"> Cargar Productos</asp:LinkButton>
             </li>
         </ContentTemplate>
     </asp:UpdatePanel>
diff --git a/Ventas/Promociones.aspx.vb b/Ventas/Promociones.aspx.vb
index a240c46e9..75d2249dc 100644
--- a/Ventas/Promociones.aspx.vb
+++ b/Ventas/Promociones.aspx.vb
@@ -1117,8 +1117,8 @@ Partial Class Ventas_Promociones
                 Dim CveTipoPromocion As Integer = -1
                 Dim Promocion As Decimal = PromocionStr.ToDecimal
                 Dim CantidadMinima As Decimal = CantidadMinimaStr.ToDecimal
-                Dim CveRin As Integer = DTRines.FiltroPrimeroValor("CveRinTamaño", $"Codigo = '{RinStr}'").ToString().ToEntero()
-                Dim RinTamaño As String = DTRines.FiltroPrimeroValor("RinTamaño", $"Codigo = '{RinStr}'").ToString()
+                Dim CveRin As Integer = If(RinStr <> "", DTRines.FiltroPrimeroValor("CveRinTamaño", $"Codigo = '{RinStr}'").ToString.ToEntero(), -1)
+                Dim RinTamaño As String = If(RinStr <> "", DTRines.FiltroPrimeroValor("RinTamaño", $"Codigo = '{RinStr}'").ToString(), "")
                 Dim IncluyeImpuestos As Boolean = If(IncluyeImpuestosStr.ToUpper.Contiene("´SÍ", "SI", "1"), True, False)
 
                 '  SBErrorRegistro.Append($"")
@@ -1131,12 +1131,11 @@ Partial Class Ventas_Promociones
                     Else
                         SBErrorRegistro.Append(If(CvePS > 0, "", $"No se encontro código de Producto/Servicio '{CodigoStr }'. "))
                     End If
-
                 End If
 
-                If TipoPromocionStr.ToUpper = "IMPORTE $" Then
+                If TipoPromocionStr.ToUpper.Contiene("IMPORTE $", "IMPORTE") Then
                     CveTipoPromocion = 1
-                ElseIf TipoPromocionStr.ToUpper = "DESCUENTO %" Then
+                ElseIf TipoPromocionStr.ToUpper.Contiene("DESCUENTO %", "DESCUENTO") Then
                     CveTipoPromocion = 2
                 ElseIf TipoPromocionStr.ToUpper = "CANTIDAD" Then
                     CveTipoPromocion = 3
@@ -1149,7 +1148,7 @@ Partial Class Ventas_Promociones
                 End If
 
                 If CantidadMinimaStr.Length > 0 And Not CantidadMinima > 0 Then
-                    SBErrorRegistro.Append($"La Cantidad Minima debe de ser mayor a 0. ")
+                    SBErrorRegistro.Append($"La Cantidad MÍnima debe de ser mayor a 0. ")
                 End If
 
                 If RinStr.Length > 0 And Not CveRin > 0 Then