Subversion Repositories wimsdev

Rev

Rev 5619 | Rev 7516 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2544 bpr 1
!!@#language independant
2
!if robot isin $session
3
  !exit
4
!endif
2667 bpr 5
!if $(module_title_$modu_lang)!=
6
  !set module_title=$(module_title_$modu_lang)
7
!endif
2544 bpr 8
!header
9
!if $compute=yes
10
  !if $error!=$empty
11
    !if $mtype!=$empty
7217 bpr 12
    <div class="wims_alertmsg">
2544 bpr 13
     !read msg.phtml
7217 bpr 14
    </div>
2544 bpr 15
    !endif
5619 bpr 16
    <div class="wims_content">
2544 bpr 17
    !read menu.phtml
5601 obado 18
    </div>
2544 bpr 19
    !goto end
20
  !else
21
    !if $transfert issametext or $transfert=yes
22
      !set wims_form_method=file
23
      !read transfert.phtml
24
    !else
5619 bpr 25
        <div class="wims_content">
2544 bpr 26
      !read menu.phtml
5601 obado 27
      </div>
2544 bpr 28
    !endif
29
  !endif
30
!else
5619 bpr 31
    <div class="wims_content">
2544 bpr 32
  !read menu.phtml
5601 obado 33
  </div>
2544 bpr 34
!endif compute=yes?
35
 
36
:end
37
 
38
!if $type_exo!=$empty
39
  !set wims_menu_items=!append line modtool,1,module=adm/modtool\
2667 bpr 40
  back2,1,module=$module\
2544 bpr 41
  ,0,\
42
   to $wims_menu_items
43
!else
44
 !set wims_menu_items=!append line modtool,1,module=adm/modtool\
45
  to $wims_menu_items
46
!endif
47
 
48
 
49
!if $wims_developer!= and $type_exo=
2667 bpr 50
!set wims_menu_items=!append line  ,0,\
51
   to $wims_menu_items
2544 bpr 52
!set u = !linecnt $name      
53
!for i = 1 to $u
54
   !set cnt=!itemcnt $(name[$i;])
55
   !for a =1 to $cnt
2667 bpr 56
     !set wims_menu_items=!append line quick_$(name[$i;$a]),1,cmd=reply&type_exo=$(name[$i;$a])\
2544 bpr 57
    to $wims_menu_items
58
   !next a
59
!next
60
!endif
61
!tail
62
 
63
!reset wims_exec_error wims_deposit