Subversion Repositories wimsdev

!read adm/title.phtml 1\

$classname\

$wims_name_regmanage

!reset table_center

!set typen=!defof class_typename in wimshome/log/classes/$wims_class/.def

!if $usercnt=0

    <div class="wimscenter">

    $name_noyetparticipant

    !if $typen!=level

         

      !set wims_ref_class=wims_button

      !href module=adm/class/reguser&step=1 $wims_name_addstudent

 

    !endif

    </div>

!else

 $name_description

 !if $tv_listtechvar!=$empty

   <fieldset class="property_fields blockcenter">

   <legend>$name_techvardisplay</legend>

   <div class="field box">

    !form reply

    <div style="margin-left:4.5em;" id="tech_var">

      !read adm/vfilter/varfilter htmldiv

    </div>

    <div class="wimscenter">

     <input type="hidden" name="job" value="regmanage" />

     <input type="submit" name="action" value="$name_display" $wims_on_click/>

    </div>

    !formend

   </div>

  </fieldset>

 !endif

!form reply

!! ----- displaying table of participant

    $table_header

    $table_hdtr

        <th><input type="checkbox" name="listuser" id="listuser_all" value="__ALL__"/><label for="listuser_all">$name_all</label></th>

        <th>$name_studentglo</th>

       !for l=1 to $nbsubclasses

            <th>

             <input type="checkbox" name="listsclassch" id="listsclassch$l_" value="$(ltsubclasses[$l])"/><label for="listsclassch$l_">$(ltnamesubclasses[$l])</label>

             $(ltnamesubclasses[$l])<br/> ($(ltsupsubclasses[$l]))

            </th>

       !next l

   </tr>

    !readproc adm/class/mkcomment name

    !let namecomment=$scriptout

    !for i=1 to $usercnt

     !set uu=!record $i of wimshome/log/classes/$wims_class/.userlist

     !distribute items $uu into bl,bl,uu

     !if $varfilter_!=$empty

        !read adm/vfilter/testfilter $uu\

$varfilter_

     !endif

     !if $(var_filter_test)=1 or $varfilter_=$empty

!!        !set UU=!hex $uu

          !reset user_exists,user_email,user_regnum,user_external_auth,user_vars,user_comments$namecomment,user_comments,user_participate

          !readproc adm/class/userdef classes,$wims_class,$uu

          !readdef $userdef

          !set user_vars=!sh grep -E '^!set user__' $Userdef | sed 's/^!set user__//g'

          $table_tr

            <td><input type="checkbox" name="listuser" value="$uu"/></td>

            !reset css_connected

            !if $uu isitemof $wims_connectedlogin

              !set css_connected=class="wims_connected"

              !set wims_ref_title=connected

            !endif

            <td><span $css_connected>

            !href cmd=reply&job=userprop&getuser=$uu $name_studentloc

            </span></td>

            !for k in $ltsubclasses

              <td class="wimscenter">

              !if $k isitemof $user_participate

                ✅

              !endif

               </td>

            !next k

          </tr>

    !endif

    !next i

    </table>

    <div class="wimscenter">

     <input type="hidden" name="job" value="regmanage" />

     <input type="submit" name="action" value="$name_reguser" $wims_on_click/>

     <input type="submit" name="action" value="$name_unreguser" $wims_on_click/>

    </div>

!!    </fieldset>

    !formend

!endif

!! define wims_menu_items

!set wims_menu_items=!append line back2,1,module=adm/class/usermanage&job=userlist to $wims_menu_items