Rev 10768 | Rev 10924 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 10768 | Rev 10852 | ||
---|---|---|---|
Line 7... | Line 7... | ||
7 | !set col1cnt=!itemcnt $col1 |
7 | !set col1cnt=!itemcnt $col1 |
8 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$wims_class/.def |
8 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$wims_class/.def |
9 | 9 | ||
10 | !!program without icourses |
10 | !!program without icourses |
11 | !if $(don[1])=program and $col1cnt=0 |
11 | !if $(don[1])=program and $col1cnt=0 |
12 |
|
12 | <ul class="wims_subclasses"> |
13 |
|
13 | !read adm/class/graphprog $wims_class |
14 |
|
14 | </ul> |
15 | !endif |
15 | !endif |
16 | !if $col1cnt=0 |
16 | !if $col1cnt=0 |
17 | !exit |
17 | !exit |
18 | !endif |
18 | !endif |
19 | 19 | ||
Line 38... | Line 38... | ||
38 | !read adm/class/graphprog $classrad |
38 | !read adm/class/graphprog $classrad |
39 | !endif |
39 | !endif |
40 | !for j1=1 to $col1cnt |
40 | !for j1=1 to $col1cnt |
41 | !set cls1=!nospace $classrad/$(col1[$j1]) |
41 | !set cls1=!nospace $classrad/$(col1[$j1]) |
42 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$cls1/.def |
42 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$cls1/.def |
- | 43 | !if $(don[1])=course |
|
- | 44 | !set tmp=$ class="inline" |
|
- | 45 | !endif |
|
43 | < |
46 | <li$tmp><span class="wims_classes_direct_$(don[1])"> |
- | 47 | !reset tmp |
|
44 | !if $cls1 isitemof $(user_$(statut)_) |
48 | !if $cls1 isitemof $(user_$(statut)_) |
45 | !if $statut=supervise |
49 | !if $statut=supervise |
46 | !href module=adm/class/classes&type=authsupervisor&class=$cls1&auth_user=supervisor $(don[2]) |
50 | !href module=adm/class/classes&type=authsupervisor&class=$cls1&auth_user=supervisor $(don[2]) |
47 | !else |
51 | !else |
48 | !href module=adm/class/classes&type=authparticipant&class=$cls1&auth_user=$u_ $(don[2]) |
52 | !href module=adm/class/classes&type=authparticipant&class=$cls1&auth_user=$u_ $(don[2]) |
Line 64... | Line 68... | ||
64 | !set compsup2=!column 2 to -1 of $compsup2 |
68 | !set compsup2=!column 2 to -1 of $compsup2 |
65 | <ul class="wims_subclasses"> |
69 | <ul class="wims_subclasses"> |
66 | !for j2=1 to $col2cnt |
70 | !for j2=1 to $col2cnt |
67 | !set cls2=!nospace $cls1/$(col2[$j2]) |
71 | !set cls2=!nospace $cls1/$(col2[$j2]) |
68 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$cls2/.def |
72 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$cls2/.def |
- | 73 | !if $(don[1])=course |
|
- | 74 | !set tmp=$ class="inline" |
|
- | 75 | !endif |
|
69 | < |
76 | <li$tmp><span class="wims_classes_direct_$(don[1])"> |
- | 77 | !reset tmp |
|
70 | !if $cls2 isitemof $(user_$(statut)_) |
78 | !if $cls2 isitemof $(user_$(statut)_) |
71 | !if $statut=supervise |
79 | !if $statut=supervise |
72 | !href module=adm/class/classes&type=authsupervisor&class=$cls2&auth_user=supervisor $(don[2]) |
80 | !href module=adm/class/classes&type=authsupervisor&class=$cls2&auth_user=supervisor $(don[2]) |
73 | !else |
81 | !else |
74 | !href module=adm/class/classes&type=authparticipant&class=$cls2&auth_user=$u_ $(don[2]) |
82 | !href module=adm/class/classes&type=authparticipant&class=$cls2&auth_user=$u_ $(don[2]) |
Line 90... | Line 98... | ||
90 | <ul> |
98 | <ul> |
91 | !set compsup3=!column 2 to -1 of $compsup3 |
99 | !set compsup3=!column 2 to -1 of $compsup3 |
92 | !for j3=1 to $col3cnt |
100 | !for j3=1 to $col3cnt |
93 | !set cls3=!nospace $cls2/$(col3[$j3]) |
101 | !set cls3=!nospace $cls2/$(col3[$j3]) |
94 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$cls3/.def |
102 | !let don=!defof class_typename,class_description,class_supervisor in wimshome/log/classes/$cls3/.def |
- | 103 | !if $(don[1])=course |
|
- | 104 | !set tmp=$ class="inline" |
|
- | 105 | !endif |
|
95 | < |
106 | <li$tmp><span class="wims_classes_direct_$(don[1])"> |
- | 107 | !reset tmp |
|
96 | !if $cls3 isitemof $(user_$(statut)_) |
108 | !if $cls3 isitemof $(user_$(statut)_) |
97 | !if $statut=supervise |
109 | !if $statut=supervise |
98 | !href module=adm/class/classes&type=authsupervisor&class=$cls3&auth_user=supervisor $(don[2]) |
110 | !href module=adm/class/classes&type=authsupervisor&class=$cls3&auth_user=supervisor $(don[2]) |
99 | !else |
111 | !else |
100 | !href module=adm/class/classes&type=authparticipant&class=$cls3&auth_user=$u_ $(don[2]) |
112 | !href module=adm/class/classes&type=authparticipant&class=$cls3&auth_user=$u_ $(don[2]) |