Subversion Repositories wimsdev

Rev

Rev 2006 | Rev 2596 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. <!-- begin of supervisor.phtml -->
  2. !! supervisor page definition.
  3. !nocache
  4. !if $module!=home
  5.  !exit
  6. !endif
  7. !set home_theme=yes
  8. !!!!! provisoire
  9.  
  10. !set wims_name_cdt=$U_cdt
  11. !set wims_name_forum=$N_Mboard
  12. !set wims_name_myscore=$U_myscore
  13. !set wims_name_account=$U_account
  14. !set wims_name_U_oclass=$U_oclass
  15. !set wims_name_V_Chpref=$V_Chpref
  16. !set wims_name_passwd=$V_Chpass
  17. !set wims_name_SE_list=$SE_list
  18. !set wims_name_n_participant=$SE_part
  19. !set wims_name_SE_mod=$SE_mod
  20. !set wims_name_SE_config=$SE_config
  21. !set wims_name_SE_secu=$SE_secu
  22. !set wims_name_struct=$SU_Gateway
  23. !set wims_name_addclass=$ADD_3 $ADD_class
  24. !!!!
  25.  
  26. !readproc tabletheme
  27. !read classlogo.phtml
  28. !if $class_logo!=
  29.  <div class="menuitem">
  30.  <div id="wimslogo$class_logoside">
  31.   <img src="$class_logo" border=0 alt="class logo" align=left>
  32.  </div><!--wimslogo-->
  33.  </div><!-- menuitem-->
  34. !endif
  35. !read ./adm/title.phtml 2\
  36. $wims_classname, $wims_institutionname\
  37. ($SU_log - $(wims_name_$class_typename))
  38.  
  39. <br clear=all>
  40. </div>
  41.  
  42. <div class="wimsbody">
  43.  
  44. !if _tool isin $wims_session
  45.  !read ./tools.phtml
  46.  </div><!--wimsbody-->
  47. </div><!--wimspagebox-->
  48.  !goto end
  49. !endif
  50. !if $class_type isin 3
  51.  $SU_greet.
  52.  !read Subclasses1.phtml
  53.  !if $class_typename=level
  54.  !! <p><center>
  55.  !! !href module=adm/class/gateway $SU_Gateway
  56.  !! </center>
  57.  </div><!--wimsbody-->
  58. </div><!--wimspagebox-->
  59. <div id="wimsmenumodubox" style="background-color:$wims_ref_bgcolor;">
  60. <div class="wimsmenu">
  61. <div class="menuitem">
  62. !read ./adm/oneitem.phtml struct,1,module=adm/class/gateway
  63. </div><!--menuitem-->
  64. <div class="menuitem">
  65. !read ./adm/oneitem.phtml U_oclass,1,module=adm/class/classes&type=supervisor
  66. </div><!--menuitem-->
  67.   !goto end
  68.  !else
  69.   !goto nocheck
  70.  !endif
  71. !endif
  72. !if $class_type notin 13
  73. $SU_greet
  74. $SU_exp1
  75. !set d_=!char 7,8 of $class_expiration
  76. !set m_=!char 5,6 of $class_expiration
  77. !set y_=!char 1 to 4 of $class_expiration
  78. !href module=adm/class/config $m_-$d_-$y_
  79. $SU_exp2.
  80. !else
  81. $SU_greet.
  82. !endif
  83. <small>
  84. !href target=wims_help module=help/main&chapter=3&open=3_sheet#sheet [$N_help]
  85. </small>
  86. !if $quota_free<2
  87.  !if $quota_free<0
  88.   <p>
  89.   Your class has exceeded disk space allowance on the server. Class
  90.   management is no longer available. Sorry!
  91.   <p>
  92.   We suggest that you ask the site manager to increase the disk space
  93.   allowance for virtual classes.
  94.   <p>
  95.   !href cmd=close&module=home&lang=$lang $V_Quit
  96.   </div><!--wimsbody-->
  97. </div><!--wimspagebox-->
  98.   !goto end
  99.  !else
  100.   <br><b>Warning</b>! Your class is reaching the limit of disk space allowance.
  101.   Once this limit is exceeded, class management will be locked!
  102.  !endif
  103. !endif
  104. :nocheck
  105.  
  106. !if & isin $newmsgcnt or $newmsgcnt>0
  107.  <br>
  108.  !href module=adm/forum/mboard $U_newmsg
  109. !endif
  110. <p>
  111.  
  112. !if $class_type=4
  113.  <center>
  114.  !href module=adm/class/gateway $SU_Gateway
  115.  </center> <p>
  116.  </div><!--wimsbody-->
  117. </div><!--wimspagebox-->
  118. <div id="wimsmenumodubox" style="background-color:$wims_ref_bgcolor;">
  119. <div class="wimsmenu">
  120. <div class="menuitem">
  121. !read ./adm/oneitem.phtml U_oclass,1,module=adm/class/classes&type=supervisor
  122. </div><!--menuitem-->
  123.  !goto end
  124.  
  125. !endif
  126.  
  127. !if $class_type=2
  128.  !if $subclasscnt>0
  129.   $table_header
  130.   $table_hdtr<th>$SU_shno</th><th>$SU_shti</th><th>$U_teacher</th>
  131.   !for i=1 to $subclasscnt
  132.    !let f_class=!record $i of wimshome/log/classes/$wims_class/.subclasses
  133.    !let f_aff=!item 4 of $f_class
  134.    !let f_name=!item 1 of $f_class
  135.    $table_tr
  136.     <td align=center>$ADD_class $i</td>
  137.     <td>
  138.     !href module=adm/class/classes&type=authsupervisor&class=$f_name $f_aff
  139.     </td>
  140.     <td align=center>
  141.      !item 9 of $f_class
  142.     </td>
  143.    </tr>
  144.   !next i
  145.   $table_end
  146.   <p><p>
  147.  !endif
  148.  
  149. </div><!--wimsbody-->
  150. </div><!--wimspagebox-->
  151. <div id="wimsmenumodubox" style="background-color:$wims_ref_bgcolor;">
  152. <div class="wimsmenu">
  153.    <div class="menuitem">
  154.     !read ./adm/oneitem.phtml addclass,1,module=adm/class/regclass
  155. </div><!--menuitem-->
  156.  
  157.  !goto end
  158. !endif
  159.  
  160. <div id="wims_class_manager_msg">
  161. !read ./wimshome/log/manager_msg.phtml.$lang
  162. </div>
  163.  
  164. !set test=!replace / by , in $wims_class
  165. !if $(test[-1])=0
  166.   !set test_up=!replace internal /0- by in $wims_class-
  167.   !href module=adm/class/classes&type=authsupervisor&class=$test_up $SU_Bprogram
  168. !endif
  169.  
  170. !set ac_0=<small>$SU_Uprep</small>
  171. !set ac_1=$SU_Ac
  172. !set ac_2=$SU_Ex
  173. !set ac_3=$SU_Hi
  174. !set docpubliccnt=!recordcnt  wimshome/log/classes/$wims_class/doc/.docindex
  175. !if $sheetcnt+$examcnt+$doccnt+$docpubliccnt+$votecnt+$subclasscnt<=0
  176.  <p>$SU_nosheet
  177. !else
  178.  $table_header
  179.  <caption>$SU_shlist &nbsp;
  180.  [
  181.  !href module=adm/class/sequence $wims_name_reorder
  182.  ]
  183.  </caption>
  184.  $table_hdtr<th>$SU_shno<th>$SU_shti<th>$SU_shst
  185.  !for i=1 to $subclasscnt
  186.   !let f_class=!record $i of wimshome/log/classes/$wims_class/.subclasses
  187.   !let f_aff=!item 4 of $f_class
  188.   !let f_name=!item 1 of $f_class
  189.   $table_tr
  190.    <td align=center>$ADD_class $i</td>
  191.    <td>
  192.    !href module=adm/class/classes&type=authsupervisor&class=$f_name $f_aff
  193.    </td>
  194.    <td align=center>-</td>
  195.   </tr>
  196.  !next i
  197.  !for i=1 to $doccnt
  198.   !set sh=!record $i of wimshome/log/classes/$wims_class/doc/.index
  199.   !distribute lines $sh into s_,t_,bidon,bidon,bidon,o_
  200.   $table_tr<td align=center>$U_Doc</td>
  201.   <td>
  202.   !href module=adm/doc&job=read&doc=$s_&block=main $t_
  203.   </td>
  204.   <td align=center><small>
  205.   !item $[$o_ +1] of $U_Docstatus
  206.    [
  207.   !href module=adm/doc&job=prop&doc=$s_ $wims_name_change
  208.   ]
  209.   </small></td>
  210.  !next i
  211.  !for i=1 to $docpubliccnt
  212.     !set sh=!record $i of wimshome/log/classes/$wims_class/doc/.docindex
  213.     !distribute lines $sh into s_,t_,ti,d_,o_
  214.     $table_tr<td align=center>$U_Doc</td>
  215.    <td>
  216.    !href module=$s_&$t_ $ti
  217.    </td>
  218.    <td align=center><small>
  219.    !item $[$o_ +1] of $wims_name_status
  220.    [
  221.    !href module=adm/class/adddoc&job=prop&doc=$i $wims_name_change
  222.    ]
  223.   </small></td>
  224.  !next i
  225.  !for i=1 to $sheetcnt
  226.   !set sh=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets
  227.   !distribute lines $sh into ac,t_,ti
  228.   $table_tr<td align=center>$U_Sheet $i</td>
  229.   <td>
  230.   !href module=adm/class/sheet&sheet=$i $ti
  231.   </td>
  232.   <td align=center>$(ac_$[$ac])</td>
  233.  !next i
  234.  !for i=1 to $examcnt
  235.   !set sh=!record $i of wimshome/log/classes/$wims_class/exams/.exams
  236.   !distribute lines $sh into ac,t_,d_,ti
  237.   $table_tr<td align=center>$U_Exam $i</td>
  238.   <td>
  239.   !href module=adm/class/exam&exam=$i $ti
  240.   </td>
  241.   <td align=center>$(ac_$[$ac])</td>
  242.  !next i
  243.  !for i=1 to $votecnt
  244.   !set sh=!record $i of wimshome/log/classes/$wims_class/vote/.votes
  245.   !distribute lines $sh into st_,ti_,op_,re_
  246.   $table_tr<td align=center>$U_Vote</td>
  247.   <td>
  248.   !href module=adm/vote&job=read&vote=$i $ti_
  249.   </td>
  250.   <td align=center>$(ac_$[$st_])</td>
  251.  !next i
  252.  $table_end <p>
  253. !endif
  254. $ADD_1
  255. !href module=adm/doc&job=creat $ADD_doc
  256. !if $wims_supertype!=4 or $class_typename!=class
  257. ,
  258. !href module=adm/class/sheet&sheet=$[$sheetcnt+1] $ADD_sheet
  259. ,
  260. !href module=adm/class/exam&exam=$[$examcnt+1] $ADD_exam
  261. ,
  262. !href module=adm/createxo $ADD_exo
  263. !endif
  264. !if $class_type=2
  265. ,
  266. !href module=adm/class/regclass $ADD_class
  267. !endif
  268.  
  269.  $N_or
  270. !href module=adm/vote&job=creat $ADD_vote
  271. .
  272.  
  273. <p>
  274. !read ./form.phtml
  275. !read ./result.phtml
  276. </div><!--wimsbody-->
  277. </div><!--wimspagebox-->
  278. <div id="wimsmenumodubox" style="background-color:$wims_ref_bgcolor;">
  279. <div class="wimsmenu">
  280. !if $wims_supertype!=4 or $class_typename!=class
  281.    <div class="menuitem">
  282.    !read ./adm/oneitem.phtml classexo,1,module=classes/$lang&special_parm=.nocache.
  283.    </div><!--menuitem-->
  284.    <div class="menuitem">
  285.    !read ./adm/oneitem.phtml modtool,1,module=adm/modtool
  286.    </div><!--menuitem-->
  287.    <div class="itemsep"></div><!--itemsep-->
  288. !endif
  289. !if $wims_supertype!=4 or $class_typename!=class
  290.  <div class="menuitem">
  291. !read ./adm/oneitem.phtml add_sheet,1,module=adm/class/sheet&sheet=$[$sheetcnt+1]
  292. </div><!--menuitem-->
  293.  <div class="menuitem">
  294. !read ./adm/oneitem.phtml add_exam,1,module=adm/class/exam&exam=$[$examcnt+1]
  295. </div><!--menuitem-->
  296.  <div class="menuitem">
  297. !read ./adm/oneitem.phtml add_exo,1,module=adm/createxo
  298. </div><!--menuitem-->
  299. !endif
  300. !if $class_type=2
  301. <div class="menuitem">
  302. !read ./adm/oneitem.phtml add_class,1,module=adm/class/regclass
  303. </div><!--menuitem-->
  304. !endif
  305. <div class="menuitem">
  306. !read ./adm/oneitem.phtml add_doc,1,module=adm/doc&job=creat
  307. </div><!--menuitem-->
  308. <div class="menuitem">
  309. !read ./adm/oneitem.phtml add_vote,1,module=adm/vote&job=creat
  310. </div><!--menuitem-->
  311. <div class="itemsep"></div><!--itemsep-->
  312. !if ($wims_supertype<4 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename iswordof course)
  313.   <div class="menuitem">
  314.     !read ./adm/oneitem.phtml Score1,1,module=adm/class/userlist
  315.   </div>
  316. !endif
  317. !if ($wims_supertype<4 and $wims_typename=class) or ($wims_supertype=4 and $wims_typename iswordof course program)
  318.   <div class="menuitem">
  319.   !read ./adm/oneitem.phtml livret,1,module=adm/class/livret
  320.   </div>
  321.   <div class="itemsep"></div><!--itemsep-->
  322. !endif
  323.  
  324. !endif  
  325.  
  326.  
  327.  
  328.  
  329. <div class="menuitem">
  330. !read ./adm/oneitem.phtml U_oclass,1,module=adm/class/classes&type=supervisor
  331. </div><!--menuitem-->
  332. :end
  333.  
  334. !set class_ent1=!rows2lines $class_ent
  335. !set class_ent_n0=!linecnt $class_ent1
  336. !for i_=1 to $class_ent_n0
  337.   !set 1_=!line $i_ of $class_ent1
  338.    <div class="menuitem">
  339.    !read ./adm/oneitem.phtml $(1_[1]),2,$(1_[2]),external
  340.    </div>
  341.  !next i_
  342.  
  343. </div><!--menuitem-->
  344. </div><!--wimsmenu-->
  345. </div><!--wimsmenumodubox-->
  346.  
  347.  
  348. <div id="wimsmenubox" style="background-color:$wims_ref_bgcolor;">
  349. <div class="wimsmenu">
  350. <div class="menublock">
  351. !if $class_typename notsametext program
  352. <span class="menuitem">
  353. !read ./adm/oneitem.phtml SE_list,1,module=adm/class/userlist
  354. </span><!-- menuitem-->
  355. <span class="menuitem">
  356. !read ./adm/oneitem.phtml n_participant,1,style=student
  357. </span><!-- menuitem-->
  358. !endif
  359. !!<div class="menuitem">
  360. !!!href module=adm/class/classes&type=supervisor $im "gifs/themes/$wims_theme_image/U_oclass.gif" alt="U_oclass"> $U_oclass
  361. !!</div><!--menuitem-->
  362. </div><!--end menublock-->
  363. !! to separate sort of submenu
  364. <div class="menublock">
  365. !if $wims_theme_version=0 or $wims_theme_version=
  366. <span class="menuitem">
  367. !read ./adm/oneitem.phtml help,1,module=help/main&chapter=3,help
  368. </span><!-- menuitem-->
  369. !endif
  370. !if $class_typename notsametext program
  371. <span class="menuitem">
  372. !read ./adm/oneitem.phtml SE_mod,1,module=adm/class/motd
  373. </span><!-- menuitem-->
  374. !endif
  375. !if $exist_cdt=yes
  376. <span class="menuitem">
  377. !read ./adm/oneitem.phtml cdt,1,module=adm/class/cdt
  378. </span><!-- menuitem-->
  379. !endif
  380. !reset name_c
  381. !if $class_superclass!=
  382.  !set name_c=!defof class_description in wimshome/log/classes/$wims_class/.def
  383.   !set name_c=<small>($name_c)</small>
  384. !endif
  385. <span class="menuitem">
  386. !read ./adm/oneitem.phtml forum,1,module=adm/forum/mboard
  387. <small>$name_c</small>
  388. </span><!-- menuitem-->
  389. !!! the following allows to have forums in level. I comment because
  390. !!I don't know if it useful. don't delete.
  391. !!!if $wims_class=$wims_superclass and $class_type=4
  392. !! !set level_cnt=!record 0 of wimshome/log/classes/$wims_class/levels
  393. !! !set level_cnt=!linecnt $level_cnt
  394. !! !set participate_=!defof user_participate in wimshome/log/classes/$wims_class/.users/$wims_user
  395. !! !set supervise_=!defof user_supervise in wimshome/log/classes/$wims_class/.users/$wims_user
  396. !!  !for le_ from 1 to $level_cnt
  397. !!   !if ,$wims_class/$le_/ isin ,$participate_,$supervise_
  398. !!     !set name_c=!defof class_description in wimshome/log/classes/$wims_class/$le_/.def
  399. !!     <div class="menuitem">
  400. !!      !read ./adm/oneitem.phtml forum,1,module=adm/forum/mboard&forum=classes/$wims_class/$le_
  401. !!      ($name_c)
  402. !!    </div>
  403. !!    !endif
  404. !!  !next
  405. !!!endif
  406. </div><!--end menublock-->
  407. <div class="menublock">
  408. <div class="menuitem">
  409. !read ./adm/oneitem.phtml SE_config,1,module=adm/class/config
  410. </div><!--menuitem-->
  411. !!<div class="menuitem">
  412. !!!read ./adm/oneitem.phtml SE_secu,1,module=adm/class/config&job=security
  413. !!</div><!--menuitem-->
  414. <div class="menuitem">
  415. !read ./adm/oneitem.phtml V_Chpref,1,module=adm/light&phtml=useropts.phtml.$lang
  416. </div><!--menuitem-->
  417. </div><!--end menublock-->
  418. </div><!--end wimsmenu-->
  419. </div><!--end wimsmenubox-->
  420. </div><!--wimsbodybox-->
  421. <div id="wimstailbox">
  422. <div class="wimstail">
  423. <div class="tailitem">
  424. WIMS-$wims_version@$httpd_HTTP_HOST.
  425. </div><!--tailitem-->
  426. <div class="tailitem">
  427. $E_manager
  428. !mailurl $wims_site_manager\
  429. WIMS
  430. .</div><!--tailitem-->
  431. </div><!--wimstail-->
  432. </div><!--end wimstailbox-->
  433. </body>
  434. </html>
  435. <!-- end of supervisor.phtml -->
  436.  
  437.