AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Pago electronico grupos cuentas deposito en ProveedoresAbonar y modulos en clsPaginas

Browse Source
This commit is contained in:
Rakcsle Supertramp
2020-04-07 12:31:00 -07:00
parent 9ed7921a78
commit 79c963be71
5 changed files with 341 additions and 118 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
Bancos/ProveedoresAbonar.aspx.vb
View File

@@ -2513,20 +2513,31 @@ Partial Class Bancos_ProveedoresAbonar
ElseIf DdlTipoTransaccion.SelectedValue = "17" Then
'''Permitir pago sin cuneta deposito
If Dep.DtResultados.Rows.Count > 0 Then
DdlCuentaDeposito.DataSource = Dep.DtResultados '.FiltraParametros("EstatusPagoElectronicoGrupos = 'True' AND Estatus ='True'")
trCuentaDeposito.Visible = True
BtnIEGuardar.ToolTip = ""
Else
Alert("El proveedor no tiene cuentas deposito registradas.")
End If
'If Dep.DtResultados.FiltraParametros("EstatusPagoElectronicoGrupos = 'True' AND Estatus ='True'").Rows.Count > 0 Then
' trCuentaDeposito.Visible = True
' DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
'Else
' BtnIEGuardar.Enabled = False
' Alert("El proveedor no tiene ninguna cuenta deposito registrada ", TipoMensaje.MsgAdvertencia)
'End If
'Alert("El proveedor no tiene cuentas deposito registradas.")
BtnIEGuardar.Enabled = False
BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
End If
'If Dep.DtResultados.FiltraParametros("EstatusPagoElectronicoGrupos = 'True' AND Estatus ='True'").Rows.Count > 0 Then
' trCuentaDeposito.Visible = True
' DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
'Else
' BtnIEGuardar.Enabled = False
' Alert("El proveedor no tiene ninguna cuenta deposito registrada ", TipoMensaje.MsgAdvertencia)
'End If
UpGuardar.Update()
Else
DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros("Estatus ='True'")
If Dep.DtResultados.Rows.Count > 0 Then