From 5d01176488af1bd9b56163a37cc98393b36ff2e1 Mon Sep 17 00:00:00 2001 From: Naama Menda Date: Mon, 16 Mar 2015 13:34:29 -0400 Subject: [PATCH] adjust CIAT trials loader to updates sent from Hernan --- bin/loading_scripts/cassavabase/load_ciat_trials.pl | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/bin/loading_scripts/cassavabase/load_ciat_trials.pl b/bin/loading_scripts/cassavabase/load_ciat_trials.pl index 78307d5..b34e9c3 100644 --- a/bin/loading_scripts/cassavabase/load_ciat_trials.pl +++ b/bin/loading_scripts/cassavabase/load_ciat_trials.pl @@ -118,11 +118,13 @@ my %locations; foreach my $site_id ( @site_rows ) { my $site_name = $sites_file->value_at($site_id , "name"); + my $department = $sites_file->value_at($site_id , "department"); + my $country = $sites_file->value_at($site_id , "country"); my $long = $sites_file->value_at($site_id , "longitude"); my $lat = $sites_file->value_at($site_id , "latitude"); my $alt = $sites_file->value_at($site_id , "altitude"); - $locations{$site_id}->{site_name} = $site_name; + $locations{$site_id}->{site_name} = $site_name . ". " . $department . ", " . $country; $locations{$site_id}->{longitude} = $long; $locations{$site_id}->{latitude} = $lat; $locations{$site_id}->{altitude} = $alt; @@ -188,8 +190,8 @@ my $coderef= sub { my $geolocation = $schema->resultset("NaturalDiversity::NdGeolocation")->find_or_create( { description => $geo_description, - #latitude => $latitude, ##needs to be reformatted in the CIAT - #longitude => $longitude, + latitude => $latitude, ##needs to be reformatted in the CIAT file + longitude => $longitude, #geodetic_datum => $datum, altitude => $altitude, } ) ; -- 2.11.4.GIT