X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2F477.html;h=ecf21cfb115a235934bb5e985acac0b64e569cb6;hp=3e7888c4070354d8171e9f748ff76f58dee13bf6;hb=f7d5af6176a79d0afcd67ba8bdd5a64d6c6af330;hpb=2c193dace8bcfc3e2b75bf6b1d28cf04bc45e2a0

diff --git a/httemplate/search/477.html b/httemplate/search/477.html
index 3e7888c40..ecf21cfb1 100755
--- a/httemplate/search/477.html
+++ b/httemplate/search/477.html
@@ -1,4 +1,7 @@
 % if ( $type eq 'xml' ) {
+% $filename = "fcc_477_$state" . '_' . time2str('%Y%m%d', $date) . '.xml';
+% http_header('Content-Type' => 'application/XML' ); # So saith RFC 4180
+% http_header('Content-Disposition' => 'attachment;filename="'.$filename.'"');
 <?xml version="1.0" encoding="ISO-8859-1"?>
 <Form_477_submission xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:noNamespaceSchemaLocation="https://specialreports.fcc.gov/wcb/Form477/XMLSchema-instance/form_477_upload_Schema.xsd" >
 % } else { #html
@@ -64,6 +67,7 @@
 <& "477part${part}.html",
     'url' => $url,
     'date' => $date,
+    'filename' => $filename,
 &>
 %       if ( $type eq 'xml' ) {
 </<% 'Part_'. $part %>>
@@ -92,7 +96,7 @@ $state =~ /^[A-Z]{2}$/ or die "illegal state: $state";
 
 my %part = map { $_ => 1 } grep { /^\w+$/ } $cgi->param('part');
 my $type = $cgi->param('_type') || 'html';
-my $xlsname = '477report';
+my $filename;
 my @technology_option = &FS::Report::FCC_477::parse_technology_option($cgi,1);
 
 # save upload and download mappings