$n = 0;
my %layer_fields = (
'charged' => [
- 'percent' => { label => 'Fraction of invoice total', type => 'percentage', },
+ 'charged_percent' => { label => 'Fraction of invoice total', type => 'percentage', },
],
'owed' => [
- 'percent' => { label => 'Fraction of balance', type => 'percentage', },
+ 'owed_percent' => { label => 'Fraction of balance', type => 'percentage', },
],
'usage' => [
'usage' => { type => 'part_fee_usage' }
'recur' => 'a recurring charge' },
},
- { type => 'justtitle', value => 'Fee calculation' },
+ { type => 'tablebreak-tr-title', value => 'Fee calculation' },
{ field => 'amount', type => 'money', },
{ field => 'basis',
layer_values_callback => sub {
my ($cgi, $obj) = @_;
{
- 'charged' => { percent => $obj->percent },
- 'owed' => { percent => $obj->percent },
+ 'charged' => { charged_percent => $obj->percent },
+ 'owed' => { owed_percent => $obj->percent },
'usage' => { usage => [ $obj->part_fee_usage ] },
}
},
type => 'checkbox',
value => 'Y' },
- { type => 'justtitle', value => 'Taxation' },
+ { type => 'tablebreak-tr-title', value => 'Taxation' },
@tax_fields,
);