Correciones Compras, Foramto OC 189, Formato CFDI GRales,RepContato detale correciones

Transportes/RepContratoDetalle.aspx.vb

@@ -620,15 +620,19 @@ Partial Class RepContratoDetalle
         If Not ErrorProceso Then
 
             ObjContratos.Commit()
-            ObjContratos.Dispose()
             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
 
+        ObjContratos.Dispose()
+
+        If Not ErrorProceso Then
+            'CargaDatos()
+        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