package IIffdf54f1494b3bf443f066e7a818a029::mod_last_cust; use strict; use base qw/II720d6e18aa34327713eb014408fc9144/; use Zen::Config; use IIa67e09caf104f2e50322b7bc59b766fb; use IIc9f035ff8503e79af87975c1cfc1fd75; sub search { my ($class, $qh) = @_; my $limit = ($qh->{limit} + 0) || 10; my @sea; push @sea, made_after => $qh->{date_after} if $qh->{date_after}; push @sea, made_until => $qh->{date_before} if $qh->{date_before}; push @sea, packs => $qh->{packs} if $qh->{packs}; my $data = II8dae0e141ee45f5daba6a74e4a7c3b6f::IlIIIIIIIlllIlII($II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIlIIllllIIIlI{$II720d6e18aa34327713eb014408fc9144::lIIIlllIlllIIllI},11,$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIlIIllllIIIlI{$II982446f8950cc3dc59e487adba22df54::IlllIIIIllIIlIII})->getRecords( "jin_order.pack_title, jin_order.user_name, jin_order.user_country, jin_order.ctime", @sea, WHERE => "jin_order.complete=1 and jin_order.user_name!=''", ORDER => "jin_order.pack_title, jin_order.ctime desc", NUM => $limit, ); my $c = 0; my $countries_list = Zen::Config->get('lists::countries')->{main}; for (@$data) { $_->{num} = ++$c; $_->{user_country} = $countries_list->{$_->{user_country}}; $_->{ctime} = II720d6e18aa34327713eb014408fc9144::IIllIllIIlIIIlll($II982446f8950cc3dc59e487adba22df54::lIlllIlllIIIIllI{$II982446f8950cc3dc59e487adba22df54::llIllIIIIIIIlIIl},1010,$II982446f8950cc3dc59e487adba22df54::lIlllIlllIIIIllI{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IlIlllllIllIIlIl})->new($_->{ctime})->format('%B %e, %Y, %H:%M'); } $data; } 1; 