-- poder cancelar un ie. cuando no estár relacioando al edo cuenta

This commit is contained in:
2023-07-28 11:12:39 -07:00
parent c2e095894e
commit d5eb9bcb21

View File

@@ -869,13 +869,13 @@ Partial Class Bancos_IE
End Try
CveIEDeposito = ObjIE.DtResultados(0)("CveIEDepositoPadre").ToString.ToEntero
CuentaDepositoPadre = ObjIE.DtResultados(0)("CuentaDepositoPadre").ToString
Cuenta = ObjIE.DtResultados(0)("NumCuenta").ToString
CveIEDeposito2 = ObjIE.DtResultados(0)("CveIEDeposito2").ToString.ToEntero
NumComplementos = ObjIE.DtResultados(0)("NumComplementos").ToString.ToEntero
Dim CveIEEstadoCuenta As Integer = ObjIE.DtResultados(0)("CveIEEstadoCuenta").ToString.ToEntero
If UsuarioActual.TienePermisoProceso(99) Then
'BtnActualizar.Visible = True
@@ -936,6 +936,7 @@ Partial Class Bancos_IE
'ChkImpreso.Checked = ObjIE.FueImpreso
ChkConciliado.Checked = ObjIE.FueConciliado
DdlEstatusIE.SelectedValue = ObjIE.CveEstatusIE.ToString
DdlEstatusIE.Visible = False
LblEstatusIE.Visible = True
@@ -1087,6 +1088,9 @@ Partial Class Bancos_IE
If UsuarioActual.TienePermisoProceso(85) AndAlso Not ObjIE.FueConciliado Then LnkCancelar.Visible = True
' si fue conciliado manual, pero no relacionado al IEEstadocuenta, porque es conciliación bancaria
If UsuarioActual.TienePermisoProceso(85) AndAlso UsuarioActual.CveEmpresa = 119 AndAlso ObjIE.FueConciliado AndAlso CveIEEstadoCuenta = 0 Then LnkCancelar.Visible = True
''COMENTAR - solo para pruebas
'If UsuarioActual.TienePermisoProceso(85) Then LnkCancelar.Visible = True
'If UsuarioActual.TienePermisoProceso(80) Then LnkEliminar.Visible = True