diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index d4001e38b..7f71e50f0 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -9330,6 +9330,7 @@ Partial Class Ventas
                     e.Row.CssClass = "SubTotales"
                 End If
             Else
+                e.Row.FCLiteral("LtlPS").Text = String.Format("<a Class='Texto'  target='_blank' href='/Inventarios/Kardex.aspx?CvePS={0}&CveAlmacen={1}&FechaI={2}&FechaF={3}'> {4}</a>", e.Row.DBCampo("CvePS"), e.Row.DBCampo("CveAlmacen"), e.Row.DBCampo("Fecha").ToDate.AddDays(-7).ToShortDateString, e.Row.DBCampo("Fecha").ToDate.AddDays(7).ToShortDateString, e.Row.DBCampo("PS"))
 
                 e.Row.Cells(3).HorizontalAlign = HorizontalAlign.Left
                 e.Row.FCCheckBox("cbInv").Visible = True