ngcp-panel/lib/NGCP/Panel/Form/Intercept/Create.pm

package NGCP::Panel::Form::Intercept::Create;

use HTML::FormHandler::Moose;
extends 'HTML::FormHandler';

has_field 'LIID' => (
    type => 'PosInteger',
    label => 'LIID',
    required => 1,
);

has_field 'number' => (
    type => 'Text',
    label => 'number',
    required => 1,
);

has_field 'cc_required' => (
    type => 'PosInteger',
    label => 'cc_required',
    range_start => 0,
    range_end => 1,
    required => 1,
);

has_field 'iri_delivery' => (
    type => 'Compound',
    label => 'iri_delivery',
    required => 1,
    validate_when_empty => 1,
);

has_field 'iri_delivery.host' => (
    type => 'Text',
    label => 'iri_delivery.host',
    required => 1,
);

has_field 'iri_delivery.port' => (
    type => 'PosInteger',
    label => 'iri_delivery.port',
    required => 1,
    range_start => 1,
    range_end => 65535,
);

has_field 'iri_delivery.username' => (
    type => 'Text',
    label => 'iri_delivery.username',
    required => 0,
);

has_field 'iri_delivery.password' => (
    type => 'Text',
    label => 'iri_delivery.password',
    required => 0,
);

has_field 'cc_delivery' => (
    type => 'Compound',
    required => 0,
    validate_when_empty => 0,
);

has_field 'cc_delivery.host' => (
    type => 'Text',
    label => 'cc_delivery.host',
    required => 1,
);

has_field 'cc_delivery.port' => (
    type => 'PosInteger',
    label => 'cc_delivery.port',
    required => 1,
    range_start => 1,
    range_end => 65535,
);


sub valprint {
    my($self, $field) = @_;
    my $c = $field->form->ctx;

    $c->log->info("validating " . $field->name . "=" . $field->value);
}

1;
# vim: set tabstop=4 expandtab: