Pear-Trading/Foodloop-Server
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

added importing doogal data for wards on postcode

Browse source
This commit is contained in:
Finn 2019-08-29 16:37:55 +01:00
parent 9b7d8530b6
commit c977cf3279
No known key found for this signature in database
GPG key ID: 7455B4B17685B598
16 changed files with 4947 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

44
lib/Pear/LocalLoop/Import/LCCCsv/Postcodes.pm Normal file
View file

@ -0,0 +1,44 @@
package Pear::LocalLoop::Import::LCCCsv::Postcodes;
use Moo;
use Geo::UK::Postcode::Regex;
extends qw/Pear::LocalLoop::Import::LCCCsv/;
has '+csv_required_columns' => (
builder => sub { return [ qw/
postcode
ward
/ ]},
);
sub import_csv {
my ($self) = @_;
my $rows = $self->csv_data;
foreach my $row ( @{$rows} ) {
$self->_row_to_result($row);
}
}
use Devel::Dwarn;
sub _row_to_result {
my ( $self, $row ) = @_;
my $postcode_obj = Geo::UK::Postcode::Regex->parse( $row->{postcode} );
my $ward = $self->schema->resultset('GbWard')->find_or_create(ward => $row->{ward});
my $postcode_r = $self->schema->resultset('GbPostcode')->find({
outcode => $postcode_obj->{outcode},
incode => $postcode_obj->{incode},
});
return unless $postcode_r;
return if $postcode_r->ward;
$postcode_r->update({ ward_id => $ward->id });
}
1;