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

Pago Electronico Grupos 2020-06-12

Browse Source
This commit is contained in:
Rakcsle Supertramp
2020-06-12 20:50:52 -07:00
parent 2a9be5cec9
commit cdbf62aced
10 changed files with 1974 additions and 1198 deletions
Download Patch File Download Diff File Expand all files Collapse all files

59
Bancos/ProveedoresAbonar.aspx.vb
View File

@@ -2518,22 +2518,23 @@ Partial Class Bancos_ProveedoresAbonar
Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
End If
'ElseIf DdlTipoTransaccion.SelectedValue = "17" Then
ElseIf DdlTipoTransaccion.SelectedValue = "17" Then
' If Dep.DtResultados.Rows.Count > 0 Then
' DdlCuentaDeposito.DataSource = Dep.DtResultados
' trCuentaDeposito.Visible = True
' BtnIEGuardar.ToolTip = ""
' Else
If Dep.DtResultados.Rows.Count > 0 Then
DdlCuentaDeposito.DataSource = Dep.DtResultados
trCuentaDeposito.Visible = True
BtnIEGuardar.ToolTip = ""
Else
' BtnIEGuardar.Enabled = False
' BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
BtnIEGuardar.Enabled = False
BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
Alert("El proveedor no tiene cuentas deposito.", TipoMensaje.MsgAdvertencia)
' End If
End If
' UpGuardar.Update()
UpGuardar.Update()
Else
DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros("Estatus ='True'")
If Dep.DtResultados.Rows.Count > 0 Then
@@ -2550,23 +2551,43 @@ Partial Class Bancos_ProveedoresAbonar
End If
'Else
Else
' If DdlTipoTransaccion.SelectedValue = "17" Then
If DdlTipoTransaccion.SelectedValue.Contiene("9", "17") Then
' BtnIEGuardar.Enabled = False
' BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
' Else
' BtnIEGuardar.Enabled = True
' BtnIEGuardar.ToolTip = ""
' End If
BtnIEGuardar.Enabled = False
BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
Alert("El proveedor no tiene cuentas deposito.", TipoMensaje.MsgAdvertencia)
Else
trCuentaDeposito.Visible = True
BtnIEGuardar.Enabled = True
BtnIEGuardar.ToolTip = ""
End If
' UpGuardar.Update()
UpGuardar.Update()
End If
Else
If DdlTipoTransaccion.SelectedValue = "17" Then
BtnIEGuardar.Enabled = False
BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
Else
trCuentaDeposito.Visible = True
BtnIEGuardar.Enabled = True
BtnIEGuardar.ToolTip = ""
End If
UpGuardar.Update()
End If
Dep.Dispose()
'Else
' trCuentaDeposito.Visible = False