Subversion Repositories wimsdev

Rev

Rev 15608 | Rev 16257 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15608 Rev 16087
Line 4... Line 4...
4
!read themes/$wims_theme/lang/name.phtml.$lang
4
!read themes/$wims_theme/lang/name.phtml.$lang
-
 
5
!readproc themes/_widgets/freeworkmanage.phtml proc
5
!default wims_name_bgcolor=$wims_ref_bgcolor
6
!default wims_name_bgcolor=$wims_ref_bgcolor
6
!if $wims_hm$wims_home_items$wims_link_close!=$empty
7
!if $wims_hm$wims_home_items$wims_link_close!=$empty
7
  !goto defend
8
  !goto defend
8
!endif
9
!endif
9
 
10
 
Line 70... Line 71...
70
 
71
 
71
!if _check isin $wims_session
72
!if _check isin $wims_session
72
  !! it is the case for examlog or exolog
73
  !! it is the case for examlog or exolog
73
  !set ckstep=$special_parm
74
  !set ckstep=$special_parm
74
  !distribute item $wims_check into ckmodule,ckuser,cksession,ckexo,cksteps,score
75
  !distribute item $wims_check into ckmodule,ckuser,cksession,ckexo,cksteps,score
-
 
76
  !if $ckmodule=adm/class/freework
-
 
77
    !set tmp=!replace internal . by , in $ckexo
-
 
78
    !set qstr=module=$ckmodule&+cmd=new&+job=exocheck&+checkuser=$ckuser&+checksession=$cksession&+freework=$(tmp[1])$&+logcheck=$(tmp[2])
-
 
79
  !else
75
  !set qstr=module=$ckmodule&+cmd=new&+job=examcheck&+checkuser=$ckuser&+checksession=$cksession&+checkexo=$ckexo
80
    !set qstr=module=$ckmodule&+cmd=new&+job=examcheck&+checkuser=$ckuser&+checksession=$cksession&+checkexo=$ckexo
-
 
81
  !endif
76
  !set 2_=$wims_page_name :  
82
  !set 2_=$wims_page_name :  
77
  !ifval $ckstep>1
83
  !ifval $ckstep>1
78
    !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=1">1</a>&nbsp;
84
    !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=1">1</a>&nbsp;
79
    !if $ckstep=2
85
    !if $ckstep=2
80
      !set 2_=$(2_)2&nbsp;
86
      !set 2_=$(2_)2&nbsp;
81
    !else
87
    !else
82
      !if $ckstep=3
88
      !if $ckstep=3
83
        !set 2_=$(2_)<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=2">2</a>&nbsp;3&nbsp;
89
        !set 2_=$(2_)<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=2">2</a>&nbsp;3&nbsp;
84
      !else
90
      !else
85
        !set 2_=$(2_)&nbsp;...&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep-1]">$[$ckstep-1]</a>&nbsp;$ckstep&nbsp;
91
        !set 2_=$(2_)&nbsp;...&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep-1]">$[$ckstep-1]</a>&nbsp;$ckstep&nbsp;
86
      !endif
92
      !endif
87
    !endif
93
    !endif
88
  !else
94
  !else
89
    !set 2_=$2_ 1 &nbsp;
95
    !set 2_=$2_ 1 &nbsp;
90
  !endif
96
  !endif
91
  !if $ckstep<$cksteps
97
  !if $ckstep<$cksteps
92
    !ifval $ckstep<$cksteps-2
98
    !ifval $ckstep<$cksteps-2
93
      !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep+1]">$[$ckstep+1]</a>&nbsp;...&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$cksteps">$cksteps</a>
99
      !set 2_=$2_<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$[$ckstep+1]">$[$ckstep+1]</a>&nbsp;...&nbsp;<a href="$wims_ref_name?session=$session&+$qstr&+checkstep=$cksteps">$cksteps</a>
Line 133... Line 139...
133
  !set tmp_=$m_wims_sequence
139
  !set tmp_=$m_wims_sequence
134
  !default tmp_=$wims_sequence
140
  !default tmp_=$wims_sequence
135
  !if $wims_user=supervisor
141
  !if $wims_user=supervisor
136
    !set wims_ariane=!append line sequence,1,module=adm/class/sequence&seq=$tmp_\
142
    !set wims_ariane=!append line sequence,1,module=adm/class/sequence&seq=$tmp_\
137
to $wims_ariane
143
to $wims_ariane
138
  !else
144
  !else
139
    !set wims_ariane=!append line sequence,1,module=home&seq=$tmp_#sh$wims_sheet to $wims_ariane
145
    !set wims_ariane=!append line sequence,1,module=home&seq=$tmp_#sh$wims_sheet to $wims_ariane
140
  !endif
146
  !endif
141
  !reset tmp_
147
  !reset tmp_
142
  !set wims_ariane_self=no
