| Lines 135-141
          sub SearchSuggestion {
      
      
        Link Here | 
        
          | 135 |     if ( C4::Context->preference('IndependentBranches') ) { | 135 |     if ( C4::Context->preference('IndependentBranches') ) { | 
        
          | 136 |         my $userenv = C4::Context->userenv; | 136 |         my $userenv = C4::Context->userenv; | 
        
          | 137 |         if ($userenv) { | 137 |         if ($userenv) { | 
          
            
              | 138 |             if ( ( $userenv->{flags} % 2 ) != 1 && !$suggestion->{branchcode} ) | 138 |             if ( !C4::Context->IsSuperLibrarian() && !$suggestion->{branchcode} ) | 
        
          | 139 |             { | 139 |             { | 
        
          | 140 |                 push @sql_params, $$userenv{branch}; | 140 |                 push @sql_params, $$userenv{branch}; | 
        
          | 141 |                 push @query,      q{ | 141 |                 push @query,      q{ | 
  
    | Lines 342-348
          sub GetSuggestionByStatus {
      
      
        Link Here | 
        
          | 342 |     if ( C4::Context->preference("IndependentBranches") || $branchcode ) { | 342 |     if ( C4::Context->preference("IndependentBranches") || $branchcode ) { | 
        
          | 343 |         my $userenv = C4::Context->userenv; | 343 |         my $userenv = C4::Context->userenv; | 
        
          | 344 |         if ($userenv) { | 344 |         if ($userenv) { | 
          
            
              | 345 |             unless ( $userenv->{flags} % 2 == 1 ) { | 345 |             unless ( C4::Context->IsSuperLibrarian() ) { | 
        
          | 346 |                 push @sql_params, $userenv->{branch}; | 346 |                 push @sql_params, $userenv->{branch}; | 
        
          | 347 |                 $query .= q{ AND (U1.branchcode = ? OR U1.branchcode ='') }; | 347 |                 $query .= q{ AND (U1.branchcode = ? OR U1.branchcode ='') }; | 
        
          | 348 |             } | 348 |             } | 
  
    | Lines 352-358
          sub GetSuggestionByStatus {
      
      
        Link Here | 
        
          | 352 |             $query .= q{ AND (U1.branchcode = ? OR U1.branchcode ='') }; | 352 |             $query .= q{ AND (U1.branchcode = ? OR U1.branchcode ='') }; | 
        
          | 353 |         } | 353 |         } | 
        
          | 354 |     } | 354 |     } | 
          
            
              | 355 |      | 355 |  | 
        
          | 356 |     my $sth = $dbh->prepare($query); | 356 |     my $sth = $dbh->prepare($query); | 
        
          | 357 |     $sth->execute(@sql_params); | 357 |     $sth->execute(@sql_params); | 
        
          | 358 |     my $results; | 358 |     my $results; | 
  
    | Lines 390-396
          sub CountSuggestion {
      
      
        Link Here | 
        
          | 390 |     my $sth; | 390 |     my $sth; | 
        
          | 391 |     my $userenv = C4::Context->userenv; | 391 |     my $userenv = C4::Context->userenv; | 
        
          | 392 |     if ( C4::Context->preference("IndependentBranches") | 392 |     if ( C4::Context->preference("IndependentBranches") | 
          
            
              | 393 |         && $userenv->{flags} % 2 != 1 ) | 393 |         && !C4::Context->IsSuperLibrarian() ) | 
        
          | 394 |     { | 394 |     { | 
        
          | 395 |         my $query = q{ | 395 |         my $query = q{ | 
        
          | 396 |             SELECT count(*) | 396 |             SELECT count(*) | 
  
    | Lines 436-445
          sub NewSuggestion {
      
      
        Link Here | 
        
          | 436 |  | 436 |  | 
        
          | 437 | Modify the suggestion according to the hash passed by ref. | 437 | Modify the suggestion according to the hash passed by ref. | 
        
          | 438 | The hash HAS to contain suggestionid | 438 | The hash HAS to contain suggestionid | 
          
            
              | 439 | Data not defined is not updated unless it is a note or sort1  | 439 | Data not defined is not updated unless it is a note or sort1 | 
        
          | 440 | Send a mail to notify the user that did the suggestion. | 440 | Send a mail to notify the user that did the suggestion. | 
        
          | 441 |  | 441 |  | 
          
            
              | 442 | Note that there is no function to modify a suggestion.  | 442 | Note that there is no function to modify a suggestion. | 
        
          | 443 |  | 443 |  | 
        
          | 444 | =cut | 444 | =cut | 
        
          | 445 |  | 445 |  | 
  
    | Lines 533-541
          sub DelSuggestion {
      
      
        Link Here | 
        
          | 533 |  | 533 |  | 
        
          | 534 | =head2 DelSuggestionsOlderThan | 534 | =head2 DelSuggestionsOlderThan | 
        
          | 535 |     &DelSuggestionsOlderThan($days) | 535 |     &DelSuggestionsOlderThan($days) | 
          
            
              | 536 |      | 536 |  | 
        
          | 537 |     Delete all suggestions older than TODAY-$days , that have be accepted or rejected. | 537 |     Delete all suggestions older than TODAY-$days , that have be accepted or rejected. | 
          
            
              | 538 |      | 538 |  | 
        
          | 539 | =cut | 539 | =cut | 
        
          | 540 |  | 540 |  | 
        
          | 541 | sub DelSuggestionsOlderThan { | 541 | sub DelSuggestionsOlderThan { |