4 my ($batchnum, $format) = $cgi->param('arg');
7 if ( $batchnum =~ /^(\d+)$/ ) {
8 my $pay_batch = FS::pay_batch->by_key($batchnum);
9 if ( $pay_batch and $format =~ /^(\w+)$/ ) {
10 my $class = "FS::pay_batch::$format";
11 if ( $class->can('download_note') ) {
12 # now we can actually do something
13 $note = $class->download_note($pay_batch);