X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_main%2Ffirst_pkg%2Fselect-part_pkg.html;h=4f8914065046cdfe2e88755cf2569de7f4db88cb;hp=d2d862bea9e6b1573e8c4b81ee29ace972ca3c46;hb=3564f619654c5cbf22fc2acbe7eff0c08308e859;hpb=04a69f9d197efee6fa396bd35d04ae553e669978 diff --git a/httemplate/edit/cust_main/first_pkg/select-part_pkg.html b/httemplate/edit/cust_main/first_pkg/select-part_pkg.html index d2d862bea..4f8914065 100644 --- a/httemplate/edit/cust_main/first_pkg/select-part_pkg.html +++ b/httemplate/edit/cust_main/first_pkg/select-part_pkg.html @@ -1,14 +1,14 @@ -<% include('/elements/xmlhttp.html', - 'url' => $p.'misc/svc_acct-domains.cgi', +<& /elements/xmlhttp.html, + 'url' => $url_prefix.'misc/svc_acct-domains.cgi', 'subs' => [ $opt{'prefix'}. 'get_domains' ], - ) -%> +&> -<% include('/elements/xmlhttp.html', - 'url' => $p.'misc/part_svc-columns.cgi', +<& /elements/xmlhttp.html, + 'url' => $url_prefix.'misc/part_svc-columns.cgi', 'subs' => [ $opt{'prefix'}. 'get_part_svc' ], - ) -%> +&> + + -<% include( '/elements/selectlayers.html', +<& /elements/selectlayers.html, 'field' => $opt{'prefix'}. 'pkgpart_svcpart', 'curr_value' => $opt{pkgpart_svcpart}, 'options' => \@options, 'labels' => \%labels, 'html_between' => '', - #'onchange' => $opt{'prefix'}. 'pkgpart_svcpart_changed(this,0);', 'onchange' => $opt{'prefix'}. 'pkgpart_svcpart_changed_too(what,0)', - 'layer_callback' => $layer_callback, 'layermap' => \%layermap, - ) -%> +&> @@ -124,9 +125,10 @@ foreach my $opt (qw( svc_part pkgparts saved_pkgpart saved_domsvc prefix)) { } $opt{saved_domsvc} = 0 unless $opt{saved_domsvc}; -my @part_pkg = @{$opt{'part_pkg'}}; +my $url_prefix = $opt{'relurls'} ? '' : $p; -my @first_svc = ( 'svc_acct', 'svc_phone' ); +my @part_pkg = @{ $opt{'part_pkg'} }; +my @first_svc = @{ $opt{'first_svc'} || [] }; my %pkgpart_svcpart = (); my %svcdb = (); @@ -139,21 +141,19 @@ foreach my $part_pkg ( @part_pkg ) { $layermap{$pkgpart_svcpart} = $svcdb{$pkgpart}; } -my @options = ( '', map $pkgpart_svcpart{ $_->pkgpart }, @part_pkg ); -my %labels = ( '' => '(none)', +my @options = (); +push @options, '' unless $opt{'disable_empty'}; +push @options, map $pkgpart_svcpart{ $_->pkgpart }, @part_pkg; +my %labels = ( '' => ( $opt{'empty_label'} || '(none)' ), map { $pkgpart_svcpart{ $_->pkgpart } => $_->pkg_comment } @part_pkg ); my $layer_callback = sub { my $layer = shift; - #$layer_fields, $layer_values, $layer_prefix - -# my( $pkgpart, $svcpart ) = split('_', $layer); -# my $svcdb = $svcdb{$pkgpart}; my $svcdb = $layer; - return '' unless $svcdb; #'




' + return '' unless $svcdb; #full path cause we're being slung around as a coderef (mason closures?) include("/edit/cust_main/first_pkg/$svcdb.html", %opt, );