Subversion Repositories wimsdev

Rev

Rev 7694 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7694 Rev 12477
Line 4... Line 4...
4 
!! supt should be a father of t
 4 
!! supt should be a father of t
5 
  !reset key
 5 
!reset key
6 
    !set key=!lookup $t in $dir
 6 
!set key=!lookup $t in $dir
7 
    !default key=$t
 7 
!default key=$t
8 
    !set key_l=!lookup $t in $dir_lang
 8 
!set key_l=!lookup $t in $dir_lang
9 
    !set name_$t=!lookup $t in $dir_lang
 9 
!set name_$t=!lookup $t in $dir_lang
10 
    !default name_$t=$t
 10 
!default name_$t=$t
11 
    !!set key=!replace internal _ by $ $  in $t
 11 
!!set key=!replace internal _ by $ $  in $t
12 
    !!set key=$supt,$key_l
 12 
!!set key=$supt,$key_l
13 
    !set key=$key_l
 13 
!set key=$key_l
14 
    !set more=!lookup $t in $dir
 14 
!set more=!lookup $t in $dir
15 
!if $more!=$empty
 15 
!if $more!=$empty
16 
      !href module=$module&cmd=new&job=$job&parm=$t $(name_$t)
 16 
  !href module=$module&cmd=new&job=$job&parm=$t $(name_$t)
17 
!else
 17 
!else
18 
      $(name_$t)
 18 
  $(name_$t)
19 
!endif
 19 
!endif
20 
!set wims_ref_class=wims_button
 20 
!set wims_ref_class=wims_button
21 
!href $search_addr >>>>
 21 
!href $search_addr >>>>
22 
!set tt=!lookup $t in $dir
 22 
!set tt=!lookup $t in $dir
23 
!set cnt=!itemcnt $tt
 23 
!set cnt=!itemcnt $tt