Subversion Repositories wimsdev

Rev

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

Rev 5194 Rev 12617
Line 2... Line 2...
2
parent=gateway
2
parent=gateway
3
!if $cancel!=$empty
3
!if $cancel!=$empty
4
 job=first
4
  job=first
5
 !changeto jobs/$job.proc
5
  !changeto jobs/$job.proc
6
!endif
6
!endif
7
 
7
 
8
!if $confirm=$empty
8
!if $confirm=$empty
9
 pass=!defof class_password in $classdir1/.def
9
  pass=!defof class_password in $classdir1/.def
10
 passs=!defof user_password in $classdir1/supervisor
10
  passs=!defof user_password in $classdir1/supervisor
11
 !read adm/levelname.phtml
11
  !read adm/levelname.phtml
12
 !exit
12
  !exit
13
!endif
13
!endif
14
 
14
 
15
title=!trim $title
15
title=!trim $title
16
title=!replace internal , by , in $title
16
title=!replace internal , by , in $title
17
!if $title=$empty
17
!if $title=$empty
18
 error=empty_data
18
  error=empty_data
19
 !exit
19
  !exit
20
!endif
20
!endif
21
 
21
 
22
!read adm/gateway/addlevel $sup,$title
22
!read adm/gateway/addlevel $sup,$title
23
 
23
 
24
!if $error!=$empty
24
!if $error!=$empty
25
 !exit
25
  !exit
26
!endif
26
!endif
27
 
27
 
28
!read adm/gateway/mkindex
28
!read adm/gateway/mkindex
29
!reset title,sup,passs,alevel
29
!reset title,sup,passs,alevel
30
job=first
30
job=first
31
!changeto jobs/$job.proc
31
!changeto jobs/$job.proc
32
 
-