This shows you the differences between two versions of the page.
Both sides previous revision Previous revision Next revision | Previous revision | ||
stats:proc:deleteexam [2011/09/28 23:49] Patrick Michel |
stats:proc:deleteexam [2011/10/07 14:32] Patrick Michel |
||
---|---|---|---|
Line 2: | Line 2: | ||
<code xcend> | <code xcend> | ||
- | deleteExam(ident id) { | + | deleteExam(ident uid, ident id) { |
+ | assume exists //accounts/account[uid]/admin; | ||
assume exists //exams/exam[id]; | assume exists //exams/exam[id]; | ||
| | ||
- | assume size(//acounts/account/examiner[id]) = 0; | + | assume size(//exams/exam[id]/examiner) = 0; |
- | + | ||
+ | assume size(//exams/exam[id]/results/participant) = 0; # don't allow to delete if participants are there | ||
+ | |||
remove //exams/exam[id]; | remove //exams/exam[id]; | ||
- | } # roles: admin | + | } |
</code> | </code> | ||