Subversion Repositories wimsdev

Rev

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

Rev 7217 Rev 7516
Line 3... Line 3...
3
  !exit
3
  !exit
4
!endif
4
!endif
5
!if $(module_title_$modu_lang)!=
5
!if $(module_title_$modu_lang)!=
6
  !set module_title=$(module_title_$modu_lang)
6
  !set module_title=$(module_title_$modu_lang)
7
!endif
7
!endif
-
 
8
 
8
!header
9
!header
9
!if $compute=yes
10
!if $compute=yes
10
  !if $error!=$empty
11
  !if $error!=$empty
11
    !if $mtype!=$empty
12
    !if $mtype!=$empty
12
    <div class="wims_alertmsg">
13
    <div class="wims_alertmsg">
13
     !read msg.phtml
14
     !read msg.phtml
14
    </div>
15
    </div>
15
    !endif
16
    !endif
16
    <div class="wims_content">
17
    <div class="wims_content">
17
    !read menu.phtml
18
    !read menu.phtml
18
    </div>
19
    </div>
19
    !goto end
20
    !goto end
Line 24... Line 25...
24
    !else
25
    !else
25
        <div class="wims_content">
26
        <div class="wims_content">
26
      !read menu.phtml
27
      !read menu.phtml
27
      </div>
28
      </div>
28
    !endif
29
    !endif
29
  !endif
30
  !endif
30
!else
31
!else
31
    <div class="wims_content">
32
    <div class="wims_content">
32
  !read menu.phtml
33
  !read menu.phtml
33
  </div>
34
  </div>
34
!endif compute=yes?
35
!endif compute=yes?
35
 
36
 
36
:end
37
:end
37
 
38
 
38
!if $type_exo!=$empty
39
!if $type_exo!=$empty
39
  !set wims_menu_items=!append line modtool,1,module=adm/modtool\
40
  !set wims_menu_items=!append line modtool,1,module=adm/modtool\
40
  back2,1,module=$module\
41
  back2,1,module=$module\
Line 47... Line 48...
47
 
48
 
48
 
49
 
49
!if $wims_developer!= and $type_exo=
50
!if $wims_developer!= and $type_exo=
50
!set wims_menu_items=!append line  ,0,\
51
!set wims_menu_items=!append line  ,0,\
51
   to $wims_menu_items
52
   to $wims_menu_items
52
!set u = !linecnt $name      
53
!set u = !linecnt $name
53
!for i = 1 to $u
54
!for i = 1 to $u
54
   !set cnt=!itemcnt $(name[$i;])
55
   !set cnt=!itemcnt $(name[$i;])
55
   !for a =1 to $cnt
56
   !for a =1 to $cnt
56
     !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
57
     !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
57
    to $wims_menu_items
58
    to $wims_menu_items