<HTML>
<HEAD>
<TITLE>$title</TITLE>
<link rel="stylesheet" type="text/css" href="http://$localSite/col/$languageRep1/doc/mirrorStandard.css">
</HEAD>
<BODY>

<!--
[
set tableList {}
set reviewList {}
foreach {reviewRep reviewTitle} [array get titleArray] {
	lappend reviewList [list $reviewRep $reviewTitle]
}
foreach review [lsort -index 1 $reviewList] {
	set reviewRep [lindex $review 0] 
	set reviewTitle [lindex $review 1] 
	set lineList {}
	lappend lineList <TR><TD><FONT FACE='Arial' SIZE=2>
	set authorList {}
	foreach name $author {
		lappend authorList [string trimright $name {,}] ;# drop trailing commas
	}
	lappend lineList "
<P ALIGN=CENTER>
<I>$reviewTitle</I>
<BR>
[join $authorList {<BR>}]
</P>"
	lappend lineList {<TABLE ALIGN=CENTER CELLPADDING=8 BORDER=1>}
	set rowList [lsort -command FieldCompare [array names reviewArray $reviewRep*]]
	if [info exists reviewsForAuthorFlag] {
# drop the commentsfortheprogramcommitteeonly
		set rowList [lreplace $rowList end end]
#		set rowList [lindex $rowList end]	;# display only comment for authors 
	}
	foreach row $rowList {
		regsub {.*,} $row {} fieldName
		if ![lindex $displayTable(Misc,$fieldName) 0] {continue}
		set fieldLabel [lindex $displayTable(Misc,$fieldName) 3]
		if [info exists translationTable($fieldLabel,Misc,$fieldName)] {
			set translatedFieldLabel $translationTable($fieldLabel,Misc,$fieldName)
		} else {
# don't translate
			set translatedFieldLabel $fieldLabel
		}
		if [info exists optionTable2(Misc,$fieldName)] {
			set list $optionTable2(Misc,$fieldName)
			foreach item $list {
				foreach {label number} $item {break}
				if {[string compare $number $reviewArray($row)] == 0} {break}
			}
			if [info exists translationTable($label,Misc,$fieldName)] {
				set translatedLabel $translationTable($label,Misc,$fieldName)
			} else {
# don't translate
				set translatedLabel $label
			}
			lappend lineList "
<TR>
<TD><FONT FACE='Arial' SIZE=2>$translatedFieldLabel</FONT></TD>
<TD ALIGN=CENTER><FONT FACE='Arial' SIZE=2>$reviewArray($row)</FONT></TD>
<TD ALIGN=CENTER><FONT FACE='Arial' SIZE=2>$translatedLabel</FONT></TD>
</TR>"
		} else {
#			regsub {^$} $reviewArray($row) {\&nbsp;} cellContent	;# process empty cell - didn't work with matrix
#			regsub {^\s*$} $reviewArray($row) {} reviewArray($row)	;# not tested with matrix
			set reviewArray($row) [string trim $reviewArray($row) " \t\n"]
			if {[string compare {} $reviewArray($row)] == 0} {
				set cellContent {&nbsp;}
			} else {
				regsub -all "(\n)" $reviewArray($row) {\1<BR>} cellContent
			}
			lappend lineList "
<TR>
<TD><FONT FACE='Arial' SIZE=2>$translatedFieldLabel</FONT></TD>
<TD COLSPAN=2><FONT FACE='Arial' SIZE=2>$cellContent</FONT></TD>
</TR>"
		}
	}
	lappend lineList {</TABLE>}
	lappend lineList "
<P ALIGN=CENTER>
<FONT FACE=\"Courier New\">&lt;$reviewRep&gt;</FONT>
</P>
"
	lappend lineList </FONT></TD></TR>
	lappend tableList [join $lineList \n]
}
]
--->

<TABLE ALIGN=CENTER CELLPADDING=12 BORDER=0>
[join $tableList \n<TR><TD><HR></TD></TR>\n]
</TABLE>

$returnButtonForReviewSheet

</BODY>
</HTML>
