httemplate/edit/cust_main/name.html

   1 <%def .namepart>
   2 % my ($field, $value, $label, $extra) = @_;
   3 <DIV STYLE="display: inline-block">
   4   <INPUT TYPE="text" NAME="<% $field %>" VALUE="<% $value |h %>" <%$extra%>>
   5   <BR><FONT SIZE=-1><% mt($label) %></FONT>
   6 </DIV>
   7 </%def>
   8
   9 <TR>
  10   <TD CLASS="required label"><% mt('Contact name') |h %></TD>
  11   <TD COLSPAN=6 STYLE="vertical-align:top">
  12         <& .namepart, 'last', $cust_main->last, 'Last', ',' &>
  13         <& .namepart, 'first', $cust_main->first, 'First' &>
  14 % if ( $conf->exists('show_ss') ) {
  15         &nbsp;
  16         <& .namepart, 'ss', $ss, 'SS#', "SIZE=11" &>
  17 % } else  {
  18         <INPUT TYPE="hidden" NAME="ss" VALUE="<% $ss %>">
  19 % }
  20   </TD>
  21 </TR>
  22 % if ( $conf->exists('cust_main-enable_spouse') ) {
  23 <TR ID="spouse_row">
  24   <TD CLASS="label"><% mt('Spouse\'s name') |h %></TD>
  25   <TD COLSPAN=6>
  26         <& .namepart, 'spouse_last', $cust_main->spouse_last, 'Last', ',' &>
  27         <& .namepart, 'spouse_first', $cust_main->spouse_first, 'First' &>
  28   </TD>
  29 </TR>
  30 % }
  31
  32 % if ( $conf->exists('cust-email-high-visibility') ) {
  33 <TR>
  34   <TD ALIGN="right" CLASS="
  35     <% $conf->exists('cust_main-require_invoicing_list_email', $agentnum)
  36         ? 'required label'
  37         : 'label' %>">Email address(es)
  38   </TD>
  39   <TD BGCOLOR="#FFFF00">
  40     <SPAN STYLE="width: 200px">
  41     <INPUT TYPE="text" NAME="invoicing_list"
  42            VALUE="<% $cust_main->invoicing_list_emailonly_scalar %>">
  43     </SPAN>
  44   </TD>
  45   <TD COLSPAN="5">
  46     <INPUT TYPE="checkbox" NAME="message_noemail" VALUE="Y" <%
  47         ( $cust_main->message_noemail eq 'Y' )
  48           ? 'CHECKED'
  49           : ''
  50         %>> <% emt('Do not send notices') %>
  51   </TD>
  52
  53 </TR>
  54 % }
  55 <%init>
  56 my $cust_main = shift;
  57 my $agentnum = $cust_main->agentnum if $cust_main->custnum;
  58 my $conf = FS::Conf->new;
  59 my $ss;
  60
  61 if ( $cgi->param('error') or $conf->exists('unmask_ss') ) {
  62   $ss = $cust_main->ss;
  63 } else {
  64   $ss = $cust_main->masked('ss');
  65 }
  66 </%init>