diff --git a/App_Code/ClsGPS.vb b/App_Code/ClsGPS.vb
index 21ddfea1e..4cdc9e7f2 100644
--- a/App_Code/ClsGPS.vb
+++ b/App_Code/ClsGPS.vb
@@ -781,7 +781,7 @@ Public Class ClsGPS
                     Velocidad = Row("SPD").ToString.ToDouble
                     Fecha = Row("FechaTrama").ToString
                     KMRecorridos = Row("KMRecorridos").ToString.ToDouble
-                    Info = InfoWindowReader($" Vehículo:  {Vehiculo}", "-1", CveDispositivo, Row, TienePermisoComandos)
+                    Info = InfoWindowReader($" Vehiculo:  {Vehiculo}", "-1", CveDispositivo, Row, TienePermisoComandos)
 
 
                     If Velocidad > 1 Then
diff --git a/Ventas/CatPS.aspx.vb b/Ventas/CatPS.aspx.vb
index 9462aa72a..a4a87b343 100644
--- a/Ventas/CatPS.aspx.vb
+++ b/Ventas/CatPS.aspx.vb
@@ -262,7 +262,7 @@ Partial Class CatPS
     End Sub
 
     Protected Sub LBExcelPersonalizado_Click(Sender As Object, e As EventArgs) Handles LBExcelPersonalizado.Click
-        ExportToExcelGembox(GvDatos, "Catálogo de Productos y Servicios", UsuarioActual, "", "", "Catálogo de Productos y Servicios", "", -1)
+        ExportToExcelGembox(GvDatos, "Catálogo de Productos y Servicios", UsuarioActual, "Catálogo de Productos y Servicios")
     End Sub
 
     Public Overrides Sub VerifyRenderingInServerForm(control As Control)