Subversion Repositories wimsdev

!! expirefreework

!if $type!=1
  error=notnow
  job=configfw
  !changeto $job.proc
!endif

!! -------- desactivate freework of type=1
!! nocondition

!! change statut
activetest=0
update_content=0\
$class_expiration\
$title\
$desc\
$comment\
$type\
$deadline.$timedeadline\
$soldate.$timesoldate\
$sizelimitfile\
$scoring\
$seealltime

update_field=$freework
update_nbline=11
!read adm/uprecord wimshome/log/classes/$wims_class/freeworks/.freeworks

success=gooddeactivate
!if $back=1
  !restart module=home
!else
  job=configfw
  !reset back
  !changeto $job.proc
!endif