summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
authorjonathan <jonathan@freeside.biz>2015-05-21 23:43:19 +0000
committerjonathan <jonathan@freeside.biz>2015-05-21 23:43:19 +0000
commitb429c39e5d748f9410143d51c79717ac95a5ff30 (patch)
tree66e400c6b27d25e78ee07be6683f96793874c092 /FS
parent37047d680db893694234b8d470a231d84597a25a (diff)
RT#34289: Flag service fields as mandatory [fieldname bug fix]
Diffstat (limited to 'FS')
-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 ca26074..518e847 100644
--- a/FS/FS/part_svc.pm
+++ b/FS/FS/part_svc.pm
@@ -145,9 +145,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', {
@@ -284,9 +284,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', {