Subversion Repositories wimsdev

!distribute items $wims_read_parm into t, supt

!! for the moment we do not use supt, plane for the future

!!keep key - use in search_addr.

!! supt should be a father of t

!reset key

!set key=!lookup $t in $dir

!default key=$t

!set key_l=!lookup $t in $dir_lang

!set name_$t=!lookup $t in $dir_lang

!default name_$t=$t

!!set key=!replace internal _ by $ $  in $t

!!set key=$supt,$key_l

!set key=$key_l

!set more=!lookup $t in $dir

!if $more!=$empty

  !href module=$module&cmd=new&job=$job&parm=$t $(name_$t)

!else

  $(name_$t)

!endif

!set wims_ref_class=wims_button

!href $search_addr >>>>

!set tt=!lookup $t in $dir

!set cnt=!itemcnt $tt