Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git] / httemplate / misc / cdr-import.html
1 <% include("/elements/header.html",'Call Detail Record Import') %>
2   
3 <& /elements/form-file_upload.html,
4      'name'      => 'CDRImportForm',
5      'action'    => 'process/cdr-import.html',
6      'num_files' => 1,
7      'fields'    => [ 'format', 'cdrbatch', ],
8      'message'   => 'CDR import successful',
9      'url'       => $p."search/cdr.html?cdrbatch=$cdrbatch",
10      'onsubmit'  => "document.CDRImportForm.submitButton.disabled=true;",
11 &>
12
13 Import a file containing Call Detail Records (CDRs).<BR><BR>
14
15 <INPUT TYPE="hidden" NAME="cdrbatch" VALUE="<% $cdrbatch %>"%>
16
17 <% ntable('#cccccc', 2) %>
18
19   <TR>
20     <TD>CDR Format</TD>
21     <TD>
22       <SELECT NAME="format">
23 %       foreach my $format ( keys %formats ) {
24          <OPTION VALUE="<% $format %>"><% $formats{$format} %></OPTION>
25 %       }
26       </SELECT>
27     </TD>
28   </TR>
29
30   <% include( '/elements/file-upload.html',
31                 'field' => 'file',
32                 'label' => 'Filename',
33             )
34   %>
35
36   <TR>
37     <TD COLSPAN=2 ALIGN="center" STYLE="padding-top:6px">
38       <INPUT TYPE    = "submit"
39              ID      = "submitButton"
40              NAME    = "submitButton"
41              VALUE   = "Import file"
42       >
43     </TD>
44   </TR>
45
46 </TABLE>
47
48 </FORM>
49
50 <% include('/elements/footer.html') %>
51
52 <%init>
53
54 die "access denied"
55   unless $FS::CurrentUser::CurrentUser->access_right('Import');
56
57 tie my %formats, 'Tie::IxHash', FS::cdr->import_formats;
58
59 my $cdrbatch = time2str('webimport-%Y/%m/%d-%T'. "-$$-". rand() * 2**32, time);
60
61 </%init>