summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2004-10-22 10:31:22 +0000
committerivan <ivan>2004-10-22 10:31:22 +0000
commit589ac6e8730f2d814bc76d9c2f0482f459cd56b6 (patch)
treeecb55d9c509a0810a3bacdf8b123c85fbc62001c
parent62f11a61ae7c51b55d85cbeec5eac72cef545492 (diff)
add svc_external-skip_manual support to main customer view, for artera turbo
-rwxr-xr-xhttemplate/view/cust_main.cgi16
1 files changed, 13 insertions, 3 deletions
diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index 22c419102..0b51a875c 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -970,11 +970,21 @@ sub svc_label_link {
sub svc_provision_link {
my ($pkg, $svcpart, $conf) = @_;
( my $svc_nbsp = $svcpart->{svc} ) =~ s/\s+/&nbsp;/g;
- my $pkgnum_svcpart = "pkgnum$pkg->{pkgnum}-svcpart$svcpart->{svcpart}";
my $num_left = $svcpart->{quantity} - $svcpart->{count};
+ my $pkgnum_svcpart = "pkgnum$pkg->{pkgnum}-svcpart$svcpart->{svcpart}";
- my $link = qq!<A CLASS="provision" HREF="${p}edit/$svcpart->{svcdb}.cgi?!.
- qq!$pkgnum_svcpart">!.
+ my $url;
+ if ( $svcpart->{svcdb} eq 'svc_external'
+ && $conf->exists('svc_external-skip_manual')
+ ) {
+ $url = "${p}edit/process/$svcpart->{svcdb}.cgi?".
+ "pkgnum=$pkg->{pkgnum}&".
+ "svcpart=$svcpart->{svcpart}";
+ } else {
+ $url = "${p}edit/$svcpart->{svcdb}.cgi?$pkgnum_svcpart";
+ }
+
+ my $link = qq!<A CLASS="provision" HREF="$url">!.
"Provision&nbsp;$svc_nbsp&nbsp;($num_left)</A>";
if ( $conf->exists('legacy_link') ) {
$link .= '<BR>'.