X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fcdr-import.html;h=05d0bbc3c05ab92141d835e7ce5f2dc6ae4d2713;hp=b466078697b500549d1946d9e49488e7b3148d94;hb=ff27c3f36240aee48ed50153dd5d8fe3ac3f2443;hpb=b60afb3800213aa1c6a4aed9d4bb995c628c6011

diff --git a/httemplate/misc/cdr-import.html b/httemplate/misc/cdr-import.html
index b46607869..05d0bbc3c 100644
--- a/httemplate/misc/cdr-import.html
+++ b/httemplate/misc/cdr-import.html
@@ -1,17 +1,50 @@
 <% include("/elements/header.html",'Call Detail Record Import') %>
-<FORM ACTION="process/cdr-import.html" METHOD="POST" ENCTYPE="multipart/form-data">
-Import a CSV file containing Call Detail Records (CDRs).<BR><BR>
-CDR Format:
-<SELECT NAME="format">
-% foreach my $format ( keys %formats ) {
-    <OPTION VALUE="<% $format %>"><% $formats{$format} %></OPTION>
-% }
-</SELECT>
-<BR><BR>
-
-Filename: <INPUT TYPE="file" NAME="csvfile"><BR><BR>
-
-<INPUT TYPE="submit" VALUE="Upload">
+  
+<& /elements/form-file_upload.html,
+     'name'      => 'CDRImportForm',
+     'action'    => 'process/cdr-import.html',
+     'num_files' => 1,
+     'fields'    => [ 'format', 'cdrbatch', ],
+     'message'   => 'CDR import successful',
+     'url'       => $p."search/cdr.html?cdrbatch=$cdrbatch",
+     'onsubmit'  => "document.CDRImportForm.submitButton.disabled=true;",
+&>
+
+Import a file containing Call Detail Records (CDRs).<BR><BR>
+
+<INPUT TYPE="hidden" NAME="cdrbatch" VALUE="<% $cdrbatch %>"%>
+
+<% ntable('#cccccc', 2) %>
+
+  <TR>
+    <TD>CDR Format</TD>
+    <TD>
+      <SELECT NAME="format">
+%       foreach my $format ( keys %formats ) {
+         <OPTION VALUE="<% $format %>"><% $formats{$format} %></OPTION>
+%       }
+      </SELECT>
+    </TD>
+  </TR>
+
+  <% include( '/elements/file-upload.html',
+                'field' => 'file',
+                'label' => 'Filename',
+            )
+  %>
+
+  <TR>
+    <TD COLSPAN=2 ALIGN="center" STYLE="padding-top:6px">
+      <INPUT TYPE    = "submit"
+             ID      = "submitButton"
+             NAME    = "submitButton"
+             VALUE   = "Import file"
+      >
+    </TD>
+  </TR>
+
+</TABLE>
+
 </FORM>
 
 <% include('/elements/footer.html') %>
@@ -23,4 +56,6 @@ die "access denied"
 
 tie my %formats, 'Tie::IxHash', FS::cdr->import_formats;
 
+my $cdrbatch = time2str('webimport-%Y/%m/%d-%T'. "-$$-". rand() * 2**32, time);
+
 </%init>