Subversion Repositories wimsdev

Rev

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

  1. !read adm/title.phtml 1\
  2. $classname\
  3. $wims_name_regmanage
  4.  
  5. !reset table_center
  6. !set typen=!defof class_typename in wimshome/log/classes/$wims_class/.def
  7. !if $usercnt=0
  8.     <div class="wimscenter">
  9.     $name_noyetparticipant
  10.     !if $typen!=level
  11.         &nbsp;
  12.       !set wims_ref_class=wims_button
  13.       !href module=adm/class/reguser&step=1 $wims_name_addstudent
  14. &nbsp;
  15.     !endif
  16.     </div>
  17. !else
  18.  !form reply
  19.  <fieldset class="property_fields blockcenter">
  20.   <legend>$name_grpaction</legend>
  21.   <div class="field box">
  22.     <p>$name_expert0</p>
  23.     <ul>
  24.       !set wims_html_mode=li
  25.       !set wims_ref_class=wims_formradio
  26.       !set wims_ref_id=motd_type
  27.       !set listuserchoices=__ALL__,__CHECK__
  28.       !!,__FILTER__
  29.       !set listusernchoices=$name_all,$name_checked
  30.       !!,$name_filter
  31.       !formradio listuserchoice list $listuserchoices prompt $listusernchoices
  32.     </ul>
  33.     <div style="margin-left:4.5em;" id="tech_var">
  34.       !set wims_ref_class=wims_button_help float_right
  35.       !href cmd=help&special_parm=filter $wims_name_help
  36.       <label for="varfilter">$name_technical_var:</label>
  37.       <textarea name="varfilter" id="varfilter" rows="6" cols="20">$varfilter</textarea>
  38.     </div>
  39.  
  40.     !!# Avec JQuery, Le champ "variable technique" n'apparait que lorsqu'il est necessaire.
  41.    !if $jquery_defined=yes
  42.       <script type="text/javascript">
  43.         /*<![CDATA[*/ jQuery(function(jq) {
  44.           jq( "#tech_var" ).hide();
  45.           jq( "#motd_type3" ).click(function() {
  46.             jq( "#tech_var" ).slideDown();
  47.           });
  48.           jq( "#motd_type1, #motd_type2" ).click(function() {
  49.             jq( "#tech_var" ).slideUp();
  50.           });
  51.         }); /*]]>*/
  52.       </script>
  53.     !endif
  54.   </div>
  55.   <div class="field box">
  56.   <p>$name_expert1</p>
  57.   !set wims_html_mode=li
  58.   !set wims_ref_class=wims_formcheck
  59.   !set wims_ref_id=motd_class
  60.   !for k=1 to $nbsubclasses
  61.     !set k_=!replace internal / by _ in $k
  62.      <input type="checkbox" name="listsclassch" id="listsclassch$k_" value="$(ltsubclasses[$k])"/><label for="listsclassch$k_">$(ltnamesubclasses[$k])</label>
  63.   !next k
  64.   </div>
  65.  <div class="wimscenter">
  66.   <input type="hidden" name="job" value="regmanage" />
  67.   <input type="submit" name="action" value="$name_reguser" $wims_on_click/>
  68.   <input type="submit" name="action" value="$name_unreguser" $wims_on_click/>
  69.  </div>
  70. </fieldset>
  71.  
  72. !! ----- displaying table of participant
  73.     $table_header
  74.     $table_hdtr
  75.         <th></th>
  76.         <th>$name_studentglo</th>
  77.        !for l=1 to $nbsubclasses
  78.             <th>$(ltnamesubclasses[$l])<br/> ($(ltsupsubclasses[$l]))</th>
  79.        !next l
  80.    </tr>
  81.     !readproc adm/class/mkcomment name
  82.     !let namecomment=$scriptout
  83.     !for i=1 to $usercnt
  84.      !set uu=!record $i of wimshome/log/classes/$wims_class/.userlist
  85.      !distribute items $uu into bl,bl,uu
  86.      !if $varfilter_!=$empty
  87.         !read adm/class/testfilter $uu\
  88. $varfilter_
  89.      !endif
  90.      !if $(var_filter_test)=1 or $varfilter_=$empty
  91. !!        !set UU=!hex $uu
  92.           !reset user_exists,user_email,user_regnum,user_external_auth,user_vars,user_comments$namecomment,user_comments,user_participate
  93.           !readproc adm/class/userdef classes,$wims_class,$uu
  94.           !readdef $userdef
  95.           !set user_vars=!sh grep -E '^!set user__' $Userdef | sed 's/^!set user__//g'
  96.           $table_tr
  97.             <td><input type="checkbox" name="listuser" value="$uu"/></td>
  98.             !reset css_connected
  99.             !if $uu isitemof $wims_connectedlogin
  100.               !set css_connected=class="wims_connected"
  101.               !set wims_ref_title=connected
  102.             !endif
  103.             <td><span $css_connected>
  104.             !href cmd=reply&job=userprop&getuser=$uu $name_studentloc
  105.             </span></td>
  106.             !for k in $ltsubclasses
  107.               <td class="wimscenter">
  108.               !if $k isitemof $user_participate
  109.                 &#x2705;
  110.              !endif
  111.                </td>
  112.             !next k
  113.           </tr>
  114.     !endif
  115.     !next i
  116.     </table>
  117.     !formend
  118. !endif
  119.  
  120. !! define wims_menu_items
  121. !set wims_menu_items=!append line back2,1,module=adm/class/usermanage&job=userlist to $wims_menu_items
  122.