[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