-tr-select-cust_location.html and elements/location.html: optionally support alternate address format and

optional address
-nearly finished qualifications, RT7111

2 files changed, 21 insertions, 0 deletions

diff --git a/httemplate/view/cust_main/packages.html b/httemplate/view/cust_main/packages.html
index 660d0ef86..04c47aa3e 100755
--- a/httemplate/view/cust_main/packages.html
+++ b/httemplate/view/cust_main/packages.html
@@ -1,4 +1,9 @@
 % my $s = 0;
+
+% # XXX: add qual access right
+  <% $s++ ? ' | ' : '' %>
+  <% include('qual_link.html', $cust_main) %>
+
 % if ( $curuser->access_right('Order customer package') ) { 
   <% $s++ ? ' | ' : '' %>
   <% include('order_pkg_link.html', $cust_main) %>
diff --git a/httemplate/view/cust_main/qual_link.html b/httemplate/view/cust_main/qual_link.html
new file mode 100644
index 000000000..077142c0a
--- /dev/null
+++ b/httemplate/view/cust_main/qual_link.html
@@ -0,0 +1,16 @@
+<% include( '/elements/popup_link-cust_main.html',
+              'action'      => $p. 'misc/qual.html',
+              'label'       => 'Service&nbsp;Qualification',
+              'actionlabel' => 'Service Qualification',
+              'color'       => '#333399',
+              'cust_main'   => $cust_main,
+              'closetext'   => 'Close',
+              'width'       => 763,
+              'height'      => 436,
+          )
+%>
+<%init>
+
+my($cust_main) = @_;
+
+</%init>