Subversion Repositories wimsdev

Rev

Rev 14890 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 14890 Rev 15294
Line 4... Line 4...
4
!if $jobclass=$empty
4
!if $jobclass=$empty
5
 job2=first
5
  job2=first
6
!endif
6
!endif
7
 
7
 
8
classcnt=!recordcnt wimshome/log/classes/.index
8
classcnt=!recordcnt wimshome/log/classes/.index
9
 
9
 
10
!if $job2=first
10
!if $job2=first
Line 21... Line 21...
21
        !if $c isitemof $list_cl_id
21
        !if $c isitemof $list_cl_id
22
          t=$[floor(($t+30)/60)]
22
          t=$[floor(($t+30)/60)]
23
          activ_$c=$t
23
          activ_$c=$t
24
        !endif
24
        !endif
25
      !next i
25
      !next i
26
    !endif
26
    !endif
27
  !endif
27
  !endif
28
!endif
28
!endif
29
 
29
 
30
!if $job2!=first
30
!if $job2!=first
31
 !defread wimshome/log/classes/$jobclass/.def
31
  !defread wimshome/log/classes/$jobclass/.def
32
!endif
32
!endif
33
 
33
 
34
!if $job2=erase2
34
!if $job2=erase2
35
 year=!char 1 to 4 of $wims_now
35
  year=!char 1 to 4 of $wims_now
36
 !sh cd $wims_home/log/classes\
36
  !sh cd $wims_home/log/classes\
37
  if [ -d $wims_home/log/ccaccount/$jobclass ]; then\
37
    if [ -d $wims_home/log/ccaccount/$jobclass ]; then\
38
   tar -cf $jobclass/account.tar -C $wims_home/log ccaccount/$jobclass 2>/dev/null\
38
     tar -cf $jobclass/account.tar -C $wims_home/log ccaccount/$jobclass 2>/dev/null\
39
  fi\
39
    fi\
40
  mkdir -p $wims_home/backup/oldclasses/$year\
40
    mkdir -p $wims_home/backup/oldclasses/$year\
41
  tar -czf $wims_home/backup/oldclasses/$year/$jobclass.tgz $jobclass\
41
    tar -czf $wims_home/backup/oldclasses/$year/$jobclass.tgz $jobclass\
42
  rm -Rf $jobclass $wims_home/log/ccaccount/$jobclass\
42
    rm -Rf $jobclass $wims_home/log/ccaccount/$jobclass\
43
  ./.build-index $jobclass
43
    ./.build-index $jobclass
44
  classcnt=!recordcnt wimshome/log/classes/.index
44
    classcnt=!recordcnt wimshome/log/classes/.index
45
  job2=first
45
  job2=first
46
!endif
46
!endif
47
 
47
 
48
!if $job2=modify
48
!if $job2=modify
49
 !if $abandon!=$empty
49
  !if $abandon!=$empty
50
  job2=first
50
    job2=first
51
  !exit
51
    !exit
52
 !endif
52
  !endif
53
 !if $save!=$empty
53
  !if $save!=$empty
54
  !bound clexp between integer 19000101 and 24000101
54
    !bound clexp between integer 19000101 and 24000101
55
  clpass2=!word 1 of $clpass2
55
    clpass2=!word 1 of $clpass2
56
  clpass2crypt=!passcrypt $clpass2
56
    clpass2crypt=!passcrypt $clpass2
57
  !setdef !set class_password=$clpass2crypt\
57
    !setdef !set class_password=$clpass2crypt\
58
!set class_expiration=$clexp\
58
!set class_expiration=$clexp\
59
!set class_secure=$clsecure in wimshome/log/classes/$jobclass/.def
59
!set class_secure=$clsecure in wimshome/log/classes/$jobclass/.def
60
  clpass=!trim $clpass
60
    clpass=!trim $clpass
61
  !if $clpass!=$empty
61
    !if $clpass!=$empty
62
   clpasscrypt=!passcrypt $clpass
62
      clpasscrypt=!passcrypt $clpass
63
   !setdef !set user_password=$clpasscrypt in wimshome/log/classes/$jobclass/supervisor
63
      !setdef !set user_password=$clpasscrypt in wimshome/log/classes/$jobclass/supervisor
-
 
64
    !endif
-
 
65
    class_password=$clpass2
-
 
66
    class_expiration=$clexp
-
 
67
    class_secure=$clsecure
-
 
68
    !reset clexp clsecure clpass clpasscrypt clpass2 clpass2crypt
64
  !endif
69
  !endif
65
  class_password=$clpass2
-
 
66
  class_expiration=$clexp
-
 
67
  class_secure=$clsecure
-
 
68
  !reset clexp clsecure clpass clpasscrypt clpass2 clpass2crypt
-
 
69
 !endif
-
 
70
!endif
70
!endif
71
 
71