Subversion Repositories wimsdev

Rev

Rev 16275 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
1733 bpr 1
 
23 reyssat 2
!if $exologcnt<1
14156 bpr 3
  $name_noexercise2 $(names[1]) $(names[2]).
4
  !exit
23 reyssat 5
!endif
6
 
1733 bpr 7
$name_click
8484 bpr 8
!if $wims_user=supervisor
14156 bpr 9
  $name_bug
8484 bpr 10
!endif
1733 bpr 11
 
23 reyssat 12
!read tabletheme
13
 
5917 bpr 14
$table_header
23 reyssat 15
$table_hdtr
6146 bpr 16
<th class="small">$wims_name_date</th>
8484 bpr 17
!if $checkuser!=supervisor
9608 bpr 18
  <th class="small">$wims_name_Sheet</th>
8484 bpr 19
!else
20
  <th class="small">$wims_name_Module</th>
21
!endif
6146 bpr 22
<th class="small">$wims_name_Exercise</th>
23
<th class="small">$name_Step</th>
24
<th class="small">$wims_name_Score1</th>
1733 bpr 25
<th>$wims_name_title</th>
8484 bpr 26
<th>$wims_name_action</th>
6146 bpr 27
</tr>
23 reyssat 28
!for i=1 to $exologcnt
14156 bpr 29
  !set l=!line $i of $exolog2
30
  !set l_=!line $i of $exologs
31
  !distribute item $l into d_,s_,n_
32
  !set n_=!translate . to , in $n_
33
  !distribute item $n_ into S_,E_
34
  !set s_=!getdef w_module_score in wimshome/log/classes/$wims_class/exolog/$checkuser/$l_
35
  !default s_=-
36
  !set p_=!recordcnt wimshome/log/classes/$wims_class/exolog/$checkuser/$l_
37
  !set V_=!record $E_ of wimshome/log/classes/$wims_class/sheets/.sheet$S_
38
  !distribute lines $V_ into a,a,a,a,T_,D_
39
  !default T_=!getdef w_title in wimshome/log/classes/$wims_class/exolog/$checkuser/$l_
23 reyssat 40
  !if $wims_user=supervisor
14156 bpr 41
    !set S__=!getdef w_module in wimshome/log/classes/$wims_class/exolog/$checkuser/$l_
42
    !set E_=!getdef w_exo in wimshome/log/classes/$wims_class/exolog/$checkuser/$l_
43
    !set M_=!getdef w_email in wimshome/log/classes/$wims_class/exolog/$checkuser/$l_
44
    !if xiao isin $M_
45
      !set M_=$DEBUG_MODULE
46
    !else
47
      !set CC_=$DEBUG_MODULE
48
    !endif
23 reyssat 49
  !endif
14156 bpr 50
  !default T_=$S_
51
  !if $T_!=$empty
52
    $table_tr<td>
53
    !href target=wims_check module=$module&job=check&checkuser=$checkuser&logcheck=$l_&checkstep=1 $d_
54
    </td>
55
    <td>$S_</td><td>$E_</td>
56
    <td>$p_</td>
57
    <td>$s_</td>
58
    <td>$T_ <span class="small">$D_
59
    !if $wims_user=supervisor
60
      !getfile exolog/$l_ $name_source
8484 bpr 61
    !endif
14156 bpr 62
    </span>
63
    </td><td>
64
    !if $wims_user=supervisor
65
      !!set source=!record 0 to -1 of $source
66
      !!mailto $DEBUG_MODULE\
15488 obado 67
      !!\
14156 bpr 68
      !![qualite] $S_\
69
      !! :$source
16275 guerimand 70
!! --- direct use of sendbug module
71
      !set wims_ref_class=wims_button
72
      !href module=adm/sendbug&+job=sendbug&+checkuser=$checkuser&+logcheck=$l_ $name_sendmail
73
!! --- old technic user mail manager
74
!!      !set msg=Please join the file source in the attachment
75
!!      <a class="wims_button" href="mailto:$M_?subject=[qualite] $S__ $E_&body=$msg&cc=$CC_">$name_sendmail</a>.
14156 bpr 76
    !endif
77
  !endif
78
  !if $checkuser=$wims_user
79
    !set wims_ref_class=wims_button wims_warning
80
    !href cmd=reply&job=erase&source=exolog/$checkuser/$l_ $wims_name_erase
81
  !endif
8484 bpr 82
  </td></tr>
23 reyssat 83
!next i
84
$table_end
85
 
8484 bpr 86
!if $checkuser!=supervisor
9031 guerimand 87
  !set wims_menu_items=!append line myscore,1,module=adm/class/userscore&job=getuser&getuser=$checkuser\
17352 guerimand 88
SE_mod,1,module=adm/class/motd&+listuser=_CHECK_,$checkuser&+action=Modifier&+job=groupe\
3109 bpr 89
to $wims_menu_items
8484 bpr 90
!endif