Subversion Repositories wimsdev

Rev

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

Rev 5295 Rev 6868
Line 130... Line 130...
130
130
131 
 !next u
 131 
 !next u
132 
!next N
 132 
!next N
133 
 
 133 
 
134 
basedir=$wims_home/log/classes
 134 
basedir=$wims_home/log/classes
- 
 
 135 
basedir2=wimshome/log/classes
135 
!for c in $clist
 136 
!for c in $clist
136 
 !sh sort -f $basedir/$c/.userlist.raw >$basedir/$c/.userlist\
 137 
 !sh sort -f $basedir/$c/.userlist.raw >$basedir/$c/.userlist 2>/dev/null\
137 
  rm -f $basedir/$c/.userlist.raw 2>/dev/null
 138 
  rm -f $basedir/$c/.userlist.raw 2>/dev/null\
- 
 
 139 
  rm -f $basedir/$c/.usernextlist.raw 2>/dev/null\
- 
 
 140 
  rm -f $basedir/$c/.userprevlist.raw 2>/dev/null
138 
 
 141 
 
139 
 !sh sort -f $basedir/$c/.userlist_external.raw >$basedir/$c/.userlist_external\
 142 
 !sh sort -f $basedir/$c/.userlist_external.raw >$basedir/$c/.userlist_external 2>/dev/null\
140 
  rm -f $basedir/$c/.userlist_external.raw 2>/dev/null
 143 
  rm -f $basedir/$c/.userlist_external.raw 2>/dev/null
141 
 
 144 
 
- 
 
 145 
 !set nbuser_=!recordcnt $basedir2/$c/.userlist
- 
 
 146 
 !writefile $basedir2/$c/.usernextlist.raw
- 
 
 147 
 !writefile $basedir2/$c/.userprevlist.raw
- 
 
 148 
 !set firstuser=!record 1 of $basedir2/$c/.userlist
- 
 
 149 
 !set firstuser1=$firstuser
- 
 
 150 
 !for l = 2 to $nbuser_
- 
 
 151 
    !set nextuser=!record $l of $basedir2/$c/.userlist
- 
 
 152 
    !appendfile $basedir2/$c/.usernextlist.raw $(firstuser[3]):$(nextuser[3])
- 
 
 153 
    !appendfile $basedir2/$c/.userprevlist.raw $(nextuser[3]):$(firstuser[3])
- 
 
 154 
    !set firstuser=$nextuser
- 
 
 155 
 !next
- 
 
 156 
 !appendfile $basedir2/$c/.usernextlist.raw $(firstuser[3]):$(firstuser1[3])
- 
 
 157 
 !appendfile $basedir2/$c/.userprevlist.raw $(firstuser1[3]):$(firstuser[3])
- 
 
 158 
  !sh mv $basedir/$c/.usernextlist.raw $basedir/$c/.usernextlist\
- 
 
 159 
   mv $basedir/$c/.userprevlist.raw $basedir/$c/.userprevlist
142 
!next c
 160 
!next c
143 
 
 161 
 
144 
!read adm/class/stat
 162 
!read adm/class/stat