mejoras en contratos

This commit is contained in:
2021-08-03 20:22:52 -07:00
parent 274015cd18
commit 90a3c0f25b
3 changed files with 8 additions and 17 deletions

View File

@@ -137,11 +137,6 @@ Partial Class Contratos_ContratoObraAutorizacion
DDlContratosEstimaciones.DataBind()
End Sub
Protected Sub GetAnexos(sender As Object, e As System.EventArgs)
Dim GvRow As GridViewRow = DirectCast((DirectCast(sender, LinkButton)).NamingContainer, GridViewRow)
@@ -219,11 +214,8 @@ Partial Class Contratos_ContratoObraAutorizacion
If DTEstimaciones.Rows.Count > 0 Then
CveEstimacionActual = DTEstimaciones.FiltroPrimeroValor("CveEstimacion", "CveEstimacion > 0").ToString.ToEntero
End If
End If
ObjContratos.Dispose()
@@ -263,9 +255,6 @@ Partial Class Contratos_ContratoObraAutorizacion
e.Row.CssClass = "SubTotales3"
End If
End If
If e.Row.DBCampo("CveContratoDetalle").ToString.ToEntero > 0 Then
@@ -638,7 +627,6 @@ Partial Class Contratos_ContratoObraAutorizacion
Dim ErrorProceso As Boolean = True
Dim ObjContrato As New ClsContratos
If ObjContrato.RemoveContratosAvance(CveContratoAvance, UsuarioActual.CveEmpresa) Then
@@ -650,7 +638,7 @@ Partial Class Contratos_ContratoObraAutorizacion
If Not ErrorProceso Then
CargaAvancesParaEstimar()
Alert("Avance elimiando correctamente.")
Alert("Avance eliminado correctamente.")
End If