From a8aacbc2ef8cc36bcdae327be7d0f59a1b1f3666 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Thu, 14 Aug 2014 19:42:39 -0700 Subject: adjust EFT Canada processing delay based on time of day, and warn the user, #20384 --- httemplate/misc/xmlhttp-pay_batch-note.html | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 httemplate/misc/xmlhttp-pay_batch-note.html (limited to 'httemplate/misc/xmlhttp-pay_batch-note.html') diff --git a/httemplate/misc/xmlhttp-pay_batch-note.html b/httemplate/misc/xmlhttp-pay_batch-note.html new file mode 100644 index 000000000..ef5901631 --- /dev/null +++ b/httemplate/misc/xmlhttp-pay_batch-note.html @@ -0,0 +1,18 @@ +<% $note %>\ +<%init> + +my ($batchnum, $format) = $cgi->param('arg'); + +my $note = ''; +if ( $batchnum =~ /^(\d+)$/ ) { + my $pay_batch = FS::pay_batch->by_key($batchnum); + if ( $pay_batch and $format =~ /^(\w+)$/ ) { + my $class = "FS::pay_batch::$format"; + if ( $class->can('download_note') ) { + # now we can actually do something + $note = $class->download_note($pay_batch); + } + } +} + + -- cgit v1.2.1