Subversion Repositories wimsdev

Rev

Rev 1541 | Rev 2671 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1541 Rev 2670
Line 1... Line 1...
1
!!   ------------------------------------------   ce fichier est une partie du fichier search.proc du module home
1
!!   ce fichier est une partie du fichier search.proc du module home
2
!!           il est nécessaire à la définition des mots utilisés dans la form html permettant de définir les mots clés de recherche
2
!!   il est nécessaire à la définition des mots utilisés dans la form html 
-
 
3
!!   permettant de définir les mots clés de recherche
3
 
4
 
4
rel_A=D,S
5
rel_A=D,S
5
rel_T=X,D,R
6
rel_T=X,D,R
6
rel_D=X,T,S,R
7
rel_D=X,T,S,R
7
rel_X=T,D,S,R
8
rel_X=T,D,S,R
Line 9... Line 10...
9
rel_P=T,X,D
10
rel_P=T,X,D
10
rel_O=X,S,T,D,R
11
rel_O=X,S,T,D,R
11
rel_S=X,R,T,D
12
rel_S=X,R,T,D
12
 
13
 
13
slist=A D T X R P O S
14
slist=A D T X R P O S
-
 
15
!set my_lang=$wims_read_parm
14
module_P=wimshome/public_html/modules/tool/popup
16
module_P=wimshome/public_html/modules/tool/popup
15
wims_trustfile=$module_P.$lang/search.phtml $module_P.$lang/search.proc
17
wims_trustfile=$module_P.$my_lang/search.phtml $module_P.$my_lang/search.proc
16
test=!record 0 of $module_P.$lang/.test
18
test=!record 0 of $module_P.$my_lang/.test
17
!if yes notin $test
19
!if yes notin $test
18
 slist=!translate P to $ $ in $slist
20
 slist=!translate P to $ $ in $slist
19
!endif
21
!endif
20
cnt=!record 0 of wimshome/public_html/bases/sheet/index/count.$lang
22
cnt=!record 0 of wimshome/public_html/bases/sheet/index/count.$my_lang
21
!if $cnt<=0
23
!if $cnt<=0
22
 slist=!translate S to $ $ in $slist
24
 slist=!translate S to $ $ in $slist
23
!endif
25
!endif
24
slist=!words2items $slist
26
slist=!words2items $slist
25
plist=
27
plist=