diff options
| -rw-r--r-- | FS/FS/cust_main.pm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index b2f93c54d..3b2ba3382 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -4100,6 +4100,23 @@ sub country_full { code2country($self->country); } +=item county_state_county [ PREFIX ] + +Returns a string consisting of just the county, state and country. + +=cut + +sub county_state_country { + my $self = shift; + my $prefix = (@_ && $_[0]) ? shift : ''; + my $label = $self->get($prefix.'country'); + $label = $self->get($prefix.'state'). ", $label" + if $self->get($prefix.'state'); + $label = $self->get($prefix.'county')." County, $label" + if $self->get($prefix.'county'); + $label; +} + =item geocode DATA_VENDOR Returns a value for the customer location as encoded by DATA_VENDOR. |