% unless ( $cust_pkg->locationnum ) {
(default service address)
% }
<% $loc->address1 |h %>
% if ( $loc->address2 !~ /^\s*$/ ) {
<% $loc->address2 |h %>
% }
<% $loc->city |h %><% $loc->county ? ' ('.$loc->county.' county)' : '' |h %>,
<% $loc->state |h %> <% $loc->zip |h %>
% if ( $loc->country ne $countrydefault ) {
<% code2country( $loc->country ) %>
% }
% if ( ! $cust_pkg->get('cancel')
% && $FS::CurrentUser::CurrentUser->access_right('Change customer package')
% )
% {
( <%pkg_change_location_link($cust_pkg)%> )
% }
<%init>
my %opt = @_;
my $conf = new FS::Conf;
my $bgcolor = $opt{'bgcolor'};
my $cust_pkg = $opt{'cust_pkg'};
my $part_pkg = $opt{'part_pkg'};
my $conf = new FS::Conf;
my $countrydefault = $conf->config('countrydefault') || 'US';
my $statedefault = $conf->config('statedefault')
|| ($countrydefault eq 'US' ? 'CA' : '');
my $loc = $cust_pkg->cust_location_or_main;
sub pkg_change_location_link {
my $cust_pkg = shift;
my $pkgpart = $cust_pkg->pkgpart;
include( '/elements/popup_link-cust_pkg.html',
'action' => $p. "misc/change_pkg.cgi?locationnum=-1;pkgpart=$pkgpart;".
"address1=;address2=;city=;county=;state=$statedefault;".
"zip=;country=$countrydefault",
'label' => 'Change location',
'actionlabel' => 'Change',
'cust_pkg' => $cust_pkg,
);
}