Subversion Repositories wimsdev

Rev

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

Rev 16044 Rev 16111
Line 2... Line 2...
2
 
2
 
3
!set typen=!defof class_typename in wimshome/log/classes/$wims_class/.def
3
!set typen=!defof class_typename in wimshome/log/classes/$wims_class/.def
4
!if $usercnt=0
4
!if $usercnt=0
5
  !exit
5
  !exit
6
!endif
6
!endif
7
fileuserlist=wimshome/s2/$wims_session/userlist-usermanage
7
fileuserlist=wimshome/sessions/$wims_session/userlist-usermanage
8
Fileuserlist=$wims_home/s2/$wims_session/userlist-usermanage
8
Fileuserlist=$wims_home/sessions/$wims_session/userlist-usermanage
9
!readproc adm/class/mkcomment name
9
!readproc adm/class/mkcomment name
10
namecomment=$scriptout
10
namecomment=$scriptout
11
 
11
 
12
!if $cmd!=resume
12
!if $cmd!=resume
13
  !sh rm -f $Fileuserlist
13
  !sh rm -f $Fileuserlist
Line 26... Line 26...
26
      ldata=$ldata,$(user_$(k))
26
      ldata=$ldata,$(user_$(k))
27
    !next k
27
    !next k
28
    lt=!defof user_lastconnect in wimshome/log/classes/$wims_class/.users/$uu
28
    lt=!defof user_lastconnect in wimshome/log/classes/$wims_class/.users/$uu
29
    !if $lt!=$empty
29
    !if $lt!=$empty
30
      !read date.phtml $lt,noprint
30
      !read date.phtml $lt,noprint
31
      ldata=$ldata,$slib_out
31
      ldata=$ldata,$slib_out,$lt
32
    !else
32
    !else
33
      ldata=$ldata,
33
      ldata=$ldata,,
34
    !endif
34
    !endif
35
    !if $nbtechvar>0
35
    !if $nbtechvar>0
36
      val=!column 2 of $user_vars
36
      val=!column 2 of $user_vars
37
      ldata=$ldata,$val
37
      ldata=$ldata,$val
38
      !! seems not to be useful : user_vars has exactly nbtechvar lines
38
      !! seems not to be useful : user_vars has exactly nbtechvar lines