256 |
# Print the row start |
# Print the row start |
257 |
$DocumentFinal .= "<TR><TD VALIGN=TOP ALIGN=RIGHT BGCOLOR=\"#EEEEEE\" WIDTH=\"130\"> $default::FieldNames{$FieldTag}: </TD><TD VALIGN=TOP ALIGN=LEFT> "; |
$DocumentFinal .= "<TR><TD VALIGN=TOP ALIGN=RIGHT BGCOLOR=\"#EEEEEE\" WIDTH=\"130\"> $default::FieldNames{$FieldTag}: </TD><TD VALIGN=TOP ALIGN=LEFT> "; |
258 |
|
|
259 |
|
$Document{$FieldTag} =~ s/&/∧/g; |
260 |
|
$Document{$FieldTag} =~ s/</</g; |
261 |
|
$Document{$FieldTag} =~ s/>/>/g; |
262 |
|
|
263 |
# Print the field data, marking up if needed |
# Print the field data, marking up if needed |
264 |
if ( $FieldTag eq "A" || $FieldTag eq "E" ) { |
if ( $FieldTag eq "A" || $FieldTag eq "E" ) { |
265 |
$CommaFlag = 0; |
$CommaFlag = 0; |