1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
|
!! ce fichier est une partie du fichier search.proc du module home
!! il est necessaire la definition des mots utilises dans la form html
!! permettant de definir les mots cles de recherche
!set search_lang=$wims_read_parm
rel_A=D,S
rel_T=X,D,R
rel_D=X,T,S,R
rel_X=T,D,S,R
rel_R=X,T,D,S
rel_P=T,X,D
rel_O=X,S,T,D,R
rel_S=X,R,T,D
slist=A D T X R P O S G
!if $wims_class=$empty
slist=$slist C
!endif
module_P=wimshome/public_html/modules/tool/popup
wims_trustfile=$module_P.$search_lang/search.phtml $module_P.$search_lang/search.proc
test=!record 0 of $module_P.$search_lang/.test
!if yes notin $test
test=!record 0 of $module_P.fr/.test
!if yes notin $test
slist=!translate P to $ $ in $slist
!else
p_lang=en
!endif
!else
p_lang=$search_lang
!endif
!!the file count.$search_lang is no more generated
!!cnt=!record 0 of wimshome/public_html/bases/sheet/index/count.$search_lang
!!!if $cnt<=0
!! slist=!translate S to $ $ in $slist
!!!endif
slist=!words2items $slist
plist=
!for i in $slist
plist=!append item $(C_$i) to $plist
!next i
|
