Subversion Repositories wimsdev

Rev

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

  1.  
  2. !set form_titlename=$wims_name_title
  3. !set form_caption=$name_levelproperties
  4. !set title=$class_description
  5. !set sup=$class_Supervisor
  6. !set alevel=$class_level
  7. !read scripts/levelform.phtml
  8. <p>
  9. !if $classcnt=0
  10.  $name_level1
  11.  !href cmd=reply&job=addclass $wims_name_addclass
  12. .
  13. &nbsp;
  14. !set wims_ref_class=wims_button_help
  15.  !href cmd=help&special_parm=structure#class $wims_name_help
  16.  
  17. !else
  18.  $table_header
  19.  <caption>$name_level4
  20.  &nbsp;
  21. !set wims_ref_class=wims_button_help
  22.  !href cmd=help&special_parm=structure#class $wims_name_help
  23. <small>
  24.  !href cmd=reply&job=addclass $wims_name_addclass
  25.  </small></caption>
  26.  $table_hdtr
  27.  <th>$name_code<th>$wims_name_name</th><th>$wims_name_action</th><th>$name_supervisor2</th>
  28.  <th><small>$wims_name_course</small></th>
  29.  <th><small>$name_participant</small></th>
  30.  </tr>
  31.  !for i=1 to $classcnt
  32.    !set l=!line $i of $classes
  33.    !distribute items $l into l_,s_,t_,n_
  34.    !set c=!record 0 of $classdir1/$l_/courses
  35.    !set c=!nonempty lines $c
  36.    !set c=!linecnt $c
  37.    $table_tr<td align="center">$l_</td>
  38.    <td align="center">
  39.    !href cmd=reply&job=class&class=$l_ $t_
  40.    </td><td align="center">
  41.    !set wims_ref_class=wims_button
  42.     !href cmd=reply&job=delclass&del=$l_ $wims_name_erase
  43.    </td><td align="center">
  44.    !if $s_!=$empty
  45.     !if $s_=supervisor
  46.      $wims_name_supervisor
  47.     !else
  48.      !default n_=$s_
  49.      !href cmd=reply&job=modteacher&teacher=$s_ $n_
  50.     !endif
  51.    !else
  52.     $name_nonavailable
  53.    !endif
  54.    </td><td align="center">$c</td>
  55.    !set c=!recordcnt $classdir1/$l_/.userlist
  56.    <td align="center">$c</td>
  57.  !next i
  58.  $table_end
  59.  
  60. !endif
  61.  
  62. <p>
  63. !if $progcnt=0
  64. $name_level2
  65.  !href cmd=reply&job=addprog $wims_name_addprog
  66. .&nbsp;
  67. !set wims_ref_class=wims_button_help
  68.  !href cmd=help&special_parm=structure#program $wims_name_help
  69. !else
  70.  $table_header
  71.  <caption>$name_level3
  72.  &nbsp;
  73. !set wims_ref_class=wims_button_help
  74.  !href cmd=help&special_parm=structure#program $wims_name_help
  75. <small>
  76.  !href cmd=reply&job=addprog $wims_name_addprog
  77.  </small></caption>
  78.  $table_hdtr
  79.  <th>$name_code<th>$wims_name_name</th><th>$wims_name_action</th><th>$name_supervisor2</th>
  80.  <th><small>$wims_name_course</small></th>
  81.  </tr>
  82.  !for i=1 to $progcnt
  83.    !set l=!line $i of $programs
  84.    !distribute items $l into l_,s_,t_,n_
  85.    !set c=!record 0 of $classdir1/$l_/courses
  86.    !set c=!nonempty lines $c
  87.    !set c=!linecnt $c
  88.    $table_tr<td align="center">$l_</td>
  89.    <td align="center">
  90.    !href cmd=reply&job=prog&prog=$l_ $t_
  91.    </td><td align="center">
  92.    !set wims_ref_class=wims_button
  93.     !href cmd=reply&job=delprog&del=$l_ $wims_name_erase
  94.  
  95.    </td><td align="center">
  96.    !if $s_!=$empty
  97.     !if $s_=supervisor
  98.      $wims_name_supervisor
  99.     !else
  100.      !default n_=$s_
  101.      !href cmd=reply&job=modteacher&teacher=$s_ $n_
  102.     !endif
  103.    !else
  104.     $name_nonavailable
  105.    !endif
  106.    </td><td align="center">$c
  107.  !next i
  108.  $table_end
  109. !set wims_menu_items=!append line addclass,1,cmd=reply&job=addclass\
  110. addprog,1,cmd=reply&job=addprog\
  111. to $wims_menu_items
  112. !endif
  113.  
  114. !reset title
  115.  
  116.