[freeside-commits] freeside/httemplate/elements select-svc_acct-domain.html, NONE, 1.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/httemplate/elements
In directory wavetail.420.am:/tmp/cvs-serv10097

Added Files:
	select-svc_acct-domain.html 
Log Message:
add svc_phone on new customer first package, RT#4315

--- NEW FILE: select-svc_acct-domain.html ---
<SELECT NAME="domsvc" SIZE=1>
% foreach my $svcnum (
%                      sort { $svc_domain{$a} cmp $svc_domain{$b} }
%                      keys %svc_domain
%                    ) {
%   my $svc_domain = $svc_domain{$svcnum};
%   my $selected = ($svcnum == $domsvc) ? ' SELECTED' : ''

    <OPTION VALUE="<% $svcnum %>" <% $selected %>><% $svc_domain{$svcnum} %>

% } 

</SELECT>
<%init>

my %opt = @_;

my $domsvc = $opt{'curr_value'};
my $part_svc = $opt{'part_svc'}
               || qsearchs('part_svc', { 'svcpart' => $opt{'svcpart'} });

#optional
my $cust_pkg = $opt{'cust_pkg'};
$cust_pkg ||= qsearchs('cust_pkg', { 'pkgnum' => $opt{'pkgnum'} })
  if $opt{'pkgnum'};

my $pkgnum = $cust_pkg ? $cust_pkg->pkgnum : '';

my %svc_domain = ();

if ( $domsvc ) {
  my $svc_domain = qsearchs('svc_domain', { 'svcnum' => $domsvc } );
  if ( $svc_domain ) {
    $svc_domain{$svc_domain->svcnum} = $svc_domain;
  } else {
    warn "unknown svc_domain.svcnum for svc_acct.domsvc: $domsvc";
  }
}

%svc_domain = (
  %svc_domain,
  FS::svc_acct->domain_select_hash( 'svcpart' => $part_svc->svcpart,
                                    'pkgnum'  => $pkgnum,
                                  )
);
</%init>