Subversion Repositories wimsdev

Rev

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

  1. !read adm/language names.phtml
  2. !read lang/names.phtml.$modu_lang
  3.  
  4. !read adm/css.phtml
  5. !header1
  6.  
  7. !!if $cmd=help
  8.  !!read help.phtml
  9.  !!goto end
  10. !!endif
  11.  
  12. !read adm/title.phtml 1\
  13. WIMS $httpd_HTTP_HOST\
  14. $name_title
  15.  
  16. !if $cltype iswordof 2 4 and $classcnt>0
  17.  <center>
  18.  ($name_reserved)
  19.  </center>
  20. !endif
  21.  
  22. !if $error!=$empty
  23.  <p>
  24.  !read lang/msg.phtml.$modu_lang
  25.  <p>
  26.  !goto end1
  27. !endif
  28.  
  29. !if $classcnt=0
  30.   $name_warning1
  31.  !goto end
  32. !endif
  33.  
  34. !if $class=$empty
  35.  $name_inscription
  36.  <p>
  37.  $table_header
  38.  !if $ctype=0
  39.   $table_hdtr
  40.   <th>$wims_name_name</th><th>$wims_name_nameteacher</th><th>$wims_name_level</th><th>$wims_name_Language</th>
  41.   <th>$name_remainig</th><th>$wims_name_Status</th>
  42.  !else
  43.   <caption>$institution_name</caption>
  44.   $table_hdtr
  45.   <th>$wims_name_name</th><th>$wims_name_Supervisor</th><th>$wims_name_level</th>
  46.   <th>$wims_name_Status</th></tr>
  47.  !endif
  48.  !for cl in $classlist
  49.   !reset class_supervisor,class_email,class_level,class_lang,class_institution,class_description,class_password,class_limit
  50.   !defread wimshome/log/classes/$cl/.def
  51.   !distribute char $class_level into l1,l2
  52.   !set part=!recordcnt wimshome/log/classes/$cl/.userlist
  53.   $table_tr<td align="center">
  54.   !if $ctype=0
  55.    !href module=$module&cmd=reply&class=$cl $class_institution<br>$class_description
  56.   !else
  57.    !href module=$module&cmd=reply&class=$cl $class_description
  58.   !endif
  59.   </td><td align="center">
  60.   !mailurl $class_email $class_supervisor
  61.   </td>
  62.   !if $class_level=$empty
  63.    !set pname=!defof class_description in wimshome/log/classes/$class_parent/.def
  64.     <td align="center">$pname</td>
  65.   !else
  66.     <td align="center">$(level$l1)<br>$name_year $l2</td>
  67.   !endif
  68.   !if $ctype=0
  69.    <td align="center">$(lang_$class_lang)</td>
  70.    <td align="right">
  71.    !if $class_limit-$part>$site_dispo
  72.     $site_dispo
  73.    !else
  74.     $[$class_limit-$part]
  75.    !endif
  76.    </td>
  77.   !endif
  78.   !if $class_password=$empty
  79.    <td align="center">$(name_statut[1])</td>
  80.   !else
  81.    <td align="center">$(name_statut[2])</td>
  82.   !endif
  83.   </tr>
  84.  !next cl
  85.  $table_end <p>
  86.  $name_remark1
  87.  !goto end1
  88. !endif class=empty
  89.  
  90. !set classname=<b><font color="green">$description</font></b>\
  91.   - <b><font color="green">$institution</font></b>
  92.  
  93. !if $password!=$empty and $passverify=$empty
  94.  !if $cltype iswordof 2 4
  95.   $name_classessss
  96.   !href module=adm/class/classes&type=authparticipant&class=$class <b>$description</b>
  97.  !else
  98.   $name_classessss
  99.   !href module=adm/class/classes&type=authparticipant&class=$class <b>$description</b>
  100.  !endif
  101.  (<b><font color="green">$institution</font></b>)
  102.  !if $cltype iswordof 4 2
  103.   $name_warning_protected
  104.   !if $classcnt>0
  105.   $name_inscription_student
  106.   !href cmd=new&module=$module&class=$class&subclass=yes $name_inyourclass
  107. .
  108.   !endif
  109.  !else
  110.   $name_isprotected
  111.   !endif
  112.  <p> $name_writepasswd
  113.  !if $cltype iswordof 2 4
  114.   $name_asateacher.
  115.  !else
  116.   $name_asaparticipant.
  117.  !endif
  118.  !form reply
  119.  <input type="hidden" name="step" value="1">
  120.  <center> <p><label for="classpass">$wims_name_Password</label>
  121.  <input type="password" name="classpass" id="classpass">
  122.  <p>
  123.  <input type="submit" value="$wims_name_send">
  124.  </center></form> <p>
  125.  <b>$wims_name_warning</b>.
  126.  !if $cltype iswordof 2 4
  127.   $name_access1
  128.  !else
  129.   $name_access2
  130.  !endif
  131.  $name_obtainpasswd
  132. (
  133.  !if $cltype iswordof 2 4
  134.   !mailurl $smail $name_write_adm
  135.  !else
  136.   !mailurl $smail $wims_name_wsup
  137.  !endif
  138. ).
  139.  !if $cltype iswordof 2 4
  140.   $name_warning_direct
  141.   !href cmd=new&module=$module&class=$class&subclass=yes $name_inyourclass
  142. .
  143.   <p>
  144.   !endif
  145.  !goto end1
  146. !endif
  147.  
  148. !if $step=$empty or $step<2
  149.  !if $superclass!=$empty and $wims_class!=$superclass and $wims_user=supervisor
  150.   !form reply
  151.   <input type="hidden" name="step" value="1">
  152.   <label for="search">$name_research:</label>
  153.   <input size="20" name="search" id="search" value="$search">
  154.   <input type="submit" value="$wims_name_tosave">
  155.   </form> <p>
  156.   !default foundcnt=0
  157.   !if $foundcnt>0
  158.    $table_header
  159.    <caption>$name_clickname</caption>
  160.    $table_hdtr<th>$wims_name_name</th><th>$wims_name_Login</th></tr>
  161.    !for i=1 to $foundcnt
  162.     !set l=!line $i of $found
  163.     !distribute item $l into l_,f_,L_
  164.     $table_tr<td>
  165.     !href cmd=reply&step=2&login=$L_ $l_, $f_
  166.     </td>
  167.     <td>$L_</td></tr>
  168.    !next i
  169.    $table_end
  170.    !goto end1
  171.   !endif
  172.   !if $search!=$empty and $foundcnt=0
  173.    ($name_nofound) <p>
  174.   !endif
  175.   $name_newparticipant
  176.  !else
  177.   $name_inscription2
  178.  !endif
  179.   !form reply
  180.  <input type="hidden" name="step" value="2">
  181.  <ul>
  182.  <li><label for="lastn">$wims_name_lastname</label> <input size="20" name="lastn" id="lastn" value="$lastn">
  183. <label for="firstn">$wims_name_firstname</label> <input size="20" name="firstn" id="firstn" value="$firstn">
  184.   <p>
  185.  <li><label for="login">$wims_name_Login</label>
  186.   <input size="16" name="login" id="login" value="$login"> <br>
  187.   $name_warning_login
  188.   <p>
  189.  <li><label for="pass">$wims_name_Password</label>
  190.   <input type="password" size="16" name="pass" id="pass"> <br>
  191.   $name_passwd_warning
  192.   <p>
  193.  <li><label for="email">$wims_name_email ($name_optional) :</label><br>
  194.   <input size="60" name="email" id="email" value="$email">
  195.   <p>
  196.  !if $wims_user=supervisor and $class=$wims_class and $cltype iswordof 2 4
  197.   <li>$name_accounttype:
  198.   !default utype=0
  199.   !formradio utype list 0,1 prompt $wims_name_namestudent,$wims_name_nameteacher
  200.  !endif
  201.  </ul>
  202.  <center><input type="submit" value="$wims_name_tosave"></center>
  203.  </form>
  204.  !goto end1
  205. !endif
  206.  
  207. !if $step=2
  208.  $name_hello, $name_student!<p>
  209.  $name_inscription3 <tt><b><font color="green">$login</font></b></tt>. <p>
  210.  !if $email=$empty
  211.   $name_passwd_nonvalid <p>
  212.  !else
  213.   $wims_name_email: <tt>$email</tt> <p>
  214.  !endif
  215.  <label for="pass2">$name_passwd_exact:</label>
  216.  !form reply
  217.  <input type="hidden" name="step" value="3">
  218.  <p></p><center><input type="password" size="16" name="pass2" id="pass2">
  219.  <p></p><input type="submit" value="$wims_name_send"></center>
  220.  </form> <p>
  221.  !goto end1
  222. !endif
  223.  
  224. !if $step=3
  225.  !if $wims_user=supervisor
  226.   $name_studentadded
  227.   <p>
  228.   !if $wims_supertype=4
  229.    !readproc adm/gateway/transfer $login test
  230.    !if $transfer_test>0
  231.     <p>
  232.     $name_otheractivities
  233.     !href module=adm/class/userlist&job=transfer&getuser=$login $name_transfer1
  234.     <p>
  235.    !endif
  236.   !endif
  237.  !set wims_menu_items=!append line part_list,1,module=adm/class/userlist\
  238.  addstudent,1,module=$module&step=1\
  239.  to wims_menu_items
  240.   !goto end
  241.  !endif
  242.  $name_hello, $name_student!<p>
  243.  $name_welcome
  244.  <tt class="d"><b><font color="green">$login</font></b></tt>. <p>
  245.  $name_youcan
  246.  !if $wims_class!=$empty
  247.   !href module=adm/class/classes&type=authparticipant&class=$class&auth_user=$login $name_gotowork
  248. .
  249.  !else
  250.   <a href="http://$httpd_HTTP_HOST$httpd_SCRIPT_NAME?lang=$lang&+module=adm/class/classes&+type=authparticipant&+class=$class&+auth_user=$login">
  251.   $name_gotowork</a>.
  252.   ($name_bookmark)
  253.  !goto end
  254. !endif
  255.  
  256. :end1
  257. !if $wims_user=supervisor
  258.  !goto end
  259. !endif
  260. <p>
  261. !if $cltype iswordof 2 4
  262.  !set wims_menu_items=!append line classlist,1,module=adm/class/classes&type=supervisor\
  263. to $wims_menu_items
  264. !else
  265.  !set wims_menu_items=!append line classlist,1,module=adm/class/classes&type=participant\
  266. to $wims_menu_items
  267. !endif
  268. :end
  269. !tail
  270.  
  271. !reset step, subclass
  272.  
  273.