Subversion Repositories wimsdev

Rev

Rev 7698 | Rev 17172 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !set test_radio=$wims_read_parm
  2.  
  3.   !set dir=wimshome/public_html/bases/sys/domain/domain
  4.   !set dom=!lookup domain in wimshome/public_html/bases/sys/domain/domain
  5. !if $test_radio=radio
  6.  !set radio=!nosubst <input type="radio" name="taxon_keywords" id="$tid" value="$tid"/>
  7. !else
  8.   !reset radio
  9. !endif
  10. <ul class="tree">
  11.   !for a in $dom
  12.   <li class="closed">
  13.     !set t_dom=!lookup $a in $dir
  14. !set tid=$(a)
  15.        $radio
  16.     !lookup $a in $dir.$lang
  17.     ($a)
  18.     <ul>
  19.        !for t in $t_dom
  20.        <li class="closed">
  21. !set tid=$(t)
  22.        $radio
  23.         !lookup $t in $dir.$lang
  24. $ ($t)
  25.         !set t2=!lookup $t in $dir
  26.         !if $t2!=$empty
  27.           <ul>
  28.           !for t3 in $t2
  29.            <li class="closed">
  30. !set tid=$(t3)
  31.        $radio
  32.            !lookup $t3 in $dir.$lang
  33. $ ($t3)
  34.            !set t4=!lookup $t3 in $dir
  35.            !if $t4!=$empty
  36.             <ul>
  37.             !for t5 in $t4
  38.               <li class="closed">
  39. !set tid=$(t5)
  40.        $radio
  41.                 !lookup $t5 in $dir.$lang
  42. $ ($t5)
  43.                !set t6=!lookup $t5 in $dir
  44.                !if $t6!=empty
  45.                  <ul>
  46.                  !for t7 in $t6
  47.                    <li class="closed">
  48. !set tid=$(t7)
  49.        $radio
  50.                   !lookup $t7 in $dir.$lang
  51. $ ($t7)
  52.                   !set t8=!lookup $t7 in $dir
  53.                   !if $t8!=empty
  54.                      <ul>
  55.                       !for t9 in $t8
  56.                      <li class="closed">
  57. !set tid=$(t9)
  58.        $radio
  59.                    !lookup $t9 in $dir.$lang
  60. $ ($t9)
  61.                      </li>
  62.                      !next
  63.                      </ul>
  64.                    !endif
  65.                    </li>
  66.                  !next
  67.                  </ul>
  68.                !endif
  69.               </li>
  70.             !next
  71.            </ul>
  72.            !endif
  73.          </li>
  74.           !next
  75.           </ul>
  76.         !endif
  77.         </li>
  78.      !next
  79.      </ul>
  80.     !endif
  81.     </li>
  82.   !next
  83.  </ul>
  84.  !exit
  85.  <pre>
  86.  !record 0 of wimshome/public_html/bases/sys/domain/domain.$modu_lang
  87.  </pre>
  88.