|
Lines 330-338
if ( $op eq "add" ) {
Link Here
|
| 330 |
# export a closed basketgroup in csv |
330 |
# export a closed basketgroup in csv |
| 331 |
# |
331 |
# |
| 332 |
my $basketgroupid = $input->param('basketgroupid'); |
332 |
my $basketgroupid = $input->param('basketgroupid'); |
|
|
333 |
my $basketgroup = GetBasketgroup($basketgroupid); |
| 333 |
print $input->header( |
334 |
print $input->header( |
| 334 |
-type => 'text/csv', |
335 |
-type => 'text/csv', |
| 335 |
-attachment => 'basketgroup' . $basketgroupid . '.csv', |
336 |
-attachment => ( $basketgroup->{name} || $basketgroupid ) . '.csv' |
| 336 |
); |
337 |
); |
| 337 |
print GetBasketGroupAsCSV( $basketgroupid, $input ); |
338 |
print GetBasketGroupAsCSV( $basketgroupid, $input ); |
| 338 |
exit; |
339 |
exit; |
| 339 |
- |
|
|