Subversion Repositories wimsdev

Rev

Rev 18337 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !! see scripts/oef/special/glossary.phtml
  2. !if $wims_read_parm!=$empty
  3.   !set parms=$wims_read_parm
  4. !else
  5.   !if $parms=$empty
  6.     !exit
  7.   !endif
  8. !endif
  9. !set option=!item 2 of $parms
  10. !set optrecord=!getopt content in $option
  11. !set optrecord=!declosing $optrecord
  12. !set parms=!item 1 of $parms
  13. !set data_dir=data/glossary
  14. !set data=$data_dir/$parms
  15.  
  16. !if $optrecord=abstract
  17.   !set optrecord=1
  18. !else
  19.   !if $optrecord=$empty
  20.     !set recordcnt=!recordcnt $data
  21.     !set optrecord=!values x for x=4 to $[$recordcnt]
  22.   !else
  23.     !set optrecord=!values (x-1)+4 for x in $optrecord
  24.   !endif
  25. !endif
  26. !set gl_title=!getdef gl_title in $data
  27. !set gl_keywords=!getdef gl_keywords in $data
  28. !set gl_author=!getdef gl_author in $data
  29. !set gl_type=!getdef gl_type in $data
  30. !set tmp=!replace internal / by , in $data
  31. !default gl_title=!lookup $(tmp[-1]) in bases/sys/domain/domain.$(tmp[-2])
  32. <div class="wims_glossary">
  33. !if $gl_type!=dynamic
  34.   !for j in $optrecord
  35.     !if $[$j%2]=0
  36.       !record $j of $data
  37.     !else
  38.       !set tmp=!record $j of $data
  39.       !read $data_dir/$tmp
  40.     !endif
  41.   !next
  42. !else
  43.   !read $data
  44. !endif
  45. </div>
  46.