[comment]
ui_template: Yes
ui_template_name: leftonly
[/comment]
[set component_after][/set]
[set members_only]0[/set]
[set page_banner]Shipping Address Removed[/set]
[set component_hsize]2[/set]
[set hbanner][/set]
[set component_before][/set]
[set hpromo_type]specials[/set]
[set page_title]__COMPANY__ -- Shipping Address Removed[/set]
@_LEFTONLY_TOP_@
[perl global=1]
my $dbname = 'ship_addresses';
my @addresses = split /\0/, $Values->{remove_sa};
my $sql_req = "delete from $dbname WHERE code = ";
$sql_req .= join(' or code = ', @addresses);
$Scratch->{sql_req} = $sql_req;
return "";
[/perl]
[seti remove_addresses][query sql="[scratch sql_req]"][/query][/seti]
The selected shipping addresses have been removed.
BACK @_LEFTONLY_BOTTOM_@