%doc> Example: include( '/elements/header.html', { 'title' => 'Title', 'menubar' => \@menubar, 'etc' => '', #included in
tag, for things like onLoad= 'head' => '', #included before closing tag 'nobr' => 0, #1 for no<% $company_name || 'ExampleCo' %> | Logged in as <% getotaker %> logout Preferences % if ( $conf->config("ticket_system") % && FS::TicketSystem->access_right(\%session, 'ModifySelf') ) { | Ticketing preferences % } |
% if ( $curuser->access_right('List prospects') ) { % } | % if ( $curuser->access_right('List customers') ) { % } | % if ( $conf->exists('address2-search') ) { % } | % if ( $curuser->access_right('View invoices') ) { % } | % if ( $curuser->access_right('View customer services') ) { % } | % if ( $conf->config("ticket_system") ) { % } |
% } |
<% $title |h %>
% unless ( $nobr ) {
% } <% $menubar !~ /^\s*$/ ? "$menubar " : '' %> <%init> my( $title, $menubar, $etc, $head ) = ( '', '', '', '' ); my( $nobr, $nocss ) = ( 0, 0 ); if ( ref($_[0]) ) { my $opt = shift; $title = $opt->{title}; $menubar = $opt->{menubar}; $etc = $opt->{etc}; $head = $opt->{head}; $nobr = $opt->{nobr}; $nocss = $opt->{nocss}; } else { ($title, $menubar) = ( shift, shift ); $etc = @_ ? shift : ''; #$etc is for things like onLoad= etc. $head = @_ ? shift : ''; #$head is for things that go in the section } my $conf = new FS::Conf; my $curuser = $FS::CurrentUser::CurrentUser; my $menu_position = $curuser->option('menu_position') || 'top'; #new default for 1.9 my $company_name; my @agentnums = $curuser->agentnums; if ( scalar(@agentnums) == 1 ) { $company_name = $conf->config('company_name', $agentnums[0] ); } else { $company_name = $conf->config('company_name'); } my $prospect_label = '(name, company or phone)'; my $cust_width = 246; my $cust_label = '(cust #, name, company'; if ( $conf->exists('address1-search') ) { $cust_label .= ', address'; $cust_width += 56; } $cust_label .= ' or contact phone)'; my $address2_label = '(Unit #)'; my $inv_label = '(inv #)'; my $svc_label = '(user, email, ip, mac, domain or service phone)'; my $ticketing_label = '(ticket #, subject, email or fulltext:text)'; %init> |