Subversion Repositories wimsdev

Rev

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

Rev 14305 Rev 14572
Line 12... Line 12...
12 
  !sh rm -f $wims_home/log/classes/$wims_class/freeworks/.freework$freework >/dev/null\
 12 
  !sh rm -f $wims_home/log/classes/$wims_class/freeworks/.freework$freework >/dev/null\
13 
    rm -f $wims_home/log/classes/$wims_class/freeworks/.freeworks >/dev/null\
 13 
    rm -f $wims_home/log/classes/$wims_class/freeworks/.freeworks >/dev/null\
14 
    touch $wims_home/log/classes/$wims_class/freeworks/.freeworks
 14 
    touch $wims_home/log/classes/$wims_class/freeworks/.freeworks
15 
!else
 15 
!else
16 
  !sh cd $wims_home/log/classes/$wims_class/freeworks/;\
 16 
  !sh cd $wims_home/log/classes/$wims_class/freeworks/;\
17 
      rm -f .freework$freework >/dev/null\
 17 
    rm -f .freework$freework >/dev/null\
18 
      rm -rf $freework >/dev/null\
 18 
    rm -rf $freework >/dev/null\
19 
      rm -rf $wims_home/log/classes/$wims_class/freeworksdata/$freework >/dev/null\
 19 
    rm -rf $wims_home/log/classes/$wims_class/freeworksdata/$freework >/dev/null\
20 
      n=$[$freework+1];\
 20 
    n=$[$freework+1];\
21 
      while [ $$n -le $nbfreework ]; do\
 21 
    while [ $$n -le $nbfreework ]; do\
22 
        mv .freework$$n .freework$$(($$n-1)) >/dev/null\
 22 
      mv .freework$$n .freework$$(($$n-1)) >/dev/null\
23 
        mv $wims_home/log/classes/$wims_class/freeworksdata/$$n $wims_home/log/classes/$wims_class/freeworksdata/$$(($$n-1)) >/dev/null\
 23 
      mv $wims_home/log/classes/$wims_class/freeworksdata/$$n $wims_home/log/classes/$wims_class/freeworksdata/$$(($$n-1)) >/dev/null\
24 
        mv $wims_home/log/classes/$wims_class/freeworks/$$n $wims_home/log/classes/$wims_class/freeworks/$$(($$n-1)) >/dev/null\
 24 
      mv $wims_home/log/classes/$wims_class/freeworks/$$n $wims_home/log/classes/$wims_class/freeworks/$$(($$n-1)) >/dev/null\
25 
        n=$$(($$n+1))\
 25 
      n=$$(($$n+1))\
26 
      done
 26 
    done
27 
  data=$empty
 27 
  data=$empty
28 
  !for k=1 to $nbfreework
 28 
  !for k=1 to $nbfreework
29 
    rec=!record $k of wimshome/log/classes/$wims_class/freeworks/.freeworks
 29 
    rec=!record $k of wimshome/log/classes/$wims_class/freeworks/.freeworks
30 
    !if $k!=$freework
 30 
    !if $k!=$freework
31 
      data=$data\
 31 
      data=$data\
Line 35... Line 35...
35 
  !filewrite wimshome/log/classes/$wims_class/freeworks/.freeworks $data
 35 
  !filewrite wimshome/log/classes/$wims_class/freeworks/.freeworks $data
36 
!endif
 36 
!endif
37 
nbfreework=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freeworks
 37 
nbfreework=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freeworks
38 
success=gooderase
 38 
success=gooderase
39 
!restart module=home
 39 
!restart module=home
40 
 
 -