Import script no longer needs to make this link.
addSupporter() now does it properly in the API.
This commit is contained in:
		
							parent
							
								
									c4668b81d6
								
							
						
					
					
						commit
						69260413f3
					
				
					 1 changed files with 1 additions and 7 deletions
				
			
		|  | @ -49,9 +49,6 @@ $sthNew->finish(); | |||
| my $sthInsertEmailAddress = $dbhNew->prepare('INSERT INTO email_address(email_address, type_id, date_encountered)' . | ||||
|                   "values(?, $paypalPayerTypeId, date('now'))"); | ||||
| 
 | ||||
| my $sthLinkSupporterToEmail = $dbhNew->prepare('INSERT INTO supporter_email_address_mapping(supporter_id, email_address_id, preferred)' . | ||||
|                   "values(?, ?, 1)"); | ||||
| 
 | ||||
| my $sthLinkSupporterToPostal = $dbhNew->prepare('INSERT INTO supporter_postal_address_mapping(supporter_id, postal_address_id, preferred)' . | ||||
|                   "values(?, ?, 1)"); | ||||
| 
 | ||||
|  | @ -84,15 +81,12 @@ while (my $row = $sthOld->fetchrow_hashref) { | |||
|     $sthInsertRequest->execute($supporterId, $announceEmailListRequestTypeId, undef, | ||||
|                                ($row->{on_announce_mailman_list} ? $fulfillmentId : undef)); | ||||
|   } | ||||
|   $sthInsertEmailAddress->execute($row->{paypal_payer}); | ||||
|   my $emailId = $dbhNew->last_insert_id("","","",""); | ||||
|   $sthLinkSupporterToEmail->execute($supporterId, $emailId); | ||||
|   $sthPostalAddress->execute($row->{formatted_address}); | ||||
|   my $postalId = $dbhNew->last_insert_id("","","",""); | ||||
|   $sthLinkSupporterToPostal->execute($supporterId, $postalId); | ||||
| } | ||||
| foreach my $sth (($sthOld, $sthOld, $sthInsertEmailAddress, | ||||
|                   $sthLinkSupporterToEmail, $sthInsertRequest, $sthPostalAddress, | ||||
|                   $sthInsertRequest, $sthPostalAddress, | ||||
|                   $sthLinkSupporterToPostal,)) { | ||||
|   $sth->finish(); | ||||
| } | ||||
|  |  | |||
		Loading…
	
	Add table
		
		Reference in a new issue
	
	 Bradley M. Kuhn
						Bradley M. Kuhn