- }
- if {$html3} {
- html {<td align=left>}
- } else {
- html "<dd>\n"
- }
- html { <a href="http:} $env(SCRIPT_NAME)
- html / $sessionId {/query.egw/} $host + $setNo
- if {$html3} {
- html {">}
- } else {
- html {">Query</a>: }
- }
- set op {}
- for {set i 1} {$i <= 3} {incr i} {
- if {[string length $hist($setNo,form,entry$i)] > 0} {
- html " <b>" [join $op " "] "</b> "
- html [join $hist($setNo,form,menu$i)] "="
- html $hist($setNo,form,entry$i)
- set op $hist($setNo,form,logic$i)
+ html { <a href="http:} $env(SCRIPT_NAME)
+ html / $sessionId / $scriptQuery {;/} $setNo + $host
+ if {$html3} {
+ html {">}
+ } else {
+ html {">Query</a>: }
+ }
+ set op {}
+ for {set j 1} {$j <= 10} {incr j} {
+ if {![info exists hist($setNo,form,entry$j)]} {
+ break
+ }
+ if {[string length $hist($setNo,form,entry$j)] > 0} {
+ html " <b>" [join $op " "] "</b> "
+ set pre [join $hist($setNo,form,menu$j)]
+ if {[string length $pre] > 0} {
+ html $pre "="
+ }
+ html $hist($setNo,form,entry$j)
+ set op $hist($setNo,form,logic$j)
+ }
+ }
+ if {$html3} {
+ html {</a><tr>} "\n"