diff --git a/asmx/WS_PuntoVenta.asmx b/asmx/WS_PuntoVenta.asmx
index 7aa4f7908..a5c0162e5 100644
--- a/asmx/WS_PuntoVenta.asmx
+++ b/asmx/WS_PuntoVenta.asmx
@@ -515,7 +515,7 @@ Public Class WS_PuntoVenta
     'End Function
 
     <WebMethod()>
-    Public Function GetVta_Promociones(Fecha As String, CveSubProyecto As Integer, CveEmpresa As Integer) As RespuestaWS
+    Public Function GetVta_Promociones(Fecha As Date, CveSubProyecto As Integer, CveEmpresa As Integer) As RespuestaWS
         Dim objPromociones As New ClsVentas
         Dim Respuesta As New RespuestaWS