Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
5648 obado 1
<!-- adm/sheet/main.phtml START -->
2247 bpr 2
 
23 reyssat 3
!if $job=print
12476 bpr 4
  !changeto print.phtml
23 reyssat 5
!endif
6
 
7
!if $public!=P
12476 bpr 8
  !changeto class.phtml
23 reyssat 9
!endif
2247 bpr 10
!if $(module_title_$modu_lang)!=
12476 bpr 11
  !set module_title=$(module_title_$modu_lang)
2247 bpr 12
!endif
23 reyssat 13
 
14
!header
15
 
16
!if $error!=$empty
12476 bpr 17
  <div class="wims_msg alert">
12654 obado 18
    !read lang/msg.phtml.$modu_lang
12476 bpr 19
  </div>
20
  !tail
21
  !exit
23 reyssat 22
!endif
23
 
24
!if $wims_user=supervisor and $job=raw
12476 bpr 25
  <p id="textsource">$name_textsource</p>
26
  <hr />
27
  <pre>
28
  !sh awk 'BEGIN {a=0};\
29
        /^:/ {a=1};\
30
        a==1 {print}' bases/sheet/$sh.def
31
  </pre>
32
  <hr />
1766 bpr 33
 
12476 bpr 34
  !set wims_menu_items=!append line participantview,1,cmd=resume&job=read \
35
  to $wims_menu_items
1766 bpr 36
 
12476 bpr 37
  !tail
38
  !exit
23 reyssat 39
!endif
40
 
1924 bpr 41
!set intro=!record 0 of $data
42
!set dur=!words2items $(intro[3;])
43
!distribute items $dur into duration,year
5195 guerimand 44
!if ? notin $duration
12476 bpr 45
  !let duration=- $name_duration $duration mn
5195 guerimand 46
!else
12476 bpr 47
  !let duration=$empty
5195 guerimand 48
!endif
1924 bpr 49
!read adm/title.phtml 3\
50
$sheet_title\
12654 obado 51
$name_level : $(name_wims_level_$(intro[5;])) $duration - $year\
1924 bpr 52
 
4298 obado 53
<div class="wims_sheet_desc">$sheet_desc</div>
12654 obado 54
<div class="wims_credits">$(intro[8;])</div>
23 reyssat 55
 
56
!if $n=0
12476 bpr 57
  $name_sheetempty
23 reyssat 58
!else
12476 bpr 59
  <div class="wims_sheet">
12654 obado 60
    <div class="wims_title_seq">$wims_name_Exercices</div>
61
    <ol class="wims_sheet_list">
62
    !for i=1 to $n
63
      !set ex=!record $i of $data
64
      !distribute lines $ex into di,pa,require,we,ti,de
65
      !set got=!word $i of $scores
66
      !set mean=!word $i of $means
67
      !if .___ isin $(ti)___
68
        !set ti=!replace internal .___ by in $(ti)___
69
      !endif
70
      <li class="wims_exo_item">
71
        !href module=$di&cmd=new&worksheet=$public$shn&$pa $ti
72
        !if $de notsametext $empty
73
, $de
74
        !else
12476 bpr 75
.
12654 obado 76
        !endif
77
      </li>
78
    !next i
79
    </ol>
12476 bpr 80
  </div>
81
  !if $wims_user=supervisor
82
    !set wims_menu_items=!append line import,1,cmd=reply&job=import \
83
    sheetsource,1,cmd=reply&job=raw\
84
    to $wims_menu_items
7101 bpr 85
  !endif
23 reyssat 86
!endif
1544 bpr 87
 
1336 bpr 88
!set wims_menu_items=!append line printable,1,cmd=reply&job=print\
89
to $wims_menu_items
5648 obado 90
<!-- adm/sheet/main.phtml END -->
91
 
23 reyssat 92
!tail