From 93810e2d18325d6f3b56cb3738d4400af69e6908 Mon Sep 17 00:00:00 2001
From: jeff <jeff>
Date: Mon, 19 May 2008 04:07:45 +0000
Subject: backport voip_cdr's upstream_simple, and the columnization features

---
 httemplate/misc/cdr-import.html | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

(limited to 'httemplate/misc')

diff --git a/httemplate/misc/cdr-import.html b/httemplate/misc/cdr-import.html
index 60f619e81..b71a3e365 100644
--- a/httemplate/misc/cdr-import.html
+++ b/httemplate/misc/cdr-import.html
@@ -1,11 +1,13 @@
 <% 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">
-<OPTION VALUE="asterisk">Asterisk</OPTION>
-<OPTION VALUE="unitel">Unitel/RSLCOM</OPTION>
-<OPTION VALUE="simple">Simple</OPTION>
-</SELECT><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>
 
@@ -19,4 +21,6 @@ Filename: <INPUT TYPE="file" NAME="csvfile"><BR><BR>
 die "access denied"
   unless $FS::CurrentUser::CurrentUser->access_right('Import');
 
+tie my %formats, 'Tie::IxHash', FS::cdr->import_formats;
+
 </%init>
-- 
cgit v1.2.1