diff --git a/App_Code/ClsBancos.vb b/App_Code/ClsBancos.vb
index dddbce407..8113ab863 100644
--- a/App_Code/ClsBancos.vb
+++ b/App_Code/ClsBancos.vb
@@ -1597,7 +1597,7 @@ Public Class ClsBancos
 
         Return Retorno
     End Function
-    Public Function CancelarBancos_IE(CveUsuario As Integer, CveIE As Integer, MesAnterior As Boolean, IdPoliza As Integer, Optional FechaCancelacion As Date = MinFecha, Optional TipoMovimiento As Integer = 1) As Boolean
+    Public Function CancelarBancos_IE(CveUsuario As Integer, CveIE As Integer, MesAnterior As Boolean, IdPoliza As Integer, FolioPoliza As Integer, Optional FechaCancelacion As Date = MinFecha, Optional TipoMovimiento As Integer = 1) As Boolean
 
         Dim Retorno As Boolean = False
         DataAdapter("PA_Banc_IECancelar")
@@ -1607,6 +1607,7 @@ Public Class ClsBancos
             .Add("@CveIE", SqlDbType.Int).Value = CveIE
             .Add("@MesAnterior", SqlDbType.Bit).Value = MesAnterior
             .Add("@IdPoliza", SqlDbType.Int).Value = IdPoliza
+            .Add("@FolioPoliza", SqlDbType.Int).Value = FolioPoliza
             .Add("@FechaCancelacion", SqlDbType.Date).Value = FechaCancelacion
             .Add("@TipoMovimiento", SqlDbType.Int).Value = TipoMovimiento
         End With
diff --git a/vwd.webinfo b/vwd.webinfo
index de9866feb..8a63d860e 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -9,6 +9,10 @@
   
     
   
+    
+  
+    
+  
     <Service ID="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}"/>
   </StartupServices>
 </VisualWebDeveloper>
\ No newline at end of file