Subversion Repositories wimsdev

!! liste des sujets

!if $nbuser<=0

  $name_noparticipant

  !exit

!endif

!! ----- displaying table of participant

!set table_id=TABLE_userlist

!set table_class=sortable

$table_header

  <thead>

    $table_hdtr

      <th scope="col">$wims_name_lastname - $wims_name_firstname</th>

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

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

    </tr>

  </thead>

  <tbody>

    !for i=1 to $nbuser

      $table_tr

        !reset css_connected tchatisopen lastmsg

        !if $(ulist[$i]) isitemof $wims_connectedlogin

          !set css_connected=class="wims_connected"

          !set wims_ref_title=connected

        !endif

        <td $css_connected>

          !href cmd=reply&+user=$(ulist[$i])&job=edit $(nlist[$i])

        </td>

        <td>

         !if $(tchatisopen_$(ulist[$i]))!=$empty

           ✔

         !endif

        </td>

        <td>

         !readproc script/lastmsg.proc $(ulist[$i])

         !if $lastmsg!=$empty

           <span class="tchat-date2">

                !let dt1=!char 1 to 8 of $lastdate

                !let dt2=!char 10 to 14 of $lastdate

                !readproc adm/date.phtml $dt1

                $l_date_out $wims_name_at

                !replace internal : by H in $dt2

           </span>

           <div class="lastmsg">

             $lastmsg ...

             !href module=$module&job=edit&job2=newmsg&user=$(ulist[$i]) $name_answer

           </div>

         !endif

        </td>

      </tr>

    !next i

  </tbody>

$table_end

!if $livinglist!=$empty

  !! ----- displaying table of living

  !set table_id=TABLE_livinglist

  !set table_class=sortable

  $table_header

  <thead>

    $table_hdtr

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

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

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

    </tr>

  </thead>

  <tbody>

    !for i in $livinglist

      $table_tr

        <td>

          !href cmd=reply&+user=.living$i&job=edit $(livingname_$i)

        </td>

        <td>

          !let n=!itemcnt $(living_connected_$i)

          $n / $(livingnb_$i)

        </td>

        <td>

         !readproc script/lastmsg.proc .living$i

         !if $lastmsg!=$empty

           <span class="tchat-date2">

                !let dt1=!char 1 to 8 of $lastdate

                !let dt2=!char 10 to 14 of $lastdate

                !readproc adm/date.phtml $dt1

                $l_date_out $wims_name_at

                !replace internal : by H in $dt2

           </span>

           <div class="lastmsg">

             $lastmsg ...

             !href module=$module&job=edit&job2=newmsg&user=$(ulist[$i]) $name_answer

           </div>

         !endif

        </td>

      </tr>

    !next i

  </tbody>

  $table_end

!endif

!read tablesort.phtml