summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorjonathan <jonathan@freeside.biz>2015-05-21 23:43:19 +0000
committerJonathan Prykop <jonathan@freeside.biz>2015-05-21 18:45:34 -0500
commit9e6a4720dba6074864ad6464f663e161fd179052 (patch)
treeeda3cb73baf647bbdcbc7679994828bdb46733a8
parentf498bc8ce9377bfac97dbf3edbf1934318b105c3 (diff)
RT#34289: Flag service fields as mandatory [fieldname bug fix]
-rw-r--r--FS/FS/part_svc.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/FS/FS/part_svc.pm b/FS/FS/part_svc.pm
index beea3f1bc..8a5fc35c9 100644
--- a/FS/FS/part_svc.pm
+++ b/FS/FS/part_svc.pm
@@ -146,9 +146,9 @@ sub insert {
foreach my $field (fields($svcdb), @fields) {
next if $field eq 'svcnum';
my $prefix = $svcdb.'__';
- if ( defined( $self->getfield($prefix.$_.'_flag'))
- or defined($self->getfield($prefix.$_.'_required'))
- or length($self->getfield($prefix.$_.'_label'))
+ if ( defined( $self->getfield($prefix.$field.'_flag'))
+ or defined($self->getfield($prefix.$field.'_required'))
+ or length($self->getfield($prefix.$field.'_label'))
) {
my $part_svc_column = $self->part_svc_column($field);
my $previous = qsearchs('part_svc_column', {
@@ -285,9 +285,9 @@ sub replace {
foreach my $field (fields($svcdb),@fields) {
next if $field eq 'svcnum';
my $prefix = $svcdb.'__';
- if ( defined( $new->getfield($prefix.$_.'_flag'))
- or defined($new->getfield($prefix.$_.'_required'))
- or length($new->getfield($prefix.$_.'_label'))
+ if ( defined( $new->getfield($prefix.$field.'_flag'))
+ or defined($new->getfield($prefix.$field.'_required'))
+ or length($new->getfield($prefix.$field.'_label'))
) {
my $part_svc_column = $new->part_svc_column($field);
my $previous = qsearchs('part_svc_column', {