- if ( $flag eq 'GNA' ) {
- $template->param( gna => 'true' );
- }
- elsif ( $flag eq 'LOST' ) {
- $template->param( lost => 'true' );
- }
- elsif ( $flag eq 'DBARRED' ) {
- $template->param( dbarred => 'true' );
- }
- elsif ( $flag eq 'CHARGES' ) {
- $template->param(
- charges => 'true',
- chargesmsg => $flags->{'CHARGES'}->{'message'},
- chargesamount => $flags->{'CHARGES'}->{'amount'},
- charges_is_blocker => 1
- );
- }
- elsif ( $flag eq 'CHARGES_GUARANTEES' ) {
- $template->param(
- charges_guarantees => 'true',
- chargesmsg_guarantees => $flags->{'CHARGES_GUARANTEES'}->{'message'},
- chargesamount_guarantees => $flags->{'CHARGES_GUARANTEES'}->{'amount'},
- charges_guarantees_is_blocker => 1
- );
- }
- elsif ( $flag eq 'CREDITS' ) {
- $template->param(
- credits => 'true',
- creditsmsg => $flags->{'CREDITS'}->{'message'},
- creditsamount => sprintf("%.02f", -($flags->{'CREDITS'}->{'amount'})), # from patron's pov
- );
- }