summaryrefslogtreecommitdiff
path: root/httemplate/edit
diff options
context:
space:
mode:
authorivan <ivan>2010-03-12 21:29:04 +0000
committerivan <ivan>2010-03-12 21:29:04 +0000
commitf433b4f187e484e8c40bdcebbeb5a5d51b3ae38e (patch)
tree6597ace03fadaa451eaceca9c986e40ebfe6bcc8 /httemplate/edit
parent02348fb69ac302f117ca8b510b68871eff25d4c6 (diff)
finishing e911/svc_phone location, RT#7047
Diffstat (limited to 'httemplate/edit')
-rw-r--r--httemplate/edit/elements/svc_Common.html5
-rw-r--r--httemplate/edit/process/svc_phone.html19
-rw-r--r--httemplate/edit/svc_phone.cgi3
3 files changed, 27 insertions, 0 deletions
diff --git a/httemplate/edit/elements/svc_Common.html b/httemplate/edit/elements/svc_Common.html
index 1cb1659f4..36950b2c9 100644
--- a/httemplate/edit/elements/svc_Common.html
+++ b/httemplate/edit/elements/svc_Common.html
@@ -101,6 +101,11 @@
};
}
+ if ( $f->{'field'} eq 'custnum' && $pkgnum ) {
+ my $cust_pkg = qsearchs('cust_pkg', {'pkgnum' => $pkgnum});
+ $object->set('custnum', $cust_pkg->custnum);
+ }
+
},
'html_init' => sub {
diff --git a/httemplate/edit/process/svc_phone.html b/httemplate/edit/process/svc_phone.html
index 27a703cdf..e02ec5ccc 100644
--- a/httemplate/edit/process/svc_phone.html
+++ b/httemplate/edit/process/svc_phone.html
@@ -1,5 +1,6 @@
<% include( 'elements/svc_Common.html',
'table' => 'svc_phone',
+ 'args_callback' => $args_callback,
)
%>
<%init>
@@ -7,4 +8,22 @@
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
+my $args_callback = sub {
+ my( $cgi, $object ) = @_;
+
+ my %opt = ();
+ if ( $cgi->param('locationnum') == -1 ) {
+ my $cust_location = new FS::cust_location {
+ map { $_ => scalar($cgi->param($_)) }
+ qw( custnum address1 address2 city county state zip country )
+ };
+ $opt{'cust_location'} = $cust_location;
+ }
+
+ %opt;
+
+};
+
+
+
</%init>
diff --git a/httemplate/edit/svc_phone.cgi b/httemplate/edit/svc_phone.cgi
index 779708b4e..4715ec146 100644
--- a/httemplate/edit/svc_phone.cgi
+++ b/httemplate/edit/svc_phone.cgi
@@ -62,10 +62,13 @@ push @fields, { field => 'pbxsvc',
my $cust_pkg = qsearchs('cust_pkg', {'pkgnum' => $pkgnum});
my $cust_main = $cust_pkg ? $cust_pkg->cust_main : '';
( 'no_bold' => 1,
+ 'cust_pkg' => $cust_pkg,
'cust_main' => $cust_main,
);
},
},
+ { field => 'custnum', type=> 'hidden' }, #for new cust_locations
;
+
</%init>