package II1791b2caffa288056b7fd904963f21c7; use strict 'vars'; use base qw/II720d6e18aa34327713eb014408fc9144/; use II4212c07ddfb1652c969722f1a6817994; use IIb39071a48a82a07eeb9256f406abebc5; use IIa67e09caf104f2e50322b7bc59b766fb; BEGIN{*II1791b2caffa288056b7fd904963f21c7::llllIIIlllIIlIIl=\%{pack('H6','101916')^'UW@'};*II1791b2caffa288056b7fd904963f21c7::IIIlIIIIIIllllll=\&{pack('H24','5e332c3e087a4a787c373a73')^'3REP2@9@KUBG'};$II1791b2caffa288056b7fd904963f21c7::IIlllIlIIIlIIIIl=pack('H18','7b146f626c710b036b')^'3@;239DP?';$II1791b2caffa288056b7fd904963f21c7::IllllIIIlIIIllII=pack('H12','130316037772')^'YJXO>1'};sub mnt { my $class = shift; my $C = shift; my $in = $C->{INPUT}; return if $in->{system_templates_mode}; my $tmpl_code = $C->{ThemeTmplCode} or die "ThemeTmplCode not defined"; my $dbc = IIa67e09caf104f2e50322b7bc59b766fb::llllIllIllIllIlI($IIa67e09caf104f2e50322b7bc59b766fb::IllIlIIllIIIlIlI{$IIb39071a48a82a07eeb9256f406abebc5::lIIIlIllllIIlIll},994,$IIa67e09caf104f2e50322b7bc59b766fb::IllIlIIllIIIlIlI{$II4212c07ddfb1652c969722f1a6817994::IIIIIllIIIIlIIll})->get; my $pack_id; if ($in->{pack_id} + 0) { $pack_id = $in->{pack_id}; } elsif ($in->{order_id} + 0) { $pack_id = $dbc->getValue("select pack_id from jin_order where id=?", [$in->{order_id}]); } elsif ($in->{sale_id} + 0) { $pack_id = $dbc->getValue("select pack_id from jin_sale where id=?", [$in->{sale_id}]); } my $where_theme = $pack_id ? "(theme='package$pack_id' or precedence=0) order by precedence desc" : "precedence=0"; my @q = ("select * from jin_theme_compiled where tmpl_code=? and $where_theme limit 1", [$tmpl_code]); $C->{ThemeCurYear} = IIb39071a48a82a07eeb9256f406abebc5::IIlIIIlIIlIIIlIl($IIb39071a48a82a07eeb9256f406abebc5::llIIlIIlIIlIllII{$IIa67e09caf104f2e50322b7bc59b766fb::lIIllIIIIIIllllI},1010,$IIb39071a48a82a07eeb9256f406abebc5::llIIlIIlIIlIllII{$IIb39071a48a82a07eeb9256f406abebc5::lllllIllIllIIllI})->new()->format('%Y'); if (my $t = $dbc->getRecord(@q)) { $C->{ThemeHTMLHead} = $t->{html_head_comp}; $C->{ThemeBodyAttr} = $t->{body_attr}; $C->{ThemeTemplate} = $t->{template_comp}; if ($t->{custom_packed}) { my $arr = II720d6e18aa34327713eb014408fc9144::llllllIlIIIIllll($IIa67e09caf104f2e50322b7bc59b766fb::IlIlllIllIIIIlIl{$II4212c07ddfb1652c969722f1a6817994::lIllIIllllIIIlII},1004,$IIa67e09caf104f2e50322b7bc59b766fb::IlIlllIllIIIIlIl{$IIb39071a48a82a07eeb9256f406abebc5::IIlIllIIlIIIlIIl})->extrArray($t->{custom_packed}); my %h; for (my $i = 0; $i < @$arr; $i += 2) { $h{$arr->[$i]} = { @{ IIb39071a48a82a07eeb9256f406abebc5::lIIlIIIlllllllII($IIa67e09caf104f2e50322b7bc59b766fb::lllIIIIllIlllIII{$II4212c07ddfb1652c969722f1a6817994::lIIlIlIIIIllIllI},1004,$IIa67e09caf104f2e50322b7bc59b766fb::lllIIIIllIlllIII{$IIb39071a48a82a07eeb9256f406abebc5::lllllIllIllIIllI})->extrArray($arr->[$i+1]) } }; } $C->{ThemeCustom} = \%h; } } return; } 1; 