Subversion Repositories wimsdev

Rev

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

Rev 10639 Rev 10649
Line -... Line 1...
- 
 
 1 
!!!make the list of all subclasses classified by their type in a portal
- 
 
 2 
!!! for supervisor
- 
 
 3 
!!! at the end something on the test zone
1 
 
 4 
 
2 
!set wims_realuser=!defof wims_realuser in wimshome/$wims_sesdir/var.stat
 5 
!set wims_realuser=!defof wims_realuser in wimshome/$wims_sesdir/var.stat
3 
!set user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
 6 
!set user_supervise=!defof user_supervise in wimshome/log/classes/$wims_superclass/.users/$wims_realuser
4 
!set classes=!record 0 of wimshome/log/classes/$wims_class/classes
 7 
!set classes=!record 0 of wimshome/log/classes/$wims_class/classes
5 
!set classcnt=!linecnt $classes
 8 
!set classcnt=!linecnt $classes
6 
!set progs=!record 0 of wimshome/log/classes/$wims_class/programs
 9 
!set progs=!record 0 of wimshome/log/classes/$wims_class/programs
7 
!set progcnt=!linecnt $progs
 10 
!set progcnt=!linecnt $progs
8 
!if $classcnt+$progcnt>=1
 11 
!!if $classcnt+$progcnt>=1
9 
 !set courses=!record 0 of wimshome/log/classes/$wims_class/courses
 12 
 !set courses=!record 0 of wimshome/log/classes/$wims_class/courses
10 
 !set coursecnt=!linecnt $courses
 13 
 !set coursecnt=!linecnt $courses
11 
!endif
 14 
!!endif
12 
!set icourses=!record 0 of wimshome/log/classes/$wims_class/icourses
 15 
!set icourses=!record 0 of wimshome/log/classes/$wims_class/icourses
13 
!set icoursecnt=!linecnt $icourses
 16 
!set icoursecnt=!linecnt $icourses
14 
!if $[$classcnt+$progcnt+$coursecnt+$icourses]=0
 17 
!if $[$classcnt+$progcnt+$coursecnt+$icourses]=0
15 
  !goto nosubclass
 18 
  !goto nosubclass
16 
!endif
 19 
!endif
Line 19... Line 22...
19 
 <li>
 22 
 <li>
20 
 $(CL_Names[2]):
 23 
 $(CL_Names[2]):
21 
  <ul class="inline">
 24 
  <ul class="inline">
22 
 !for i=1 to $classcnt
 25 
 !for i=1 to $classcnt
23 
  !set l=!line $i of $classes
 26 
  !set l=!line $i of $classes
24 
  !distribute items $l into c_,s_,t_
 27 
  !distribute items $l into c_,s_,t_
25 
  <li>
 28 
  <li>
26 
  <div class="wims_classes_direct_class">
 29 
  <div class="wims_classes_direct_class">
27 
   !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
 30 
   !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
28 
     !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
 31 
     !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
29 
   !else
 32 
   !else
30 
     !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 33 
     !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
31 
      $t_
 34 
      $t_
32 
   !endif
 35 
   !endif
33 
  </div>
 36 
  </div>
34 
  </li>
 37 
  </li>
35 
 !next i
 38 
 !next i
36 
 </ul></li>
 39 
 </ul></li>
37 
!endif
 40 
!endif
38 
!if $progcnt>0
 41 
!if $progcnt>0
39 
  <li>
 42 
  <li>
40 
 $(CL_Names[3]):
 43 
 $(CL_Names[3]):
41 
 <ul class="inline">
 44 
 <ul class="inline">
42 
 !for i=1 to $progcnt
 45 
 !for i=1 to $progcnt
43 
  !set l=!line $i of $progs
 46 
  !set l=!line $i of $progs
44 
  !distribute items $l into c_,s_,t_
 47 
  !distribute items $l into c_,s_,t_
45 
  <li>
 48 
  <li>
46 
  <div class="wims_classes_direct_program">
 49 
  <div class="wims_classes_direct_program">
47 
   !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
 50 
   !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
48 
     !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
 51 
     !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
49 
   !else
 52 
   !else
50 
     !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 53 
     !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
51 
     $t_
 54 
     $t_
52 
   !endif
 55 
   !endif
53 
  </div>
 56 
  </div>
54 
  </li>
 57 
  </li>
55 
 !next i
 58 
 !next i
56 
 </ul></li>
 59 
 </ul></li>
57 
!endif
 60 
!endif
58 
 
 61 
 
59 
!if $classcnt+$progcnt>=1
 62 
!!if $classcnt+$progcnt>=1
60 
 !if $coursecnt>0
 63 
 !if $coursecnt>0
61 
  <li>
 64 
  <li>
62 
  $(CL_Names[4]):
 65 
  $(CL_Names[4]):
63 
  <ul class="inline">
 66 
  <ul class="inline">
64 
  !for i=1 to $coursecnt
 67 
  !for i=1 to $coursecnt
Line 69... Line 72...
69 
   !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
 72 
   !if $wims_superclass/$c_ isitemof $user_supervise or $wims_realuser=supervisor
70 
     !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
 73 
     !href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_&auth_user=supervisor $t_
71 
   !else
 74 
   !else
72 
    !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
 75 
    !!!href module=adm/class/classes&type=authsupervisor&class=$wims_superclass/$c_ $t_
73 
    $t_
 76 
    $t_
74 
   !endif
 77 
   !endif
75 
   </div>
 78 
   </div>
76 
   </li>
 79 
   </li>
77 
  !next i
 80 
  !next i
78 
  </ul></li>
 81 
  </ul></li>
79 
 !endif
 82 
 !endif
80 
 !if $icoursecnt>0
 83 
 !if $icoursecnt>0
81 
  <li>
 84 
  <li>
82 
  $(CL_Names[5]):
 85 
  $(CL_Names[5]):
Line 112... Line 115...
112 
  !set wims_menu_items=!append line testgo,1,module=adm/class/classes&type=authsupervisor&class=$wims_class/0 \
 115 
  !set wims_menu_items=!append line testgo,1,module=adm/class/classes&type=authsupervisor&class=$wims_class/0 \
113 
  import,1,adm/class/config&job=neighbor&job2=import&nei=$wims_class/0\
 116 
  import,1,adm/class/config&job=neighbor&job2=import&nei=$wims_class/0\
114 
  to $wims_menu_items
 117 
  to $wims_menu_items
115 
  </div>
 118 
  </div>
116 
 !endif
 119 
 !endif
117 
!endif
 120 
!!endif