projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 79353 Update discount graph - include waived setup fees
[freeside.git]
/
FS
/
FS
/
areacode.pm
diff --git
a/FS/FS/areacode.pm
b/FS/FS/areacode.pm
index
58b498c
..
b6defa2
100644
(file)
--- a/
FS/FS/areacode.pm
+++ b/
FS/FS/areacode.pm
@@
-25,27
+25,20
@@
FS::areacode - Object methods for areacode records
=head1 DESCRIPTION
=head1 DESCRIPTION
-An FS::areacode object represents an
exampl
e. FS::areacode inherits from
+An FS::areacode object represents an
area cod
e. FS::areacode inherits from
FS::Record. The following fields are currently supported:
=over 4
FS::Record. The following fields are currently supported:
=over 4
-=item
code
+=item
areanum - primary key
-area code (primary key)
+=item code - area code
-=item country
+=item country
- two-letter country code
-two-letter country code
-
-=item state
-
-two-letter state code, if appropriate
-
-=item description
-
-description (optional)
+=item state - two-letter state code, if appropriate
+=item description - description (optional)
=back
=back
@@
-92,7
+85,8
@@
sub check {
my $self = shift;
my $error =
my $self = shift;
my $error =
- $self->ut_number('code')
+ $self->ut_numbern('areanum')
+ || $self->ut_number('code')
|| $self->ut_text('country')
|| $self->ut_textn('state')
|| $self->ut_textn('description')
|| $self->ut_text('country')
|| $self->ut_textn('state')
|| $self->ut_textn('description')