OK, I fixed a major problem with results.
The asm-admin/results-edit.tcl is sending the wrong assessment_id to the calculate procs.
db_1row find_assessment {} gets the correct assessment_rev_id,
but
as::assessment::data -assessment_id $assessment_id
set assessment_rev_id $assessment_data(assessment_rev_id)
sets the wrong assesment_rev_id.
I will upload a patch after someone else checks it.