-- poder cancelar un ie. cuando no estár relacioando al edo cuenta
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user