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

-

Browse Source
This commit is contained in:
rrene
2023-10-12 08:59:11 -07:00
parent 0458dfcdda
commit 008d4a5818
1 changed files with 0 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
Bancos/IE.aspx.vb
View File

@@ -1177,43 +1177,8 @@ Partial Class Bancos_IE
If ObjIE.CveIECancelacion > 0 Then
CveIECancelacion = ObjIE.CveIECancelacion
End If
UpCancelacion.Update()
'OTROS DATOS - DATOS COMPLEMENTO SUSTITUCION
'Dim CveIESustitucion As Integer = ObjIE.DtResultados(0)("CveIESustitucion").ToString.ToEntero
'If CveIESustitucion > 0 Then
' TRComplementoSustitucion.Visible = True
' If ObjIE.GetBancosIE(CveIESustitucion, UsuarioActual.CveEmpresa) And ObjIE.DtResultados.Rows.Count > 0 Then
' ARefIESustitucion.HRef = String.Format("/Bancos/IE.aspx?CveIE={0}", CveIESustitucion)
' ARefIESustitucion.InnerText = ObjIE.Folio
' End If
'End If
' codigo se reubicó a linea 969
''DETALLES - MOVIMIENTOS
'If ObjIE.GetBancosIEMovimientos(CveIE, UsuarioActual.CveEmpresa) Then
' GvM.DataSource = ObjIE.DtResultados.FiltraParametros("CveConceptoContable <> 30")
' If UsuarioActual.TienePermisoProceso(277) AndAlso Not TabCancelacion.Visible Then
' GvM.Columns(8).Visible = True
' End If
' If ObjIE.DtResultados.FiltraParametros("TCPago > 1").Rows.Count.ToEntero() > 0 Then
' GvM.Columns(7).Visible = True
' End If
' If ObjIE.DtResultados.FiltraParametros("CveMonedaIE <> CveMoneda").Rows.Count.ToEntero > 0 Then
' GvM.Columns(5).Visible = True
' GvM.Columns(6).Visible = True
' End If
' GvM.DataBind()
'End If
'Movimientos Relacionados Padre
If ObjIE.GetBancosIEMovimientosPadre(CveIE, UsuarioActual.CveEmpresa) Then
If ObjIE.DtResultados.FiltraParametros("TCPago > 1").Rows.Count.ToEntero() > 0 Then