diff --git a/Compras/Proveedores.aspx.vb b/Compras/Proveedores.aspx.vb
index 01d316185..06cf44aa7 100644
--- a/Compras/Proveedores.aspx.vb
+++ b/Compras/Proveedores.aspx.vb
@@ -484,7 +484,7 @@ Partial Class Compras_Proveedores
     Private Function CargadeFactura(CveFactura As Integer) As Integer
 
         Dim ObjeFacturas As New ClsCompras
-        If ObjeFacturas.GetFacturas(CveFactura, "-1", Now.AddYears(-2), Now, "-1", "-1", -1, -1, -1, -1, UsuarioActual.CveEmpresa) Then
+        If ObjeFacturas.GetFacturas(CveFactura, "-1", Now.AddYears(-2), Now, "-1", "-1", -1, -1, -1, -1, "-1", UsuarioActual.CveEmpresa) Then
             Dim XMLDoc As New XmlDocument
 
             Try