#!/usr/bin/perl
########################################################################
#
# $Id: VirtualPBX-EI.cgi,v 1.68 2026/07/25 19:36:03 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 XVB::DIDs;use Template::EasyTT;use JSON::XS;use XML::Simple;use POSIX qw(locale_h);use CGI;use vars qw($a36RhBLKAp);MStsG8HqbX();sub new{my($ppuZUvE82P,$mqz59tr8NW)=@_;unless($a36RhBLKAp){$a36RhBLKAp=bless{_TMPL=>Template::EasyTT->new({}),_CONF=>{},},$ppuZUvE82P;$a36RhBLKAp->S3UQckeABZ($mqz59tr8NW);$a36RhBLKAp->gMWzp30G8c();if($a36RhBLKAp->Y89WXfLe6Q("\x44\x45\x42\x55\x47\x5f\x48\x54\x54\x50\x5f\x41\x55\x44\x49\x54\x5f\x46\x49\x4c\x45")){$a36RhBLKAp->gMWzp30G8c("\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");}$a36RhBLKAp->{"\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;$a36RhBLKAp->M2lb4OhEsd(1);chdir($a36RhBLKAp->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x57\x4f\x52\x4b\x5f\x44\x49\x52"));$a36RhBLKAp->N6HIv3XA7E();$a36RhBLKAp->{"\x5f\x54\x4d\x50\x4c"}->filters_add("\x6c\x6f\x63\x61\x6c\x65\x5f\x6d\x73\x67",sub{my $Tsoey7ACDW=$a36RhBLKAp->Sgzw8dc0Vv($_[1],$a36RhBLKAp->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});$Tsoey7ACDW=~ s#&#&amp;#gs;$Tsoey7ACDW=~ s#\x22#&quot;#gs;$Tsoey7ACDW=~ s#<#&lt;#gs;$Tsoey7ACDW=~ s#>#&gt;#gs;$Tsoey7ACDW=~ s#\x27#&apos;#gs;return $Tsoey7ACDW;});}$a36RhBLKAp->{"\x5f\x43\x44\x52"}={};$a36RhBLKAp->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}={};$a36RhBLKAp->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}={};$a36RhBLKAp->{"\x5f\x53\x45\x53\x53\x49\x4f\x4e"}={};$a36RhBLKAp->{"\x5f\x43\x47\x49"}=CGI->new();return $a36RhBLKAp;}sub MStsG8HqbX{my $AnmzMI3HKg=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($Qb85f9aHMd,$x6iuEjUpLD,$oOVEaqU4S3)=$AnmzMI3HKg->Dix6pSQcAZ([qw(login pswd action)]);if(! length($Qb85f9aHMd)){if($Qb85f9aHMd=$AnmzMI3HKg->{"\x5f\x43\x47\x49"}->cookie("\x6c\x6f\x67\x69\x6e")){$AnmzMI3HKg->{"\x5f\x43\x47\x49"}->param(-name=>"\x6c\x6f\x67\x69\x6e",-value=>$Qb85f9aHMd);}$x6iuEjUpLD=$AnmzMI3HKg->{"\x5f\x43\x47\x49"}->cookie("\x70\x73\x77\x64");}if(! $Qb85f9aHMd){return jieHY3TRDV($AnmzMI3HKg,{});}elsif($oOVEaqU4S3 eq "\x68\x69\x6e\x74"){return dWzDZlvmBd($AnmzMI3HKg);}my($hE8TSUVQ1G,$cdrZIuAgGi)=split(/\@/,$Qb85f9aHMd);my $p73iKUFjpt;if($AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x43\x41\x43\x48\x45\x5f\x57\x45\x42\x5f\x41\x55\x54\x48")){$p73iKUFjpt=$AnmzMI3HKg->FwdCZAK60p("short-user-$cdrZIuAgGi");unless(ref($p73iKUFjpt)){IvTUkLhWlS($AnmzMI3HKg,$cdrZIuAgGi,"\x70\x73\x77\x64\x20\x6d\x69\x73\x6d\x61\x74\x63\x68")if $AnmzMI3HKg->hyBSAPbRYr(1);return jieHY3TRDV($AnmzMI3HKg,{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(! $p73iKUFjpt->{"\x53\x54\x41\x54\x55\x53"}and ! $AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x49\x47\x4e\x4f\x52\x45\x5f\x4c\x4f\x43\x4b")){IvTUkLhWlS($AnmzMI3HKg,$cdrZIuAgGi,"\x6c\x6f\x63\x6b\x65\x64")if $AnmzMI3HKg->hyBSAPbRYr(1);return jieHY3TRDV($AnmzMI3HKg,{ERROR_STR=>"\x59\x6f\x75\x72\x20\x61\x63\x63\x6f\x75\x6e\x74\x20\x69\x73\x20\x6c\x6f\x63\x6b\x65\x64"});}}$p73iKUFjpt=$AnmzMI3HKg->x46lsUXHiG(undef,$cdrZIuAgGi);unless($p73iKUFjpt==1){IvTUkLhWlS($AnmzMI3HKg,$cdrZIuAgGi,"\x70\x73\x77\x64\x20\x6d\x69\x73\x6d\x61\x74\x63\x68")if $AnmzMI3HKg->hyBSAPbRYr(1);return jieHY3TRDV($AnmzMI3HKg,{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 $ZTpS768LnF=$AnmzMI3HKg->EvPmN3L9af();if(ref $ZTpS768LnF ne "\x48\x41\x53\x48"){return jieHY3TRDV($AnmzMI3HKg,{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($ZTpS768LnF->{$hE8TSUVQ1G})or length($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x57\x45\x42\x5f\x53\x45\x43\x52\x45\x54"})==0 or $ZTpS768LnF->{$hE8TSUVQ1G}->{"\x57\x45\x42\x5f\x53\x45\x43\x52\x45\x54"}ne $x6iuEjUpLD){IvTUkLhWlS($AnmzMI3HKg,$cdrZIuAgGi,"\x70\x73\x77\x64\x20\x6d\x69\x73\x6d\x61\x74\x63\x68")if $AnmzMI3HKg->hyBSAPbRYr(1);return jieHY3TRDV($AnmzMI3HKg,{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($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"})and ! $AnmzMI3HKg->{"\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"}){$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"};}if(length($AnmzMI3HKg->S0pnQXc96o()->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"})){unless($AnmzMI3HKg->Nh9ynmFo8b($AnmzMI3HKg->S0pnQXc96o()->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"},$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"})){return $AnmzMI3HKg->ZyguHA4T9W(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($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x4c\x41\x4e\x47\x5f\x49\x44"}){$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"};$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"};}if(my $NZ9iGqHlg1=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x45\x49\x5f\x57\x45\x42\x52\x54\x43\x5f\x50\x52\x45\x46")){if($x6iuEjUpLD=~ /^\Q$NZ9iGqHlg1\E/i){$oOVEaqU4S3="\x70\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65\x5f\x6f\x6e\x6c\x79";}}my %ZzF576pxZC;if($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"}){foreach my $nJVR96d75p(split(/\s*\|\s*/,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"})){my($VqWsVrJuNi,$lzsJmnq6xf)=split(/=/,$nJVR96d75p,2);next unless length $VqWsVrJuNi;if($VqWsVrJuNi eq "\x55\x49\x5f\x42\x4c"){foreach my $UMhbxN6LTS(split(/\s*,\s*/,$lzsJmnq6xf)){$ZzF576pxZC{uc($UMhbxN6LTS)}=1;}if(exists $ZzF576pxZC{"\x43\x53\x56\x5f\x44\x55\x4d\x50"}){$AnmzMI3HKg->{"\x5f\x43\x47\x49"}->param(-name=>"\x6e\x65\x65\x64\x5f\x65\x78\x63\x65\x6c",-value=>0);}last;}}if(exists $ZzF576pxZC{uc($oOVEaqU4S3)}){return $AnmzMI3HKg->ZyguHA4T9W(undef,"\x59\x6f\x75\x20\x68\x61\x76\x65\x20\x6e\x6f\x20\x61\x63\x63\x65\x73\x73\x20\x74\x68\x69\x73\x20\x70\x61\x67\x65\x2e");}}if($oOVEaqU4S3 eq "\x70\x70\x5f\x6d\x65\x6e\x75"){my $L0vtyGKNTM=$AnmzMI3HKg->Y89WXfLe6Q("\x57\x45\x42\x52\x54\x43\x5f\x57\x53");if($L0vtyGKNTM){$L0vtyGKNTM=0 if $AnmzMI3HKg->Dix6pSQcAZ("\x73\x6b\x69\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65");}my $lABz8wsmUT;if(length($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})){$lABz8wsmUT=2;}else{$lABz8wsmUT=3;}my $zZ8gyndhGt=$AnmzMI3HKg->WcAE6gs8Cp(undef,$lABz8wsmUT,undef,undef,"\x69\x73\x5f\x75\x69");return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x6d\x65\x6e\x75\x2e\x74\x74",{PHONE=>$ZTpS768LnF->{$hE8TSUVQ1G},CDR_EXTRA_REPORTS=>scalar(@{$zZ8gyndhGt}),UI_BL=>\%ZzF576pxZC,WEBRTC=>$L0vtyGKNTM});}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x73\x74\x61\x72\x74"){my $tj8r7Nn6LT=$AnmzMI3HKg->{"\x5f\x43\x47\x49"}->cookie(-name=>"\x6c\x6f\x67\x69\x6e",-value=>$Qb85f9aHMd,-path=>"\x2f\x70\x68\x6f\x6e\x65");my $nEwxJpb4um=$AnmzMI3HKg->{"\x5f\x43\x47\x49"}->cookie(-name=>"\x70\x73\x77\x64",-value=>$x6iuEjUpLD,-path=>"\x2f\x70\x68\x6f\x6e\x65");return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x73\x74\x61\x72\x74\x2e\x74\x74",{WITH_PHONE=>$AnmzMI3HKg->Dix6pSQcAZ("\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: $tj8r7Nn6LT","Set-Cookie: $nEwxJpb4um"]);}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x6d\x73\x67\x5f\x6c\x69\x73\x74"){JYF9BH4VZ6($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x63\x64\x72\x5f\x6c\x69\x73\x74"){my($sQBay09EFv,$teKR6zA9Fg)=$AnmzMI3HKg->Dix6pSQcAZ([qw(need_excel need_chart)]);if($sQBay09EFv && ! $AnmzMI3HKg->S0pnQXc96o()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"}){T1h7ZPO0wV($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}elsif($teKR6zA9Fg){zY3jXG4UeJ($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}else{gUuGQR6ed5($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x69\x6e\x66\x6f"){my $Lvx79ILJpV=time;$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});if($Lvx79ILJpV<$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}){$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x47\x5f\x53\x54\x41\x54\x55\x53"}="\x52\x65\x67\x69\x73\x74\x65\x72\x65\x64";}else{$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x47\x5f\x53\x54\x41\x54\x55\x53"}="\x55\x6e\x72\x65\x67\x69\x73\x74\x65\x72\x65\x64";}$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x47\x5f\x45\x58\x50\x49\x52\x45\x44"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}? $AnmzMI3HKg->ZaBlJMdYyE($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x72\x65\x67\x73\x65\x63\x6f\x6e\x64\x73"}):"\x2d";$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}? $AnmzMI3HKg->ZaBlJMdYyE($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x47\x5f\x54\x49\x4d\x45"}):"\x2d";$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x41\x57\x44\x4e\x44"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x4e\x44"};$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x4e\x44"}=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x4e\x44"}? $AnmzMI3HKg->ZaBlJMdYyE($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x4e\x44"}):'';$AnmzMI3HKg->cimODeS49H();my $NneOSQuf9b=0;if($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"}and $ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"}=~ /ALLOW_CCID/){foreach my $nJVR96d75p(split(/\s*\|\s*/,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"})){my($VqWsVrJuNi,$lzsJmnq6xf)=split(/=/,$nJVR96d75p,2);if($VqWsVrJuNi eq "\x41\x4c\x4c\x4f\x57\x5f\x43\x43\x49\x44" and $lzsJmnq6xf){$NneOSQuf9b=1;}}}my $dbC50DGgPH=$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};my $JN0Luha1HT=[];foreach my $HOgRBy1AJH(keys %{$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}}){if($AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x54\x59\x50\x45"}eq "\x31\x33"){my($Wt8u4yPGTs)=$AnmzMI3HKg->gKHklYny5m([$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x43\x41\x4c\x4c\x5f\x4e\x55\x4d\x42\x45\x52"}],"\x6e\x6f\x71\x75\x6f\x74\x65");$Wt8u4yPGTs=~ s#[^,_@\w\d:.*\|\/-]##gs;foreach my $gAMEjr9qtw(split(/,/,$Wt8u4yPGTs)){unless(index($gAMEjr9qtw,"$dbC50DGgPH/")){my $hzHndR6D1N=$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x71\x75\x65\x75\x65\x2d\x61\x67\x65\x6e\x74\x2d".$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x49\x44"}."\x2d".$dbC50DGgPH);push @{$JN0Luha1HT},{NAME=>$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x45\x58\x54\x5f\x4e\x55\x4d\x42\x45\x52"}."\x20\x28\x20".$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x4e\x41\x4d\x45"}."\x20\x29",STATUS=>$hzHndR6D1N,ID=>$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x49\x44"}};last;}}}}my $F6mwWqngUo=0;if($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x68\x6f\x74\x64\x65\x73\x6b\x5f\x63\x61\x6c\x6c\x65\x72\x69\x64"}or $ZTpS768LnF->{$hE8TSUVQ1G}->{"\x48\x4f\x54\x44\x45\x53\x4b\x5f\x43\x49\x44"}){$F6mwWqngUo=1;}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x70\x69\x6e\x66\x6f\x2e\x74\x74",{PHONE=>$ZTpS768LnF->{$hE8TSUVQ1G},HOTDESK=>$F6mwWqngUo,Q_STAT=>$JN0Luha1HT,CUSTOM_CID=>$NneOSQuf9b,DID=>$AnmzMI3HKg->W8Ra9FPOBo(),LANG=>$AnmzMI3HKg->YomitkHNux("\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($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x75\x70\x64\x61\x74\x65"){$AnmzMI3HKg->OuHTcGpAkl();$AnmzMI3HKg->OuHTcGpAkl({CALLED_ID=>"\x77\x65\x62",CALLER_ID=>$ENV{REMOTE_ADDR},CALL_TYPE=>"\x77\x65\x62"});my $tDbvlaZd9n=$AnmzMI3HKg->Dix6pSQcAZ("\x44\x4e\x44");unless($tDbvlaZd9n){$tDbvlaZd9n=0;}else{if($AnmzMI3HKg->Dix6pSQcAZ("\x52\x41\x57\x44\x4e\x44")){$tDbvlaZd9n=$AnmzMI3HKg->Dix6pSQcAZ("\x52\x41\x57\x44\x4e\x44");}else{$tDbvlaZd9n=time;}}my $t6TGVMgx79=$AnmzMI3HKg->Dix6pSQcAZ("\x46\x57\x44\x5f\x41\x46\x54\x45\x52");my $SHPylf2U9u=$AnmzMI3HKg->Dix6pSQcAZ("\x4c\x41\x4e\x47\x5f\x49\x44");if($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"}and $ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"}=~ /ALLOW_CCID/){foreach my $nJVR96d75p(split(/\s*\|\s*/,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"})){my($VqWsVrJuNi,$lzsJmnq6xf)=split(/=/,$nJVR96d75p,2);if($VqWsVrJuNi eq "\x41\x4c\x4c\x4f\x57\x5f\x43\x43\x49\x44" and $lzsJmnq6xf){$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x45\x46\x43\x49\x44"}=$AnmzMI3HKg->Dix6pSQcAZ("\x44\x45\x46\x43\x49\x44");}}}if($AnmzMI3HKg->E7WfiF34Gp($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x73\x65\x63\x72\x65\x74"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x45\x53\x43\x52\x49\x50\x54\x49\x4f\x4e"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x43\x5f\x4d\x4f\x44\x45"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x52\x45\x43\x5f\x45\x58\x54"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x50\x49\x43\x4b\x55\x50\x5f\x47\x52\x4f\x55\x50\x53"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x6e\x61\x6d\x65"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x45\x46\x43\x49\x44"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x74\x72\x75\x73\x74\x65\x64\x5f\x69\x70"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x45\x4d\x41\x49\x4c"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x4f\x4c"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x46\x57\x44\x5f\x4e\x55\x4d"},$t6TGVMgx79,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x57\x45\x42\x5f\x53\x45\x43\x52\x45\x54"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x48\x4f\x54\x44\x45\x53\x4b\x5f\x50\x49\x4e"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x4c\x44\x5f\x54\x54\x4c"},$SHPylf2U9u,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x50\x45\x52\x4d\x49\x54\x5f\x57\x45\x42"},$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x43\x55\x53\x54\x4f\x4d\x5f\x56\x41\x52\x53"},$tDbvlaZd9n)){if($AnmzMI3HKg->S0pnQXc96o()->{"\x41\x4c\x4c\x4f\x57\x5f\x53\x55\x42\x53\x43\x52\x49\x42\x45"}){if($tDbvlaZd9n and ! $ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x4e\x44"}){$AnmzMI3HKg->tB9EsM58Ue($AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},$hE8TSUVQ1G,"\x42\x55\x53\x59");}elsif(! $tDbvlaZd9n and $ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x4e\x44"}){$AnmzMI3HKg->tB9EsM58Ue($AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},$hE8TSUVQ1G,"\x4e\x4f\x54\x5f\x49\x4e\x55\x53\x45");}}return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x6c\x69\x73\x74"){my $hL8mRuDlFk=$AnmzMI3HKg->J1Ym8JCe9f()||return undef;my $gXdM8kDVjl=$AnmzMI3HKg->J1Ym8JCe9f($ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"})||return undef;my $XcumjV30b8=$AnmzMI3HKg->Dix6pSQcAZ("\x66\x6f\x72\x6d\x61\x74");if($XcumjV30b8 eq "\x65\x78\x63\x65\x6c"){my $M21gxwHtAO=[];foreach my $LDhzZgYyJH(@{$gXdM8kDVjl}){push @$M21gxwHtAO,$LDhzZgYyJH;}foreach my $LDhzZgYyJH(@{$hL8mRuDlFk}){push @$M21gxwHtAO,$LDhzZgYyJH;}my $NVhzP0smLy=$AnmzMI3HKg->uyrWI1wpq9("\x70\x62\x6f\x6f\x6b",[$M21gxwHtAO,[qw(PHONE FIRST_NAME LAST_NAME SHORTCUT DESCRIPTION RESPONSIBLE)]]);unless($NVhzP0smLy){return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}else{if($NVhzP0smLy=~ /xlsx$/){return $AnmzMI3HKg->KGOpEHCewM($NVhzP0smLy,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $AnmzMI3HKg->KGOpEHCewM($NVhzP0smLy,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}my $O0Ixpfegmk=$AnmzMI3HKg->Nv0d1CuOSQ();my $Tt56HCxMl7;foreach my $DjdUZkXCEW(keys %$O0Ixpfegmk){if($O0Ixpfegmk->{$DjdUZkXCEW}->{"\x45\x58\x54\x45\x4e\x53\x49\x4f\x4e"}eq "\x63\x72\x6d\x2d\x63\x32\x63\x2d\x67\x77"){$Tt56HCxMl7="ph=$hE8TSUVQ1G&key=$DjdUZkXCEW&ac=".$AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"};last;}}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x70\x62\x6f\x6f\x6b\x2e\x74\x74",{PBOOK_LIST_S=>$hL8mRuDlFk,PBOOK_LIST_P=>$gXdM8kDVjl,C2C=>$Tt56HCxMl7,PHONE=>$hE8TSUVQ1G,});}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x64\x65\x6c"){my $tm5Ue6nVSf=$AnmzMI3HKg->Dix6pSQcAZ("\x64\x61\x74\x61\x5f\x69\x64");if($AnmzMI3HKg->ACFj5sp21n($tm5Ue6nVSf,($tm5Ue6nVSf eq "\x61\x6c\x6c" ? 1:undef),undef,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"},$hE8TSUVQ1G)){return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x61\x64\x64"){unless($AnmzMI3HKg->mhqME9ijPC($AnmzMI3HKg->Y89WXfLe6Q("\x54\x41\x42\x4c\x45\x53\x5f\x50\x48\x4f\x4e\x45\x5f\x42\x4f\x4f\x4b"),$AnmzMI3HKg->S0pnQXc96o()->{"\x4d\x41\x58\x5f\x50\x42\x4f\x4f\x4b\x5f\x49\x54\x45\x4d\x53"},{SUBSCR_ID=>$AnmzMI3HKg->S0pnQXc96o()->{"\x49\x44"},PHONE_OWNER=>$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"}})){return $AnmzMI3HKg->ZyguHA4T9W(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 $tm5Ue6nVSf=$AnmzMI3HKg->tvF5AboafX($AnmzMI3HKg->Dix6pSQcAZ([qw(shortcut ph fn ln description)]),undef,undef,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"},$hE8TSUVQ1G))){return $AnmzMI3HKg->ZyguHA4T9W(undef,undef,$tm5Ue6nVSf,"\x23\x61\x64\x64\x61\x72\x65\x61");}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x75\x70\x64\x61\x74\x65"){if($AnmzMI3HKg->chAfRJGbMy($AnmzMI3HKg->Dix6pSQcAZ([qw(data_id shortcut ph fn ln description)]),undef,$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"},$hE8TSUVQ1G)){return $AnmzMI3HKg->ZyguHA4T9W();}else{return $AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x70\x62\x6f\x6f\x6b\x5f\x75\x70\x6c\x6f\x61\x64"){my $mqz59tr8NW=$AnmzMI3HKg->Dix6pSQcAZ("\x63\x6f\x6e\x66\x69\x67\x5f\x66\x69\x6c\x65");unless(ref($mqz59tr8NW)){$mqz59tr8NW=undef;my $pS7f46TVdU=$AnmzMI3HKg->Dix6pSQcAZ("\x63\x6f\x6e\x66\x69\x67\x5f\x69\x64");if(length($pS7f46TVdU)){my $cpQ8vPySMY=$AnmzMI3HKg->hWMmKQzJLr($AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},undef,$pS7f46TVdU);if(ref($cpQ8vPySMY)eq "\x41\x52\x52\x41\x59" and scalar(@{$cpQ8vPySMY})){$mqz59tr8NW=$cpQ8vPySMY->[0]->{"\x46\x5f\x50\x41\x54\x48"};}}}unless($mqz59tr8NW){return $AnmzMI3HKg->ZyguHA4T9W();}if($AnmzMI3HKg->pwhxCf3XyS($mqz59tr8NW,0,"\x55\x50\x42\x4f\x4f\x4b",undef,undef,"\x75\x70\x62\x6f\x6f\x6b",{PHONE_OWNER=>$ZTpS768LnF->{$hE8TSUVQ1G}->{"\x44\x41\x54\x41\x5f\x49\x44"},PHONE_NUMBER=>$hE8TSUVQ1G})){return $AnmzMI3HKg->ZyguHA4T9W();}}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x63\x61\x6c\x6c\x73\x5f\x6c\x69\x73\x74"){ebI8fRy4X9($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74"){rIrJCMQWu4($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x72\x75\x6e"){lH298O54cu($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G});}elsif($oOVEaqU4S3=~ /^pp_web_phone/){my $tCbisRwhUQ=$AnmzMI3HKg->Y89WXfLe6Q("\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($AnmzMI3HKg->S0pnQXc96o()->{"\x50\x48\x4f\x4e\x45\x5f\x55\x49\x5f\x53\x4b\x49\x50\x5f\x50\x53\x57\x44"})){$tCbisRwhUQ=$AnmzMI3HKg->S0pnQXc96o()->{"\x50\x48\x4f\x4e\x45\x5f\x55\x49\x5f\x53\x4b\x49\x50\x5f\x50\x53\x57\x44"};}my $mS8YmD3s9t=$AnmzMI3HKg->Dix6pSQcAZ("\x6e\x6f\x63\x6f\x6e\x74\x72\x6f\x6c");my $tuh8nAzlQ2=0;if($oOVEaqU4S3 eq "\x70\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65\x5f\x6f\x6e\x6c\x79"){$mS8YmD3s9t=$tuh8nAzlQ2=1;}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x77\x65\x62\x5f\x70\x68\x6f\x6e\x65\x2e\x74\x74",{PHONE=>$ZTpS768LnF->{$hE8TSUVQ1G},WEBRTC=>{REALM=>$AnmzMI3HKg->Y89WXfLe6Q("\x57\x45\x42\x52\x54\x43\x5f\x52\x45\x41\x4c\x4d"),WS=>$AnmzMI3HKg->Y89WXfLe6Q("\x57\x45\x42\x52\x54\x43\x5f\x57\x53"),ICE=>$AnmzMI3HKg->Y89WXfLe6Q("\x57\x45\x42\x52\x54\x43\x5f\x49\x43\x45"),UI_SKIP_PSWD=>$tCbisRwhUQ},NOCONTROL=>$mS8YmD3s9t,PHONE_ONLY=>$tuh8nAzlQ2});}elsif($oOVEaqU4S3 eq "\x70\x70\x5f\x71\x73\x74\x61\x74\x75\x73"){my $WaBIdQrJRX=$AnmzMI3HKg->Dix6pSQcAZ("\x71\x5f\x69\x64");my $hzHndR6D1N=$AnmzMI3HKg->Dix6pSQcAZ("\x73\x74\x61\x74\x75\x73")||0;if($WaBIdQrJRX and length($hzHndR6D1N)){zMnzXWLGvE($AnmzMI3HKg,$ZTpS768LnF->{$hE8TSUVQ1G},$WaBIdQrJRX,$hzHndR6D1N);}return $AnmzMI3HKg->ZyguHA4T9W();}else{return jieHY3TRDV($AnmzMI3HKg,{});}}sub JYF9BH4VZ6{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($S8l9ToNzLi,$XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$dbC50DGgPH,$YQIpsiahC7,$LARNhM49GZ,$Qb85f9aHMd,$x6iuEjUpLD)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(from_time to_time smart_time caller_id called_id duration login pswd)]);my @vYsw9UcZOB=($mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"});if($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @vYsw9UcZOB,@{$AnmzMI3HKg->dE8b2n9y4L($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}unless(length("$XZ4s1aiuhp$wkRUSzXufK$dbC50DGgPH$YQIpsiahC7$LARNhM49GZ")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $STYNBXbn82=$AnmzMI3HKg->ys4PzEyni2(0,$S8l9ToNzLi,$AnmzMI3HKg->S0pnQXc96o()->{"\x49\x44"},undef,$AnmzMI3HKg->HEyv8csKOu($XZ4s1aiuhp),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),$dbC50DGgPH,$YQIpsiahC7,undef,$LARNhM49GZ,join("\x7c",@vYsw9UcZOB));if($STYNBXbn82){my $QagrqUj7vi=$S8l9ToNzLi+1;my $tpYRXjULiV=$AnmzMI3HKg->S0pnQXc96o()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"};foreach my $zX4ALQuS7y(@{$STYNBXbn82}){$zX4ALQuS7y->{"\x4d\x53\x47\x5f\x4e\x55\x4d"}=$QagrqUj7vi++;$zX4ALQuS7y->{"\x4d\x53\x47\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($zX4ALQuS7y->{"\x43\x52\x45\x41\x54\x45\x5f\x54\x49\x4d\x45"});if($tpYRXjULiV){$AnmzMI3HKg->z4XsWPZrKn(\$zX4ALQuS7y->{"\x43\x41\x4c\x4c\x45\x52\x49\x44"},$tpYRXjULiV);$AnmzMI3HKg->z4XsWPZrKn(\$zX4ALQuS7y->{"\x43\x41\x4c\x4c\x45\x44\x49\x44"},$tpYRXjULiV);}}}$AnmzMI3HKg->cimODeS49H();return dwZpvdYCec($AnmzMI3HKg,"\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=>$STYNBXbn82,FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK,CALLER_ID=>$dbC50DGgPH,CALLED_ID=>$YQIpsiahC7,DURATION=>$LARNhM49GZ,SMART_TIME=>$CyzqtHa3GI,$AnmzMI3HKg->rYQvMDRBum(0,$STYNBXbn82,$S8l9ToNzLi)});}sub zY3jXG4UeJ{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$dbC50DGgPH,$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,$UpUzD1BhMe,$GgimvhV9wj)=$AnmzMI3HKg->Dix6pSQcAZ([qw(from_time to_time smart_time caller_id call_type called_id duration data raw_chart_data)]);my $hE8TSUVQ1G=$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});unless(length("$XZ4s1aiuhp$wkRUSzXufK$dbC50DGgPH$qWoIU9upfn$YQIpsiahC7$LARNhM49GZ$UpUzD1BhMe")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my @vYsw9UcZOB=($hE8TSUVQ1G);if($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @vYsw9UcZOB,@{$AnmzMI3HKg->dE8b2n9y4L($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}my $tmU5JCl6QK=$AnmzMI3HKg->d9x67XfL8P($dbC50DGgPH,$AnmzMI3HKg->HEyv8csKOu(($XZ4s1aiuhp||"\x30\x30\x3a\x30\x30")),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),($AnmzMI3HKg->Dix6pSQcAZ("\x63\x68\x61\x72\x74\x5f\x67\x72\x6f\x75\x70\x5f\x70\x65\x72\x69\x6f\x64")||"\x64"),$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,$UpUzD1BhMe,$GgimvhV9wj,join("\x7c",@vYsw9UcZOB));my $y0GQbtAJ9Z;unless($GgimvhV9wj){$y0GQbtAJ9Z=$AnmzMI3HKg->ZaBlJMdYyE($tmU5JCl6QK->[2])."\x20\x2d\x20".$AnmzMI3HKg->ZaBlJMdYyE($tmU5JCl6QK->[3]);}$AnmzMI3HKg->cimODeS49H();if($GgimvhV9wj){unless($tmU5JCl6QK){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}else{if($tmU5JCl6QK=~ /xlsx$/){return $AnmzMI3HKg->KGOpEHCewM($tmU5JCl6QK,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $AnmzMI3HKg->KGOpEHCewM($tmU5JCl6QK,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}unless(ref $tmU5JCl6QK eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;}my $MD8xHiL2Ow=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45");if(exists $AnmzMI3HKg->S0pnQXc96o()->{"\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45"}){$MD8xHiL2Ow=$AnmzMI3HKg->S0pnQXc96o()->{"\x45\x58\x43\x45\x4c\x5f\x4d\x4f\x44\x45"};}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x63\x64\x72\x73\x5f\x63\x68\x61\x72\x74\x2e\x74\x74",{CDR_LIST=>$tmU5JCl6QK->[0],CDR_HEADER=>$y0GQbtAJ9Z,CDR_PERIOD=>$tmU5JCl6QK->[1],CDR_CALLER_ID=>$dbC50DGgPH,CDR_CALLED_ID=>$YQIpsiahC7,CDR_CALL_TYPE=>$qWoIU9upfn,CDR_DURATION=>$LARNhM49GZ,CDR_DATA=>$UpUzD1BhMe,CDR_WITH_ASR=>$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x53\x54\x41\x54\x5f\x57\x49\x54\x48\x5f\x41\x53\x52"),PHONE=>$hE8TSUVQ1G,EXCEL_MODE=>$MD8xHiL2Ow,SMART_TIME=>$CyzqtHa3GI,FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK});}sub T1h7ZPO0wV{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($S8l9ToNzLi,$XZ4s1aiuhp,$wkRUSzXufK,$dbC50DGgPH,$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(from_time to_time caller_id call_type called_id duration)]);unless(length("$dbC50DGgPH$YQIpsiahC7$XZ4s1aiuhp$wkRUSzXufK$qWoIU9upfn$LARNhM49GZ")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my $hE8TSUVQ1G=$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};my @vYsw9UcZOB=($hE8TSUVQ1G);if($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @vYsw9UcZOB,@{$AnmzMI3HKg->dE8b2n9y4L($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $NVhzP0smLy=$AnmzMI3HKg->NuWm8U7s3J("\x63\x64\x72",$dbC50DGgPH,$AnmzMI3HKg->HEyv8csKOu($XZ4s1aiuhp),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),undef,undef,$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,undef,join("\x7c",@vYsw9UcZOB));$AnmzMI3HKg->cimODeS49H();unless($NVhzP0smLy){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);}else{if($NVhzP0smLy=~ /xlsx$/){return $AnmzMI3HKg->KGOpEHCewM($NVhzP0smLy,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $AnmzMI3HKg->KGOpEHCewM($NVhzP0smLy,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}sub gUuGQR6ed5{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($S8l9ToNzLi,$XZ4s1aiuhp,$wkRUSzXufK,$CyzqtHa3GI,$dbC50DGgPH,$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,$VKe8MojfY4)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(from_time to_time smart_time caller_id call_type called_id duration cnam)]);my $hE8TSUVQ1G=$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});unless(length("$dbC50DGgPH$YQIpsiahC7$XZ4s1aiuhp$wkRUSzXufK$qWoIU9upfn$LARNhM49GZ$VKe8MojfY4")){my $C1WmHy6Kai=$AnmzMI3HKg->Y89WXfLe6Q("\x44\x42\x5f\x46\x52\x4f\x4d\x5f\x54\x49\x4d\x45\x5f\x55\x49");$XZ4s1aiuhp=$AnmzMI3HKg->ZaBlJMdYyE(time-86400*$C1WmHy6Kai,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x30\x30\x3a\x30\x30");$wkRUSzXufK=$AnmzMI3HKg->ZaBlJMdYyE(time,"\x25\x59\x2f\x25\x6d\x2f\x25\x64\x20\x32\x33\x3a\x35\x39\x3a\x35\x39");}my @vYsw9UcZOB=($hE8TSUVQ1G);if($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}){push @vYsw9UcZOB,@{$AnmzMI3HKg->dE8b2n9y4L($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})};}my $zpPo6XZes9=$AnmzMI3HKg->yuMWzK495Q(undef,$dbC50DGgPH,$S8l9ToNzLi,"\x63\x64\x72",$AnmzMI3HKg->HEyv8csKOu($XZ4s1aiuhp),$AnmzMI3HKg->HEyv8csKOu($wkRUSzXufK),undef,undef,$qWoIU9upfn,$YQIpsiahC7,$LARNhM49GZ,undef,undef,join("\x7c",@vYsw9UcZOB),$VKe8MojfY4);if($zpPo6XZes9){my $tpYRXjULiV=$AnmzMI3HKg->S0pnQXc96o()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"};my $QagrqUj7vi=$S8l9ToNzLi+1;foreach my $bKpLaOhv0I(@{$zpPo6XZes9}){$bKpLaOhv0I->{"\x43\x44\x52\x5f\x4e\x55\x4d"}=$QagrqUj7vi++;$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});if($tpYRXjULiV){$AnmzMI3HKg->z4XsWPZrKn(\$bKpLaOhv0I->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"},$tpYRXjULiV);$AnmzMI3HKg->z4XsWPZrKn(\$bKpLaOhv0I->{"\x43\x41\x4c\x4c\x45\x44\x5f\x49\x44"},$tpYRXjULiV);$bKpLaOhv0I->{"\x44\x41\x54\x41"}=~ s/(DID=|PN=|RN=)([^,]+)(\d{$tpYRXjULiV})(,|$)/$1x$3$4/g;}if(not exists $bKpLaOhv0I->{"\x56\x42\x5f\x49\x44"}and $bKpLaOhv0I->{"\x44\x41\x54\x41"}=~ /FILE=(\d+):([^\s,]+)/){$bKpLaOhv0I->{"\x56\x42\x5f\x49\x44"}=$1;$bKpLaOhv0I->{"\x46\x49\x4c\x45\x5f\x4e\x41\x4d\x45"}=$2;}}}$AnmzMI3HKg->cimODeS49H();my $O0Ixpfegmk=$AnmzMI3HKg->Nv0d1CuOSQ();my $Tt56HCxMl7;foreach my $DjdUZkXCEW(keys %$O0Ixpfegmk){if($O0Ixpfegmk->{$DjdUZkXCEW}->{"\x45\x58\x54\x45\x4e\x53\x49\x4f\x4e"}eq "\x63\x72\x6d\x2d\x63\x32\x63\x2d\x67\x77"){$Tt56HCxMl7="ph=$hE8TSUVQ1G&key=$DjdUZkXCEW&ac=".$AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"};last;}}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x63\x64\x72\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74",{CDR_LIST=>$zpPo6XZes9,CDR_CALLER_ID=>$dbC50DGgPH,CDR_CALLED_ID=>$YQIpsiahC7,CDR_DURATION=>$LARNhM49GZ,FROM_TIME=>$XZ4s1aiuhp,TO_TIME=>$wkRUSzXufK,SMART_TIME=>$CyzqtHa3GI,CDR_CNAM=>$VKe8MojfY4,CDR_CALL_TYPE=>$qWoIU9upfn,C2C=>$Tt56HCxMl7,PHONE=>$hE8TSUVQ1G,$AnmzMI3HKg->rYQvMDRBum(0,$zpPo6XZes9,$S8l9ToNzLi)});}sub ebI8fRy4X9{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($S8l9ToNzLi,$dbC50DGgPH,$YQIpsiahC7,$cdrZIuAgGi,$qWoIU9upfn,$YUASHyWjB9,$Tt56HCxMl7,$LARNhM49GZ)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],qw(caller_id called_id ac call_type refresh c2c duration)]);my $pHXQB8k4Pf;if($AnmzMI3HKg->S0pnQXc96o()->{"\x41\x4c\x4c\x4f\x57\x5f\x43\x54\x52"}){$pHXQB8k4Pf=$AnmzMI3HKg->S5ZDxtzm0n($dbC50DGgPH,$YQIpsiahC7,$AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"},$qWoIU9upfn,$LARNhM49GZ,undef,undef,undef,$S8l9ToNzLi);}else{$YUASHyWjB9="\x38\x36\x34\x30\x30";}unless(ref $pHXQB8k4Pf eq "\x41\x52\x52\x41\x59"){$pHXQB8k4Pf=[];}my $fs2STkhKE9=[];if(scalar @$pHXQB8k4Pf){$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $tpYRXjULiV=$AnmzMI3HKg->S0pnQXc96o()->{"\x48\x49\x44\x45\x5f\x4e\x55\x4d\x42\x45\x52\x53"};foreach my $bKpLaOhv0I(@{$pHXQB8k4Pf}){$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x41\x54\x45"}=$AnmzMI3HKg->ZaBlJMdYyE($bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"});$bKpLaOhv0I->{"\x43\x44\x52\x5f\x44\x55\x52\x41\x54\x49\x4f\x4e"}=time-$bKpLaOhv0I->{"\x53\x54\x41\x52\x54\x5f\x54\x49\x4d\x45\x53\x54\x41\x4d\x50"};if($bKpLaOhv0I->{"\x43\x41\x4c\x4c\x5f\x54\x59\x50\x45"}ne "\x74\x72\x61\x6e\x73\x69\x74" and $bKpLaOhv0I->{"\x43\x41\x4c\x4c\x5f\x54\x59\x50\x45"}ne "\x69\x6e\x74\x65\x72\x6e\x61\x6c" and $bKpLaOhv0I->{"\x43\x41\x4c\x4c\x5f\x54\x59\x50\x45"}ne "\x73\x65\x72\x76\x69\x63\x65"){my($oAFfPUv9OH,$HOgRBy1AJH,$Z1YkpariQM)=split(/:/,$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x63\x2d\x74\x72\x61\x63\x6b\x2d\x63\x75\x72\x2d\x65\x78\x74\x2d".$bKpLaOhv0I->{"\x43\x41\x4c\x4c\x5f\x49\x44"}));$bKpLaOhv0I->{"\x45\x58\x54\x5f\x54\x53"}=time-$oAFfPUv9OH;$bKpLaOhv0I->{"\x45\x58\x54\x5f\x49\x44"}=$HOgRBy1AJH;$bKpLaOhv0I->{"\x41\x4e\x53\x57\x45\x52\x45\x44"}=$Z1YkpariQM;}foreach my $mWt5IO0i8D(@{$AnmzMI3HKg->dE8b2n9y4L($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})},$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"}){next unless length $mWt5IO0i8D;if($bKpLaOhv0I->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"}eq $mWt5IO0i8D or $bKpLaOhv0I->{"\x43\x41\x4c\x4c\x45\x44\x5f\x49\x44"}eq $mWt5IO0i8D or $bKpLaOhv0I->{"\x41\x4e\x53\x57\x45\x52\x45\x44"}eq $mWt5IO0i8D){push @$fs2STkhKE9,$bKpLaOhv0I;last;}elsif(index($mWt5IO0i8D,"\x2a")==0 and length($mWt5IO0i8D)>1){if("\x2a".$bKpLaOhv0I->{"\x45\x58\x54\x5f\x49\x44"}eq $mWt5IO0i8D){push @$fs2STkhKE9,$bKpLaOhv0I;last;}}}if($tpYRXjULiV){$AnmzMI3HKg->z4XsWPZrKn(\$bKpLaOhv0I->{"\x43\x41\x4c\x4c\x45\x52\x5f\x49\x44"},$tpYRXjULiV);$AnmzMI3HKg->z4XsWPZrKn(\$bKpLaOhv0I->{"\x43\x41\x4c\x4c\x45\x44\x5f\x49\x44"},$tpYRXjULiV);}}$AnmzMI3HKg->cimODeS49H();}if($YUASHyWjB9 and $YUASHyWjB9<$AnmzMI3HKg->Y89WXfLe6Q("\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")){$YUASHyWjB9=$AnmzMI3HKg->Y89WXfLe6Q("\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($YUASHyWjB9){my $O0Ixpfegmk=$AnmzMI3HKg->Nv0d1CuOSQ();foreach my $DjdUZkXCEW(keys %$O0Ixpfegmk){if($O0Ixpfegmk->{$DjdUZkXCEW}->{"\x45\x58\x54\x45\x4e\x53\x49\x4f\x4e"}eq "\x78\x76\x62\x73\x70\x79"){if($AnmzMI3HKg->aUsvc0qPmO()->{"\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"){$Tt56HCxMl7=$DjdUZkXCEW."\x26\x70\x68\x3d".$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};}last;}}}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x63\x61\x6c\x6c\x73\x5f\x6c\x69\x73\x74\x2e\x74\x74",{CALLS_COUNT=>scalar(@$fs2STkhKE9),CALLS_LIST=>$fs2STkhKE9,CDR_CALLER_ID=>$dbC50DGgPH,CDR_CALLED_ID=>$YQIpsiahC7,CDR_CALL_TYPE=>$qWoIU9upfn,CDR_REFRESH_TIME=>$YUASHyWjB9,CDR_C2C=>$Tt56HCxMl7,CDR_DURATION=>$LARNhM49GZ,$AnmzMI3HKg->rYQvMDRBum(1,$fs2STkhKE9,$S8l9ToNzLi)});}sub zMnzXWLGvE{my($AnmzMI3HKg,$mfJKlVeopI,$WaBIdQrJRX,$hzHndR6D1N)=@_;my $dbC50DGgPH=$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};foreach my $HOgRBy1AJH(keys %{$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}}){if($AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x54\x59\x50\x45"}eq "\x31\x33"){if($WaBIdQrJRX and $WaBIdQrJRX ne $AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x49\x44"}){next;}my($Wt8u4yPGTs)=$AnmzMI3HKg->gKHklYny5m([$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x43\x41\x4c\x4c\x5f\x4e\x55\x4d\x42\x45\x52"}],"\x6e\x6f\x71\x75\x6f\x74\x65");$Wt8u4yPGTs=~ s#[^,_@\w\d:.*\|\/-]##gs;foreach my $gAMEjr9qtw(split(/,/,$Wt8u4yPGTs)){unless(index($gAMEjr9qtw,"$dbC50DGgPH/")){if($hzHndR6D1N){$hzHndR6D1N=1;}else{$hzHndR6D1N=0;}$AnmzMI3HKg->FwdCZAK60p("\x73\x68\x2d\x71\x75\x65\x75\x65\x2d\x61\x67\x65\x6e\x74\x2d".$AnmzMI3HKg->{"\x5f\x55\x53\x45\x52\x5f\x56\x42\x4f\x58\x45\x53"}->{$HOgRBy1AJH}->{"\x49\x44"}."\x2d".$dbC50DGgPH,$hzHndR6D1N,0);$AnmzMI3HKg->OuHTcGpAkl();$AnmzMI3HKg->OuHTcGpAkl({EVENT_START_TIME=>$AnmzMI3HKg->YRaJLzjuwS(),EVENT_TYPE=>"\x41\x67\x65\x6e\x74\x53\x74\x61\x74\x75\x73",EVENT_STOP_TIME=>0,EVENT_EXT=>$HOgRBy1AJH,ENH_STATUS=>$hzHndR6D1N,ENH_AGENT=>$dbC50DGgPH,CALL_TYPE=>"\x77\x65\x62",CALLED_ID=>"\x77\x65\x62",CALLER_ID=>$ENV{"\x52\x45\x4d\x4f\x54\x45\x5f\x41\x44\x44\x52"}});$AnmzMI3HKg->o62sXWE8nl();last;}}}}}sub rIrJCMQWu4{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($S8l9ToNzLi,$f23jkS1CPi)=$AnmzMI3HKg->Dix6pSQcAZ([[(from=>0)],"\x6e\x61\x6d\x65"]);my $lABz8wsmUT;if(length($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})){$lABz8wsmUT=2;}else{$lABz8wsmUT=3;}my $zZ8gyndhGt=$AnmzMI3HKg->WcAE6gs8Cp(undef,$lABz8wsmUT,$f23jkS1CPi,$S8l9ToNzLi,"\x69\x73\x5f\x75\x69");unless(ref $zZ8gyndhGt eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->{"\x5f\x43\x47\x49\x5f\x45\x52\x52\x4f\x52"}="Internal error : $$ : ".__LINE__;return 0;}dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x72\x65\x70\x6f\x72\x74\x5f\x6c\x69\x73\x74\x2e\x74\x74",{REPORTS=>$zZ8gyndhGt,SEARCH_NAME=>$f23jkS1CPi,$AnmzMI3HKg->rYQvMDRBum(1,$zZ8gyndhGt,$S8l9ToNzLi)});}sub lH298O54cu{my($AnmzMI3HKg,$mfJKlVeopI)=@_;my($txt6QkTVXf,$sQBay09EFv,$my6wQkbd8c,$Kf39QSrJDE,$CyzqtHa3GI)=$AnmzMI3HKg->Dix6pSQcAZ([qw(report_id need_excel from_time to_time smart_time)]);$AnmzMI3HKg->cimODeS49H($AnmzMI3HKg->S0pnQXc96o()->{"\x54\x5a\x5f\x4e\x41\x4d\x45"},$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4c\x4f\x43\x41\x4c\x45"});my $irNLD9nUIV=$AnmzMI3HKg->HEyv8csKOu($my6wQkbd8c);my $eJtLflIT9k=$AnmzMI3HKg->HEyv8csKOu($Kf39QSrJDE);$AnmzMI3HKg->cimODeS49H();my(%v0jWF678wp,@UNrd6o8H29,$lABz8wsmUT);if(length($mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"})){$lABz8wsmUT=2;}else{$lABz8wsmUT=3;}my $XUjDX5puVr=$AnmzMI3HKg->WcAE6gs8Cp($txt6QkTVXf,$lABz8wsmUT,undef,undef,"\x69\x73\x5f\x75\x69");if(! ref $XUjDX5puVr eq "\x41\x52\x52\x41\x59" or scalar(@{$XUjDX5puVr})==0){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);return 0;}if($XUjDX5puVr->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"}){foreach my $sABpt8wfv0(split(/\s*\|\s*/,$XUjDX5puVr->[0]->{"\x45\x58\x54\x52\x41\x5f\x50\x41\x52\x41\x4d\x53"})){my($hed95pMray,$yumNEpS8dc,$OuCjQl5mZ9)=split(/\s*:\s*/,$sABpt8wfv0,3);$v0jWF678wp{$hed95pMray}=$AnmzMI3HKg->Dix6pSQcAZ($hed95pMray);push @UNrd6o8H29,{name=>$hed95pMray,label=>$yumNEpS8dc,value=>$v0jWF678wp{$hed95pMray}};}}$v0jWF678wp{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"}=$mfJKlVeopI->{"\x4d\x41\x4e\x41\x47\x45\x52\x5f\x46\x4f\x52"};$v0jWF678wp{"\x55\x53\x45\x52\x5f\x50\x48\x4f\x4e\x45"}=$mfJKlVeopI->{"\x63\x61\x6c\x6c\x65\x72\x69\x64"};my $shNGgCWQ4T=$AnmzMI3HKg->pVzJck5Arb($txt6QkTVXf,$XUjDX5puVr->[0]->{"\x54\x59\x50\x45"},$sQBay09EFv,$irNLD9nUIV,$eJtLflIT9k,\%v0jWF678wp,"\x69\x73\x5f\x75\x69");if($sQBay09EFv){if($shNGgCWQ4T){if($shNGgCWQ4T=~ /xlsx$/){return $AnmzMI3HKg->KGOpEHCewM($shNGgCWQ4T,"\x61\x70\x70\x6c\x69\x63\x61\x74\x69\x6f\x6e\x2f\x78\x6c\x73\x78");}else{return $AnmzMI3HKg->KGOpEHCewM($shNGgCWQ4T,"\x74\x65\x78\x74\x2f\x63\x73\x76");}}}unless(ref $shNGgCWQ4T eq "\x41\x52\x52\x41\x59"){$AnmzMI3HKg->ZyguHA4T9W(undef,"Internal error : $$ : ".__LINE__);return 0;}my $AfVEUj1HGr=[];my $KY78N4basG=[];foreach my $atOPlCq51N(@{$shNGgCWQ4T->[1]}){my $DjdUZkXCEW=$atOPlCq51N;if($DjdUZkXCEW=~ s/^=//){push @{$KY78N4basG},{name=>$DjdUZkXCEW,align=>"\x6c\x65\x66\x74"};}elsif($DjdUZkXCEW=~ s/=$//){push @{$KY78N4basG},{name=>$DjdUZkXCEW,align=>"\x72\x69\x67\x68\x74"};}else{push @{$KY78N4basG},{name=>$DjdUZkXCEW,align=>"\x63\x65\x6e\x74\x65\x72"};}}for(0..$#{$shNGgCWQ4T->[0]}){$AfVEUj1HGr->[$_]=[];foreach my $atOPlCq51N(@{$shNGgCWQ4T->[1]}){my $DjdUZkXCEW=$atOPlCq51N;my $XKPcO4CSL5=$shNGgCWQ4T->[0]->[$_]->{$DjdUZkXCEW};if($DjdUZkXCEW=~ s/^=//){push @{$AfVEUj1HGr->[$_]},{value=>$XKPcO4CSL5,align=>"\x6c\x65\x66\x74",label=>$DjdUZkXCEW};}elsif($DjdUZkXCEW=~ s/=$//){push @{$AfVEUj1HGr->[$_]},{value=>$XKPcO4CSL5,align=>"\x72\x69\x67\x68\x74",label=>$DjdUZkXCEW};}else{push @{$AfVEUj1HGr->[$_]},{value=>$XKPcO4CSL5,align=>"\x63\x65\x6e\x74\x65\x72",label=>$DjdUZkXCEW};}}}my @Rh9fw7vjzl;unless($AnmzMI3HKg->fcKSvG6Ye3()->{"\x44\x46"}){@Rh9fw7vjzl=(REPORT_DATA=>$shNGgCWQ4T->[2]);}dwZpvdYCec($AnmzMI3HKg,"\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=>($my6wQkbd8c||$shNGgCWQ4T->[3]),TO_TIME=>($Kf39QSrJDE||$shNGgCWQ4T->[4]),SMART_TIME=>$CyzqtHa3GI,REPORT_RESULT=>$AfVEUj1HGr,REPORT_HDR=>$KY78N4basG,REPORT_RAW_DATA=>$shNGgCWQ4T->[5],EXTRA_PARAMS=>\@UNrd6o8H29,@Rh9fw7vjzl});}sub jieHY3TRDV{my($AnmzMI3HKg,$tmU5JCl6QK)=@_;if(my $PW8EJj75Qs=$AnmzMI3HKg->Dix6pSQcAZ("\x6c\x61\x6e\x67")){$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"}=$PW8EJj75Qs;}return dwZpvdYCec($AnmzMI3HKg,"\x70\x68\x6f\x6e\x65\x5f\x70\x5f\x6c\x6f\x67\x69\x6e\x2e\x74\x74",$tmU5JCl6QK);}sub dWzDZlvmBd{my($AnmzMI3HKg)=@_;my $JO1uQRfhsK=$AnmzMI3HKg->Dix6pSQcAZ("\x65\x78\x74");my($T9sqkJK6Cw,$mwmbR8oZ31)=split(/\//,$JO1uQRfhsK,2);my $tmU5JCl6QK="\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($T9sqkJK6Cw){my $AET8veJ9qD=$AnmzMI3HKg->XHI8FNoztq($T9sqkJK6Cw);if($AET8veJ9qD){my $PQhpPoOtiG=$AnmzMI3HKg->S0pnQXc96o();%{$PQhpPoOtiG}=%{$AET8veJ9qD};if($AnmzMI3HKg->S0pnQXc96o()->{"\x41\x4c\x4c\x4f\x57\x5f\x53\x55\x42\x53\x43\x52\x49\x42\x45"}){my $ZTpS768LnF=$AnmzMI3HKg->EvPmN3L9af();if(ref $ZTpS768LnF eq "\x48\x41\x53\x48"){if(exists($ZTpS768LnF->{$mwmbR8oZ31})){$tmU5JCl6QK="\x53\x49\x50\x2f".$ZTpS768LnF->{$mwmbR8oZ31}->{"\x6e\x61\x6d\x65"}."\x26\x43\x75\x73\x74\x6f\x6d\x3a\x58\x56\x42\x2d".$AnmzMI3HKg->S0pnQXc96o()->{"\x41\x43\x43\x45\x53\x53\x5f\x43\x4f\x44\x45"}."-$mwmbR8oZ31";}}}}}}$AnmzMI3HKg->au9SnFjUNM(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",$tmU5JCl6QK);}sub IvTUkLhWlS{my($AnmzMI3HKg,$cdrZIuAgGi,$uTWXmzliKb)=@_;$AnmzMI3HKg->Pn4ciL8F9G(["\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"},$cdrZIuAgGi,$uTWXmzliKb]);}sub dwZpvdYCec{my($AnmzMI3HKg,$KuQ984NhYL,$tmU5JCl6QK,$s8FXqvHhcZ)=@_;$tmU5JCl6QK->{"\x43\x47\x49\x5f\x55\x52\x4c"}=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x55\x52\x4c");$tmU5JCl6QK->{"\x43\x47\x49\x5f\x53\x45\x52\x56\x45\x52"}=$AnmzMI3HKg->Y89WXfLe6Q("\x43\x47\x49\x5f\x53\x45\x52\x56\x45\x52");$tmU5JCl6QK->{"\x55\x4e\x49\x58\x54\x49\x4d\x45"}=time;my $w2AEoDmSLn='';my $zA1ID7Wrvc='';unless($w2AEoDmSLn){my $GnqlTy8Yzr;my $fgVNP8jtre=$AnmzMI3HKg->Y89WXfLe6Q("\x50\x41\x54\x48\x5f\x54\x45\x4d\x50\x4c\x41\x54\x45\x5f\x44\x49\x52");my $PW8EJj75Qs=$AnmzMI3HKg->S0pnQXc96o()->{"\x4c\x41\x4e\x47\x5f\x4e\x41\x4d\x45"}||$AnmzMI3HKg->Y89WXfLe6Q("\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 $ZM6p2EHWoU=$AnmzMI3HKg->S0pnQXc96o()->{"\x53\x55\x42\x5f\x54\x45\x4d\x50\x4c\x41\x54\x45\x5f\x44\x49\x52"};if(length $ZM6p2EHWoU){$ZM6p2EHWoU=~ s#[^\d\w_.-]##gs;}if(length($ZM6p2EHWoU)and-e "$fgVNP8jtre/$ZM6p2EHWoU/$PW8EJj75Qs/$KuQ984NhYL"){$GnqlTy8Yzr="$fgVNP8jtre/$ZM6p2EHWoU/$PW8EJj75Qs/$KuQ984NhYL";}elsif(-e "$fgVNP8jtre/$PW8EJj75Qs/$KuQ984NhYL"){$GnqlTy8Yzr="$fgVNP8jtre/$PW8EJj75Qs/$KuQ984NhYL";}else{$GnqlTy8Yzr="$fgVNP8jtre/$KuQ984NhYL";}my $f49PdJ3YjM=$AnmzMI3HKg->{"\x5f\x54\x4d\x50\x4c"};my $n8ht091Lnj=$AnmzMI3HKg->FwdCZAK60p("files-$GnqlTy8Yzr");unless($n8ht091Lnj){$n8ht091Lnj=$f49PdJ3YjM->load_src('',$GnqlTy8Yzr);$AnmzMI3HKg->FwdCZAK60p("files-$GnqlTy8Yzr",$n8ht091Lnj,$AnmzMI3HKg->Y89WXfLe6Q("\x54\x49\x4d\x45\x4f\x55\x54\x5f\x4d\x45\x4d\x5f\x43\x41\x43\x48\x45\x44"));}$tmU5JCl6QK->{"\x55\x53\x45\x52\x5f\x43\x52\x45\x44\x53"}=$AnmzMI3HKg->S0pnQXc96o();$f49PdJ3YjM->process(\$n8ht091Lnj,$tmU5JCl6QK,\$zA1ID7Wrvc);}unless($w2AEoDmSLn){$AnmzMI3HKg->au9SnFjUNM(200,"\x4f\x6b",$s8FXqvHhcZ,$zA1ID7Wrvc.$AnmzMI3HKg->Sgzw8dc0Vv("\x67\x36\x31\x33","\x43"));}elsif($w2AEoDmSLn eq "\x78\x6d\x6c"){$zA1ID7Wrvc=XML::Simple::XMLout($tmU5JCl6QK);$AnmzMI3HKg->sKr7q6P80I(200,"\x4f\x6b",undef,$zA1ID7Wrvc);}elsif($w2AEoDmSLn eq "\x6a\x73\x6f\x6e"){my $m9TXZBjeyx=JSON::XS->new();$AnmzMI3HKg->au9SnFjUNM(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",$m9TXZBjeyx->encode($tmU5JCl6QK));}}