| … | |
… | |
| 203 | } else { |
203 | } else { |
| 204 | @fieldOrder = @{ SET_FIELD_ORDER() }; |
204 | @fieldOrder = @{ SET_FIELD_ORDER() }; |
| 205 | } |
205 | } |
| 206 | |
206 | |
| 207 | my $output = CGI::start_table({border => 0, cellpadding => 1}); |
207 | my $output = CGI::start_table({border => 0, cellpadding => 1}); |
|
|
208 | if ($forUsers) { |
|
|
209 | $output .= CGI::Tr( |
|
|
210 | CGI::th({colspan=>"3"}, "User Value"), |
|
|
211 | CGI::th({}, "Global Value"), |
|
|
212 | ); |
|
|
213 | } |
|
|
214 | |
| 208 | foreach my $field (@fieldOrder) { |
215 | foreach my $field (@fieldOrder) { |
| 209 | my %properties = %{ FIELD_PROPERTIES()->{$field} }; |
216 | my %properties = %{ FIELD_PROPERTIES()->{$field} }; |
| 210 | unless ($properties{type} eq "hidden") { |
217 | unless ($properties{type} eq "hidden") { |
| 211 | $output .= CGI::Tr({}, CGI::td({}, [$self->FieldHTML($userID, $setID, $problemID, $globalRecord, $userRecord, $field)])); |
218 | $output .= CGI::Tr({}, CGI::td({}, [$self->FieldHTML($userID, $setID, $problemID, $globalRecord, $userRecord, $field)])); |
| 212 | } |
219 | } |