Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!! -------------- specific process for job=configfw and type=4
nbexo=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freework$freework
!! ---- delete exercise
!if $job2=delexo and $activetest=0
!bound exonum between 1 and $nbexo default $empty
!if $exonum=$empty
error=badexonumber
!reset job2
!exit
!endif
data=!record $exonum of wimshome/log/classes/$wims_class/freeworks/.freework$freework
data=!line 1 of $data
!if $data=solution
error=badexonumber
!reset job2
!exit
!endif
!read adm/recorddel $exonum wimshome/log/classes/$wims_class/freeworks/.freework$freework
success=ok-delexo
nbexo=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freework$freework
wims_module_log=class $class: del No$exonum in freework $freework
!reset job2
!endif