ADDMIPSOL and XPRS_CB_SOLNOTIFY

You could extend the "solnotify" routine as follows:

public procedure solnotify(id:string, status:integer)

  declarations

    SOLSTAT: array(range) of string

  end-declarations

  SOLSTAT:: (0..7)["Solution not checked",

    "Solution is feasible",

    "Solution feasible after reoptimizing with fixed globals",

    "Feasible solution discovered by local search heuristic",

    "Local search heuristic applied, no solution found",

    "Solution infeasible, local search not applied",

    "Partial solution, local search not applied",

    "Failed to reoptimize with globals fixed"]

  writeln("Optimiser loaded solution '", id, "' status: ", SOLSTAT(status))

end-procedure