Pago Grupos Liberacion General

Compras/ReembolsosComprobaciones.aspx.vb

@@ -239,6 +239,22 @@ Partial Class Compras_ReembolsosComprobaciones
         Dim dt As DataTable = GlobalDTBancosCuentas(UsuarioActual.CveUsuario)
 
         dt = dt.FiltraParametros(String.Format("CveMoneda = {0}", 1))
+
+
+        If DdlTipoTransaccion.SelectedValue.ToEntero = 3 Then
+            dt = dt.FiltraParametros("CveTipoCuenta = 7")
+        End If
+
+        'cuando es layout
+        If DdlTipoTransaccion.SelectedValue.ToEntero = 9 Then
+            dt = dt.FiltraParametros("UsaLayout = 1")
+        End If
+
+
+        If DdlTipoTransaccion.SelectedValue.ToEntero = 17 Then
+            dt = dt.FiltraParametros("UsaLayoutGrupos = 1")
+        End If
+
         DdlCuenta.DataSource = dt
         DdlCuenta.DataBind()
         DdlCuenta.Items.Insert(0, New ListItem("Seleccione cuenta", "-1"))