projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
show un-configured ikano products, RT#7111
[freeside.git]
/
httemplate
/
view
/
qual.cgi
diff --git
a/httemplate/view/qual.cgi
b/httemplate/view/qual.cgi
index
45f3d2a
..
a0768c3
100644
(file)
--- a/
httemplate/view/qual.cgi
+++ b/
httemplate/view/qual.cgi
@@
-16,7
+16,7
@@
<B>Qualification #<% $qual->qualnum %></B>
<% ntable("#cccccc", 2) %>
<% include('elements/tr.html', label => 'Status', value => $qual->status_long ) %>
<B>Qualification #<% $qual->qualnum %></B>
<% ntable("#cccccc", 2) %>
<% include('elements/tr.html', label => 'Status', value => $qual->status_long ) %>
-<% include('elements/tr.html', label => 'Service Telephone Number', value => $qual->phonenum ) %>
+<% include('elements/tr.html', label => 'Service Telephone Number', value => $qual->phonenum
|| '(none - dry loop)'
) %>
<% include('elements/tr.html', label => 'Address', value => $location_line ) %>
% if ( $location_kind ) {
<% include('elements/tr.html', label => 'Location Kind', value => $location_kind ) %>
<% include('elements/tr.html', label => 'Address', value => $location_line ) %>
% if ( $location_kind ) {
<% include('elements/tr.html', label => 'Location Kind', value => $location_kind ) %>
@@
-37,7
+37,7
@@
% my $pkglist = $qual_result->{'pkglist'};
% my $cust_or_prospect = $qual->cust_or_prospect;
% my $locationnum = '';
% my $pkglist = $qual_result->{'pkglist'};
% my $cust_or_prospect = $qual->cust_or_prospect;
% my $locationnum = '';
-% my %location = $qual->location;
+% my %location = $qual->location
_hash
;
% if (%location && $location{'locationnum'}) {
% $locationnum = $location{'locationnum'};
% }
% if (%location && $location{'locationnum'}) {
% $locationnum = $location{'locationnum'};
% }
@@
-63,6
+63,14
@@
% }
</UL>
% }
% }
</UL>
% }
+
+% my $not_avail = $qual_result->{'not_avail'};
+% if ( keys %$not_avail ) {
+ <BR>
+ Qualifying vendor packages (not yet configured in any package definition):
+ <% join(', ', map $not_avail->{$_}, keys %$not_avail ) |h %>
+% }
+
% }
<%init>
% }
<%init>
@@
-82,7
+90,7
@@
if ( $cgi->param('qualnum') ) {
my $qual = qsearchs('qual', { qualnum => $qualnum }) or die "invalid qualnum";
my $location_line = '';
my $qual = qsearchs('qual', { qualnum => $qualnum }) or die "invalid qualnum";
my $location_line = '';
-my %location_hash = $qual->location;
+my %location_hash = $qual->location
_hash
;
my $cust_location;
if ( %location_hash ) {
$cust_location = new FS::cust_location(\%location_hash);
my $cust_location;
if ( %location_hash ) {
$cust_location = new FS::cust_location(\%location_hash);