[freeside-commits] freeside/httemplate/misc/process cdr-import.html, 1.6, 1.7

Ivan,,, ivan at wavetail.420.am
Tue Dec 30 19:28:59 PST 2008


Update of /home/cvs/cvsroot/freeside/httemplate/misc/process
In directory wavetail.420.am:/tmp/cvs-serv28551/httemplate/misc/process

Modified Files:
	cdr-import.html 
Log Message:
bell west CDR format, RT#4403

Index: cdr-import.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/process/cdr-import.html,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- cdr-import.html	7 Oct 2008 23:57:43 -0000	1.6
+++ cdr-import.html	31 Dec 2008 03:28:57 -0000	1.7
@@ -1,23 +1,9 @@
-% if ( $error ) {
-%   errorpage($error);
-% } else {
-    <% include("/elements/header.html",'Import successful') %>
-    <!-- XXX redirect to batch search like the payment entry... -->
-    <% include("/elements/footer.html",'Import successful') %> 
-% }
+<% $server->process %>
 <%init>
 
 die "access denied"
   unless $FS::CurrentUser::CurrentUser->access_right('Import');
 
-my $fh = $cgi->upload('csvfile');
-
-my $error = defined($fh)
-  ? FS::cdr::batch_import( {
-      'filehandle' => $fh,
-      'format'     => scalar($cgi->param('format')),
-      'cdrbatch'   => scalar($cgi->param('cdrbatch')),
-    } )
-  : 'No file';
+my $server = new FS::UI::Web::JSRPC 'FS::cdr::process_batch_import', $cgi;
 
 </%init>



More information about the freeside-commits mailing list