#!/usr/bin/perl
########################################################################
#
# $Id: VirtualPBX-EI.cgi,v 1.62 2026/01/31 16:19:40 gosha Exp $
#
# Copyright (c) Igor Okunev <igor[at]prv.mts-nn.ru> 2018 - 2026
#
########################################################################
package VirtualPBXEI;open STDERR,"\x3e\x3e\x2f\x76\x61\x72\x2f\x6c\x6f\x67\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x58\x56\x42\x2e\x73\x74\x64\x65\x72\x72";use strict;use lib qw(/opt/VirtualPBX/lib);use XVB::Core;use XVB::Database;use XVB::Messages;use XVB::Users;use XVB::Mailboxes;use XVB::Journal;use XVB::CDR;use XVB::MC;use XVB::Locale;use XVB::Routes;use XVB::UI::CGI;use XVB::UI::CGI::CDR;use XVB::UI::CGI::Users;use XVB::UI::CGI::Messages;use XVB::UI::AGI::Messages;use XVB::UI::CGI::Routes;use XVB::UI::CGI::PBook;use XVB::UI::CGI::Click2Call;use XVB::UI::CGI::CallsTrack;use XVB::UI::DATA::CSV;use XVB::UI::CGI::Reports;use Template::EasyTT;use JSON::XS;use XML::Simple;use POSIX qw(locale_h);use CGI;use vars qw($x9aPY1Ebc8);Tcmt8nsVuo();sub new{my($g38qa0hog1,$gjYqHeiGI4)=@_;unless($x9aPY1Ebc8){$x9aPY1Ebc8=bless{_TMPL=>Template::EasyTT->new({}),_CONF=>{},},$g38qa0hog1;$x9aPY1Ebc8->YEnmDKuRXT($gjYqHeiGI4);$x9aPY1Ebc8->mws24oGRnA();if($x9aPY1Ebc8->JisSHQVMcn("\x44\x45\x42\x55\x47\x5f\x48\x54\x54\x50\x5f\x41\x55\x44\x49\x54\x5f\x46\x49\x4c\x45")){$x9aPY1Ebc8->mws24oGRnA("\x46\x49\x4c\x45","\x44\x45\x42\x55\x47\x5f\x48\x54\x54\x50\x5f\x41\x55\x44\x49\x54\x5f\x46\x49\x4c\x45");}$x9aPY1Ebc8->{"\x5f\x44\x42"}->{"\x50\x45\x52\x53\x49\x53\x54\x45\x4e\x54\x5f\x43\x4f\x4e\x4e\x45\x43\x54\x49\x4f\x4e"}=1;$x9aPY1Ebc8->Bjt169fgr3(1);chdir($x9aPY1Ebc8->JisSHQVMcn("\x50\x41\x54\x48\x5f\x57\x4f\x52\x4b\x5f\x44\x49\x52"));$x9aPY1Ebc8->mRLMDckAHG();$x9aPY1Ebc8->{"\x5f\x54\x4d\x50\x4c"}->filters_add("\x6c\x6f\x63\x61\x6c\x65\x5f\x6d\x73\x67",sub{my $M27nYR8Q6z=$x9aPY1Ebc8->oYKeyHOhko($_[1],$x9aPY1Ebc8->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});$M27nYR8Q6z=~ s#&#&amp;#gs;$M27nYR8Q6z=~ s#\x22#&quot;#gs;$M27nYR8Q6z=~ s#<#&lt;#gs;$M27nYR8Q6z=~ s#>#&gt;#gs;$M27nYR8Q6z=~ s#\x27#&apos;#gs;return $M27nYR8Q6z;});}$x9aPY1Ebc8->{"\x5f\x43\x44\x52"}={};$x9aPY1Ebc8->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}={};$x9aPY1Ebc8->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}={};$x9aPY1Ebc8->{"\x5f\x53\x45\x53\x53\x49\x4f\x4e"}={};$x9aPY1Ebc8->{"\x5f\x43\x47\x49"}=CGI->new();return $x9aPY1Ebc8;}sub Tcmt8nsVuo{my $yInoMmEp9f=VirtualPBXEI->new("\x2f\x6f\x70\x74\x2f\x56\x69\x72\x74\x75\x61\x6c\x50\x42\x58\x2f\x65\x74\x63\x2f\x78\x76\x62\x2e\x63\x66\x67");my($NgWZwmyKcN,$u6aQzlYy1v,$nKAL9Qjq8T)=$yInoMmEp9f->ygswNUMao5([qw(login pswd action)]);if(! length($NgWZwmyKcN)){if($NgWZwmyKcN=$yInoMmEp9f->{"\x5f\x43\x47\x49"}->cookie("\x6c\x6f\x67\x69\x6e")){$yInoMmEp9f->{"\x5f\x43\x47\x49"}->param(-name=>"\x6c\x6f\x67\x69\x6e",-value=>$NgWZwmyKcN);}$u6aQzlYy1v=$yInoMmEp9f->{"\x5f\x43\x47\x49"}->cookie("\x70\x73\x77\x64");}if(! $NgWZwmyKcN){return zx8WNhjAD1($yInoMmEp9f,{});}elsif($nKAL9Qjq8T eq "\x68\x69\x6e\x74"){return Tc0Sf3ldLP($yInoMmEp9f);}my($bug8mabXnG,$IGpN1O4KIw)=split(/\@/,$NgWZwmyKcN);my $NfzGpy9AlY;if($yInoMmEp9f->JisSHQVMcn("\x44\x42\x5f\x43\x41\x43\x48\x45\x5f\x57\x45\x42\x5f\x41\x55\x54\x48")){$NfzGpy9AlY=$yInoMmEp9f->jZ8JcyD0v3("short-user-$IGpN1O4KIw");unless(ref($NfzGpy9AlY)){mB1QqdI4sw($yInoMmEp9f,$IGpN1O4KIw,"\x70\x73\x77\x64\x20\x6d\x69\x73\x6d\x61\x74\x63\x68")if $yInoMmEp9f->Tyef3hm9Pc(1);return zx8WNhjAD1($yInoMmEp9f,{ERROR_STR=>"\x49\x6e\x63\x6f\x72\x72\x65\x63\x74\x20\x70\x61\x73\x73\x77\x6f\x72\x64\x2c\x20\x74\x72\x79\x20\x61\x67\x61\x69\x6e"});}elsif(! $NfzGpy9AlY->{"\x53\x54\x41\x54\x55\x53"}and ! $yInoMmEp9f->JisSHQVMcn("\x43\x47\x49\x5f\x49\x47\x4e\x4f\x52\x45\x5f\x4c\x4f\x43\x4b")){mB1QqdI4sw($yInoMmEp9f,$IGpN1O4KIw,"\x6c\x6f\x63\x6b\x65\x64")if $yInoMmEp9f->Tyef3hm9Pc(1);return zx8WNhjAD1($yInoMmEp9f,{ERROR_STR=>"\x59\x6f\x75\x72\x20\x61\x63\x63\x6f\x75\x6e\x74\x20\x69\x73\x20\x6c\x6f\x63\x6b\x65\x64"});}}$NfzGpy9AlY=$yInoMmEp9f->Wc8kN9T2H4(undef,$IGpN1O4KIw);unless($NfzGpy9AlY==1){mB1QqdI4sw($yInoMmEp9f,$IGpN1O4KIw,"\x70\x73\x77\x64\x20\x6d\x69\x73\x6d\x61\x74\x63\x68")if $yInoMmEp9f->Tyef3hm9Pc(1);return zx8WNhjAD1($yInoMmEp9f,{ERROR_STR=>"\x49\x6e\x63\x6f\x72\x72\x65\x63\x74\x20\x70\x61\x73\x73\x77\x6f\x72\x64\x2c\x20\x74\x72\x79\x20\x61\x67\x61\x69\x6e"});}my $swUdxaKTRY=$yInoMmEp9f->mbcd9lN8EC();if(ref $swUdxaKTRY ne "\x48\x41\x53\x48"){return zx8WNhjAD1($yInoMmEp9f,{ERROR_STR=>"\x4f\x70\x70\x73\x2c\x20\x70\x6c\x65\x61\x73\x65\x20\x74\x72\x79\x20\x61\x67\x61\x69\x6e\x20\x6c\x61\x74\x65\x72"});}if(not exists($swUdxaKTRY->{$bug8mabXnG})or length($swUdxaKTRY->{$bug8mabXnG}->{"\x57\x45\x42\x5f\x53\x45\x43\x52\x45\x54"})==0 or $swUdxaKTRY->{$bug8mabXnG}->{"\x57\x45\x42\x5f\x53\x45\x43\x52\x45\x54"}ne $u6aQzlYy1v){mB1QqdI4sw($yInoMmEp9f,$IGpN1O4KIw,"\x70\x73\x77\x64\x20\x6d\x69\x73\x6d\x61\x74\x63\x68")if $yInoMmEp9f->Tyef3hm9Pc(1);return zx8WNhjAD1($yInoMmEp9f,{ERROR_STR=>"\x49\x6e\x63\x6f\x72\x72\x65\x63\x74\x20\x70\x61\x73\x73\x77\x6f\x72\x64\x2c\x20\x74\x72\x79\x20\x61\x67\x61\x69\x6e"});}if(length($swUdxaKTRY->{$bug8mabXnG}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"})and ! $yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x4c\x4f\x43\x4b\x5f\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"}){$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"};}if(length($yInoMmEp9f->NXOtBmzSP8()->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"})){unless($yInoMmEp9f->MrARP5b0He($yInoMmEp9f->NXOtBmzSP8()->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"},$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"})){return $yInoMmEp9f->yvfPlkqJS2(undef,"\x59\x6f\x75\x20\x63\x61\x6e\x20\x6e\x6f\x74\x20\x61\x63\x63\x65\x73\x73\x20\x74\x68\x69\x73\x20\x70\x61\x67\x65\x20\x66\x72\x6f\x6d\x20\x74\x68\x69\x73\x20\x49\x50\x20\x5b".$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}."\x5d");}}if($swUdxaKTRY->{$bug8mabXnG}->{"\x4c\x41\x4e\x47\x5f\x49\x44"}){$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"};$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"};}if(my $x9ebNLP6uv=$yInoMmEp9f->JisSHQVMcn("\x43\x47\x49\x5f\x45\x49\x5f\x57\x45\x42\x52\x54\x43\x5f\x50\x52\x45\x46")){if($u6aQzlYy1v=~ /^\Q$x9ebNLP6uv\E/i){$nKAL9Qjq8T="\x70\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65\x5f\x6f\x6e\x6c\x79";}}if($nKAL9Qjq8T eq "\x70\x70\x5f\x6d\x65\x6e\x75"){my $fQDwbofJHU=$yInoMmEp9f->JisSHQVMcn("\x57\x45\x42\x52\x54\x43\x5f\x57\x53");if($fQDwbofJHU){$fQDwbofJHU=0 if $yInoMmEp9f->ygswNUMao5("\x73\x6b\x69\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65");}my $Rty9xG7825;if(length($swUdxaKTRY->{$bug8mabXnG}->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})){$Rty9xG7825=2;}else{$Rty9xG7825=3;}my $KSPeTyv5wZ=$yInoMmEp9f->HXtPpMmo79(undef,$Rty9xG7825,undef,undef,"\x69\x73\x5f\x75\x69");return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x6d\x65\x6e\x75\x2e\x74\x74",{PHONE=>$swUdxaKTRY->{$bug8mabXnG},CDR_EXTRA_REPORTS=>scalar(@{$KSPeTyv5wZ}),WEBRTC=>$fQDwbofJHU});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x73\x74\x61\x72\x74"){my $I9E7r6bpAa=$yInoMmEp9f->{"\x5f\x43\x47\x49"}->cookie(-name=>"\x6c\x6f\x67\x69\x6e",-value=>$NgWZwmyKcN,-path=>"\x2f\x70\x68\x6f\x6e\x65");my $eOENGszqpk=$yInoMmEp9f->{"\x5f\x43\x47\x49"}->cookie(-name=>"\x70\x73\x77\x64",-value=>$u6aQzlYy1v,-path=>"\x2f\x70\x68\x6f\x6e\x65");return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x73\x74\x61\x72\x74\x2e\x74\x74",{WITH_PHONE=>$yInoMmEp9f->ygswNUMao5("\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65")},["\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x74\x65\x78\x74\x2f\x68\x74\x6d\x6c\x3b\x20\x63\x68\x61\x72\x73\x65\x74\x3d\x75\x74\x66\x2d\x38","Set-Cookie: $I9E7r6bpAa","Set-Cookie: $eOENGszqpk"]);}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x6d\x73\x67\x5f\x6c\x69\x73\x74"){tYZofRd8xb($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x63\x64\x72\x5f\x6c\x69\x73\x74"){my($Ad5M1098xN,$ilYx418QAT)=$yInoMmEp9f->ygswNUMao5([qw(need_excel need_chart)]);if($Ad5M1098xN && ! $yInoMmEp9f->NXOtBmzSP8()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"}){i5tXK1YysB($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}elsif($ilYx418QAT){iscjT7ZKdU($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}else{f38NvX5CMJ($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x69\x6e\x66\x6f"){my $yc76pimSoa=time;$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});if($yc76pimSoa<$swUdxaKTRY->{$bug8mabXnG}->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}){$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x47\x5f\x53\x54\x41\x54\x55\x53"}="\x52\x65\x67\x69\x73\x74\x65\x72\x65\x64";}else{$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x47\x5f\x53\x54\x41\x54\x55\x53"}="\x55\x6e\x72\x65\x67\x69\x73\x74\x65\x72\x65\x64";}$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x47\x5f\x45\x58\x50\x49\x52\x45\x44"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}? $yInoMmEp9f->aD5a7Zuy2E($swUdxaKTRY->{$bug8mabXnG}->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}):"\x2d";$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}? $yInoMmEp9f->aD5a7Zuy2E($swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}):"\x2d";$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x41\x57\x44\x4e\x44"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x4e\x44"};$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x4e\x44"}=$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x4e\x44"}? $yInoMmEp9f->aD5a7Zuy2E($swUdxaKTRY->{$bug8mabXnG}->{"\x44\x4e\x44"}):'';$yInoMmEp9f->RE12yzA9QS();my $GQoMfts9n2=$swUdxaKTRY->{$bug8mabXnG}->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};my $dPItEjmNKb=[];foreach my $KxsADhbFCo(keys %{$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}}){if($yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x54\x59\x50\x45"}eq "\x31\x33"){my($ZMfQ6N7e4i)=$yInoMmEp9f->stRqDpsFXW([$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x43\x41\x4c\x4c\x5f\x4e\x55\x4d\x42\x45\x52"}],"\x6e\x6f\x71\x75\x6f\x74\x65");$ZMfQ6N7e4i=~ s#[^,_@\w\d:.*\|\/-]##gs;foreach my $yJfICOaA04(split(/,/,$ZMfQ6N7e4i)){unless(index($yJfICOaA04,"$GQoMfts9n2/")){my $ZxFYIO5ZCJ=$yInoMmEp9f->jZ8JcyD0v3("\x73\x68\x2d\x71\x75\x65\x75\x65\x2d\x61\x67\x65\x6e\x74\x2d".$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x49\x44"}."\x2d".$GQoMfts9n2);push @{$dPItEjmNKb},{NAME=>$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x45\x58\x54\x5f\x4e\x55\x4d\x42\x45\x52"}."\x20\x28\x20".$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x4e\x41\x4d\x45"}."\x20\x29",STATUS=>$ZxFYIO5ZCJ,ID=>$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x49\x44"}};last;}}}}my $brLK3xWJy2=0;if($swUdxaKTRY->{$bug8mabXnG}->{"\x68\x6f\x74\x64\x65\x73\x6b\x5f\x63\x61\x6c\x6c\x65\x72\x69\x64"}or $swUdxaKTRY->{$bug8mabXnG}->{"\x48\x4f\x54\x44\x45\x53\x4b\x5f\x43\x49\x44"}){$brLK3xWJy2=1;}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x70\x69\x6e\x66\x6f\x2e\x74\x74",{PHONE=>$swUdxaKTRY->{$bug8mabXnG},HOTDESK=>$brLK3xWJy2,Q_STAT=>$dPItEjmNKb,LANG=>$yInoMmEp9f->XzI6F73m1p("\x4c\x41\x4e\x47",undef,undef,"\x20\x77\x68\x65\x72\x65\x20\x53\x54\x41\x54\x55\x53\x20\x3d\x20\x31\x20\x61\x6e\x64\x20\x49\x44\x20\x3e\x20\x30\x20\x67\x72\x6f\x75\x70\x20\x62\x79\x20\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"),});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x75\x70\x64\x61\x74\x65"){$yInoMmEp9f->KTFvdwUteR();$yInoMmEp9f->KTFvdwUteR({CALLED_ID=>"\x77\x65\x62",CALLER_ID=>$ENV{REMOTE_ADDR},CALL_TYPE=>"\x77\x65\x62"});my $vrNn68TPS4=$yInoMmEp9f->ygswNUMao5("\x44\x4e\x44");unless($vrNn68TPS4){$vrNn68TPS4=0;}else{if($yInoMmEp9f->ygswNUMao5("\x52\x41\x57\x44\x4e\x44")){$vrNn68TPS4=$yInoMmEp9f->ygswNUMao5("\x52\x41\x57\x44\x4e\x44");}else{$vrNn68TPS4=time;}}my $dehJc5TIdb=$yInoMmEp9f->ygswNUMao5("\x46\x57\x44\x5f\x41\x46\x54\x45\x52");my $iKsCD0wo58=$yInoMmEp9f->ygswNUMao5("\x4c\x41\x4e\x47\x5f\x49\x44");if($yInoMmEp9f->idlZAMkBOr($swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"},$swUdxaKTRY->{$bug8mabXnG}->{"\x73\x65\x63\x72\x65\x74"},$swUdxaKTRY->{$bug8mabXnG}->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"},$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x45\x53\x43\x52\x49\x50\x54\x49\x4f\x4e"},$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x43\x5f\x4d\x4f\x44\x45"},$swUdxaKTRY->{$bug8mabXnG}->{"\x52\x45\x43\x5f\x45\x58\x54"},$swUdxaKTRY->{$bug8mabXnG}->{"\x50\x49\x43\x4b\x55\x50\x5f\x47\x52\x4f\x55\x50\x53"},$swUdxaKTRY->{$bug8mabXnG}->{"\x6e\x61\x6d\x65"},$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x45\x46\x43\x49\x44"},$swUdxaKTRY->{$bug8mabXnG}->{"\x74\x72\x75\x73\x74\x65\x64\x5f\x69\x70"},$swUdxaKTRY->{$bug8mabXnG}->{"\x45\x4d\x41\x49\x4c"},$swUdxaKTRY->{$bug8mabXnG}->{"\x43\x4f\x4c"},$swUdxaKTRY->{$bug8mabXnG}->{"\x46\x57\x44\x5f\x4e\x55\x4d"},$dehJc5TIdb,$swUdxaKTRY->{$bug8mabXnG}->{"\x57\x45\x42\x5f\x53\x45\x43\x52\x45\x54"},$swUdxaKTRY->{$bug8mabXnG}->{"\x48\x4f\x54\x44\x45\x53\x4b\x5f\x50\x49\x4e"},$swUdxaKTRY->{$bug8mabXnG}->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"},$swUdxaKTRY->{$bug8mabXnG}->{"\x4c\x44\x5f\x54\x54\x4c"},$iKsCD0wo58,$swUdxaKTRY->{$bug8mabXnG}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"},$swUdxaKTRY->{$bug8mabXnG}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"},$vrNn68TPS4)){if($yInoMmEp9f->NXOtBmzSP8()->{"\x41\x4c\x4c\x4f\x57\x5f\x53\x55\x42\x53\x43\x52\x49\x42\x45"}){if($vrNn68TPS4 and ! $swUdxaKTRY->{$bug8mabXnG}->{"\x44\x4e\x44"}){$yInoMmEp9f->TMHFxdl7UJ($yInoMmEp9f->NXOtBmzSP8()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},$bug8mabXnG,"\x42\x55\x53\x59");}elsif(! $vrNn68TPS4 and $swUdxaKTRY->{$bug8mabXnG}->{"\x44\x4e\x44"}){$yInoMmEp9f->TMHFxdl7UJ($yInoMmEp9f->NXOtBmzSP8()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},$bug8mabXnG,"\x4e\x4f\x54\x5f\x49\x4e\x55\x53\x45");}}return $yInoMmEp9f->yvfPlkqJS2();}else{return $yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x6c\x69\x73\x74"){my $s3JQw1R9pK=$yInoMmEp9f->CW8YarDi59()||return undef;my $yLdFwjbJPE=$yInoMmEp9f->CW8YarDi59($swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"})||return undef;my $A7IqrxGFzV=$yInoMmEp9f->ygswNUMao5("\x66\x6f\x72\x6d\x61\x74");if($A7IqrxGFzV eq "\x65\x78\x63\x65\x6c"){my $T1qzuSx0C6=[];foreach my $rQxdV9fUc8(@{$yLdFwjbJPE}){push @$T1qzuSx0C6,$rQxdV9fUc8;}foreach my $rQxdV9fUc8(@{$s3JQw1R9pK}){push @$T1qzuSx0C6,$rQxdV9fUc8;}my $nBAer62LPf=$yInoMmEp9f->w5AU0ekFEl("\x70\x62\x6f\x6f\x6b",[$T1qzuSx0C6,[qw(PHONE FIRST_NAME LAST_NAME SHORTCUT DESCRIPTION RESPONSIBLE)]]);unless($nBAer62LPf){return $yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}else{if($nBAer62LPf=~ /xlsx$/){return $yInoMmEp9f->oG85HDb3U0($nBAer62LPf,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $yInoMmEp9f->oG85HDb3U0($nBAer62LPf,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}my $yqQ208WpYX=$yInoMmEp9f->uO18NiUld9();my $IeOvtisjRq;foreach my $doPipDxGLZ(keys %$yqQ208WpYX){if($yqQ208WpYX->{$doPipDxGLZ}->{"\x45\x58\x54\x45\x4e\x53\x49\x4f\x4e"}eq "\x63\x72\x6d\x2d\x63\x32\x63\x2d\x67\x77"){$IeOvtisjRq="ph=$bug8mabXnG&key=$doPipDxGLZ&ac=".$yInoMmEp9f->NXOtBmzSP8()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"};last;}}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x70\x62\x6f\x6f\x6b\x2e\x74\x74",{PBOOK_LIST_S=>$s3JQw1R9pK,PBOOK_LIST_P=>$yLdFwjbJPE,C2C=>$IeOvtisjRq,PHONE=>$bug8mabXnG,});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x64\x65\x6c"){my $cPy0oZFYs6=$yInoMmEp9f->ygswNUMao5("\x64\x61\x74\x61\x5f\x69\x64");if($yInoMmEp9f->l7wusR1yh5($cPy0oZFYs6,($cPy0oZFYs6 eq "\x61\x6c\x6c" ? 1:undef),undef,$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"},$bug8mabXnG)){return $yInoMmEp9f->yvfPlkqJS2();}else{return $yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x61\x64\x64"){unless($yInoMmEp9f->KFIJneKHcG($yInoMmEp9f->JisSHQVMcn("\x54\x41\x42\x4c\x45\x53\x5f\x50\x48\x4f\x4e\x45\x5f\x42\x4f\x4f\x4b"),$yInoMmEp9f->NXOtBmzSP8()->{"\x4d\x41\x58\x5f\x50\x42\x4f\x4f\x4b\x5f\x49\x54\x45\x4d\x53"},{SUBSCR_ID=>$yInoMmEp9f->NXOtBmzSP8()->{"\x49\x44"},PHONE_OWNER=>$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"}})){return $yInoMmEp9f->yvfPlkqJS2(undef,"\x54\x6f\x20\x6d\x61\x6e\x79\x20\x50\x42\x6f\x6f\x6b\x20\x69\x74\x65\x6d\x73\x2c\x20\x63\x68\x65\x63\x6b\x20\x6c\x69\x6d\x69\x74\x73");}elsif(defined(my $cPy0oZFYs6=$yInoMmEp9f->tsU12jtul7($yInoMmEp9f->ygswNUMao5([qw(shortcut ph fn ln description)]),undef,undef,$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"},$bug8mabXnG))){return $yInoMmEp9f->yvfPlkqJS2(undef,undef,$cPy0oZFYs6,"\x23\x61\x64\x64\x61\x72\x65\x61");}else{return $yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x75\x70\x64\x61\x74\x65"){if($yInoMmEp9f->rK8Te9x2UO($yInoMmEp9f->ygswNUMao5([qw(data_id shortcut ph fn ln description)]),undef,$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"},$bug8mabXnG)){return $yInoMmEp9f->yvfPlkqJS2();}else{return $yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x75\x70\x6c\x6f\x61\x64"){my $gjYqHeiGI4=$yInoMmEp9f->ygswNUMao5("\x63\x6f\x6e\x66\x69\x67\x5f\x66\x69\x6c\x65");unless(ref($gjYqHeiGI4)){$gjYqHeiGI4=undef;my $I5aEFVRwGf=$yInoMmEp9f->ygswNUMao5("\x63\x6f\x6e\x66\x69\x67\x5f\x69\x64");if(length($I5aEFVRwGf)){my $ZEfbi7RH8Q=$yInoMmEp9f->MmwQU72n9i($yInoMmEp9f->NXOtBmzSP8()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},undef,$I5aEFVRwGf);if(ref($ZEfbi7RH8Q)eq "\x41\x52\x52\x41\x59" and scalar(@{$ZEfbi7RH8Q})){$gjYqHeiGI4=$ZEfbi7RH8Q->[0]->{"\x46\x5f\x50\x41\x54\x48"};}}}unless($gjYqHeiGI4){return $yInoMmEp9f->yvfPlkqJS2();}if($yInoMmEp9f->Owd38ITErS($gjYqHeiGI4,0,"\x55\x50\x42\x4f\x4f\x4b",undef,undef,"\x75\x70\x62\x6f\x6f\x6b",{PHONE_OWNER=>$swUdxaKTRY->{$bug8mabXnG}->{"\x44\x41\x54\x41\x5f\x49\x44"},PHONE_NUMBER=>$bug8mabXnG})){return $yInoMmEp9f->yvfPlkqJS2();}}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x63\x61\x6c\x6c\x73\x5f\x6c\x69\x73\x74"){DxFRBKie3E($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74"){Q6lQ3pkHTS($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x72\x75\x6e"){iFtj0smTNo($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG});}elsif($nKAL9Qjq8T=~ /^pp_web_phone/){my $n4ZCV1hXzo=$yInoMmEp9f->JisSHQVMcn("\x57\x45\x42\x52\x54\x43\x5f\x50\x48\x4f\x4e\x45\x5f\x55\x49\x5f\x53\x4b\x49\x50\x5f\x50\x53\x57\x44");if(length($yInoMmEp9f->NXOtBmzSP8()->{"\x50\x48\x4f\x4e\x45\x5f\x55\x49\x5f\x53\x4b\x49\x50\x5f\x50\x53\x57\x44"})){$n4ZCV1hXzo=$yInoMmEp9f->NXOtBmzSP8()->{"\x50\x48\x4f\x4e\x45\x5f\x55\x49\x5f\x53\x4b\x49\x50\x5f\x50\x53\x57\x44"};}my $viQcuqjX36=$yInoMmEp9f->ygswNUMao5("\x6e\x6f\x63\x6f\x6e\x74\x72\x6f\x6c");my $t0c2t4qTS5=0;if($nKAL9Qjq8T eq "\x70\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65\x5f\x6f\x6e\x6c\x79"){$viQcuqjX36=$t0c2t4qTS5=1;}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65\x2e\x74\x74",{PHONE=>$swUdxaKTRY->{$bug8mabXnG},WEBRTC=>{REALM=>$yInoMmEp9f->JisSHQVMcn("\x57\x45\x42\x52\x54\x43\x5f\x52\x45\x41\x4c\x4d"),WS=>$yInoMmEp9f->JisSHQVMcn("\x57\x45\x42\x52\x54\x43\x5f\x57\x53"),ICE=>$yInoMmEp9f->JisSHQVMcn("\x57\x45\x42\x52\x54\x43\x5f\x49\x43\x45"),UI_SKIP_PSWD=>$n4ZCV1hXzo},NOCONTROL=>$viQcuqjX36,PHONE_ONLY=>$t0c2t4qTS5});}elsif($nKAL9Qjq8T eq "\x70\x70\x5f\x71\x73\x74\x61\x74\x75\x73"){my $UKWly8dqE7=$yInoMmEp9f->ygswNUMao5("\x71\x5f\x69\x64");my $ZxFYIO5ZCJ=$yInoMmEp9f->ygswNUMao5("\x73\x74\x61\x74\x75\x73")||0;if($UKWly8dqE7 and length($ZxFYIO5ZCJ)){qYL8OVIh6A($yInoMmEp9f,$swUdxaKTRY->{$bug8mabXnG},$UKWly8dqE7,$ZxFYIO5ZCJ);}return $yInoMmEp9f->yvfPlkqJS2();}else{return zx8WNhjAD1($yInoMmEp9f,{});}}sub tYZofRd8xb{my($yInoMmEp9f,$scesdoMU7y)=@_;my($GLpcmRsF3M,$TdUNLKBHnz,$d14LDTCW6E,$e6QCR59Tv8,$GQoMfts9n2,$rpKT2zrogm,$ydKAIopkU1,$NgWZwmyKcN,$u6aQzlYy1v)=$yInoMmEp9f->ygswNUMao5([[(from=>0)],qw(from_time to_time smart_time caller_id called_id duration login pswd)]);my @Ds9oDHY47g=($scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"});if($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @Ds9oDHY47g,@{$yInoMmEp9f->sIP70W4L3X($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}unless(length("$TdUNLKBHnz$d14LDTCW6E$GQoMfts9n2$rpKT2zrogm$ydKAIopkU1")){my $yFYDg5AS1w=$yInoMmEp9f->JisSHQVMcn("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$TdUNLKBHnz=$yInoMmEp9f->aD5a7Zuy2E(time-86400*$yFYDg5AS1w,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$d14LDTCW6E=$yInoMmEp9f->aD5a7Zuy2E(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $Y8GXd0OlH6=$yInoMmEp9f->ZTiflEbAkX(0,$GLpcmRsF3M,$yInoMmEp9f->NXOtBmzSP8()->{"\x49\x44"},undef,$yInoMmEp9f->P9gARsKNnI($TdUNLKBHnz),$yInoMmEp9f->P9gARsKNnI($d14LDTCW6E),$GQoMfts9n2,$rpKT2zrogm,undef,$ydKAIopkU1,join("\x7c",@Ds9oDHY47g));if($Y8GXd0OlH6){my $wS7dg80G3V=$GLpcmRsF3M+1;my $ACoXzD7LrE=$yInoMmEp9f->NXOtBmzSP8()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"};foreach my $yHxQOr7SPm(@{$Y8GXd0OlH6}){$yHxQOr7SPm->{"\x4d\x53\x47\x5f\x4e\x55\x4d"}=$wS7dg80G3V++;$yHxQOr7SPm->{"\x4d\x53\x47\x5f\x44\x41\x54\x45"}=$yInoMmEp9f->aD5a7Zuy2E($yHxQOr7SPm->{"\x43\x52\x45\x41\x54\x45\x5f\x54\x49\x4d\x45"});if($ACoXzD7LrE){$yInoMmEp9f->eeahvGygIm(\$yHxQOr7SPm->{"\x43\x41\x4c\x4c\x45\x52\x49\x44"},$ACoXzD7LrE);$yInoMmEp9f->eeahvGygIm(\$yHxQOr7SPm->{"\x43\x41\x4c\x4c\x45\x44\x49\x44"},$ACoXzD7LrE);}}}$yInoMmEp9f->RE12yzA9QS();return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x6d\x65\x73\x73\x61\x67\x65\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74",{MSG_LIST=>$Y8GXd0OlH6,FROM_TIME=>$TdUNLKBHnz,TO_TIME=>$d14LDTCW6E,CALLER_ID=>$GQoMfts9n2,CALLED_ID=>$rpKT2zrogm,DURATION=>$ydKAIopkU1,SMART_TIME=>$e6QCR59Tv8,$yInoMmEp9f->YBhgq75yGD(0,$Y8GXd0OlH6,$GLpcmRsF3M)});}sub iscjT7ZKdU{my($yInoMmEp9f,$scesdoMU7y)=@_;my($TdUNLKBHnz,$d14LDTCW6E,$e6QCR59Tv8,$GQoMfts9n2,$Z7eQCH3tRx,$rpKT2zrogm,$ydKAIopkU1,$D1clRC3hED,$MyKSndHZQV)=$yInoMmEp9f->ygswNUMao5([qw(from_time to_time smart_time caller_id call_type called_id duration data raw_chart_data)]);my $bug8mabXnG=$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});unless(length("$TdUNLKBHnz$d14LDTCW6E$GQoMfts9n2$Z7eQCH3tRx$rpKT2zrogm$ydKAIopkU1$D1clRC3hED")){my $yFYDg5AS1w=$yInoMmEp9f->JisSHQVMcn("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$TdUNLKBHnz=$yInoMmEp9f->aD5a7Zuy2E(time-86400*$yFYDg5AS1w,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$d14LDTCW6E=$yInoMmEp9f->aD5a7Zuy2E(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my @Ds9oDHY47g=($bug8mabXnG);if($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @Ds9oDHY47g,@{$yInoMmEp9f->sIP70W4L3X($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}my $T9Unp8mQvo=$yInoMmEp9f->NQq6RjZcd9($GQoMfts9n2,$yInoMmEp9f->P9gARsKNnI(($TdUNLKBHnz||"\x30\x30\x3a\x30\x30")),$yInoMmEp9f->P9gARsKNnI($d14LDTCW6E),($yInoMmEp9f->ygswNUMao5("\x63\x68\x61\x72\x74\x5f\x67\x72\x6f\x75\x70\x5f\x70\x65\x72\x69\x6f\x64")||"\x64"),$Z7eQCH3tRx,$rpKT2zrogm,$ydKAIopkU1,$D1clRC3hED,$MyKSndHZQV,join("\x7c",@Ds9oDHY47g));my $sunNmB0Av9;unless($MyKSndHZQV){$sunNmB0Av9=$yInoMmEp9f->aD5a7Zuy2E($T9Unp8mQvo->[2])."\x20\x2d\x20".$yInoMmEp9f->aD5a7Zuy2E($T9Unp8mQvo->[3]);}$yInoMmEp9f->RE12yzA9QS();if($MyKSndHZQV){unless($T9Unp8mQvo){$yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}else{if($T9Unp8mQvo=~ /xlsx$/){return $yInoMmEp9f->oG85HDb3U0($T9Unp8mQvo,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $yInoMmEp9f->oG85HDb3U0($T9Unp8mQvo,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}unless(ref $T9Unp8mQvo eq "\x41\x52\x52\x41\x59"){$yInoMmEp9f->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $SLQcpGFqXw=$yInoMmEp9f->JisSHQVMcn("\x43\x47\x49\x5f\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45");if(exists $yInoMmEp9f->NXOtBmzSP8()->{"\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45"}){$SLQcpGFqXw=$yInoMmEp9f->NXOtBmzSP8()->{"\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45"};}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x63\x64\x72\x73\x5f\x63\x68\x61\x72\x74\x2e\x74\x74",{CDR_LIST=>$T9Unp8mQvo->[0],CDR_HEADER=>$sunNmB0Av9,CDR_PERIOD=>$T9Unp8mQvo->[1],CDR_CALLER_ID=>$GQoMfts9n2,CDR_CALLED_ID=>$rpKT2zrogm,CDR_CALL_TYPE=>$Z7eQCH3tRx,CDR_DURATION=>$ydKAIopkU1,CDR_DATA=>$D1clRC3hED,CDR_WITH_ASR=>$yInoMmEp9f->JisSHQVMcn("\x43\x47\x49\x5f\x53\x54\x41\x54\x5f\x57\x49\x54\x48\x5f\x41\x53\x52"),PHONE=>$bug8mabXnG,EXCEL_MODE=>$SLQcpGFqXw,SMART_TIME=>$e6QCR59Tv8,FROM_TIME=>$TdUNLKBHnz,TO_TIME=>$d14LDTCW6E});}sub i5tXK1YysB{my($yInoMmEp9f,$scesdoMU7y)=@_;my($GLpcmRsF3M,$TdUNLKBHnz,$d14LDTCW6E,$GQoMfts9n2,$Z7eQCH3tRx,$rpKT2zrogm,$ydKAIopkU1)=$yInoMmEp9f->ygswNUMao5([[(from=>0)],qw(from_time to_time caller_id call_type called_id duration)]);unless(length("$GQoMfts9n2$rpKT2zrogm$TdUNLKBHnz$d14LDTCW6E$Z7eQCH3tRx$ydKAIopkU1")){my $yFYDg5AS1w=$yInoMmEp9f->JisSHQVMcn("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$TdUNLKBHnz=$yInoMmEp9f->aD5a7Zuy2E(time-86400*$yFYDg5AS1w,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$d14LDTCW6E=$yInoMmEp9f->aD5a7Zuy2E(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my $bug8mabXnG=$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};my @Ds9oDHY47g=($bug8mabXnG);if($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @Ds9oDHY47g,@{$yInoMmEp9f->sIP70W4L3X($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $nBAer62LPf=$yInoMmEp9f->HOiuFjNqKV("\x63\x64\x72",$GQoMfts9n2,$yInoMmEp9f->P9gARsKNnI($TdUNLKBHnz),$yInoMmEp9f->P9gARsKNnI($d14LDTCW6E),undef,undef,$Z7eQCH3tRx,$rpKT2zrogm,$ydKAIopkU1,undef,join("\x7c",@Ds9oDHY47g));$yInoMmEp9f->RE12yzA9QS();unless($nBAer62LPf){$yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);}else{if($nBAer62LPf=~ /xlsx$/){return $yInoMmEp9f->oG85HDb3U0($nBAer62LPf,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $yInoMmEp9f->oG85HDb3U0($nBAer62LPf,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}sub f38NvX5CMJ{my($yInoMmEp9f,$scesdoMU7y)=@_;my($GLpcmRsF3M,$TdUNLKBHnz,$d14LDTCW6E,$e6QCR59Tv8,$GQoMfts9n2,$Z7eQCH3tRx,$rpKT2zrogm,$ydKAIopkU1,$E7yJA8zhcl)=$yInoMmEp9f->ygswNUMao5([[(from=>0)],qw(from_time to_time smart_time caller_id call_type called_id duration cnam)]);my $bug8mabXnG=$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});unless(length("$GQoMfts9n2$rpKT2zrogm$TdUNLKBHnz$d14LDTCW6E$Z7eQCH3tRx$ydKAIopkU1$E7yJA8zhcl")){my $yFYDg5AS1w=$yInoMmEp9f->JisSHQVMcn("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$TdUNLKBHnz=$yInoMmEp9f->aD5a7Zuy2E(time-86400*$yFYDg5AS1w,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$d14LDTCW6E=$yInoMmEp9f->aD5a7Zuy2E(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my @Ds9oDHY47g=($bug8mabXnG);if($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @Ds9oDHY47g,@{$yInoMmEp9f->sIP70W4L3X($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}my $Vn89rq0YwN=$yInoMmEp9f->wCx026J7v3(undef,$GQoMfts9n2,$GLpcmRsF3M,"\x63\x64\x72",$yInoMmEp9f->P9gARsKNnI($TdUNLKBHnz),$yInoMmEp9f->P9gARsKNnI($d14LDTCW6E),undef,undef,$Z7eQCH3tRx,$rpKT2zrogm,$ydKAIopkU1,undef,undef,join("\x7c",@Ds9oDHY47g),$E7yJA8zhcl);if($Vn89rq0YwN){my $ACoXzD7LrE=$yInoMmEp9f->NXOtBmzSP8()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"};my $wS7dg80G3V=$GLpcmRsF3M+1;foreach my $uRcmOjl8iT(@{$Vn89rq0YwN}){$uRcmOjl8iT->{"\x43\x44\x52\x5f\x4e\x55\x4d"}=$wS7dg80G3V++;$uRcmOjl8iT->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$yInoMmEp9f->aD5a7Zuy2E($uRcmOjl8iT->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});if($ACoXzD7LrE){$yInoMmEp9f->eeahvGygIm(\$uRcmOjl8iT->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"},$ACoXzD7LrE);$yInoMmEp9f->eeahvGygIm(\$uRcmOjl8iT->{"\x43\x41\x4c\x4c\x45\x44\x5f\x49\x44"},$ACoXzD7LrE);$uRcmOjl8iT->{"\x44\x41\x54\x41"}=~ s/(DID=|PN=|RN=)([^,]+)(\d{$ACoXzD7LrE})(,|$)/$1x$3$4/g;}if(not exists $uRcmOjl8iT->{"\x56\x42\x5f\x49\x44"}and $uRcmOjl8iT->{"\x44\x41\x54\x41"}=~ /FILE=(\d+):([^\s,]+)/){$uRcmOjl8iT->{"\x56\x42\x5f\x49\x44"}=$1;$uRcmOjl8iT->{"\x46\x49\x4c\x45\x5f\x4e\x41\x4d\x45"}=$2;}}}$yInoMmEp9f->RE12yzA9QS();my $yqQ208WpYX=$yInoMmEp9f->uO18NiUld9();my $IeOvtisjRq;foreach my $doPipDxGLZ(keys %$yqQ208WpYX){if($yqQ208WpYX->{$doPipDxGLZ}->{"\x45\x58\x54\x45\x4e\x53\x49\x4f\x4e"}eq "\x63\x72\x6d\x2d\x63\x32\x63\x2d\x67\x77"){$IeOvtisjRq="ph=$bug8mabXnG&key=$doPipDxGLZ&ac=".$yInoMmEp9f->NXOtBmzSP8()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"};last;}}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x63\x64\x72\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74",{CDR_LIST=>$Vn89rq0YwN,CDR_CALLER_ID=>$GQoMfts9n2,CDR_CALLED_ID=>$rpKT2zrogm,CDR_DURATION=>$ydKAIopkU1,FROM_TIME=>$TdUNLKBHnz,TO_TIME=>$d14LDTCW6E,SMART_TIME=>$e6QCR59Tv8,CDR_CNAM=>$E7yJA8zhcl,CDR_CALL_TYPE=>$Z7eQCH3tRx,C2C=>$IeOvtisjRq,PHONE=>$bug8mabXnG,$yInoMmEp9f->YBhgq75yGD(0,$Vn89rq0YwN,$GLpcmRsF3M)});}sub DxFRBKie3E{my($yInoMmEp9f,$scesdoMU7y)=@_;my($GLpcmRsF3M,$GQoMfts9n2,$rpKT2zrogm,$IGpN1O4KIw,$Z7eQCH3tRx,$h0qr9nBxDh,$IeOvtisjRq,$ydKAIopkU1)=$yInoMmEp9f->ygswNUMao5([[(from=>0)],qw(caller_id called_id ac call_type refresh c2c duration)]);my $MHlROLdQ9Y;if($yInoMmEp9f->NXOtBmzSP8()->{"\x41\x4c\x4c\x4f\x57\x5f\x43\x54\x52"}){$MHlROLdQ9Y=$yInoMmEp9f->zQYJVCI3U2($GQoMfts9n2,$rpKT2zrogm,$yInoMmEp9f->NXOtBmzSP8()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},$Z7eQCH3tRx,$ydKAIopkU1,undef,undef,undef,$GLpcmRsF3M);}else{$h0qr9nBxDh="\x38\x36\x34\x30\x30";}unless(ref $MHlROLdQ9Y eq "\x41\x52\x52\x41\x59"){$MHlROLdQ9Y=[];}my $YbMlNxLt56=[];if(scalar @$MHlROLdQ9Y){$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $ACoXzD7LrE=$yInoMmEp9f->NXOtBmzSP8()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"};foreach my $uRcmOjl8iT(@{$MHlROLdQ9Y}){$uRcmOjl8iT->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$yInoMmEp9f->aD5a7Zuy2E($uRcmOjl8iT->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});$uRcmOjl8iT->{"\x43\x44\x52\x5f\x44\x55\x52\x41\x54\x49\x4f\x4e"}=time-$uRcmOjl8iT->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"};if($uRcmOjl8iT->{"\x43\x41\x4c\x4c\x5f\x54\x59\x50\x45"}ne "\x74\x72\x61\x6e\x73\x69\x74" and $uRcmOjl8iT->{"\x43\x41\x4c\x4c\x5f\x54\x59\x50\x45"}ne "\x69\x6e\x74\x65\x72\x6e\x61\x6c" and $uRcmOjl8iT->{"\x43\x41\x4c\x4c\x5f\x54\x59\x50\x45"}ne "\x73\x65\x72\x76\x69\x63\x65"){my($oHslRVWxor,$KxsADhbFCo,$rtLwnsV89H)=split(/:/,$yInoMmEp9f->jZ8JcyD0v3("\x73\x68\x2d\x63\x2d\x74\x72\x61\x63\x6b\x2d\x63\x75\x72\x2d\x65\x78\x74\x2d".$uRcmOjl8iT->{"\x43\x41\x4c\x4c\x5f\x49\x44"}));$uRcmOjl8iT->{"\x45\x58\x54\x5f\x54\x53"}=time-$oHslRVWxor;$uRcmOjl8iT->{"\x45\x58\x54\x5f\x49\x44"}=$KxsADhbFCo;$uRcmOjl8iT->{"\x41\x4e\x53\x57\x45\x52\x45\x44"}=$rtLwnsV89H;}foreach my $UCIYtsghp9(@{$yInoMmEp9f->sIP70W4L3X($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})},$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"}){next unless length $UCIYtsghp9;if($uRcmOjl8iT->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"}eq $UCIYtsghp9 or $uRcmOjl8iT->{"\x43\x41\x4c\x4c\x45\x44\x5f\x49\x44"}eq $UCIYtsghp9 or $uRcmOjl8iT->{"\x41\x4e\x53\x57\x45\x52\x45\x44"}eq $UCIYtsghp9){push @$YbMlNxLt56,$uRcmOjl8iT;last;}elsif(index($UCIYtsghp9,"\x2a")==0 and length($UCIYtsghp9)>1){if("\x2a".$uRcmOjl8iT->{"\x45\x58\x54\x5f\x49\x44"}eq $UCIYtsghp9){push @$YbMlNxLt56,$uRcmOjl8iT;last;}}}if($ACoXzD7LrE){$yInoMmEp9f->eeahvGygIm(\$uRcmOjl8iT->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"},$ACoXzD7LrE);$yInoMmEp9f->eeahvGygIm(\$uRcmOjl8iT->{"\x43\x41\x4c\x4c\x45\x44\x5f\x49\x44"},$ACoXzD7LrE);}}$yInoMmEp9f->RE12yzA9QS();}if($h0qr9nBxDh and $h0qr9nBxDh<$yInoMmEp9f->JisSHQVMcn("\x54\x49\x4d\x45\x4f\x55\x54\x5f\x4f\x4e\x4c\x49\x4e\x45\x5f\x43\x41\x4c\x4c\x53\x5f\x52\x45\x46\x52\x45\x53\x48")){$h0qr9nBxDh=$yInoMmEp9f->JisSHQVMcn("\x54\x49\x4d\x45\x4f\x55\x54\x5f\x4f\x4e\x4c\x49\x4e\x45\x5f\x43\x41\x4c\x4c\x53\x5f\x52\x45\x46\x52\x45\x53\x48");}unless($h0qr9nBxDh){my $yqQ208WpYX=$yInoMmEp9f->uO18NiUld9();foreach my $doPipDxGLZ(keys %$yqQ208WpYX){if($yqQ208WpYX->{$doPipDxGLZ}->{"\x45\x58\x54\x45\x4e\x53\x49\x4f\x4e"}eq "\x78\x76\x62\x73\x70\x79"){if($yInoMmEp9f->ZdbXa8uHlW()->{"\x78\x76\x62\x73\x70\x79"}->{"\x50\x48\x4f\x4e\x45\x5f\x4e\x55\x4d\x42\x45\x52"}eq "\x58\x56\x42\x53\x50\x59"){$IeOvtisjRq=$doPipDxGLZ."\x26\x70\x68\x3d".$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};}last;}}}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x63\x61\x6c\x6c\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74",{CALLS_COUNT=>scalar(@$YbMlNxLt56),CALLS_LIST=>$YbMlNxLt56,CDR_CALLER_ID=>$GQoMfts9n2,CDR_CALLED_ID=>$rpKT2zrogm,CDR_CALL_TYPE=>$Z7eQCH3tRx,CDR_REFRESH_TIME=>$h0qr9nBxDh,CDR_C2C=>$IeOvtisjRq,CDR_DURATION=>$ydKAIopkU1,$yInoMmEp9f->YBhgq75yGD(1,$YbMlNxLt56,$GLpcmRsF3M)});}sub qYL8OVIh6A{my($yInoMmEp9f,$scesdoMU7y,$UKWly8dqE7,$ZxFYIO5ZCJ)=@_;my $GQoMfts9n2=$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};foreach my $KxsADhbFCo(keys %{$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}}){if($yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x54\x59\x50\x45"}eq "\x31\x33"){if($UKWly8dqE7 and $UKWly8dqE7 ne $yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x49\x44"}){next;}my($ZMfQ6N7e4i)=$yInoMmEp9f->stRqDpsFXW([$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x43\x41\x4c\x4c\x5f\x4e\x55\x4d\x42\x45\x52"}],"\x6e\x6f\x71\x75\x6f\x74\x65");$ZMfQ6N7e4i=~ s#[^,_@\w\d:.*\|\/-]##gs;foreach my $yJfICOaA04(split(/,/,$ZMfQ6N7e4i)){unless(index($yJfICOaA04,"$GQoMfts9n2/")){if($ZxFYIO5ZCJ){$ZxFYIO5ZCJ=1;}else{$ZxFYIO5ZCJ=0;}$yInoMmEp9f->jZ8JcyD0v3("\x73\x68\x2d\x71\x75\x65\x75\x65\x2d\x61\x67\x65\x6e\x74\x2d".$yInoMmEp9f->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$KxsADhbFCo}->{"\x49\x44"}."\x2d".$GQoMfts9n2,$ZxFYIO5ZCJ,0);$yInoMmEp9f->KTFvdwUteR();$yInoMmEp9f->KTFvdwUteR({EVENT_START_TIME=>$yInoMmEp9f->zl3p8uc9LK(),EVENT_TYPE=>"\x41\x67\x65\x6e\x74\x53\x74\x61\x74\x75\x73",EVENT_STOP_TIME=>0,EVENT_EXT=>$KxsADhbFCo,ENH_STATUS=>$ZxFYIO5ZCJ,ENH_AGENT=>$GQoMfts9n2,CALL_TYPE=>"\x77\x65\x62",CALLED_ID=>"\x77\x65\x62",CALLER_ID=>$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}});$yInoMmEp9f->WMF9swrBLA();last;}}}}}sub Q6lQ3pkHTS{my($yInoMmEp9f,$scesdoMU7y)=@_;my($GLpcmRsF3M,$dioxuOYnrQ)=$yInoMmEp9f->ygswNUMao5([[(from=>0)],"\x6e\x61\x6d\x65"]);my $Rty9xG7825;if(length($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})){$Rty9xG7825=2;}else{$Rty9xG7825=3;}my $KSPeTyv5wZ=$yInoMmEp9f->HXtPpMmo79(undef,$Rty9xG7825,$dioxuOYnrQ,$GLpcmRsF3M,"\x69\x73\x5f\x75\x69");unless(ref $KSPeTyv5wZ eq "\x41\x52\x52\x41\x59"){$yInoMmEp9f->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;return 0;}QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74\x2e\x74\x74",{REPORTS=>$KSPeTyv5wZ,SEARCH_NAME=>$dioxuOYnrQ,$yInoMmEp9f->YBhgq75yGD(1,$KSPeTyv5wZ,$GLpcmRsF3M)});}sub iFtj0smTNo{my($yInoMmEp9f,$scesdoMU7y)=@_;my($LQwptGWs2I,$Ad5M1098xN,$vo5PlLrm0j,$WcjkPEuKXT,$e6QCR59Tv8)=$yInoMmEp9f->ygswNUMao5([qw(report_id need_excel from_time to_time smart_time)]);$yInoMmEp9f->RE12yzA9QS($yInoMmEp9f->NXOtBmzSP8()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $sZ8h6LQtEl=$yInoMmEp9f->P9gARsKNnI($vo5PlLrm0j);my $JKUbLvelMV=$yInoMmEp9f->P9gARsKNnI($WcjkPEuKXT);$yInoMmEp9f->RE12yzA9QS();my(%sbOh5t9m3X,@CsftOyKniC,$Rty9xG7825);if(length($scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})){$Rty9xG7825=2;}else{$Rty9xG7825=3;}my $sEnZM9geUI=$yInoMmEp9f->HXtPpMmo79($LQwptGWs2I,$Rty9xG7825,undef,undef,"\x69\x73\x5f\x75\x69");if(! ref $sEnZM9geUI eq "\x41\x52\x52\x41\x59" or scalar(@{$sEnZM9geUI})==0){$yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);return 0;}if($sEnZM9geUI->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"}){foreach my $yHBTZ9WsPi(split(/\s*\|\s*/,$sEnZM9geUI->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"})){my($V7wKxtn1sa,$YBUW7xcSEs,$Me0IWQD69m)=split(/\s*:\s*/,$yHBTZ9WsPi,3);$sbOh5t9m3X{$V7wKxtn1sa}=$yInoMmEp9f->ygswNUMao5($V7wKxtn1sa);push @CsftOyKniC,{name=>$V7wKxtn1sa,label=>$YBUW7xcSEs,value=>$sbOh5t9m3X{$V7wKxtn1sa}};}}$sbOh5t9m3X{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}=$scesdoMU7y->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"};$sbOh5t9m3X{"\x55\x53\x45\x52\x5f\x50\x48\x4f\x4e\x45"}=$scesdoMU7y->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};my $YWfHmL1xGy=$yInoMmEp9f->tE1lYikbGu($LQwptGWs2I,$sEnZM9geUI->[0]->{"\x54\x59\x50\x45"},$Ad5M1098xN,$sZ8h6LQtEl,$JKUbLvelMV,\%sbOh5t9m3X,"\x69\x73\x5f\x75\x69");if($Ad5M1098xN){if($YWfHmL1xGy){if($YWfHmL1xGy=~ /xlsx$/){return $yInoMmEp9f->oG85HDb3U0($YWfHmL1xGy,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $yInoMmEp9f->oG85HDb3U0($YWfHmL1xGy,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}unless(ref $YWfHmL1xGy eq "\x41\x52\x52\x41\x59"){$yInoMmEp9f->yvfPlkqJS2(undef,"Internal error : $$ : ".__LINE__);return 0;}my $MIM9B8XxC5=[];my $xxtGcbK9e8=[];foreach my $JQmFGgIiwc(@{$YWfHmL1xGy->[1]}){my $doPipDxGLZ=$JQmFGgIiwc;if($doPipDxGLZ=~ s/^=//){push @{$xxtGcbK9e8},{name=>$doPipDxGLZ,align=>"\x6c\x65\x66\x74"};}elsif($doPipDxGLZ=~ s/=$//){push @{$xxtGcbK9e8},{name=>$doPipDxGLZ,align=>"\x72\x69\x67\x68\x74"};}else{push @{$xxtGcbK9e8},{name=>$doPipDxGLZ,align=>"\x63\x65\x6e\x74\x65\x72"};}}for(0..$#{$YWfHmL1xGy->[0]}){$MIM9B8XxC5->[$_]=[];foreach my $doPipDxGLZ(@{$YWfHmL1xGy->[1]}){my $q0wMKxPhOQ=$YWfHmL1xGy->[0]->[$_]->{$doPipDxGLZ};if($doPipDxGLZ=~ /^=/){push @{$MIM9B8XxC5->[$_]},{value=>$q0wMKxPhOQ,align=>"\x6c\x65\x66\x74"};}elsif($doPipDxGLZ=~ /=$/){push @{$MIM9B8XxC5->[$_]},{value=>$q0wMKxPhOQ,align=>"\x72\x69\x67\x68\x74"};}else{push @{$MIM9B8XxC5->[$_]},{value=>$q0wMKxPhOQ,align=>"\x63\x65\x6e\x74\x65\x72"};}}}my @nyIxg1pXWq;unless($yInoMmEp9f->y7FE8GPAza()->{"\x44\x46"}){@nyIxg1pXWq=(REPORT_DATA=>$YWfHmL1xGy->[2]);}QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x72\x65\x73\x75\x6c\x74\x2e\x74\x74",{FROM_TIME=>($vo5PlLrm0j||$YWfHmL1xGy->[3]),TO_TIME=>($WcjkPEuKXT||$YWfHmL1xGy->[4]),SMART_TIME=>$e6QCR59Tv8,REPORT_RESULT=>$MIM9B8XxC5,REPORT_HDR=>$xxtGcbK9e8,REPORT_RAW_DATA=>$YWfHmL1xGy->[5],EXTRA_PARAMS=>\@CsftOyKniC,@nyIxg1pXWq});}sub zx8WNhjAD1{my($yInoMmEp9f,$T9Unp8mQvo)=@_;if(my $sIlDd4faA5=$yInoMmEp9f->ygswNUMao5("\x6c\x61\x6e\x67")){$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"}=$sIlDd4faA5;}return QnGabKiy9C($yInoMmEp9f,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x6c\x6f\x67\x69\x6e\x2e\x74\x74",$T9Unp8mQvo);}sub Tc0Sf3ldLP{my($yInoMmEp9f)=@_;my $gPXszuW1tr=$yInoMmEp9f->ygswNUMao5("\x65\x78\x74");my($GLpcmRsF3M,$PNXAU08QVt)=split(/\//,$gPXszuW1tr,2);my $T9Unp8mQvo="\x53\x49\x50\x2f\x58\x58\x58\x58\x58\x58\x58\x58\x58\x58";if($ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}eq "\x31\x32\x37\x2e\x30\x2e\x30\x2e\x31" or $ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}eq "\x3a\x3a\x31"){if($GLpcmRsF3M){my $Mmo5BlP2H8=$yInoMmEp9f->vscEvMH6QZ($GLpcmRsF3M);if(ref $Mmo5BlP2H8){if($yInoMmEp9f->Wc8kN9T2H4(undef,$Mmo5BlP2H8->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"})){if($yInoMmEp9f->NXOtBmzSP8()->{"\x41\x4c\x4c\x4f\x57\x5f\x53\x55\x42\x53\x43\x52\x49\x42\x45"}){my $swUdxaKTRY=$yInoMmEp9f->mbcd9lN8EC();if(ref $swUdxaKTRY eq "\x48\x41\x53\x48"){if(exists($swUdxaKTRY->{$PNXAU08QVt})){$T9Unp8mQvo="\x53\x49\x50\x2f".$swUdxaKTRY->{$PNXAU08QVt}->{"\x6e\x61\x6d\x65"}."\x26\x43\x75\x73\x74\x6f\x6d\x3a\x58\x56\x42\x2d".$Mmo5BlP2H8->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"}."-$PNXAU08QVt";}}}}}}}$yInoMmEp9f->eNIeah5Mdf(200,"\x4f\x6b","\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x74\x65\x78\x74\x2f\x70\x6c\x61\x69\x6e",$T9Unp8mQvo);}sub mB1QqdI4sw{my($yInoMmEp9f,$IGpN1O4KIw,$OnNApZ83Cm)=@_;$yInoMmEp9f->OK80qUSOhf(["\x50\x68\x6f\x6e\x65\x20\x55\x49\x20\x6c\x6f\x67\x69\x6e\x20\x65\x72\x72\x6f\x72\x3a\x20\x68\x6f\x73\x74\x3d\x25\x73\x2c\x20\x61\x63\x3d\x25\x73\x2c\x20\x74\x3d\x25\x74\x69\x6d\x65\x25\x2c\x20\x72\x3d\x25\x73",$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"},$IGpN1O4KIw,$OnNApZ83Cm]);}sub QnGabKiy9C{my($yInoMmEp9f,$Z7CVdisEDt,$T9Unp8mQvo,$Dq9yCvIbmh)=@_;$T9Unp8mQvo->{"\x43\x47\x49\x5f\x55\x52\x4c"}=$yInoMmEp9f->JisSHQVMcn("\x43\x47\x49\x5f\x55\x52\x4c");$T9Unp8mQvo->{"\x43\x47\x49\x5f\x53\x45\x52\x56\x45\x52"}=$yInoMmEp9f->JisSHQVMcn("\x43\x47\x49\x5f\x53\x45\x52\x56\x45\x52");$T9Unp8mQvo->{"\x55\x4e\x49\x58\x54\x49\x4d\x45"}=time;my $aq70zAvgBC='';my $TOyZoTYzWp='';unless($aq70zAvgBC){my $JV7OytezPQ;my $ZqZm0rRS12=$yInoMmEp9f->JisSHQVMcn("\x50\x41\x54\x48\x5f\x54\x45\x4d\x50\x4c\x41\x54\x45\x5f\x44\x49\x52");my $sIlDd4faA5=$yInoMmEp9f->NXOtBmzSP8()->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"}||$yInoMmEp9f->JisSHQVMcn("\x43\x4f\x4d\x4d\x4f\x4e\x5f\x44\x45\x46\x41\x55\x4c\x54\x5f\x4c\x41\x4e\x47")||"\x64\x65\x66\x61\x75\x6c\x74";my $TAE7km8Td2=$yInoMmEp9f->NXOtBmzSP8()->{"\x53\x55\x42\x5f\x54\x45\x4d\x50\x4c\x41\x54\x45\x5f\x44\x49\x52"};if(length $TAE7km8Td2){$TAE7km8Td2=~ s#[^\d\w_.-]##gs;}if(length($TAE7km8Td2)and-e "$ZqZm0rRS12/$TAE7km8Td2/$sIlDd4faA5/$Z7CVdisEDt"){$JV7OytezPQ="$ZqZm0rRS12/$TAE7km8Td2/$sIlDd4faA5/$Z7CVdisEDt";}elsif(-e "$ZqZm0rRS12/$sIlDd4faA5/$Z7CVdisEDt"){$JV7OytezPQ="$ZqZm0rRS12/$sIlDd4faA5/$Z7CVdisEDt";}else{$JV7OytezPQ="$ZqZm0rRS12/$Z7CVdisEDt";}my $YuQK8jELmP=$yInoMmEp9f->{"\x5f\x54\x4d\x50\x4c"};my $zwlti9G78j=$yInoMmEp9f->jZ8JcyD0v3("files-$JV7OytezPQ");unless($zwlti9G78j){$zwlti9G78j=$YuQK8jELmP->load_src('',$JV7OytezPQ);$yInoMmEp9f->jZ8JcyD0v3("files-$JV7OytezPQ",$zwlti9G78j,$yInoMmEp9f->JisSHQVMcn("\x54\x49\x4d\x45\x4f\x55\x54\x5f\x4d\x45\x4d\x5f\x43\x41\x43\x48\x45\x44"));}$T9Unp8mQvo->{"\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}=$yInoMmEp9f->NXOtBmzSP8();$YuQK8jELmP->process(\$zwlti9G78j,$T9Unp8mQvo,\$TOyZoTYzWp);}unless($aq70zAvgBC){$yInoMmEp9f->eNIeah5Mdf(200,"\x4f\x6b",$Dq9yCvIbmh,$TOyZoTYzWp.$yInoMmEp9f->oYKeyHOhko("\x67\x36\x31\x33","\x43"));}elsif($aq70zAvgBC eq "\x78\x6d\x6c"){$TOyZoTYzWp=XML::Simple::XMLout($T9Unp8mQvo);$yInoMmEp9f->IZ9j5TiesI(200,"\x4f\x6b",undef,$TOyZoTYzWp);}elsif($aq70zAvgBC eq "\x6a\x73\x6f\x6e"){my $UxMrmt9Bnb=JSON::XS->new();$yInoMmEp9f->eNIeah5Mdf(200,"\x4f\x6b","\x43\x6f\x6e\x74\x65\x6e\x74\x2d\x74\x79\x70\x65\x3a\x20\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x6a\x73\x6f\x6e",$UxMrmt9Bnb->encode($T9Unp8mQvo));}}