Subversion Repositories wimsdev

!distribute item $user_lastname,$user_firstname into lastname,firstname

!default name_student=!nosubst $lastname, $firstname

!form reply

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

  <input type="hidden" name="status" value="OK" />

  <fieldset class="property_fields halfwidth blockcenter">

    <legend>$name_title

      !if $user!=$empty

        ($name_student)

      !endif

    </legend>

    <div class="field box">

      <label for="showsheet">$name_showsheet</label><br />

      !set wims_formselect_switch=multiple size="$[min($activelist_cnt,10)]"

      !formselect showsheet list $activlist prompt $(shs_title[$(activlist)])

    </div>

    <div class="field box">

      $name_graphics

      !formradio graphics list 0,1 prompt $wims_name_no,$wims_name_yes

    </div>

    <div class="wimscenter wimsform">

      <input type="submit" value="$wims_name_Show" />

    </div>

   </fieldset>

!formend

!if $showsheet!=$empty

  !default showsheet=$activlist

  !default graphics=0

  !set nbth=4

  !if $graphics!=1

    !set table_id=TABLE_userlist

    !set table_class=sortable

  !endif

  $table_header

  <thead>

    <tr>

      <th colspan="5"></th>

      !for j in $showsheet

        !if $(activ[$j])>0

          <th colspan="2" class="small">$wims_name_Sheet $j <br />$(shs_title[$j])<br />($(nbexo$j) $name_exo)</th>

          !increase nbth

          !increase nbth

        !endif

      !next j

    </tr>

    $table_hdtr

      <th scope="col">$name_lastconnexion</th>

      <th scope="col" data-sort-method="number">$name_nbsessions</th>

      <th scope="col" class="small" data-sort-method="number">$wims_name_cnt_exo<br /> ($nbexototal $name_exo)</th>

      <th>$name_total</th>

      !for j in $showsheet

        !if $(activ[$j])>0

          <th class="small" scope="col" data-sort-method="number">$name_cnt_exo</th>

          <th class="small" scope="col" data-sort-method="number">$name_time</th>

        !endif

      !next j

    </tr>

  </thead>

  <tbody>

    !set getraw=$user

    !readproc script/raw.proc

    $table_tr

      !for h = 1 to 2*$sheetcnt + 4

        !set h1=$[($h+$h%2)/2-2]

        !if $h <=4 or ($h>4 and $(activ[$h1])>0) and $h1 isitemof $showsheet

          <td>

            !if $h>2 and . notin $[$h/2]

              $(data[$h])

            !else

              $(data[$h])

            !endif

            !if $h=3 and $(data[$h])!=$empty and $(data[-1])>0

              <span style="color:orange">+ $(data[-1])</span>

            !endif

            !set h2=$[$h%2]

            !if $h1 isitemof $showsheet and $h2=1

              !if , isin $showsheet

                !set bb=!select $databyday where column 1=$h1

              !else

                !set bb=$(databyday[1;])

              !endif

              !if $bb!=$empty

                !set bb=!exec pari vecsum($(bb[6]))

                <span style="color:orange">+ $bb</span>

              !endif

            !endif

          </td>

        !endif

      !next h

    </tr>

    !if $graphics=1

      $table_tr

        <td colspan="$[$nbth+1]" style="text-align:left;">

        !read script/exobyday.phtml

        </td>

      </tr>

    !endif

  </tbody>

  $table_end

!endif

!set wims_menu_items=!append line myscore,1,module=adm/class/userscore&job_affi=notes\

livret,1,module=adm/class/livret\

to $wims_menu_items

!tail