package IIa9e952f4fd26234f94b8a7e98df5615c; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; use II601fa70f090cadcaa1dcddfa68ea7567; use IIb314814b945372fa5c193ed9e65a1b3d; BEGIN{*IIa9e952f4fd26234f94b8a7e98df5615c::IIIIlllIIlIlllIl=\%{pack('H6','167f6c')^'S1:'};*IIa9e952f4fd26234f94b8a7e98df5615c::IIllllllIllIlIll=\&{pack('H24','58505b386268397578252e7d')^'512VXRJMOGVI'};$IIa9e952f4fd26234f94b8a7e98df5615c::IlIlIIlIIIllllIl=pack('H18','7705136a0d060e640c')^'?QG:RNA7X';$IIa9e952f4fd26234f94b8a7e98df5615c::llIIlIIIlllIlIII=pack('H12','190a760b0816')^'SC8GAU'};sub fields    { qw/ keyword cat_id / } BEGIN{*IIa9e952f4fd26234f94b8a7e98df5615c::lIIlIllIIlllllIl=\%{pack('H6','7b7a06')^'>4P'};*IIa9e952f4fd26234f94b8a7e98df5615c::IIlIIlIIllIIlIll=\&{pack('H24','5351332f0e7a2b6d6f253274')^'>0ZA4@XUXGJ@'};$IIa9e952f4fd26234f94b8a7e98df5615c::IIlllIIIllllIIll=pack('H18','701c690916061d0b1f')^'8H=YINRXK';$IIa9e952f4fd26234f94b8a7e98df5615c::lllIllllIlllIlIl=pack('H12','18751c140f0a')^'R<RXFI'};sub namesResourcePrefix { 'field.product' } __PACKAGE__->standardHandler($_, $_ => 'text(30)') for qw/keyword/; BEGIN{*IIa9e952f4fd26234f94b8a7e98df5615c::IlIlllIllllIllII=\%{pack('H6','097301')^'L=W'};*IIa9e952f4fd26234f94b8a7e98df5615c::IllIIIllIIIllIll=\&{pack('H24','57302855707f4b060f5f4d0e')^':QA;JE8>8=5:'};$IIa9e952f4fd26234f94b8a7e98df5615c::IllIllIlllIIlIlI=pack('H18','72101a6810007f1602')^':DN8OH0EV';$IIa9e952f4fd26234f94b8a7e98df5615c::llIlIlIIIlIIlIII=pack('H12','1d7618007575')^'W?VL<6'};sub getCat_id { my $form = shift; my $object = $form->getDecorated; my $in = $form->getInput; my $f = $form->pfx . 'cat_id'; my $shopcart = II601fa70f090cadcaa1dcddfa68ea7567::llIIIIIIIIlIIllI($IIb314814b945372fa5c193ed9e65a1b3d::lIlIllllIIIllIll{$IIa9e952f4fd26234f94b8a7e98df5615c::IlIlIIlIIIllllIl},33,$IIb314814b945372fa5c193ed9e65a1b3d::lIlIllllIIIllIll{$II601fa70f090cadcaa1dcddfa68ea7567::IIIlIIlllIllIlII})->getOrDummy($in->{TabCustom2}); my @lineage = ({title => __PACKAGE__->message('product.formsearchshopcart.message.top_level'), value => '0'}); my @subcats; if ($object->{cat_id} ne '') { @subcats = map { {title => $_->{title}, value => $_->{id}} } IIa9e952f4fd26234f94b8a7e98df5615c::IllIIIllIIIllIll($IIa9e952f4fd26234f94b8a7e98df5615c::IlIlllIllllIllII{$IIb314814b945372fa5c193ed9e65a1b3d::lIllIIllllllIlIl},49,$IIa9e952f4fd26234f94b8a7e98df5615c::IlIlllIllllIllII{$II3562149e53818b6637b38680e87ba918::llIIlIlIlllllIIl})->search(pack_id => $shopcart->id, parent_id => $object->{cat_id}, ORDER => 'path_seq'); } if ($object->{cat_id}) { my $cat = II601fa70f090cadcaa1dcddfa68ea7567::llIIIIIIIIlIIllI($IIa9e952f4fd26234f94b8a7e98df5615c::IIIIlllIIlIlllIl{$IIa9e952f4fd26234f94b8a7e98df5615c::IllIllIlllIIlIlI},49,$IIa9e952f4fd26234f94b8a7e98df5615c::IIIIlllIIlIlllIl{$IIb314814b945372fa5c193ed9e65a1b3d::IIlIIIIlIIlIIlIl})->getOrDummy($object->{cat_id}); push @lineage, {title => $_->{title}, value => $_->{id}} for @{$cat->getPath}; unshift @subcats, {title => '..', value => $cat->{parent_id}}; } my $code = qq(<input type="hidden" name="$f" id="$f" value="$object->{cat_id}">); $code .= join("&nbsp;/&nbsp", map { $_->{value} eq $object->{cat_id} ? "<b>$_->{title}</b>" : qq(<a href="#" onClick="document.getElementById('$f').value='$_->{value}';document.forms['Lister'].submit();">$_->{title}</a>) } @lineage); $code .= "<br><br>" if @subcats; $code .= join("<br>", map { qq(<a href="#" onClick="document.getElementById('$f').value='$_->{value}';document.forms['Lister'].submit();">$_->{title}</a>) } @subcats); my $msg_show_all = __PACKAGE__->message('product.formsearchshopcart.message.show_all'); $code .= (@subcats ? "<br><br>" : "<br>") . ($object->{cat_id} eq '' ? "<b>$msg_show_all</b><br>" : qq(<a href="#" onClick="document.getElementById('$f').value='';document.forms['Lister'].submit();">$msg_show_all</a><br>)); $code; } 1; 