Subversion Repositories wimsdev

Rev

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

Rev 14297 Rev 14537
Line 6... Line 6...
6 
  job=configfw
 6 
  job=configfw
7 
  !changeto $job.proc
 7 
  !changeto $job.proc
8 
!endif
 8 
!endif
9 
 
 9 
 
10 
!!testing if all work are corrected (and deposit)
 10 
!!testing if all work are corrected (and deposit)
11 
!if $type>=2
 11 
!if $type>=2 and $notcorrected>0
12 
  n1=!filelist $wims_home/log/classes/$wims_class/freeworksdata/$freework/work
 12 
  error=notallcorrected
13 
  n1=!linecnt $n1
 13 
  job=configfw
14 
  n2=!filelist $wims_home/log/classes/$wims_class/freeworksdata/$freework/co
 - 
 
15 
  n2=!linecnt $n2
 14 
  !changeto $job.proc
16 
  !if $n1!=$n2
 15 
!endif
- 
 
 16 
 
- 
 
 17 
!! testing if solutiondate pass (user can view solution)
- 
 
 18 
!ifval $type>=2 and $displaysolution!=1
17 
    error=notallcorrected
 19 
  error=expire_nosoldisplay
18 
    job=configfw
 20 
  job=configfw
19 
    !changeto $job.proc
 21 
  !changeto $job.proc
20 
  !endif
 - 
 
21 
!endif
 22 
!endif
22
- 
 
23 
 
 23 
 
24 
!! change statut
 24 
!! change statut
25 
activetest=2
 25 
activetest=2
26 
update_content=2\
 26 
update_content=2\
27 
$class_expiration\
 27 
$class_expiration\
Line 29... Line 29...
29 
$desc\
 29 
$desc\
30 
$comment\
 30 
$comment\
31 
$type\
 31 
$type\
32 
$deadline.$timedeadline\
 32 
$deadline.$timedeadline\
33 
$soldate.$timesoldate\
 33 
$soldate.$timesoldate\
34 
$sizelimitfile
 34 
$sizelimitfile\
- 
 
 35 
$seealltime
- 
 
 36 
 
35 
update_field=$freework
 37 
update_field=$freework
36 
update_nbline=10
 38 
update_nbline=11
37 
!read adm/uprecord wimshome/log/classes/$wims_class/freeworks/.freeworks
 39 
!read adm/uprecord wimshome/log/classes/$wims_class/freeworks/.freeworks
38 
 
 40 
 
39 
success=goodstatut
 41 
success=goodstatut
40 
!if $back=1
 42 
!if $back=1
41 
  !restart module=home
 43 
  !restart module=home