Rev 17598 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 17598 | Rev 17639 | ||
---|---|---|---|
Line 3... | Line 3... | ||
3 | !if $activetest!=1 and $activetest!=2 |
3 | !if $activetest!=1 and $activetest!=2 |
4 | error=badallows |
4 | error=badallows |
5 | emptypage=yes |
5 | emptypage=yes |
6 | !exit |
6 | !exit |
7 | !endif |
7 | !endif |
- | 8 | ||
- | 9 | !! ---- check techvar access |
|
- | 10 | !readproc adm/class/checkuserscorecondition F$freework |
|
- | 11 | !! $beginning_ is undocumented (but defined by checkuserscorecondition) |
|
- | 12 | !if $beginning_!=$empty |
|
- | 13 | begh_=!char 9 to 10 of $beginning_ |
|
- | 14 | begm_=!char 11 to 12 of $beginning_ |
|
- | 15 | !readproc adm/date.phtml $beginning_ |
|
- | 16 | !endif |
|
- | 17 | !if $output=no |
|
- | 18 | !exit |
|
- | 19 | !endif |
|
- | 20 | !! ---- end check techvar access |
|
8 | 21 | ||
9 | !set appletnum=0 |
22 | !set appletnum=0 |
10 | 23 | ||
11 | !! ----- check of authorisation for student to modify his work (studentmode=0 no studentmode=1 yes) |
24 | !! ----- check of authorisation for student to modify his work (studentmode=0 no studentmode=1 yes) |
12 | !set studentmode=1 |
25 | !set studentmode=1 |