Subversion Repositories wimsdev

Rev

Rev 7217 | Rev 9810 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

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