Subversion Repositories wimsdev

Rev

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

Rev 17252 Rev 18605
Line 152... Line 152...
152 
  !endif
 152 
  !endif
153 
  !if ($gl>0 and $cmd!=reply) or adm/tool/glossary notin $module
 153 
  !if ($gl>0 and $cmd!=reply) or adm/tool/glossary notin $module
154 
    !set 1_=!append line addh,1,module=adm/class/addmodule&job=helpexo&dir=$module&iniparm=$wims_homeref_parm to $1_
 154 
    !set 1_=!append line addh,1,module=adm/class/addmodule&job=helpexo&dir=$module&iniparm=$wims_homeref_parm to $1_
155 
  !endif
 155 
  !endif
156 
  !if $gl=0 and adm/tool/glossary isin $module and $wims_homeref_parm!=$empty
 156 
  !if $gl=0 and adm/tool/glossary isin $module and $wims_homeref_parm!=$empty
- 
 
 157 
    !set hh_cnt=!recordcnt $data_dir/$wims_homeref_parm
- 
 
 158 
    !for hh_i=4 to $hh_cnt
- 
 
 159 
      !set hh_tmp=!record $hh_i of $data_dir/$wims_homeref_parm
- 
 
 160 
      !if $hh_tmp!=$empty
- 
 
 161 
        !set hh_list=!append item $[$hh_i-3] to $hh_list
- 
 
 162 
      !endif
- 
 
 163 
    !next hh_i
157 
    !set 1_=!append line addh,1,module=adm/class/addmodule&job=helpexo&dir=$module&iniparm=special_parm=$wims_homeref_parm to $1_
 164 
    !set 1_=!append line addh,1,module=adm/class/addmodule&job=helpexo&dir=$module&iniparm=special_parm=$wims_homeref_parm|content=[$hh_list] to $1_
158 
  !endif
 165 
  !endif
159 
!endif
 166 
!endif
160 
!if $wims_user=supervisor and $module=adm/doc
 167 
!if $wims_user=supervisor and $module=adm/doc
161 
  !set 1_=!append line doch_docs,1,module=adm/doc&job=home to $1_
 168 
  !set 1_=!append line doch_docs,1,module=adm/doc&job=home to $1_
162 
!endif
 169 
!endif