-- filtros de reportes de contratos por fechaing

This commit is contained in:
2024-10-22 16:03:05 -07:00
parent 6203d060e5
commit b0a8a4b4e4
4 changed files with 17 additions and 33 deletions

View File

@@ -418,10 +418,7 @@ Partial Class RepContratoDetalle
ErrorProceso = True
End If
If Not ErrorProceso Then
If CveVentaRemision > 0 AndAlso (CveSubProyectoOriginal <> DdlSubProyecto.SelectedValue.ToEntero OrElse
CveMonedaOriginal <> DdlMoneda.SelectedValue.ToEntero OrElse
ImporteOrigial <> TxtImporte.Text.ToDecimal OrElse
@@ -434,8 +431,6 @@ Partial Class RepContratoDetalle
ErrorProceso = True
End If
End If
End If
If Not ErrorProceso Then
@@ -445,15 +440,11 @@ Partial Class RepContratoDetalle
AgregarABitacora($"Actualización del contrato {CveContrato}")
CargaDatos()
Alert("Contrato actualizado correctamente")
Else
Alert("Ocurrió un ocurrió un error al actualizar su boleto", TipoMensaje.MsgError)
ObjContratos.RollBack()
End If
End Sub
Private Function UpdateRemision(ByRef transaccionSql As SqlTransaction, CveSubProyectoNew As Integer, CveMonedaNew As Integer, TotalNew As Decimal, DescripcionNew As String) As Boolean