X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Femail-customer-statement.html;h=39c99e515a0b066d9646a21d2b4b8991409b831b;hb=b31719ae093ed10ceaaf0def79f8c3d3f0fb7c7e;hp=92ce1c4d108efee8a2b4511695cb23217319e6a8;hpb=4f5619288413a185e9933088d9dd8c5afbc55dfa;p=freeside.git

diff --git a/httemplate/misc/email-customer-statement.html b/httemplate/misc/email-customer-statement.html
index 92ce1c4d1..39c99e515 100644
--- a/httemplate/misc/email-customer-statement.html
+++ b/httemplate/misc/email-customer-statement.html
@@ -1,15 +1,12 @@
-
- <% include('email-customers.html',
-      'form_action'       => 'email-customer-statement.html',
-      'title'             => 'Send statement to customer',
-      'no_search_fields'  => [ 'start_date', 'end_date' ],
-      'alternate_form'    => $alternate_form,
-      'post_search_hook'  => $post_search_hook,
-      'acl'               => $acl,
-      'process_url'       => 'process/email-customer-statement.html',
-    )
- %>
-
+<& email-customers.html,
+     'form_action'       => 'email-customer-statement.html',
+     'title'             => 'Send statement to customer',
+     'no_search_fields'  => [ 'start_date', 'end_date' ],
+     'alternate_form'    => $alternate_form,
+     'post_search_hook'  => $post_search_hook,
+     'acl'               => $acl,
+     'process_url'       => 'process/email-customer-statement.html',
+&>
 <%init>
 
 my $acl = 'Resend invoices';
@@ -37,14 +34,14 @@ my $alternate_form = sub {
       qw( start_date end_date )
     ),
     '</TABLE>',
-    '<INPUT TYPE="hidden" NAME="action" VALUE="preview">',
+    '<INPUT TYPE="hidden" NAME="preview" VALUE="1">',
     '<INPUT TYPE="submit" VALUE="Preview notice">',
   );
 };
 
 my $post_search_hook = sub {
   my %opt = @_;
-  return unless $cgi->param('action') eq 'preview';
+  return unless $cgi->param('preview');
   my $cust_main = qsearchs('cust_main',$opt{'search'})
     or die "Could not find customer";
 
@@ -72,7 +69,7 @@ my $post_search_hook = sub {
     $summary_text
   );
 
-  $cgi->param('html_body',
+  $cgi->param('body',
     '<P>' .
     $opt{'conf'}->config('company_name') . 
     ' statement of charges and payments for ' .
@@ -82,7 +79,7 @@ my $post_search_hook = sub {
       'history' => [ 
         $cust_main->payment_history(
           map {
-            $_ => parse_datetime($cgi->param($_))
+            $_ => parse_datetime(scalar($cgi->param($_)))
           }
           qw( start_date end_date ),
         ),