X-Git-Url: http://git.pippins.net/embedvideo/.git/static/gitweb.js?a=blobdiff_plain;f=bin%2Fimport_ward_data;fp=bin%2Fimport_ward_data;h=ef7eac4a6cb403645fe1692e92cfb50bb80af0bd;hb=5b6a77efbd41b615baf86ca2222e3b1c08fe106f;hp=bf970a2565b17e1cc9834e838fb4586c4976517a;hpb=8c3a64633fe59a227723d29b6965a6a7b6dd2d73;p=eq%2F.git diff --git a/bin/import_ward_data b/bin/import_ward_data index bf970a2..ef7eac4 100755 --- a/bin/import_ward_data +++ b/bin/import_ward_data @@ -97,7 +97,7 @@ sub update_eq_aaronic_table $membership_data{$index}{$key} =~ /^Priest\s*$/i)) { $aaronic_name = $membership_data{$index}{'Preferred Name'}; $phone = $membership_data{$index}{'Phone 1'}; - if($phone =~ /(\d\d\d-\d\d\d\d)/) { $phone = "970-$1"; } + if($phone =~ /(\d\d\d-\d\d\d\d)/) { $phone = "$areacode-$1"; } if($phone =~ /^\(\d\d\d\) (\d\d\d-\d\d\d\d)/) { $phone = "$1-$2"; } $sth = $dbh->prepare("select * from eq_aaronic where name='$aaronic_name'"); $sth->execute or die "-E- DB error: $DBI::errstr\n"; @@ -165,7 +165,7 @@ sub update_eq_elder_table ($organization =~ /Sunday School/) || ($organization =~ /Primary/) ) { $attending = 1; } - if($phone =~ /(\d\d\d-\d\d\d\d)/) { $phone = "970-$1"; } + if($phone =~ /(\d\d\d-\d\d\d\d)/) { $phone = "$areacode-$1"; } if($phone =~ /^\(\d\d\d\) (\d\d\d-\d\d\d\d)/) { $phone = "$1-$2"; } $sth = $dbh->prepare("select * from eq_elder where name='$elder_name'"); $sth->execute or die "-E- DB error: $DBI::errstr\n"; @@ -497,7 +497,7 @@ sub update_eq_parent_table $hofh_id = $membership_data{$index}{'HofH ID'}; $id = $membership_data{$index}{'Indiv ID'}; $phone = $membership_data{$index}{'Phone 1'}; - if($phone =~ /(\d\d\d-\d\d\d\d)/) { $phone = "970-$1"; } + if($phone =~ /(\d\d\d-\d\d\d\d)/) { $phone = "$areacode-$1"; } if($phone =~ /^\(\d\d\d\) (\d\d\d-\d\d\d\d)/) { $phone = "$1-$2"; } $address = $membership_data{$index}{'Street 1'}; if($membership_data{$index}{'Street 2'} ne "") {