ngcp-panel/lib/NGCP/Panel/Form/Balance/CustomerBalanceAPI.pm

package NGCP::Panel::Form::Balance::CustomerBalanceAPI;

use HTML::FormHandler::Moose;
extends 'NGCP::Panel::Form::Balance::CustomerBalance';
use Moose::Util::TypeConstraints;

has_field 'cash_debit' => (
    type => 'Money',
    #label => 'Cash Balance (Interval)',
    #required => 1,
    element_attr => {
        rel => ['tooltip'],
        title => ['The amount spent during the current interval in EUR/USD/etc (read-only).'],
    },
);

has_field 'free_time_spent' => (
    type => 'Integer',
    #label => 'Free-Time Balance',
    #required => 1,
    element_attr => {
        rel => ['tooltip'],
        title => ['The free-time spent during the current interval in seconds (read-only).'],
    },
);

has_field 'ratio' => (
    type => 'Float',
    required => 0,
    #precision => 6,
    #decimal_symbol => '.',
    element_attr => {
        rel => ['tooltip'],
        title => ['The ratio to reduce free cash/time in the initial balance period (month), when the customer was created. Readonly.'],
    },
);

has_block 'fields' => (
    tag => 'div',
    class => [qw/modal-body/],
    render_list => [qw/cash_balance cash_debit free_time_balance free_time_spent ratio/],
);

1;

=head1 NAME

NGCP::Panel::Form::Balance::CustomerBalanceAPI

=head1 DESCRIPTION



=head1 METHODS

=head1 AUTHOR

Gerhard Jungwirth

=head1 LICENSE

This library is free software. You can redistribute it and/or modify
it under the same terms as Perl itself.

=cut

# vim: set tabstop=4 expandtab: