diff --git a/lib/NGCP/Panel/Controller/Callflow.pm b/lib/NGCP/Panel/Controller/Callflow.pm
index 00e79b9432..d94ace378b 100644
--- a/lib/NGCP/Panel/Controller/Callflow.pm
+++ b/lib/NGCP/Panel/Controller/Callflow.pm
@@ -125,17 +125,14 @@ sub get_packet :Chained('callflow_base') :PathPart('packet') :Args() {
my $pkg = { $packet->get_inflated_columns };
- my $t = DateTime->from_epoch(
- epoch => $pkg->{timestamp},
- time_zone => DateTime::TimeZone->new(name => 'local'),
- );
- my $tstamp = $t->ymd('-') . ' ' . $t->hms(':') . '.' . $t->millisecond;
+ my $t = $packet->timestamp;
+ my $tstamp = $t->ymd('-') . ' ' . $t->hms(':') . '.' . $t->microsecond;
$pkg->{payload} = encode_entities($pkg->{payload});
$pkg->{payload} =~ s/\r//g;
$pkg->{payload} =~ s/([^\n]{120})/$1
/g;
$pkg->{payload} =~ s/^([^\n]+)\n/$1<\/b>\n/;
- $pkg->{payload} = $tstamp .' ('.$pkg->{timestamp}.')
'.
+ $pkg->{payload} = $tstamp .' ('.$t->hires_epoch.')
'.
$pkg->{src_ip}.':'.$pkg->{src_port}.' → '. $pkg->{dst_ip}.':'.$pkg->{dst_port}.'
'.
$pkg->{payload};
$pkg->{payload} =~ s/\n([a-zA-Z0-9\-_]+\:)/\n$1<\/b>/g;
diff --git a/lib/NGCP/Panel/Controller/Subscriber.pm b/lib/NGCP/Panel/Controller/Subscriber.pm
index 2f9d652a4e..5c0bb9a60c 100644
--- a/lib/NGCP/Panel/Controller/Subscriber.pm
+++ b/lib/NGCP/Panel/Controller/Subscriber.pm
@@ -2465,17 +2465,14 @@ sub get_packet :Chained('callflow_base') :PathPart('packet') :Args() {
my $pkg = { $packet->get_inflated_columns };
- my $t = DateTime->from_epoch(
- epoch => $pkg->{timestamp},
- time_zone => DateTime::TimeZone->new(name => 'local'),
- );
- my $tstamp = $t->ymd('-') . ' ' . $t->hms(':') . '.' . $t->millisecond;
+ my $t = $packet->timestamp;
+ my $tstamp = $t->ymd('-') . ' ' . $t->hms(':') . '.' . $t->microsecond;
$pkg->{payload} = encode_entities($pkg->{payload});
$pkg->{payload} =~ s/\r//g;
$pkg->{payload} =~ s/([^\n]{120})/$1
/g;
$pkg->{payload} =~ s/^([^\n]+)\n/$1<\/b>\n/;
- $pkg->{payload} = $tstamp .' ('.$pkg->{timestamp}.')
'.
+ $pkg->{payload} = $tstamp .' ('.$t->hires_epoch.')
'.
$pkg->{src_ip}.':'.$pkg->{src_port}.' → '. $pkg->{dst_ip}.':'.$pkg->{dst_port}.'
'.
$pkg->{payload};
$pkg->{payload} =~ s/\n([a-zA-Z0-9\-_]+\:)/\n$1<\/b>/g;
diff --git a/lib/NGCP/Panel/Utils/Callflow.pm b/lib/NGCP/Panel/Utils/Callflow.pm
index e9ce473d83..c2053ee8f1 100644
--- a/lib/NGCP/Panel/Utils/Callflow.pm
+++ b/lib/NGCP/Panel/Utils/Callflow.pm
@@ -175,7 +175,7 @@ sub process_callmap {
my $y_offset = $canvas_margin + $canvas_pkg_distance;
$i = 1;
foreach my $packet(@{$packets}) {
- my $time_offset = defined $last_timestamp ? ($packet->timestamp - $last_timestamp) : 0;
+ my $time_offset = defined $last_timestamp ? ($packet->timestamp->hires_epoch - $last_timestamp->hires_epoch) : 0;
$last_timestamp = $packet->timestamp;
my $from_x = $uas_pos_x{$packet->src_ip.':'.$packet->src_port};
my $to_x = $uas_pos_x{$packet->dst_ip.':'.$packet->dst_port};
diff --git a/share/templates/widgets/admin_topmenu_settings.tt b/share/templates/widgets/admin_topmenu_settings.tt
index 9dde4a17e4..16b5aaadaa 100644
--- a/share/templates/widgets/admin_topmenu_settings.tt
+++ b/share/templates/widgets/admin_topmenu_settings.tt
@@ -16,7 +16,7 @@
NCOS Levels
Sound Sets
Security Bans
- SIP Call Flows
+ SIP Call Flows
[% # vim: set tabstop=4 syntax=html expandtab: -%]