Subversion Repositories wimsdev

Rev

Rev 13694 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13694 Rev 17505
Line 2... Line 2...
2 
!!! for supervisor
 2 
!!! for supervisor
3 
!!! at the end something on the test zone
 3 
!!! at the end something on the test zone
- 
 
 4 
!!! TODO this file need to be cleaned
- 
 
 5 
 
4 
 
 6 
 
5 
!set wims_realuser=!defof wims_realuser in wimshome/$wims_sesdir/var.stat
 7 
!set wims_realuser=!defof wims_realuser in wimshome/$wims_sesdir/var.stat
- 
 
 8 
!! --- la ligne suivante ne sert à rien si wims_realuser est supervisor et la variable user_supervise ne semble utilisée que dans la partie non active du fichier
6 
!set user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
 9 
!set user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
7 
!set classes=!record 0 of wimshome/log/classes/$wims_class/classes
 10 
!set classes=!record 0 of wimshome/log/classes/$wims_class/classes
8 
!set classcnt=!linecnt $classes
 11 
!set classcnt=!linecnt $classes
9 
!set progs=!record 0 of wimshome/log/classes/$wims_class/programs
 12 
!set progs=!record 0 of wimshome/log/classes/$wims_class/programs
10 
!set progcnt=!linecnt $progs
 13 
!set progcnt=!linecnt $progs
Line 16... Line 19...
16 
!set icoursecnt=!linecnt $icourses
 19 
!set icoursecnt=!linecnt $icourses
17 
!!if $[$classcnt+$progcnt+$coursecnt+$icourses]=0
 20 
!!if $[$classcnt+$progcnt+$coursecnt+$icourses]=0
18 
  !goto nosubclass
 21 
  !goto nosubclass
19 
!!endif
 22 
!!endif
20 
 
 23 
 
21 
!!! not useful now, but as I am not quite sure, leave it !!!
 24 
!!! ---- not useful now, but as I am not quite sure, leave it !!! (end line 108)
22 
 <ul class="wims_nopuce">
 25 
 <ul class="wims_nopuce">
23 
!if $classcnt>0
 26 
!if $classcnt>0
24 
  <li>
 27 
  <li>
25 
  $(CL_Names[2]):
 28 
  $(CL_Names[2]):
26 
   <ul class="inline">
 29 
   <ul class="inline">
27 
  !for i=1 to $classcnt
 30 
  !for i=1 to $classcnt
28 
    !set l=!line $i of $classes
 31 
    !set l=!line $i of $classes
29 
    !distribute items $l into c_,s_,t_
 32 
    !distribute items $l into c_,s_,t_
30 
    <li>
 33 
    <li>
31 
    <div class="wims_classes_direct_class">
 34 
    <div class="wims_classes_direct_class">
32 
    !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
 35 
    !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
33 
      !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
 36 
      !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
34 
    !else
 37 
    !else
35 
      !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 38 
      !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
Line 47... Line 50...
47 
  !for i=1 to $progcnt
 50 
  !for i=1 to $progcnt
48 
    !set l=!line $i of $progs
 51 
    !set l=!line $i of $progs
49 
    !distribute items $l into c_,s_,t_
 52 
    !distribute items $l into c_,s_,t_
50 
    <li>
 53 
    <li>
51 
    <div class="wims_classes_direct_program">
 54 
    <div class="wims_classes_direct_program">
52 
    !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
 55 
    !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
53 
      !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
 56 
      !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
54 
    !else
 57 
    !else
55 
      !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 58 
      !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
56 
      $t_
 59 
      $t_
57 
    !endif
 60 
    !endif
58 
    </div>
 61 
    </div>
59 
    </li>
 62 
    </li>
60 
  !next i
 63 
  !next i
Line 63... Line 66...
63 
 
 66 
 
64 
!!if $classcnt+$progcnt>=1
 67 
!!if $classcnt+$progcnt>=1
65 
!if $coursecnt>0
 68 
!if $coursecnt>0
66 
  <li>
 69 
  <li>
67 
  $(CL_Names[4]):
 70 
  $(CL_Names[4]):
68 
  <ul class="inline">
 71 
  <ul class="inline">
69 
  !for i=1 to $coursecnt
 72 
  !for i=1 to $coursecnt
70 
    !set l=!line $i of $courses
 73 
    !set l=!line $i of $courses
71 
    !distribute items $l into c_,s_,t_
 74 
    !distribute items $l into c_,s_,t_
72 
    <li>
 75 
    <li>
73 
    <div class="wims_classes_direct_course">
 76 
    <div class="wims_classes_direct_course">
74 
    !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
 77 
    !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
75 
      !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
 78 
      !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
76 
    !else
 79 
    !else
77 
      !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 80 
      !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
78 
      $t_
 81 
      $t_
79 
    !endif
 82 
    !endif
80 
    </div>
 83 
    </div>
81 
    </li>
 84 
    </li>
82 
  !next i
 85 
  !next i
83 
  </ul></li>
 86 
  </ul></li>
84 
!endif
 87 
!endif
85 
!if $icoursecnt>0
 88 
!if $icoursecnt>0
Line 101... Line 104...
101 
    </li>
 104 
    </li>
102 
  !next i
 105 
  !next i
103 
  </ul></li>
 106 
  </ul></li>
104 
!endif
 107 
!endif
105 
</ul>
 108 
</ul>
- 
 
 109 
 
- 
 
 110 
!! -------- fin de la partie inutile
- 
 
 111 
 
106 
:nosubclass
 112 
:nosubclass
107 
!if $class_typename=program
 113 
!if $class_typename=program
108 
  !set test=!defof class_defined in wimshome/log/classes/$wims_class/0/.def
 114 
  !set test=!defof class_defined in wimshome/log/classes/$wims_class/0/.def
109 
  !if $test=yes
 115 
  !if $test=yes
110 
    <ul class="wims_subclasses"><li>
 116 
    <ul class="wims_subclasses"><li>