| 
      
            Lines 33-38
          use C4::Koha qw/IsAuthorisedValueCategory GetFrameworksLoop/;
      
      
        Link Here
      
     | 
  
        
          | 33 | 
          use C4::Context;  | 
          33 | 
          use C4::Context;  | 
        
        
          | 34 | 
          use C4::Log;  | 
          34 | 
          use C4::Log;  | 
        
        
          | 35 | 
          use Koha::DateUtils qw/dt_from_string output_pref/;  | 
          35 | 
          use Koha::DateUtils qw/dt_from_string output_pref/;  | 
        
            
               | 
               | 
              36 | 
              use Koha::AuthorisedValue;  | 
            
        
          | 36 | 
           | 
          37 | 
           | 
        
        
          | 37 | 
          =head1 NAME  | 
          38 | 
          =head1 NAME  | 
        
        
          | 38 | 
           | 
          39 | 
           | 
        
  
    | 
      
            Lines 998-1009
          sub create_non_existing_group_and_subgroup {
      
      
        Link Here
      
     | 
  
        
          | 998 | 
                  my $report_groups = C4::Reports::Guided::get_report_groups;  | 
          999 | 
                  my $report_groups = C4::Reports::Guided::get_report_groups;  | 
        
        
          | 999 | 
                  if (not exists $report_groups->{$group}) { | 
          1000 | 
                  if (not exists $report_groups->{$group}) { | 
        
        
          | 1000 | 
                      my $groupdesc = $input->param('groupdesc') // $group; | 
          1001 | 
                      my $groupdesc = $input->param('groupdesc') // $group; | 
        
          
            
              | 1001 | 
                          C4::Koha::AddAuthorisedValue('REPORT_GROUP', $group, $groupdesc); | 
              1002 | 
                          Koha::AuthorisedValue->new({ | 
            
            
               | 
               | 
              1003 | 
                              category => 'REPORT_GROUP',  | 
            
            
              | 1004 | 
                              authorised_value => $group,  | 
            
            
              | 1005 | 
                              lib => $groupdesc,  | 
            
            
              | 1006 | 
                          })->store;  | 
            
        
          | 1002 | 
                  }  | 
          1007 | 
                  }  | 
        
        
          | 1003 | 
                  if (defined $subgroup and $subgroup ne '') { | 
          1008 | 
                  if (defined $subgroup and $subgroup ne '') { | 
        
        
          | 1004 | 
                      if (not exists $report_groups->{$group}->{subgroups}->{$subgroup}) { | 
          1009 | 
                      if (not exists $report_groups->{$group}->{subgroups}->{$subgroup}) { | 
        
        
          | 1005 | 
                          my $subgroupdesc = $input->param('subgroupdesc') // $subgroup; | 
          1010 | 
                          my $subgroupdesc = $input->param('subgroupdesc') // $subgroup; | 
        
          
            
              | 1006 | 
                              C4::Koha::AddAuthorisedValue('REPORT_SUBGROUP', $subgroup, $subgroupdesc, $group); | 
              1011 | 
                              Koha::AuthorisedValue->new({ | 
            
            
               | 
               | 
              1012 | 
                                  category => 'REPORT_SUBGROUP',  | 
            
            
              | 1013 | 
                                  authorised_value => $subgroup,  | 
            
            
              | 1014 | 
                                  lib => $subgroupdesc,  | 
            
            
              | 1015 | 
                                  lib_opac => $group,  | 
            
            
              | 1016 | 
                              })->store;  | 
            
        
          | 1007 | 
                      }  | 
          1017 | 
                      }  | 
        
        
          | 1008 | 
                  }  | 
          1018 | 
                  }  | 
        
        
          | 1009 | 
              }  | 
          1019 | 
              }  | 
        
            
              | 1010 | 
              -   | 
               | 
               |