Subversion Repositories wimsdev

Rev

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

Rev 2544 Rev 2667
Line 4... Line 4...
4 
!endif
 4 
!endif
5 
!!!reset wims_html_header
 5 
!if $(module_title_$modu_lang)!=
6 
!! !read js/keyboard.phtml notepad
 6 
  !set module_title=$(module_title_$modu_lang)
7 
!! $wims_html_header
 - 
 
8 
 
 7 
!endif
9 
!header
 8 
!header
10 
!if $compute=yes
 9 
!if $compute=yes
11 
  !if $error!=$empty
 10 
  !if $error!=$empty
12 
    !if $mtype!=$empty
 11 
    !if $mtype!=$empty
13 
     !read msg.phtml
 12 
     !read msg.phtml
Line 20... Line 19...
20 
      !read transfert.phtml
 19 
      !read transfert.phtml
21 
    !else
 20 
    !else
22 
      !read menu.phtml
 21 
      !read menu.phtml
23 
    !endif
 22 
    !endif
24 
  !endif
 23 
  !endif
25 
!else
 24 
!else
26 
  !read menu.phtml
 25 
  !read menu.phtml
27 
!endif compute=yes?
 26 
!endif compute=yes?
28 
 
 27 
 
29 
:end
 28 
:end
30 
 
 29 
 
31 
!if $type_exo!=$empty
 30 
!if $type_exo!=$empty
32 
  !set wims_menu_items=!append line modtool,1,module=adm/modtool\
 31 
  !set wims_menu_items=!append line modtool,1,module=adm/modtool\
33 
  intro,1,module=$module\
 32 
  back2,1,module=$module\
34 
  ,0,\
 33 
  ,0,\
35 
   to $wims_menu_items
 34 
   to $wims_menu_items
36 
!else
 35 
!else
37 
 !set wims_menu_items=!append line modtool,1,module=adm/modtool\
 36 
 !set wims_menu_items=!append line modtool,1,module=adm/modtool\
38 
  ,0,\
 - 
 
39 
  to $wims_menu_items
 37 
  to $wims_menu_items
40 
!endif
 38 
!endif
41 
 
 39 
 
42 
 
 40 
 
43 
!if $wims_developer!= and $type_exo=
 41 
!if $wims_developer!= and $type_exo=
- 
 
 42 
!set wims_menu_items=!append line  ,0,\
- 
 
 43 
   to $wims_menu_items
44 
!set u = !linecnt $name      
 44 
!set u = !linecnt $name      
45 
!for i = 1 to $u
 45 
!for i = 1 to $u
46 
   !set cnt=!itemcnt $(name[$i;])
 46 
   !set cnt=!itemcnt $(name[$i;])
47 
   !for a =1 to $cnt
 47 
   !for a =1 to $cnt
48 
     !set wims_menu_items=!append line $(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
 48 
     !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
49 
    to $wims_menu_items
 49 
    to $wims_menu_items
50 
   !next a
 50 
   !next a
51 
!next
 51 
!next
52 
!endif
 52 
!endif
53 
!tail
 53 
!tail