| Lines 517-522
          my $fa_duedatespec        = $input->param('duedatespec');
      
      
        Link Here | 
        
          | 517 |  | 517 |  | 
        
          | 518 | my $userflags = 'edit_catalogue'; | 518 | my $userflags = 'edit_catalogue'; | 
        
          | 519 |  | 519 |  | 
            
              |  |  | 520 | my ( $template, $loggedinuser, $cookie ) = get_template_and_user( | 
            
              | 521 |     { | 
            
              | 522 |         template_name   => "cataloguing/addbiblio.tt", | 
            
              | 523 |         query           => $input, | 
            
              | 524 |         type            => "intranet", | 
            
              | 525 |         flagsrequired   => { editcatalogue => $userflags }, | 
            
              | 526 |     } | 
            
              | 527 | ); | 
            
              | 528 |  | 
            
              | 529 | $frameworkcode = &GetFrameworkCode($biblionumber) | 
            
              | 530 |   if ( $biblionumber and not( defined $frameworkcode) and $op ne 'cud-addbiblio' ); | 
            
              | 531 |  | 
            
              | 532 | if ($frameworkcode eq 'FA'){ | 
            
              | 533 |     $userflags = 'fast_cataloging'; | 
            
              | 534 | } | 
            
              | 535 |  | 
            
              | 536 | $frameworkcode = '' if ( $frameworkcode eq 'Default' ); | 
            
              | 537 |  | 
        
          | 520 | # Set default values for global variable | 538 | # Set default values for global variable | 
        
          | 521 | $tagslib           = &GetMarcStructure( 1, $frameworkcode ); | 539 | $tagslib           = &GetMarcStructure( 1, $frameworkcode ); | 
        
          | 522 | $usedTagsLib       = &GetUsedMarcStructure($frameworkcode); | 540 | $usedTagsLib       = &GetUsedMarcStructure($frameworkcode); | 
  
    | Lines 530-552
          if ( $op eq 'cud-change-framework' ) {
      
      
        Link Here | 
        
          | 530 |     $changed_framework = 1; | 548 |     $changed_framework = 1; | 
        
          | 531 | } | 549 | } | 
        
          | 532 |  | 550 |  | 
            
              | 533 | $frameworkcode = &GetFrameworkCode($biblionumber) |  |  | 
            
              | 534 |   if ( $biblionumber and not( defined $frameworkcode) and $op ne 'cud-addbiblio' ); | 
            
              | 535 |  | 
            
              | 536 | if ($frameworkcode eq 'FA'){ | 
            
              | 537 |     $userflags = 'fast_cataloging'; | 
            
              | 538 | } | 
            
              | 539 |  | 
            
              | 540 | $frameworkcode = '' if ( $frameworkcode eq 'Default' ); | 
            
              | 541 | my ( $template, $loggedinuser, $cookie ) = get_template_and_user( | 
            
              | 542 |     { | 
            
              | 543 |         template_name   => "cataloguing/addbiblio.tt", | 
            
              | 544 |         query           => $input, | 
            
              | 545 |         type            => "intranet", | 
            
              | 546 |         flagsrequired   => { editcatalogue => $userflags }, | 
            
              | 547 |     } | 
            
              | 548 | ); | 
            
              | 549 |  | 
        
          | 550 | my $logged_in_patron = Koha::Patrons->find($loggedinuser); | 551 | my $logged_in_patron = Koha::Patrons->find($loggedinuser); | 
        
          | 551 | my $biblio; | 552 | my $biblio; | 
        
          | 552 |  | 553 |  | 
            
              | 553 | -  |  |  |