httemplate/view/cust_main/contacts.html

   1 % my %which = (
   2 %   ''      => emt('Billing'),
   3 %   'ship_' => emt('Service'),
   4 % );
   5 % foreach my $which ( '', 'ship_' ) {
   6 %   my $pre = $cust_main->get("${which}last") ? $which : '';
   7
   8 <% $which{$which} %> <% mt('address') |h %>
   9 <% ntable("#cccccc") %><TR><TD><% ntable("#cccccc",2) %>
  10 <TR>
  11   <TD ALIGN="right"><% mt('Contact name') |h %></TD>
  12   <TD COLSPAN=5 BGCOLOR="#ffffff">
  13     <% $cust_main->get("${pre}last"). ', '. $cust_main->get("${pre}first") |h %>
  14   </TD>
  15 % if ( $which eq '' && $conf->exists('show_ss') ) {
  16     <TD ALIGN="right"><% mt('SS#') |h %></TD>
  17     <TD BGCOLOR="#ffffff"><% $cust_main->masked('ss') || '&nbsp' %></TD>
  18 % }
  19 </TR>
  20 % if ( $conf->exists('cust-email-high-visibility') && $which eq '') {
  21 <TR>
  22   <TD ALIGN="right"><% mt('Email invoices') |h %></TD>
  23   <TD BGCOLOR="#ffff00">
  24     <% join(', ', grep { $_ !~ /^(POST|FAX)$/ } @invoicing_list ) || $no %>
  25   </TD>
  26 </TR>
  27 % }
  28 <TR>
  29   <TD ALIGN="right"><% mt('Company') |h %></TD>
  30   <TD COLSPAN=7 BGCOLOR="#ffffff"><% $cust_main->get("${pre}company") |h %></TD>
  31 </TR>
  32 <TR>
  33   <TD ALIGN="right"><% mt('Address') |h %></TD>
  34   <TD COLSPAN=7 BGCOLOR="#ffffff"><% $cust_main->get("${pre}address1") |h %></TD>
  35 </TR>
  36
  37 % if ( $cust_main->get("${pre}address2") ) {
  38 %   my $address2_label =
  39 %     ( $conf->exists('cust_main-require_address2')
  40 %       && ! ( $pre xor $cust_main->has_ship_address )
  41 %     )
  42 %       ? emt('Unit #')
  43 %       : ' ';
  44
  45   <TR>
  46     <TD ALIGN="right"><% $address2_label %></TD>
  47     <TD COLSPAN=7 BGCOLOR="#ffffff"><% $cust_main->get("${pre}address2") |h %></TD>
  48   </TR>
  49
  50 % }
  51
  52 <TR>
  53   <TD ALIGN="right"><% mt('City') |h %></TD>
  54   <TD BGCOLOR="#ffffff"><% $cust_main->get("${pre}city") |h %></TD>
  55 % if ( $cust_main->get("${pre}county") ) {
  56     <TD ALIGN="right"><% mt('County') |h %></TD>
  57     <TD BGCOLOR="#ffffff"><% $cust_main->get("${pre}county") |h %></TD>
  58 % }
  59   <TD ALIGN="right"><% mt('State') |h %></TD>
  60   <TD BGCOLOR="#ffffff"><% state_label( $cust_main->get("${pre}state"), $cust_main->get("${pre}country") ) |h %></TD>
  61   <TD ALIGN="right"><% mt('Zip') |h %></TD>
  62   <TD BGCOLOR="#ffffff"><% $cust_main->get("${pre}zip") %></TD>
  63 </TR>
  64 <TR>
  65   <TD ALIGN="right"><% mt('Country') |h %></TD>
  66   <TD BGCOLOR="#ffffff"><% code2country( $cust_main->get("${pre}country") ) %></TD>
  67 </TR>
  68
  69 % if ( $cust_main->get($pre.'latitude') && $cust_main->get($pre.'longitude') ) {
  70   <& /elements/tr-coords.html, $cust_main->get($pre.'latitude'),
  71                                $cust_main->get($pre.'longitude'),
  72                                $cust_main->name_short,
  73                                $cust_main->agentnum,
  74   &>
  75 % }
  76
  77 <TR>
  78   <TD ALIGN="right"><% $daytime_label %></TD>
  79   <TD COLSPAN=3 BGCOLOR="#ffffff">
  80     <& /elements/phonenumber.html,
  81                   $cust_main->get("${pre}daytime"),
  82                   'callable'=>1,
  83                   'calling_list_exempt'=>$cust_main->calling_list_exempt,
  84     &>
  85   </TD>
  86 </TR>
  87 <TR>
  88   <TD ALIGN="right"><% $night_label %></TD>
  89   <TD COLSPAN=3 BGCOLOR="#ffffff">
  90     <& /elements/phonenumber.html,
  91                   $cust_main->get("${pre}night"),
  92                   'callable'=>1,
  93                   'calling_list_exempt'=>$cust_main->calling_list_exempt,
  94     &>
  95   </TD>
  96 </TR>
  97 <TR>
  98   <TD ALIGN="right"><% $mobile_label %></TD>
  99   <TD COLSPAN=3 BGCOLOR="#ffffff">
 100     <& /elements/phonenumber.html,
 101                   $cust_main->get("${pre}mobile"),
 102                   'callable'=>1,
 103                   'calling_list_exempt'=>$cust_main->calling_list_exempt,
 104     &>
 105   </TD>
 106 </TR>
 107 <TR>
 108   <TD ALIGN="right"><% mt('Fax') |h %></TD>
 109   <TD COLSPAN=3 BGCOLOR="#ffffff">
 110     <% $cust_main->get("${pre}fax") || '&nbsp' %>
 111   </TD>
 112 </TR>
 113 % if ( $which eq '' && $conf->exists('show_stateid') ) {
 114   <TR>
 115     <TD ALIGN="right"><% $stateid_label %></TD>
 116     <TD BGCOLOR="#ffffff"><% $cust_main->masked('stateid') || '&nbsp' %></TD>
 117     <TD ALIGN="right"><% $stateid_state_label %></TD>
 118     <TD BGCOLOR="#ffffff"><% $cust_main->stateid_state || '&nbsp' %></TD>
 119   </TR>
 120 % }
 121 </TABLE></TD></TR></TABLE>
 122 % if ( $which ne 'ship_' ) {
 123 <BR>
 124 % }
 125 % }
 126 <& contacts_new.html, $cust_main &>
 127 <%once>
 128
 129 my $daytime_label = FS::Msgcat::_gettext('daytime') =~ /^(daytime)?$/
 130                       ? 'Day&nbsp;Phone'
 131                       : FS::Msgcat::_gettext('daytime');
 132 my $night_label   = FS::Msgcat::_gettext('night') =~ /^(night)?$/
 133                       ? 'Night&nbsp;Phone'
 134                       : FS::Msgcat::_gettext('night');
 135 my $mobile_label = FS::Msgcat::_gettext('mobile') =~ /^(mobile)?$/
 136                       ? 'Mobile&nbsp;Phone'
 137                       : FS::Msgcat::_gettext('Mobile');
 138
 139 my $stateid_label = FS::Msgcat::_gettext('stateid') =~ /^(stateid)?$/
 140                       ? 'Driver&rsquo;s&nbsp;License'
 141                       : FS::Msgcat::_gettext('stateid');
 142 my $stateid_state_label = FS::Msgcat::_gettext('stateid_state') =~ /^(stateid_state)?$/
 143                       ? 'Driver&rsquo;s&nbsp;License State'
 144                       : FS::Msgcat::_gettext('stateid_state');
 145
 146 </%once>
 147 <%init>
 148
 149 my( $cust_main ) = @_;
 150 my $conf = new FS::Conf;
 151 my @invoicing_list = $cust_main->invoicing_list;
 152 my $no = emt('no');
 153
 154 </%init>
 155