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>