Changeset 12185
- Timestamp:
- 2006-07-13T09:36:41+12:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cic-hcap/perllib/plugins/CICPlug.pm
r12182 r12185 307 307 308 308 # Prepare SQL statement for getting the Institution best place image location 309 my $institution_best_place_image_location_sql_statement = "SELECT Location FROM tblImages WHERE FileType=1 AND FileName=?";309 my $institution_best_place_image_location_sql_statement = "SELECT Location,Entry_ID FROM tblImages WHERE FileType=1 AND FileName=?"; 310 310 my $institution_best_place_image_location_sql_handle = $dbh->prepare($institution_best_place_image_location_sql_statement); 311 311 $institution_best_place_image_location_sql_handle->{LongReadLen} = 65536; … … 371 371 # Get the file location of the best place image for this institution 372 372 $institution_best_place_image_location_sql_handle->execute($institution_best_place_image_name) or die "Could not execute SQL statement."; 373 my $institution_best_place_image_location = $institution_best_place_image_location_sql_handle->fetchrow(); 373 my $institution_best_place_image_hashref = $institution_best_place_image_location_sql_handle->fetchrow_hashref(); 374 375 my $institution_best_place_image_location = $institution_best_place_image_hashref->{"Location"}; 374 376 if (!defined($institution_best_place_image_location) || $institution_best_place_image_location eq "") { 375 377 print STDERR "<ProcessingError n='Institution $institution_id' p='CICPlug' r='Could not match best image $institution_best_place_image_name to a file'>\n" if ($self->{'gli'}); … … 389 391 } 390 392 393 my $institution_best_place_id = $institution_best_place_image_hashref->{"Entry_ID"}; 391 394 my $institution_best_place_image_medium_file_href = $self->generate_place_image_variant($institution_doc_obj, $institution_best_place_image_location, "medium"); 392 my $institution_best_place_image_large_file_href = $self->generate_place_image_variant($institution_doc_obj, $institution_best_place_image_location, "large"); 393 &new_metadata_entry($institution_doc_obj, "InstitutionBestPlaceImageHTML", "<a href=\"$institution_best_place_image_large_file_href\"><img src=\"$institution_best_place_image_medium_file_href\"/><br /><span class=\"cictext\">$institution_best_place_image_name</span></a>"); 395 &new_metadata_entry($institution_doc_obj, "InstitutionBestPlaceImageHTML", "<a href=\"_gwcgi_?a=d&d=p$institution_best_place_id\"><img src=\"$institution_best_place_image_medium_file_href\"/><br /><span class=\"cictext\">$institution_best_place_image_name</span></a>"); 394 396 } 395 397
Note:
See TracChangeset
for help on using the changeset viewer.