Optimize "Customer has a referring customer" condition, RT#74452
[freeside.git] / httemplate / misc / process / cust_credit-import.cgi
1 <% $server->process %>
2 <%init>
3
4 die "access denied"
5   unless $FS::CurrentUser::CurrentUser->access_right('Import');
6
7 my %arg = $cgi->param('arg');
8 $arg{_date} = parse_datetime( $arg{_date} )
9   if $arg{_date} && $arg{_date} =~ /\D/;
10 $cgi->param('arg', %arg );
11
12 my $server =
13   new FS::UI::Web::JSRPC 'FS::cust_credit::process_batch_import', $cgi;
14
15 </%init>