1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
7 <META HTTP-Equiv="Cache-Control" Content="no-cache">
8 <META HTTP-Equiv="Pragma" Content="no-cache">
9 <META HTTP-Equiv="Expires" Content="0">
11 <% include('menu.html', 'freeside_baseurl' => $fsurl,
12 'position' => $menu_position,
16 <SCRIPT TYPE="text/javascript">
17 function clearhint_search_cust (what) {
18 if ( what.value == '(cust #, name, company or phone)' )
22 function clearhint_search_invoice (what) {
23 if ( what.value == '(inv #)' )
27 function clearhint_search_svc (what) {
28 if ( what.value == '(user, user@domain or domain)' )
32 function clearhint_search_ticket (what) {
33 if ( what.value == '(ticket # or subject string)' )
41 <BODY <% $menu_position eq 'left' ? qq( BACKGROUND="${fsurl}images/background-cheat.png" ) : ' BGCOLOR="#e8e8e8" ' %> <% $etc %> STYLE="margin-top:0; margin-bottom:0; margin-left:0; margin-right:0">
42 <table width="100%" CELLPADDING=0 CELLSPACING=0 STYLE="padding-left:0; padding-right:4">
44 <td rowspan=2 BGCOLOR="#ffffff"><IMG BORDER=0 ALT="freeside" SRC="<%$fsurl%>images/small-logo.png"></td>
45 <td align=left rowspan=2 BGCOLOR="#ffffff"> <!-- valign="top" -->
46 <font size=6><% $conf->config('company_name') || 'ExampleCo' %></font>
48 <td align=right valign=top BGCOLOR="#ffffff"><FONT SIZE="-1">Logged in as <b><% getotaker %> </b><br></FONT><FONT SIZE="-2"><a href="<%$fsurl%>pref/pref.html">Preferences</a> <BR></FONT>
52 <td align=right valign=bottom BGCOLOR="#ffffff">
56 <td align=right BGCOLOR="#ffffff">
58 <A HREF="http://www.sisd.com/freeside">Freeside</A> v<% $FS::VERSION %><BR>
59 <A HREF="<% $conf->config('support-key') ? "http://www.sisd.com/mediawiki/index.php/Supported:Documentation" : "http://www.sisd.com/mediawiki/index.php/Freeside:1.7:Documentation" %>">Documentation</A><BR>
62 % if ( $conf->config('ticket_system') eq 'RT_Internal' ) {
65 <td bgcolor=#000000></td>
68 <A HREF="http://www.bestpractical.com/rt">RT<A> v<% $RT::VERSION %><BR>
69 <A HREF="http://wiki.bestpractical.com/">Documentation</A><BR>
82 <style type="text/css">
84 background-color:#333333;
87 border-top-color:#cccccc;
88 border-left-color:#cccccc;
89 border-right-color:#aaaaaa;
90 border-bottom-color:#aaaaaa;
95 filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=0,StartColorStr='#ff333333',EndColorStr='#ff666666')
98 input.fsblackbuttonselected {
99 background-color:#7e0079;
102 border-top-color:#cccccc;
103 border-left-color:#cccccc;
104 border-right-color:#aaaaaa;
105 border-bottom-color:#aaaaaa;
110 filter:progid:DXImageTransform.Microsoft.Gradient(GradientType=0,StartColorStr='#ff330033',EndColorStr='#ff7e0079')
114 <TABLE WIDTH="100%" CELLSPACING=0 CELLPADDING=0>
116 <TD COLSPAN=5 WIDTH="100%" STYLE="padding:0"><IMG BORDER=0 ALT="" SRC="<%$fsurl%>images/black-gradient.png" HEIGHT="13" WIDTH="100%"></TD>
119 % if ( $menu_position eq 'top' ) {
123 <TD COLSPAN="5" WIDTH="100%" STYLE="padding:0">
124 <SCRIPT TYPE="text/javascript">
125 document.write(myBar);
132 <TD COLSPAN="5" WIDTH="100%" HEIGHT="2px" STYLE="padding:0" BGCOLOR="#000000">
137 <TD COLSPAN="5" WIDTH="100%" HEIGHT="4px" STYLE="padding:0" BGCOLOR="#000000">
145 <TD COLSPAN=1 BGCOLOR="#000000" ALIGN="right">
146 <FORM ACTION="<%$fsurl%>edit/cust_main.cgi" METHOD="GET" STYLE="margin:0">
147 <INPUT TYPE="submit" VALUE="New customer" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="vertical-align:bottom">
151 <TD COLSPAN=1 BGCOLOR="#000000" ALIGN="right">
152 <FORM ACTION="<%$fsurl%>search/cust_main.cgi" METHOD="GET" STYLE="margin:0">
153 <INPUT NAME="search_cust" TYPE="text" VALUE="(cust #, name, company or phone)" SIZE="28" onFocus="clearhint_search_cust(this);" onClick="clearhint_search_cust(this);" STYLE="vertical-align:bottom;text-align:right"><BR>
154 <A NOTYET="<%$fsurl%>search/cust_main.html" STYLE="color: #000000; font-size: 70%">Advanced</A>
155 <INPUT TYPE="submit" VALUE="Search customers" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%">
159 <TD COLSPAN=1 BGCOLOR="#000000" ALIGN="right">
160 % if ( $FS::CurrentUser::CurrentUser->access_right('View invoices') ) {
162 <FORM ACTION="<%$fsurl%>search/cust_bill.html" METHOD="GET" STYLE="margin:0;display:inline">
163 <INPUT NAME="invnum" TYPE="text" VALUE="(inv #)" SIZE="4" onFocus="clearhint_search_invoice(this);" onClick="clearhint_search_invoice(this);" STYLE="vertical-align:bottom;text-align:right;margin-bottom:1px">
164 % if ( $FS::CurrentUser::CurrentUser->access_right('List invoices') ) {
166 <A HREF="<%$fsurl%>search/report_cust_bill.html" STYLE="color: #ffffff; font-size: 70%">Advanced</A>
170 <INPUT TYPE="submit" VALUE="Search invoices" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%">
176 <TD COLSPAN=1 BGCOLOR="#000000" ALIGN="right">
177 <FORM ACTION="<%$fsurl%>search/cust_svc.html" METHOD="GET" STYLE="margin:0">
178 <INPUT NAME="search_svc" TYPE="text" VALUE="(user, user@domain or domain)" SIZE="26" onFocus="clearhint_search_svc(this);" onClick="clearhint_search_svc(this);" STYLE="vertical-align:bottom;text-align:right"><BR>
179 <A NOTYET="<%$fsurl%>search/svc_Smarter.html" STYLE="color: #000000; font-size: 70%">Advanced</A>
180 <INPUT TYPE="submit" VALUE="Search services" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%">
184 <TD COLSPAN=1 BGCOLOR="#000000" ALIGN="right" STYLE="padding-right:4px">
185 % if ( $conf->config("ticket_system") ) {
186 <FORM ACTION="<% FS::TicketSystem->baseurl %>index.html" METHOD="GET" STYLE="margin:0">
187 <INPUT NAME="q" TYPE="text" VALUE="(ticket # or subject string)" onFocus="clearhint_search_ticket(this);" onClick="clearhint_search_ticket(this);" STYLE="vertical-align:bottom;text-align:right"><BR>
188 <A HREF="<% FS::TicketSystem->baseurl %>Search/Build.html" STYLE="color: #ffffff; font-size: 70%">Advanced</A>
189 <INPUT TYPE="submit" VALUE="Search tickets" CLASS="fsblackbutton" onMouseOver="this.className='fsblackbuttonselected'; return true;" onMouseOut="this.className='fsblackbutton'; return true;" STYLE="font-size:70%;padding-left:2px;padding-right:2px">
197 <TABLE WIDTH="100%" HEIGHT="100%" CELLSPACING=0 CELLPADDING=4>
201 % if ( $menu_position eq 'left' ) {
203 <TD BGCOLOR="#000000" STYLE="padding:0" WIDTH="154"></TD>
204 <TD STYLE="padding:0" WIDTH="13"><IMG BORDER=0 ALT="" SRC="<%$fsurl%>images/black-gray-corner.png"></TD>
208 <TD STYLE="padding:0" WIDTH="100%"><IMG BORDER=0 ALT="" SRC="<%$fsurl%>images/black-gray-top.png" HEIGHT="13" WIDTH="100%"></TD>
214 % if ( $menu_position eq 'left' ) {
216 <TD BGCOLOR="#000000" ALIGN="left" HEIGHT="100%" WIDTH="154" VALIGN="top" ALIGN="right">
217 <SCRIPT TYPE="text/javascript">
218 document.write(myBar);
221 <IMG SRC="<%$fsurl%>images/32clear.gif" HEIGHT="1" WIDTH="154">
224 <TD STYLE="padding:0" HEIGHT="100%" WIDTH=13 VALIGN="top"><IMG WIDTH="13" HEIGHT="100%" BORDER=0 ALT="" SRC="<%$fsurl%>images/black-gray-side.png"></TD>
228 <TD BGCOLOR="#e8e8e8" HEIGHT="100%" VALIGN="top"> <!-- WIDTH="100%"> -->
235 <% $menubar !~ /^\s*$/ ? "$menubar<BR><BR>" : '' %>
238 my($title, $menubar) = ( shift, shift );
239 my $etc = @_ ? shift : ''; #$etc is for things like onLoad= etc.
240 my $head = @_ ? shift : ''; #$head is for things that go in the <HEAD> section
241 my $conf = new FS::Conf;
243 my $menu_position = $FS::CurrentUser::CurrentUser->option('menu_position')