package IId6daad97137ce79d9e944273b07a28c7; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; use Zen::Config; use Zen::PerlHandler; use II7abdf80bcb08f6e77a72ea08c833b9b9; BEGIN{*IId6daad97137ce79d9e944273b07a28c7::IIlIIIllllIIIllI=\%{pack('H6','1f0f1e')^'ZAH'};*IId6daad97137ce79d9e944273b07a28c7::lIlIlIIlIIIIIIIl=\&{pack('H24','50333c286a6b2670062b4a65')^'=RUFPQUH1I2Q'};$IId6daad97137ce79d9e944273b07a28c7::IIIIlIIIIIIllIII=pack('H18','0f136b076b7c02686c')^'GG?W44M;8';$IId6daad97137ce79d9e944273b07a28c7::lIIlllllIIllllIl=pack('H12','0e7e07071d1a')^'D7IKTY'};sub fields    { qw/ country state / } BEGIN{*IId6daad97137ce79d9e944273b07a28c7::IIllIIlIIllIIlll=\%{pack('H6','141705')^'QYS'};*IId6daad97137ce79d9e944273b07a28c7::IIllIlIlIlIIlIII=\&{pack('H24','2c5c545d027d4c6a0b5e3b7f')^'A==38G?R<<CK'};$IId6daad97137ce79d9e944273b07a28c7::lIIIlllIIIIlIIlI=pack('H18','1f06051f1375731702')^'WRQOL=<DV';$IId6daad97137ce79d9e944273b07a28c7::IlIIIlllIIlIIIll=pack('H12','0f701b1b7c74')^'E9UW57'};sub required  { qw// } BEGIN{*IId6daad97137ce79d9e944273b07a28c7::llIIllIIllIllIII=\%{pack('H6','0f050c')^'JKZ'};*IId6daad97137ce79d9e944273b07a28c7::IllIIllIlllIIllI=\&{pack('H24','5d30292d6c05396c64373002')^'0Q@CV?JTSUH6'};$IId6daad97137ce79d9e944273b07a28c7::llIIIlIIlllllIIl=pack('H18','79136e68631f041905')^'1G:8<WKJQ';$IId6daad97137ce79d9e944273b07a28c7::lIIlIIlIlllIlIIl=pack('H12','7473761a7977')^'>:8V04'};sub namesResourcePrefix { 'field.geoforce' } __PACKAGE__->standardHandler($_, $_ => 'conflist(select,lists::countries::main,=,id="SelCountry")') for qw/country/; __PACKAGE__->standardHandler($_, $_ => 'dynamicStatesList(SelCountry,SelState)') for qw/state/; BEGIN{*IId6daad97137ce79d9e944273b07a28c7::llIlIIlllIlIlIll=\%{pack('H6','070b60')^'BE6'};*IId6daad97137ce79d9e944273b07a28c7::llIIIIlllIlIllll=\&{pack('H24','3936552b75723c6d62234a03')^'TW<EOHOUUA27'};$IId6daad97137ce79d9e944273b07a28c7::llIlIIIIllllIlIl=pack('H18','0666041c1e0709011f')^'N2PLAOFRK';$IId6daad97137ce79d9e944273b07a28c7::llllllllIlllllIl=pack('H12','7c0f061c717e')^'6FHP8='};sub getCountry { my $form = shift; my $object = $form->getDecorated; my $f = 'country'; return Zen::PerlHandler->get('II3562149e53818b6637b38680e87ba918::conflist::get(select,lists::countries::main,=,id="SelCountry")')->do($form, $f) unless $object->{country_resolved_by_ip}; my $country = Zen::Config->get('lists::countries')->{main}->{$object->{$f}}; qq(<b>$country</b>) . Zen::PerlHandler->get('II3562149e53818b6637b38680e87ba918::conflist::get(select,lists::countries::main,=,id="SelCountry" style="display:none")')->do($form, $f); } BEGIN{*IId6daad97137ce79d9e944273b07a28c7::IIlIlIIlIlIlIlll=\%{pack('H6','08030c')^'MMZ'};*IId6daad97137ce79d9e944273b07a28c7::IllIIIllIIIIIlII=\&{pack('H24','21332b28777739047730416e')^'LRBFMMJ<@R9Z'};$IId6daad97137ce79d9e944273b07a28c7::llIIIlllIlIlIIlI=pack('H18','7f1c19146173721201')^'7HMD>;=AU';$IId6daad97137ce79d9e944273b07a28c7::lllIllIlIIlIIIII=pack('H12','18720a700370')^'R;D<J3'};sub getState { my $form = shift; my $object = $form->getDecorated; my $f = 'state'; return Zen::PerlHandler->get('II3562149e53818b6637b38680e87ba918::dynamicStatesList::get(SelCountry,SelState)')->do($form, $f) unless $object->{state_resolved_by_ip}; my $state = Zen::Config->get('lists::states')->{main}->{$object->{$f}}; qq(<b>$state</b>); } 1; 