148
  !set wims_ariane_self=no
143
!else
149
!else
144
  !if adm/doc isin $module and $wims_user!=supervisor
150
  !if adm/doc isin $module and $wims_user!=supervisor
145
    !set wims_ariane=!append line doc,8 to $wims_ariane
151
    !set wims_ariane=!append line doc,8 to $wims_ariane
146
    !set wims_ariane_self=no
152
    !set wims_ariane_self=no
147
  !endif
153
  !endif
148
  !if adm/class/freework isin $module
154
  !if adm/class/freework isin $module
149
    !set wims_ariane=!append line Freework $freework,1,module=adm/class/freework&freework=$freework to $wims_ariane
155
    !set wims_ariane=!append line Freework $freework,1,module=adm/class/freework&freework=$freework to $wims_ariane
150
    !set wims_ariane_self=no
156
    !set wims_ariane_self=no
151
  !endif
157
  !endif
152
!endif
158
!endif
153
!if $wims_sheet>0 or P isin $wims_sheet
159
!if $wims_sheet>0 or P isin $wims_sheet
154
   !set wims_ariane=!append line sheet,1,module=adm/sheet&sh=$wims_sheet#ex$wims_exo to $wims_ariane
160
   !set wims_ariane=!append line sheet,1,module=adm/sheet&sh=$wims_sheet#ex$wims_exo to $wims_ariane
155
   !set wims_ariane_self=no
161
   !set wims_ariane_self=no
Line 165... Line 171...
165
!endif
171
!endif
166
!if $cmd=help or $cmd=hint
172
!if $cmd=help or $cmd=hint
167
  !set 1_=!append line resume,1,cmd=resume to $1_
173
  !set 1_=!append line resume,1,cmd=resume to $1_
168
!endif
174
!endif
169
!if $module_has_intro=yes and $cmd notwordof intro help and \
175
!if $module_has_intro=yes and $cmd notwordof intro help and \
170
    $wims_sheet=$empty and exam notin $wims_session and mfeed notin $wims_session
176
    $wims_sheet=$empty and exam notin $wims_session and mfeed notin $wims_session and $wims_freework=$empty
171
  !if $wims_theme!=default
177
  !if $wims_theme!=default
172
    !set wims_ariane=!append line intro,1,module=$module&cmd=intro&special_parm=$special_parm&special_parm2=$special_parm2&special_parm3=$special_parm3&special_parm4=$special_parm4 to $wims_ariane
178
    !set wims_ariane=!append line intro,1,module=$module&cmd=intro&special_parm=$special_parm&special_parm2=$special_parm2&special_parm3=$special_parm3&special_parm4=$special_parm4 to $wims_ariane
173
    !set wims_ariane_self=no
179
    !set wims_ariane_self=no
174
  !else
180
  !else
175
    !set 1_=!append line intro,1,module=$module&cmd=intro&special_parm=$special_parm&special_parm2=$special_parm2&special_parm3=$special_parm3&special_parm4=$special_parm4 to $1_
181
    !set 1_=!append line intro,1,module=$module&cmd=intro&special_parm=$special_parm&special_parm2=$special_parm2&special_parm3=$special_parm3&special_parm4=$special_parm4 to $1_
176
  !endif
182
  !endif
-
 
183
!endif
-
 
184
!if $wims_freework!=$empty
-
 
185
    !set wims_ariane=!append line freework,1,module=adm/class/freework&cmd=new&freework=$(wims_freework[1]) to $wims_ariane
-
 
186
    !set wims_ariane_self=no
177
!endif
187
!endif
178
!! ------------ add link for sendbug (TEST TO BE IMPROVED ?)
188
!! ------------ add link for sendbug (TEST TO BE IMPROVED ?)
179
!! TODO : change name of the window to open should be deleted when
189
!! TODO : change name of the window to open should be deleted when
180
!if $wims_class!=$empty and $wims_user=supervisor and adm/ notin $module and classes/ notin $module and devel/ notin $module and $module!=home and $cmd!=intro
190
!if $wims_class!=$empty and $wims_user=supervisor and adm/ notin $module and classes/ notin $module and devel/ notin $module and $module!=home and $cmd!=intro
181
  !let number_=!randint 1,1000
191
  !let number_=!randint 1,1000
Line 211... Line 221...
211
!set wims_ariane_cnt=!linecnt $wims_ariane
221
!set wims_ariane_cnt=!linecnt $wims_ariane
212
!read themes.phtml header
222
!read themes.phtml header
213
<!--BEGINSUPVIEW-->
223
<!--BEGINSUPVIEW-->
214
<div class="wimsbody">
224
<div class="wimsbody">
215
<!-- END of html/headmenu_user -->
225
<!-- END of html/headmenu_user -->
-
 
226
!read themes/_widgets/freeworkmanage.phtml head