From eb061f5119325e666f0dff40d4089e5c1df58e17 Mon Sep 17 00:00:00 2001 From: cvs2git Date: Sun, 16 Mar 2008 19:58:34 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'TRIXBOX_2_6'. --- httemplate/view/cust_main/notes.html | 93 ------------------------------------ 1 file changed, 93 deletions(-) delete mode 100755 httemplate/view/cust_main/notes.html (limited to 'httemplate/view/cust_main/notes.html') diff --git a/httemplate/view/cust_main/notes.html b/httemplate/view/cust_main/notes.html deleted file mode 100755 index f2d116930..000000000 --- a/httemplate/view/cust_main/notes.html +++ /dev/null @@ -1,93 +0,0 @@ -% -% my $conf = new FS::Conf; -% my $curuser = $FS::CurrentUser::CurrentUser; -% -% $cgi->param('custnum') =~ /^(\d+)$/ -% or die "No customer specified (bad URL)!"; -% my $custnum = $1; -% -% my $cust_main = qsearchs('cust_main', {'custnum' => $custnum} ); -% die "Custimer not found!" unless $cust_main; -% - - - -% my (@notes) = $cust_main->notes(); -% if ( scalar(@notes) ) { - - - - - - - - -% my $bgcolor1 = '#eeeeee'; -% my $bgcolor2 = '#ffffff'; -% my $bgcolor = ''; -% -% foreach my $note (@notes) { -% -% if ( $bgcolor eq $bgcolor1 ) { -% $bgcolor = $bgcolor2; -% } else { -% $bgcolor = $bgcolor1; -% } -% -% my $pop = popurl(3); -% my $notenum = $note->notenum; -% my $clickjs = qq!onclick="overlib( OLiframeContent('${pop}edit/! . -% qq!cust_main_note.cgi?custnum=$custnum&! . -% qq!notenum=$notenum', 616, ! . -% qq!386, 'cust_main_note_popup' ), CAPTION, 'Edit customer ! . -% qq!note', STICKY, AUTOSTATUSCAP, MIDX, 0, MIDY, 0, ! . -% qq!CLOSECLICK, FRAME, top); return false;"!; -% -% my ($el, $eel); -% if ($curuser->access_right('Edit customer note') ) { -% $el = qq!!; -% $eel = qq!!; -% }else{ -% $el = $eel = ''; -% } - - - <% note_datestr($note,$conf,$bgcolor, $el, $eel) %> - - - - -% } #end display notes - -
- <% $el %>  <%$note->otaker%>  <% $eel %> - -  <%$note->comments%> -
- -% } -% -%#subroutines -% -%sub note_datestr { -% my($note, $conf, $bgcolor, $el, $eel) = @_ or return ''; -% my $format=qq{$el%b$eel}. -% qq{$el %o,$eel}. -% qq{$el %Y $eel}; -% $format .= qq{$el %l$eel}. -% qq{$el:$eel}. -% qq{$el%M$eel}. -% qq{$el %P $eel} -% if $conf->exists('cust_main_note-display_times'); -% ( my $strip = time2str($format, $note->_date) ) =~ s/ (\d)/$1/g; -% $strip; -% } -% - -- cgit v1.2.1