Subversion Repositories wimsdev

Rev

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

Rev 14907 Rev 14984
Line 28... Line 28...
28 
nb_=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freeworks
 28 
nb_=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freeworks
29 
nbuser_=!recordcnt wimshome/log/classes/$wims_class/.userlist
 29 
nbuser_=!recordcnt wimshome/log/classes/$wims_class/.userlist
30 
!for k_=1 to $nb_
 30 
!for k_=1 to $nb_
31 
  dt_=!record $k_ of wimshome/log/classes/$wims_class/freeworks/.freeworks
 31 
  dt_=!record $k_ of wimshome/log/classes/$wims_class/freeworks/.freeworks
32 
  !distribute line $dt_ into s_,bl,bl,bl,bl,t_,bl,bl,c_
 32 
  !distribute line $dt_ into s_,bl,bl,bl,bl,t_,bl,bl,c_
- 
 
 33 
  !default c_=0
33 
  !if $s_=1 and $t_>=2
 34 
  !if $s_=1 and $t_>=2
34 
    !read adm/du $wims_home/log/classes/$wims_class/freeworksdata/$k_/work
 35 
    !read adm/du $wims_home/log/classes/$wims_class/freeworksdata/$k_/work
35 
    quota_reserved=$[$quota_reserved+$nbuser_*$c_*0.25-$du]
 36 
    quota_reserved=$[$quota_reserved+$nbuser_*$c_*0.25-$du]
36 
  !endif
 37 
  !endif
37 
!next k_
 38 
!next k_