diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index ca047fa89..9551eba19 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -61,6 +61,8 @@ Partial Class Bancos_DepositosCaja
DivRowCuenta.Visible = True
End If
+ If UsuarioActual.CveEmpresa.Contiene(140, 141) Then divTipoPago.Visible = False : divTipoPago1.Visible = False
+
DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
DdlSubProyectos.DataBind()
DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
@@ -284,15 +286,15 @@ Partial Class Bancos_DepositosCaja
End If
End If
- Dim CveTransaccionBanco As Integer = 13
+ Dim CveTransaccionBanco As Integer = DdlTipoDeposito.SelectedValue.ToEntero
If TotalImporte < 0 Then 'que es una devolución, entonces como es negativo, se cambia el concetpo de bancos, por condición de trigger
CveTransaccionBanco = 6
End If
- If DdlTipoPago.SelectedValue.Contiene("11", "12") Then ' cuando son pagos con tarjetas
- CveTransaccionBanco = DdlTipoPago.SelectedValue.ToEntero
- End If
+ 'If DdlTipoPago.SelectedValue.Contiene("11", "12") Then ' cuando son pagos con tarjetas
+ ' CveTransaccionBanco = DdlTipoPago.SelectedValue.ToEntero
+ 'End If
'código temporal, para claudia y toñita, monge, anadelia, alba,patricia
If UsuarioActual.CveUsuario.Contiene(1937, 2452, 3358, 3033, 2897, 2560) Then