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 [2013/07/10 12:34] (current) |
||
|---|---|---|---|
| Line 2: | Line 2: | ||
| <code xcend> | <code xcend> | ||
| - | deleteExam(ident id) { | + | deleteExam(ident uid, ident id) { |
| - | assume exists //exams/exam[id]; | + | assume exists /account[uid]/admin; |
| + | |||
| + | assume exists /exam[id]; | ||
| | | ||
| - | assume size(//acounts/account/examiner[id]) = 0; | + | assume size(/exam[id]/examiner) = 0; |
| - | + | ||
| - | remove //exams/exam[id]; | + | assume size(/exam[id]/participant) = 0; # don't allow to delete if participants are there |
| - | } # roles: admin | + | |
| + | remove /exam[id]; | ||
| + | } | ||
| </code> | </code> | ||