X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=htetc%2Fglobal.asa;h=3781f947d16a5782c412eefd9fc53349c2423ceb;hp=94a103081b9d2dc1fc2693860ee1d5ea8845f44c;hb=c2146ae32fdef80049abfa13098db2d45f3ebdd5;hpb=fc4e4c29f657b9aa01180a91f461a0342a8c7be2 diff --git a/htetc/global.asa b/htetc/global.asa index 94a103081..3781f947d 100644 --- a/htetc/global.asa +++ b/htetc/global.asa @@ -10,15 +10,19 @@ use CGI 2.47; use Date::Format; use Date::Parse; use Time::Local; +use Time::Duration; use Tie::IxHash; use HTML::Entities; use IO::Handle; use IO::File; +use IO::Scalar; use Net::Whois::Raw qw(whois); if ( $] < 5.006 ) { eval "use Net::Whois::Raw 0.32 qw(whois)"; die $@ if $@; } +use Text::CSV_XS; +use Spreadsheet::WriteExcel; use Business::CreditCard; use String::Approx qw(amatch); use Chart::LinesPoints; @@ -29,6 +33,7 @@ use FS::Record qw(qsearch qsearchs fields dbdef); use FS::Conf; use FS::CGI qw(header menubar popurl table itable ntable idiot eidiot small_custview myexit http_header); +use FS::UI::Web; use FS::Msgcat qw(gettext geterror); use FS::Misc qw( send_email ); use FS::Report::Table::Monthly;