<%args>
$records => undef
</%args>
<%init>
my $credits = int($records/100) + 1;
$credits-- if (($records % 100)==0);
return ($credits);
</%init>
