Subversion Repositories wimsdev

Rev

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

Rev 12555 Rev 14336
Line 88... Line 88...
88 
  qstr=
 88 
  qstr=
89 
  !for i=1 to $cnt
 89 
  !for i=1 to $cnt
90 
    l=!line $i of $checkqstr
 90 
    l=!line $i of $checkqstr
91 
    eq==
 91 
    eq==
92 
    !if &&module$eq notin &&$l and \
 92 
    !if &&module$eq notin &&$l and \
93 
	      &&session$eq notin &&$l and \
 93 
        &&session$eq notin &&$l and \
94 
	      &&cmd$eq notin &&$l and \
 94 
        &&cmd$eq notin &&$l and \
95 
	      &&wims_window$eq notin &&$l and \
 95 
        &&wims_window$eq notin &&$l and \
96 
	      &&worksheet$eq notin &&$l
 96 
        &&worksheet$eq notin &&$l
97 
      qstr=!append line $l to $qstr
 97 
      qstr=!append line $l to $qstr
98 
    !endif
 98 
    !endif
99 
  !next i
 99 
  !next i
100 
  !if $checksession isin $qstr
 100 
  !if $checksession isin $qstr
101 
    qstr=!replace $checksession[\._a-z0-9]* by $wims_session in $qstr
 101 
    qstr=!replace $checksession[\._a-z0-9]* by $wims_session in $qstr