projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
remove max length on ACH account number
[freeside.git]
/
httemplate
/
edit
/
svc_acct.cgi
diff --git
a/httemplate/edit/svc_acct.cgi
b/httemplate/edit/svc_acct.cgi
index
eca0a31
..
d4c9a73
100755
(executable)
--- a/
httemplate/edit/svc_acct.cgi
+++ b/
httemplate/edit/svc_acct.cgi
@@
-12,8
+12,8
@@
if ( $cgi->param('error') ) {
$svcnum = $svc_acct->svcnum;
$pkgnum = $cgi->param('pkgnum');
$svcpart = $cgi->param('svcpart');
$svcnum = $svc_acct->svcnum;
$pkgnum = $cgi->param('pkgnum');
$svcpart = $cgi->param('svcpart');
- $part_svc
=qsearchs('part_svc',{'svcpart'=>$svcpart}
);
- die "No part_svc entry!" unless $part_svc;
+ $part_svc
= qsearchs( 'part_svc', { 'svcpart' => $svcpart }
);
+ die "No part_svc entry
for svcpart $svcpart
!" unless $part_svc;
@groups = $cgi->param('radius_usergroup');
} else {
my($query) = $cgi->keywords;
@groups = $cgi->param('radius_usergroup');
} else {
my($query) = $cgi->keywords;
@@
-28,8
+28,8
@@
if ( $cgi->param('error') ) {
$pkgnum=$cust_svc->pkgnum;
$svcpart=$cust_svc->svcpart;
$pkgnum=$cust_svc->pkgnum;
$svcpart=$cust_svc->svcpart;
- $part_svc
=qsearchs('part_svc',{'svcpart'=>$svcpart}
);
- die "No part_svc entry!" unless $part_svc;
+ $part_svc
= qsearchs( 'part_svc', { 'svcpart' => $svcpart }
);
+ die "No part_svc entry
for svcpart $svcpart
!" unless $part_svc;
@groups = $svc_acct->radius_groups;
@groups = $svc_acct->radius_groups;
@@
-41,8
+41,8
@@
if ( $cgi->param('error') ) {
$pkgnum=$1 if /^pkgnum(\d+)$/;
$svcpart=$1 if /^svcpart(\d+)$/;
}
$pkgnum=$1 if /^pkgnum(\d+)$/;
$svcpart=$1 if /^svcpart(\d+)$/;
}
- $part_svc
=qsearchs('part_svc',{'svcpart'=>$svcpart}
);
- die "No part_svc entry!" unless $part_svc;
+ $part_svc
= qsearchs( 'part_svc', { 'svcpart' => $svcpart }
);
+ die "No part_svc entry
for svcpart $svcpart
!" unless $part_svc;
$svcnum='';
$svcnum='';
@@
-72,6
+72,12
@@
if ( $cgi->param('error') ) {
}
}
}
}
+
+#fixed radius groups always override & display
+if ( $part_svc->part_svc_column('usergroup')->columnflag eq "F" ) {
+ @groups = split(',', $part_svc->part_svc_column('usergroup')->columnvalue);
+}
+
my $action = $svcnum ? 'Edit' : 'Add';
my $svc = $part_svc->getfield('svc');
my $action = $svcnum ? 'Edit' : 'Add';
my $svc = $part_svc->getfield('svc');
@@
-163,7
+169,7
@@
if ( $part_svc->part_svc_column('domsvc')->columnflag eq 'F' ) {
}
my $cust_pkg = qsearchs('cust_pkg', { 'pkgnum' => $pkgnum } );
}
my $cust_pkg = qsearchs('cust_pkg', { 'pkgnum' => $pkgnum } );
- if ($cust_pkg) {
+ if ($cust_pkg
&& !$conf->exists('svc_acct-alldomains')
) {
my @cust_svc =
map { qsearch('cust_svc', { 'pkgnum' => $_->pkgnum } ) }
qsearch('cust_pkg', { 'custnum' => $cust_pkg->custnum } );
my @cust_svc =
map { qsearch('cust_svc', { 'pkgnum' => $_->pkgnum } ) }
qsearch('cust_pkg', { 'custnum' => $cust_pkg->custnum } );