httemplate/elements/header-cust_main.html

   1 <%doc>
   2
   3 Examples:
   4
   5   <& /elements/header-cust_main.html,
   6        view      => 'Basics', #required
   7        cust_main => $cust_main, # cust_main or custnum is required
   8        custnum   => $custnum,   #
   9   &>
  10
  11 </%doc>
  12 <& /elements/header.html, {
  13              'title' => $title,
  14              'title_noescape' => $title_noescape,
  15              'nobr'  => 1,
  16           }
  17 &>
  18
  19 % my @part_tag = $cust_main->part_tag;
  20 % if ( $conf->config('cust_tag-location') eq 'top' && @part_tag ) {
  21 <TABLE STYLE="margin-bottom:8px" CELLSPACING=2>
  22 %   foreach my $part_tag ( @part_tag ) {
  23 <TR>
  24   <TD>
  25       <FONT SIZE="+1"
  26             <% length($part_tag->tagcolor)
  27                  ? 'STYLE="background-color:#'.$part_tag->tagcolor.'"'
  28                  : ''
  29       %>><% $part_tag->tagname.': '. $part_tag->tagdesc |h %></FONT>
  30   </TD>
  31 </TR>
  32 %   }
  33 </TABLE>
  34 % }
  35
  36 <& /view/cust_main/menu.html, cust_main => $cust_main, show => $opt{'view'} &>
  37 <BR>
  38
  39 <DIV CLASS="fstabcontainer">
  40
  41 <& /elements/init_overlib.html &>
  42
  43 <SCRIPT TYPE="text/javascript">
  44 function areyousure(href, message) {
  45   if (confirm(message) == true)
  46     window.location.href = href;
  47 }
  48 function areyousure_popup(message, action, actionlabel) {
  49   if (confirm(message) == true) {
  50 <% include('/elements/popup_link_onclick.html',
  51      'js_action' => 'action',
  52      'js_actionlabel' => 'actionlabel',
  53    ) %>
  54   }
  55 }
  56 </SCRIPT>
  57
  58 <br>
  59 <%init>
  60
  61 my $curuser = $FS::CurrentUser::CurrentUser;
  62
  63 my $conf = new FS::Conf;
  64
  65 my %opt = @_;
  66
  67 my $cust_main = $opt{'cust_main'} || qsearchs( {
  68   'table'     => 'cust_main',
  69   'hashref'   => { 'custnum' => $opt{'custnum'} },
  70   'extra_sql' => ' AND '. $curuser->agentnums_sql,
  71 });
  72 die "Customer not found!" unless $cust_main;
  73
  74 my $title = mt("Customer").' #'. $cust_main->display_custnum. ': ';
  75 my $title_noescape = $title. encode_entities($cust_main->name);
  76 $title .= $cust_main->name;
  77
  78 if ( $curuser->num_agents ) {
  79   $title_noescape =
  80     encode_entities($cust_main->agent->agent). " $title_noescape";
  81   $title = $cust_main->agent->agent. " $title";
  82 }
  83
  84 my $status = $cust_main->status_label;
  85 $status .= ' (Cancelled)' if $cust_main->is_status_delay_cancel;
  86 $title_noescape .= ' (<B><FONT COLOR="#'. $cust_main->statuscolor. '">'. $status.  '</FONT></B>)';
  87 $title .= " ($status)";
  88
  89 </%init>