Subversion Repositories wimsdev

Rev

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

  1.  
  2. !if $job iswordof edit
  3.   !read header_js.phtml
  4.   !set wims_html_header=!append line $header_js_editor to $wims_html_header
  5. !endif
  6.  
  7. !if $job iswordof read print
  8.   !set wims_html_header=!append line $header to $wims_html_header
  9. !endif
  10. !read adm/css.phtml
  11.  
  12. !if $job=help
  13.   !header1
  14.   !changeto help.phtml
  15. !endif
  16.  
  17. !if help isin $wims_session and $doc!=$helpd
  18.   !set wims_html_onload=!append word window.close(); to $wims_html_onload
  19.   !header1
  20.   $n_helpclose
  21.   !tail
  22.   !exit
  23. !endif
  24.  
  25. !if $cmd=help and $special_parm=about
  26.   !changeto about.phtml
  27. !endif
  28.  
  29. !if $job notwordof home
  30.   !read menu.phtml
  31. !else
  32.   !if $(module_title_$modu_lang)!=
  33.     !set module_title=$(module_title_$modu_lang)
  34.   !endif
  35.   !header
  36. !endif
  37.  
  38. !read $job.phtml
  39. !!transfert from docmenubox.phtml
  40. !if $job!=exosource and $sheetdata!=$empty and ($wims_user=supervisor or $wims_developer!=$empty)
  41.   !set wims_menu_items=!append line source,1,cmd=reply&job=exosource&block=$startblock\
  42. to $wims_menu_items
  43. !endif
  44.  
  45. !reset rEg,preview,abandon,Titb,Keyw,Next,Prev,Upbl,currcont,\
  46.        titr,authorr,descr,emailr,coder,coder1,coder2,coderr,\
  47.        coderr1,coderr2,copyrightr,docopenr,dlangr,\
  48.        foldin,foldout,readcntadv,job2
  49.  
  50. !for i=1 to 20
  51.   !reset parm$i
  52. !next i
  53.  
  54. !if $job notwordof home
  55.   !tail
  56. !endif
  57.