package II71e19d6bfa5e4dd25d3ce57939bfe40c; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; use II63f393aac595fc3ddeed72ddda115c6f; use IIc7a1102a58c38cc35c941ca362362583; BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::IlIIllIlIllIIIII=\%{pack('H6','160a19')^'SDO'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::lIlIIlIIIIllllll=\&{pack('H24','532a282f0c7f347663314b6d')^'>KAA6EGNTS3Y'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIlIlllllllIlll=pack('H18','7b030c6418737a050d')^'3WX4G;5VY';$II71e19d6bfa5e4dd25d3ce57939bfe40c::llIIIlIlIIlIIlIl=pack('H12','1b7516787404')^'Q<X4=G'};sub fields    { II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIllIlIIllIIIII($II71e19d6bfa5e4dd25d3ce57939bfe40c::IIlIllIllIIIlIIl{$II63f393aac595fc3ddeed72ddda115c6f::IIlIlIIllllIllIl},906,$II71e19d6bfa5e4dd25d3ce57939bfe40c::IIlIllIllIIIlIIl{$IIc7a1102a58c38cc35c941ca362362583::llIIlIIllIlIllll})->listFields } BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::IIllIIlIllllIlll=\%{pack('H6','71021b')^'4LM'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIllIlIIllIIIII=\&{pack('H24','2a2729200e77306a64252160')^'GF@N4MCRSGYT'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::lIIllIllIllIlIll=pack('H18','726a161c1b0b16691c')^':>BLDCY:H';$II71e19d6bfa5e4dd25d3ce57939bfe40c::lllIIIIlIIIIIIll=pack('H12','0406727c0378')^'NO<0J;'};sub required  { qw// } BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIIlllIIlIIIIIl=\%{pack('H6','04750e')^'A;X'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::lIllIlllIlIllIlI=\&{pack('H24','522a273a7a7e2a030f3a3879')^'?KNT@DY;8X@M'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::IllIIIIlIlIlllll=pack('H18','07070168660e0f1f11')^'OSU89F@LE';$II71e19d6bfa5e4dd25d3ce57939bfe40c::llllIIlIllIIlIll=pack('H12','0a1801780205')^'@QO4KF'};sub namesResourcePrefix { 'field.commission' } __PACKAGE__->standardHandler($_, $_ => 'view') for fields(); BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::IlllIIIllIIlIllI=\%{pack('H6','131b14')^'VUB'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::IIlIIIIlIllllIll=\&{pack('H24','2a5f5c347b6d3a0b77223f61')^'G>5ZAWI3@@GU'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIIIIlIIllIlIII=pack('H18','0d191066061d171e15')^'EMD6YUXMA';$II71e19d6bfa5e4dd25d3ce57939bfe40c::IllllIIlIIllIlII=pack('H12','1f781c727c0f')^'U1R>5L'};sub _form_get_commission { my ($this, $f) = @_; my $object = $this->getDecorated; my $pfx = $this->pfx; my $msgTier1 = __PACKAGE__->message('commission.form.tier1'); my $msgTier2 = __PACKAGE__->message('commission.form.tier2'); my $msgIrreducible = __PACKAGE__->message('commission.form.irreducible'); my ($ts, $irr) = split ':', $object->{$f}; my ($t1, $t2) = split '/', $ts; $irr = "checked" if $irr; return <<END;
<input type="hidden" name="$pfx$f" value="">
<table>
<tr>
<td class=atkEditorLeft>$msgTier1</td> <td class=atkEditorLeft>$msgTier2</td>
</tr>
<tr>
<td><input type="text" size="5" name="$pfx${f}1" value="$t1"></td> <td><input type="text" size="5" name="$pfx${f}2" value="$t2"></td>
</tr>
<tr>
<td colspan="2" class=atkEditorLeft><input type="checkbox" name="$pfx${f}_irr" value="1" $irr> $msgIrreducible</td>
</tr>
</table>
END
} BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::lIIIIlllllIlIIll=\%{pack('H6','73091c')^'6GJ'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::llIllIIlllIIIIll=\&{pack('H24','385c5e36786e3f69705c3866')^'U=7XBTLQG>@R'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::lIIIlIIIIlIlllII=pack('H18','7714111205101e6714')^'?@EBZXQ4@';$II71e19d6bfa5e4dd25d3ce57939bfe40c::IIlllIIllIllllIl=pack('H12','1d7c18020978')^'W5VN@;'};sub _form_set_commission { my ($this, $f, $v) = @_; my $in = $this->getInput; my $object = $this->getDecorated; my $t1 = $in->{$this->pfx . $f . '1'}; my $t2 = $in->{$this->pfx . $f . '2'}; for ($t1, $t2) { $this->addError(__PACKAGE__->message('commission.form.error.invalid_commission', $_)) if $_ && $_ !~ /^\d+(?:\.\d\d?)?\%?$/; } $object->{$f} = join '/', $t1, $t2; $object->{$f} =~ s|/+$||; $object->{$f} .= ":i" if $object->{$f} && $in->{$this->pfx . $f . '_irr'}; return; } BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::IIlIllIllIIIlIIl=\%{pack('H6','701d64')^'5S2'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::llllllIlIllIIIll=\&{pack('H24','56515e266c6c2377605e4b79')^';07HVVPOW<3M'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::lIIlIIIlIlIlIIIl=pack('H18','1a6b681f0c77061f61')^'R?<OS?IL5';$II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIIIlIIIllIIlIl=pack('H12','1c7e141b7912')^'V7ZW0Q'};sub _form_get_commission_1tier { my ($this, $f, $options) = @_; my $object = $this->getDecorated; my $pfx = $this->pfx; my $msgIrreducible = __PACKAGE__->message('commission.form.irreducible'); my ($v, $irr) = split ':', $object->{$f}; $irr = "checked" if $irr; return qq(<input type="text" size="5" name="$pfx$f" value="$v" class="form-control">) . ($options && $options->{no_irr} ? '' : qq(<div class="custom-control custom-checkbox"><input id="chbox_irr" type="checkbox" name="$pfx${f}_irr" value="1" $irr><label for="chbox_irr" class="custom-control-label">$msgIrreducible</label></div>)); } BEGIN{*II71e19d6bfa5e4dd25d3ce57939bfe40c::IlIlIlllIIIllIIl=\%{pack('H6','08771e')^'M9H'};*II71e19d6bfa5e4dd25d3ce57939bfe40c::IlIIllIlllllIllI=\&{pack('H24','2434512f7107297366202d61')^'IU8AK=ZKQBUU'};$II71e19d6bfa5e4dd25d3ce57939bfe40c::IIIIIllIIlIlIlIl=pack('H18','1f6a1808610e0f650e')^'W>LX>F@6Z';$II71e19d6bfa5e4dd25d3ce57939bfe40c::IlIIllIlIIIIIIII=pack('H12','10741a1f097d')^'Z=TS@>'};sub _form_set_commission_1tier { my ($this, $f, $v) = @_; my $in = $this->getInput; my $object = $this->getDecorated; $this->addError(__PACKAGE__->message('commission.form.error.invalid_commission', $v)) if $v && $v !~ /^\d+(?:\.\d\d?)?\%?$/; $object->{$f} = $v; $object->{$f} .= ":i" if $object->{$f} && $in->{$this->pfx . $f . '_irr'}; return; } 1; 