Merge branch 'master' of http://oirigoyen@192.168.10.111:8383/SIG.git

Bancos/PopIE.aspx.vb

@@ -363,4 +363,44 @@ Partial Class Bancos_PopIE
             End If
         End If
     End Sub
+
+    Protected Sub BtnEliminarCompra_Click(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Protected Sub ChkPagarPesos_CheckedChanged(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Protected Sub ChkPagarDolares_CheckedChanged(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Protected Sub CVImporteDolares_ServerValidate(source As Object, args As ServerValidateEventArgs)
+
+    End Sub
+
+    Protected Sub CVImportePesos_ServerValidate(source As Object, args As ServerValidateEventArgs)
+
+    End Sub
+
+    Protected Sub DdlCuentaDeposito_SelectedIndexChanged(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Protected Sub ChkPagarPesosDeudores_CheckedChanged(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Protected Sub ChkPagarDolaresDeudores_CheckedChanged(sender As Object, e As EventArgs)
+
+    End Sub
+
+    Protected Sub CvImporteDolaresDeudores_ServerValidate(source As Object, args As ServerValidateEventArgs)
+
+    End Sub
+
+    Protected Sub CveImportePesosDeudores_ServerValidate(source As Object, args As ServerValidateEventArgs)
+
+    End Sub
 End Class

Bancos/RepComprobaciones.aspx.cs

@@ -61,7 +61,7 @@ public partial class Bancos_RepComprobaciones : ClsPaginas
     }
     protected void CargaCuentas()
     {
-        DdlCuentas.DataSource = get_GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:= UsuarioActual.CveEmpresa).FiltraParametros("Banco = 'Empresa'");
+        DdlCuentas.DataSource = get_GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa: UsuarioActual.CveEmpresa).FiltraParametros("Banco = 'Empresa'");
         DdlCuentas.DataBind();
         DdlCuentas.Items.Insert(0, new ListItem("Seleccione", "-1"));
         DdlCuentas.SelectedValue = "-1";

Bancos/RepProgramarRecursos.aspx.vb

@@ -160,7 +160,7 @@ Partial Class Bancos_RepProgramarRecursos
             Opcion = IfNull(Request("Op"), "-1").ToString
 
 
-            If UsuarioActual.Empresa.GralSoloProyecto Then ' solo muestar el subproyecto
+            If True Then 'UsuarioActual.Empresa.GralSoloProyecto Then ' solo muestar el subproyecto
                 TdProyecto.Visible = False
                 TdSubProyectoTitulo.Visible = False
                 Dim script As String = "Sys.Application.add_load(function (s, e) { $('#tsubprocto').slideDown(200); $('#subproyecto').before($('#dropsubproyecto'));  });"