Subversion Repositories wimsdev

Rev

Rev 7704 | Rev 17172 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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