Subversion Repositories wimsdev

Rev

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

  1. !nocache
  2. !if $special_parm!=$empty
  3.   !set exo=$special_parm
  4. !endif
  5.  
  6. !if $exo=__user__ and select iswordof $special_parm2
  7.  !if $wims_user!=$empty and $wims_user!=supervisor
  8.   !set test=$wims_user.
  9.   !goto dir
  10.  !else
  11.   !reset exo
  12.  !endif
  13. !endif
  14. !if $exo!=$empty
  15.  !if select iswordof $special_parm2
  16.   !set oldparm=$exo
  17.   !set test=!lower $exo
  18.   !set test=!deaccent $test
  19.   !set test=!text select abcdefghijklmnopqrstuvwxyz1234567890 $ in $test
  20.   !set test=!singlespace $test
  21.   !set test=!trim $test
  22. :dir
  23.   !reset elist,vlist
  24.   !set tlist=!lower $titlelist
  25.   !set tlist=!deaccent $tlist
  26.   !set tlist=!text select abcdefghijklmnopqrstuvwxyz1234567890 , in $tlist
  27.   !set tlist=!singlespace $tlist
  28.   !for i=0 to $exocnt
  29.    !set n_=!item $i of $exolist
  30.    !set t_=!item $i of $tlist
  31.    !if $test isin $t_ $n_
  32.     !set elist=!append item $n_ to $elist
  33.     !set t_=!item $i of $titlelist
  34.     !set vlist=!append item $t_ to $vlist
  35.    !endif
  36.   !next i
  37.   !if $elist!=$empty
  38.    !set exolist=$elist
  39.    !set titlelist=$vlist
  40.    <input type="hidden" name="defaultlist" value="$elist" />
  41.   !endif
  42.  !else
  43.   !set exolist=!listuniq $exolist
  44.   !set exolist=!replace , by , $ in $exolist
  45.   !if $class_header!=wimshome/log/classes/$wims_class/
  46.    !if $class_header!=
  47.     !set dictionary=scripts/$(class_header)Extitles
  48.    !else
  49.     !set dictionary=$module_dir/$(class_header)Extitles
  50.    !endif
  51.   !else
  52.    !set dictionary=$wims_home/log/classes/$wims_class/Extitles
  53.   !endif
  54.   !set translator_unknown=leave
  55.   !set titlelist=!exec translator $exolist
  56.  !endif
  57. !endif
  58. !!set ecnt=!itemcnt $exolist
  59. !if $lang notsametext $module_language and $(titlelist_$lang) notsametext $empty
  60.  !set titlelist=$(titlelist_$lang)
  61. !endif
  62.  
  63. <label for="exo">$name_chooseexo:</label>
  64. !set wims_formselect_switch=multiple="multiple" size="$qcnt"
  65. !formselect exo list $exolist prompt $titlelist
  66. !reset wims_formselect_switch
  67.  
  68. !if $exocnt>2 and $jquery_defined=yes
  69.   <ul class="oef_filter">
  70.     <li>
  71.       <label for="selectorForExo">$name_select_auto:</label>
  72.       <input type="search" results="5" id="selectorForExo" value="$special_parm" placeholder="$name_select_placeholder" />
  73.     </li>
  74.   </ul>
  75.   <script type="text/javascript" src="scripts/js/interface/jQuery.selectFilters.js"></script>
  76.   <script type="text/javascript">
  77.     /*<![CDATA[*/
  78.     $$(function() {
  79.       $$('#exo').selectByText($$('#selectorForExo'));
  80.     });
  81.   /*]]>*/
  82.   </script>
  83. !endif
  84.