| 
      
            Lines 68-74
          sub fetch_bib {
      
      
        Link Here
      
     | 
  
        
          | 68 | 
              my $biblionumber = shift;  | 
          68 | 
              my $biblionumber = shift;  | 
        
        
          | 69 | 
              my $record = GetMarcBiblio({ | 
          69 | 
              my $record = GetMarcBiblio({ | 
        
        
          | 70 | 
                  biblionumber => $biblionumber,  | 
          70 | 
                  biblionumber => $biblionumber,  | 
        
          
            
              | 71 | 
                      embed_items  => $query->url_param('items') }); | 
              71 | 
                      embed_items  => scalar $query->param('items') }); | 
            
        
          | 72 | 
              if  (defined $record) { | 
          72 | 
              if  (defined $record) { | 
        
        
          | 73 | 
                  print $query->header(-type => 'text/xml',-charset => 'utf-8',);  | 
          73 | 
                  print $query->header(-type => 'text/xml',-charset => 'utf-8',);  | 
        
        
          | 74 | 
                  print $record->as_xml_record();  | 
          74 | 
                  print $record->as_xml_record();  | 
        
  
    | 
      
            Lines 117-123
          sub update_bib {
      
      
        Link Here
      
     | 
  
        
          | 117 | 
                  ModBiblio( $record, $biblionumber, '' );  | 
          117 | 
                  ModBiblio( $record, $biblionumber, '' );  | 
        
        
          | 118 | 
                  my $new_record = GetMarcBiblio({ | 
          118 | 
                  my $new_record = GetMarcBiblio({ | 
        
        
          | 119 | 
                      biblionumber => $biblionumber,  | 
          119 | 
                      biblionumber => $biblionumber,  | 
        
          
            
              | 120 | 
                          embed_items  => $query->url_param('items') }); | 
              120 | 
                          embed_items  => scalar $query->url_param('items') }); | 
            
        
          | 121 | 
           | 
          121 | 
           | 
        
        
          | 122 | 
                  $result->{'status'} = "ok"; | 
          122 | 
                  $result->{'status'} = "ok"; | 
        
        
          | 123 | 
                  $result->{'biblionumber'} = $biblionumber; | 
          123 | 
                  $result->{'biblionumber'} = $biblionumber; |