TT#24128 Fixes found during testing

Change-Id: I5e431ebd12b925e526e12571e2acf7f773b33d30

lib/NGCP/Panel/Form/Invoice/InvoiceAPI.pm

@@ -53,7 +53,7 @@ has_field 'period_end' => (
 );
 
 has_field 'period' => (
-    label => 'Invoice Period End',
+    label => 'Invoice Periods',
     required => 0,
     element_attr => {
         rel => ['tooltip'],

lib/NGCP/Panel/Role/API/Conversations.pm

@@ -347,12 +347,12 @@ sub _get_call_rs {
         $self->_apply_direction(params => $params,
             in => sub {
                 $rs = $rs->search({
-                    { destination_provider_id => $provider_id },
+                    destination_provider_id => $provider_id
                 });
             },
             out => sub {
                 $rs = $rs->search({
-                    { source_provider_id => $provider_id },
+                    source_provider_id => $provider_id
                 });
             },
             inout => sub {
@@ -369,12 +369,12 @@ sub _get_call_rs {
         $self->_apply_direction(params => $params,
             in => sub {
                 $rs = $rs->search({
-                    { destination_account_id => $contract_id },
+                    destination_account_id => $contract_id
                 });
             },
             out => sub {
                 $rs = $rs->search({
-                    { source_account_id => $contract_id },
+                    source_account_id => $contract_id
                 });
             },
             inout => sub {

lib/NGCP/Panel/Utils/Generic.pm

@@ -122,10 +122,10 @@ sub hash2obj {
     bless($obj,$classname);
     no strict "refs";
     return $obj if scalar %{$classname . '::'};
-    print "registering class $classname\n";
+    #print "registering class $classname\n";
     $accessors //= {};
     foreach my $accessor (keys %$accessors) {
-        print "registering accessor $classname::$accessor\n";
+        #print "registering accessor $classname::$accessor\n";
         *{$classname . '::' . $accessor} = sub {
             my $self = shift;
             return &{$accessors->{$accessor}}($self,@_);