diff --git a/Contabilidad2/MovimientosconProveedores.aspx.vb b/Contabilidad2/MovimientosconProveedores.aspx.vb
index a4d29fda1..a54167118 100644
--- a/Contabilidad2/MovimientosconProveedores.aspx.vb
+++ b/Contabilidad2/MovimientosconProveedores.aspx.vb
@@ -54,7 +54,7 @@ Partial Class MovimientosconProveedores
     End Property
     Private Property CveSubProyecto As Integer
         Get
-            CveSubProyecto = ViewState("CveSubProyecto").ToString
+            CveSubProyecto = ViewState("CveSubProyecto").ToString.ToEntero
         End Get
         Set(value As Integer)
             ViewState("CveSubProyecto") = value