X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_bill_pkg_tax_location.pm;h=4da354a6c7bed7ac7aeddcb3cf61f901dbad536b;hb=0af65f4c957f0f658d9a539effd5d61375f6a0b9;hp=0e510005f2808009c353c5b42292d667398b8faa;hpb=ac602a212f0cb29cc9f2693de4df75c70dc5211f;p=freeside.git diff --git a/FS/FS/cust_bill_pkg_tax_location.pm b/FS/FS/cust_bill_pkg_tax_location.pm index 0e510005f..4da354a6c 100644 --- a/FS/FS/cust_bill_pkg_tax_location.pm +++ b/FS/FS/cust_bill_pkg_tax_location.pm @@ -127,7 +127,7 @@ sub check { || $self->ut_number('pkgnum', 'cust_pkg', 'pkgnum' ) || $self->ut_foreign_key('locationnum', 'cust_location', 'locationnum' ) || $self->ut_money('amount') - || $self->ut_foreign_key('taxable_billpkgnum', 'cust_bill_pkg', 'billpkgnum') + || $self->ut_foreign_keyn('taxable_billpkgnum', 'cust_bill_pkg', 'billpkgnum') ; return $error if $error; @@ -160,6 +160,19 @@ sub cust_location { qsearchs( 'cust_location', { 'locationnum' => $self->locationnum } ); } +=item taxname + +Returns the tax name (for populating the itemdesc field). + +=cut + +sub taxname { + my $self = shift; + my $cust_main_county = FS::cust_main_county->by_key($self->taxnum) + or return ''; + $cust_main_county->taxname || 'Tax'; +} + =item desc Returns a description for this tax line item constituent. Currently this @@ -495,4 +508,3 @@ L, schema.html from the base documentation. =cut 1; -