From 7efc882e67c25728c07990e852a590cbddfc1dc6 Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 14 Jul 2008 23:08:36 +0000 Subject: [PATCH] fuck embedded iframes and their stupid display problems with scrolling. also make the gridding more consistent --- httemplate/edit/process/cust_main_note.cgi | 8 +-- httemplate/view/cust_main.cgi | 14 +--- httemplate/view/cust_main/notes.html | 111 +++++++++++++---------------- 3 files changed, 53 insertions(+), 80 deletions(-) diff --git a/httemplate/edit/process/cust_main_note.cgi b/httemplate/edit/process/cust_main_note.cgi index 9689ca6d6..5127c72d1 100755 --- a/httemplate/edit/process/cust_main_note.cgi +++ b/httemplate/edit/process/cust_main_note.cgi @@ -2,17 +2,11 @@ % $cgi->param('error', $error); <% $cgi->redirect(popurl(2). 'cust_main_note.cgi?'. $cgi->query_string ) %> %} else { -% <% header('Note ' . ($notenum ? 'updated' : 'added') ) %> -% % } <%init> diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi index 63df35ad1..2231d4148 100755 --- a/httemplate/view/cust_main.cgi +++ b/httemplate/view/cust_main.cgi @@ -111,19 +111,7 @@ Comments
-% if ($notecount) { - - - -% }else{ # make firefox happy wrt POSTDATA - - - -% } +<% include('cust_main/notes.html', 'custnum' => $cust_main->custnum ) %> % } diff --git a/httemplate/view/cust_main/notes.html b/httemplate/view/cust_main/notes.html index ed50c58c2..4c97c9f64 100755 --- a/httemplate/view/cust_main/notes.html +++ b/httemplate/view/cust_main/notes.html @@ -1,36 +1,21 @@ -% -% 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; -% - - + <% include("/elements/table-grid.html") %> -% my (@notes) = $cust_main->notes(); -% if ( scalar(@notes) ) { + + Date + Time + Person + Note + -<% include('/elements/init_overlib.html') %> - - - -% my $bgcolor1 = '#eeeeee'; -% my $bgcolor2 = '#ffffff'; -% my $bgcolor = ''; +% my $bgcolor1 = '#eeeeee'; +% my $bgcolor2 = '#ffffff'; +% my $bgcolor = ''; % -% foreach my $note (@notes) { +% foreach my $note (@notes) { % % if ( $bgcolor eq $bgcolor1 ) { % $bgcolor = $bgcolor2; @@ -41,7 +26,7 @@ body { background: #e8e8e8 } % my $pop = popurl(3); % my $notenum = $note->notenum; % my $onclick = include( '/elements/popup_link_onclick.html', -% 'action' => popurl(3). +% 'action' => popurl(2). % 'edit/cust_main_note.cgi'. % "?custnum=$custnum". % ";notenum=$notenum", @@ -52,44 +37,50 @@ body { background: #e8e8e8 } % ); % my $clickjs = qq!onclick="$onclick"!; % -% my ($el, $eel); +% my $edit = ''; % if ($curuser->access_right('Edit customer note') ) { -% $el = qq!!; -% $eel = qq!!; -% }else{ -% $el = $eel = ''; +% $edit = qq! (edit)!; % } - - <% note_datestr($note,$conf,$bgcolor, $el, $eel) %> - - - + + <% note_datestr($note,$conf,$bgcolor) %> + + + % } #end display notes
- <% $el %>  <%$note->otaker%>  <% $eel %> - -  <%$note->comments%> -
+  <% $note->otaker%> + +  <%$note->comments%><% $edit %> +
-% } -% -%#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; % } -% +<%init> + +my $conf = new FS::Conf; +my $curuser = $FS::CurrentUser::CurrentUser; + +my(%opt) = @_; + +my $custnum = $opt{'custnum'}; + +my $cust_main = qsearchs('cust_main', {'custnum' => $custnum} ); +die "Custimer not found!" unless $cust_main; + +my (@notes) = $cust_main->notes(); + +#subroutines + +sub note_datestr { + my($note, $conf, $bgcolor) = @_ or return ''; + my $td = ''; + my $format = "$td%b %o, %Y"; + $format .= "$td%l:%M%P" + if $conf->exists('cust_main_note-display_times'); + ( my $strip = time2str($format, $note->_date) ) =~ s/ (\d)/$1/g; + $strip; +} + -- 2.11.0