Subversion Repositories wimsdev

Rev

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

Rev 12490 Rev 14335
Line 36... Line 36...
36
  ii=0
36
  ii=0
37
  !for i=1 to $doccnt
37
  !for i=1 to $doccnt
38
    l=!record $i of wimshome/public_html/bases/doc/.index
38
    l=!record $i of wimshome/public_html/bases/doc/.index
39
    !distribute lines $l into s_,t_,a_,e_,g_,o_,l_,A_
39
    !distribute lines $l into s_,t_,a_,e_,g_,o_,l_,A_
40
    !if $wims_ismanager=2 or ($u1!=$empty and ($u1 iswordof $A_ or\
40
    !if $wims_ismanager=2 or ($u1!=$empty and ($u1 iswordof $A_ or\
41
    	  ($u2!=$empty and $u2 iswordof $A_) or\
41
        ($u2!=$empty and $u2 iswordof $A_) or\
42
    	  ($u3!=$empty and $u3 iswordof $A_)))
42
        ($u3!=$empty and $u3 iswordof $A_)))
43
      i_=1
43
      i_=1
44
      !advance ii
44
      !advance ii
45
    !else
45
    !else
46
      i_=0
46
      i_=0
47
    !endif
47
    !endif
48
    !if $i_=1 or ($s_>=1000 and $s_ iswordof $openlist $edlist and $o_=yes and \
48
    !if $i_=1 or ($s_>=1000 and $s_ iswordof $openlist $edlist and $o_=yes and \
49
    	  ($l_=$empty or all iswordof $l_ or $module_language iswordof $l_))
49
        ($l_=$empty or all iswordof $l_ or $module_language iswordof $l_))
50
      slist=!append line $s_ to $slist
50
      slist=!append line $s_ to $slist
51
      tlist=!append line $t_ to $tlist
51
      tlist=!append line $t_ to $tlist
52
      alist=!append line $a_ to $alist
52
      alist=!append line $a_ to $alist
53
      elist=!append line $ $e_ to $elist
53
      elist=!append line $ $e_ to $elist
54
      !!if $s_ iswordof $openlist $edlist or $wims_ismanager=2
54
      !!if $s_ iswordof $openlist $edlist or $wims_ismanager=2