Subversion Repositories wimsdev

Rev

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