Subversion Repositories wimsdev

Rev

Rev 1429 | Rev 3960 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1429 Rev 1850
Line 1... Line 1...
1 
 
 1 
 
2 
!set classes=!record 0 of wimshome/log/classes/$wims_class/classes
 2 
!set classes=!record 0 of wimshome/log/classes/$wims_class/classes
3 
!set classcnt=!linecnt $classes
 3 
!set classcnt=!linecnt $classes
4 
!if $classcnt>0
 4 
!if $classcnt>0
5 
 <p>
 5 
 <p>
6 
 $(CL_Names[2]):
 6 
 $(CL_Names[2]):<p>
- 
 
 7 
 !reset compt
7 
 !for i=1 to $classcnt
 8 
 !for i=1 to $classcnt
8 
  !set l=!line $i of $classes
 9 
  !set l=!line $i of $classes
9 
  !distribute items $l into c_,s_,t_
 10 
  !distribute items $l into c_,s_,t_
10 
  <span class="wims_classes_direct_class">
 11 
  <span class="wims_classes_direct_class">
11 
  !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 12 
  !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
12 
</span>
 13 
</span>
- 
 
 14 
  !if $compt=9
- 
 
 15 
    !set compt=0
- 
 
 16 
    <p>
- 
 
 17 
  !else
- 
 
 18 
    !increase compt
- 
 
 19 
  !endif
13 
 !next i
 20 
 !next i
14 
!endif
 21 
!endif
15 
!set progs=!record 0 of wimshome/log/classes/$wims_class/programs
 22 
!set progs=!record 0 of wimshome/log/classes/$wims_class/programs
16 
!set progcnt=!linecnt $progs
 23 
!set progcnt=!linecnt $progs
17 
!if $progcnt>0
 24 
!if $progcnt>0
18 
 <p>
 25 
 <p>
19 
 $(CL_Names[3]):
 26 
 $(CL_Names[3]):<p>
- 
 
 27 
 !reset compt
20 
 !for i=1 to $progcnt
 28 
 !for i=1 to $progcnt
21 
  !set l=!line $i of $progs
 29 
  !set l=!line $i of $progs
22 
  !distribute items $l into c_,s_,t_
 30 
  !distribute items $l into c_,s_,t_
23 
  <span class="wims_classes_direct_program">
 31 
  <span class="wims_classes_direct_program">
24 
  !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 32 
  !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
25 
  </span>
 33 
  </span>
- 
 
 34 
  !if $compt=9
- 
 
 35 
    !set compt=0
- 
 
 36 
    <p>
- 
 
 37 
  !else
- 
 
 38 
    !increase compt
- 
 
 39 
  !endif
26 
 !next i
 40 
 !next i
27 
!endif
 41 
!endif
28 
 
 42 
 
29 
!if $classcnt+$progcnt<1
 43 
!if $classcnt+$progcnt<1
30 
 !set courses=!record 0 of wimshome/log/classes/$wims_class/courses
 44 
 !set courses=!record 0 of wimshome/log/classes/$wims_class/courses
31 
 !set coursecnt=!linecnt $courses
 45 
 !set coursecnt=!linecnt $courses
32 
 !if $coursecnt>0
 46 
 !if $coursecnt>0
33 
  <p>
 47 
  <p>
34 
  $(CL_Names[4]):
 48 
  $(CL_Names[4]):<p>
- 
 
 49 
  !reset compt
35 
  !for i=1 to $coursecnt
 50 
  !for i=1 to $coursecnt
36 
   !set l=!line $i of $courses
 51 
   !set l=!line $i of $courses
37 
   !distribute items $l into c_,s_,t_
 52 
   !distribute items $l into c_,s_,t_
38 
   <span class="wims_classes_direct_course">
 53 
   <span class="wims_classes_direct_course">
39 
   !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 54 
   !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
40 
   </span>
 55 
   </span>
- 
 
 56 
   !if $compt=9
- 
 
 57 
    !set compt=0
- 
 
 58 
    <p>
- 
 
 59 
   !else
- 
 
 60 
    !increase compt
- 
 
 61 
   !endif
41 
  !next i
 62 
  !next i
42 
 !endif
 63 
 !endif
43 
 !set courses=!record 0 of wimshome/log/classes/$wims_class/icourses
 64 
 !set courses=!record 0 of wimshome/log/classes/$wims_class/icourses
44 
 !set coursecnt=!linecnt $courses
 65 
 !set coursecnt=!linecnt $courses
45 
 !if $coursecnt>0
 66 
 !if $coursecnt>0
46 
  <p>
 67 
  <p>
47 
  $(CL_Names[5]):
 68 
  $(CL_Names[5]):<p>
- 
 
 69 
  !reset compt
48 
  !for i=1 to $coursecnt
 70 
  !for i=1 to $coursecnt
49 
   !set l=!line $i of $courses
 71 
   !set l=!line $i of $courses
50 
   !distribute items $l into c_,s_,t_
 72 
   !distribute items $l into c_,s_,t_
51 
   <span class="wims_classes_direct_course">
 73 
   <span class="wims_classes_direct_course">
52 
   !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 74 
   !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
53 
   </span>
 75 
   </span>
- 
 
 76 
   !if $compt=9
- 
 
 77 
    !set compt=0
- 
 
 78 
    <p>
- 
 
 79 
   !else
- 
 
 80 
    !increase compt
- 
 
 81 
   !endif
54 
  !next i
 82 
  !next i
55 
 !endif
 83 
 !endif
56 
!endif
 84 
!endif
57 
 
 85 
 
58 
!if $class_typename=program
 86 
!if $class_typename=program