package II4776e7a52d2b3da132cb7e9e2d4ed2b4; use strict 'vars'; use base qw/II674e2407e107271bcc76478050bc636a/; BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIlIIllIIIlIIIIl=\%{pack('H6','7f0c11')^':BG'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIlIIIlIlIlIllIl=\&{pack('H24','27313f5b62034a7f7f55300b')^'JPV5X99GH7H?'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IllIlIIIIIIIllll=pack('H18','7e030366061d0c0907')^'6WW6YUCZS';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIlIIIlllIIIlIl=pack('H12','191b0c7c1871')^'SRB0Q2'};sub dbTable     { 'jin_form_editor' } BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::IIllIIIIlllIllIl=\%{pack('H6','1d0162')^'XO4'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::IllIllIllIIIIlll=\&{pack('H24','5d535c51030121610332347a')^'025?9;RY4PLN'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IlIIllIIIlllIlII=pack('H18','7117166218107a6d6b')^'9CB2GX5>?';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::llllIlIlIllIIlII=pack('H12','7610080e7215')^'<YFB;V'};sub dbFields    { qw/code obj_id data/ } BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::IlIlIlllllllIlIl=\%{pack('H6','067462')^'C:4'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIIlIIIllllIlI=\&{pack('H24','555a232f69023f6007242f0c')^'8;JAS8LX0FW8'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IlllIIllllIllIll=pack('H18','1c151e656402000402')^'TAJ5;JOWV';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IIlIlIlIIllIllII=pack('H12','7d097d00060d')^'7@3LON'};sub defaultViewClass { II674e2407e107271bcc76478050bc636a::llIlIIllIIIlIIlI($II674e2407e107271bcc76478050bc636a::lllIllllIlIIIlII{$II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIllIIlIIIlIlI},762,$II674e2407e107271bcc76478050bc636a::lllIllllIlIIIlII{$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IllIIIIlIlIIIlll}) } BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::IlIllIIIllIIIlll=\%{pack('H6','027717')^'G9A'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIlllIIllIlllI=\&{pack('H24','3f3557257d782a767e203607')^'RT>KGBYNIBN3'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIllIIlIIIlIlI=pack('H18','000c601c0b75191e10')^'HX4LT=VMD';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IIlIIIllIIIlIlll=pack('H12','7d0d79090d0a')^'7D7EDI'};sub getForUse { my $class = shift; my ($code, $obj_id) = @_; return $class->getGlobal($code) unless II674e2407e107271bcc76478050bc636a::IIlllIllIIIIllIl($II674e2407e107271bcc76478050bc636a::IIlllIlIllIIIIll{$II4776e7a52d2b3da132cb7e9e2d4ed2b4::llllllIllIlIIIII},47,$II674e2407e107271bcc76478050bc636a::IIlllIlIllIIIIll{$II674e2407e107271bcc76478050bc636a::llIlIIlIIlIIIIlI})->getAdmin->getPrivs->{master_tools_forms}; $class->getCustom($code, $obj_id) || $class->getGlobal($code); } BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIIllIIllIlIII=\%{pack('H6','737410')^'6:F'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::llllIllIIIIllIll=\&{pack('H24','54395a29010f45090c354d63')^'9X3G;561;W5W'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::llIIIIIllIIIllIl=pack('H18','1f6d1d041079041a1f')^'W9ITO1KIK';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIIIIIIllIIlII=pack('H12','70070a190b7e')^':NDUB='};sub getCustom { my $class = shift; my ($code, $obj_id) = @_; $class->search(obj_id => $obj_id, code => $code)->[0]; } BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::IlIIllIIIIllIlll=\%{pack('H6','100211')^'ULG'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lllllIIIllllllIl=\&{pack('H24','34233a2c68023d6202534e67')^'YBSBR8NZ516S'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIlIIlIIllIIllII=pack('H18','1d061c120d1e046c6e')^'URHBRVK?:';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IlIllIlllIIIlIll=pack('H12','041904021c1b')^'NPJNUX'};sub getGlobal { my $class = shift; my $code = shift; my $form = $class->search(obj_id => 0, code => $code)->[0]; unless ($form) { my %codes = map { $_ => 1 } split(',', $class->cfg->{main}{Forms}); die "unregistered form code [$code]" unless $codes{$code}; $form = $class->get->set(code => $code)->save; } $form; } BEGIN{*II4776e7a52d2b3da132cb7e9e2d4ed2b4::lIIIlIlIlIlIlIlI=\%{pack('H6','0d7c0e')^'H2X'};*II4776e7a52d2b3da132cb7e9e2d4ed2b4::IllIllIIIIllllII=\&{pack('H24','2b37552d0d6c397d09233970')^'FV<C7VJE>AAD'};$II4776e7a52d2b3da132cb7e9e2d4ed2b4::llllllIllIlIIIII=pack('H18','191165116e707e6f12')^'QE1A181<F';$II4776e7a52d2b3da132cb7e9e2d4ed2b4::IllIIIIlIlIIIlll=pack('H12','760a0c05717a')^'<CBI89'};sub autocreateAllGlobal { my $class = shift; my %forms = map { $_->{code} => $_ } $class->SUPER::search(obj_id => 0); for my $code (split ',', $class->cfg->{main}{Forms}) { next if $forms{$code}; $class->get->set(code => $code)->save; } return; } 1; 