| Lines 766-772
          subtest 'Split subfields in Item2Marc (Bug 21774)' => sub {
      
      
        Link Here | 
        
          | 766 | }; | 766 | }; | 
        
          | 767 |  | 767 |  | 
        
          | 768 | subtest 'ModItemFromMarc' => sub { | 768 | subtest 'ModItemFromMarc' => sub { | 
          
            
              | 769 |     plan tests => 7; | 769 |     plan tests => 8; | 
        
          | 770 |     $schema->storage->txn_begin; | 770 |     $schema->storage->txn_begin; | 
        
          | 771 |  | 771 |  | 
        
          | 772 |     my $builder = t::lib::TestBuilder->new; | 772 |     my $builder = t::lib::TestBuilder->new; | 
  
    | Lines 840-845
          subtest 'ModItemFromMarc' => sub {
      
      
        Link Here | 
        
          | 840 |         is( $item->get_from_storage->onloan, '2022-03-26', 'onloan has been updated when passed in' ); | 840 |         is( $item->get_from_storage->onloan, '2022-03-26', 'onloan has been updated when passed in' ); | 
        
          | 841 |     }; | 841 |     }; | 
        
          | 842 |  | 842 |  | 
            
              |  |  | 843 |     subtest 'dateaccessioned' => sub { | 
            
              | 844 |         plan tests => 3; | 
            
              | 845 |  | 
            
              | 846 |         my $item = $builder->build_sample_item; | 
            
              | 847 |         $item->set({ dateaccessioned => '2022-03-19' })->store->discard_changes; | 
            
              | 848 |         is( $item->dateaccessioned, '2022-03-19', 'init values set are expected' ); | 
            
              | 849 |  | 
            
              | 850 |         my $marc = C4::Items::Item2Marc( $item->get_from_storage->unblessed, $item->biblionumber ); | 
            
              | 851 |         my ( $MARCfield, $MARCsubfield ) = GetMarcFromKohaField( 'items.dateaccessioned' ); | 
            
              | 852 |         $marc->field($MARCfield)->delete_subfield( code => $MARCsubfield ); | 
            
              | 853 |         ModItemFromMarc( $marc, $item->biblionumber, $item->itemnumber ); | 
            
              | 854 |         is( $item->get_from_storage->dateaccessioned, '2022-03-19', 'dateaccessioned has not been updated if not passed' ); | 
            
              | 855 |  | 
            
              | 856 |         $marc = C4::Items::Item2Marc( { %{$item->unblessed}, dateaccessioned => '2022-03-26' }, $item->biblionumber ); | 
            
              | 857 |         ModItemFromMarc( $marc, $item->biblionumber, $item->itemnumber ); | 
            
              | 858 |         is( $item->get_from_storage->dateaccessioned, '2022-03-26', 'dateaccessioned has been updated when passed in' ); | 
            
              | 859 |     }; | 
            
              | 860 |  | 
        
          | 843 |     subtest 'permanent_location' => sub { | 861 |     subtest 'permanent_location' => sub { | 
        
          | 844 |         plan tests => 10; | 862 |         plan tests => 10; | 
        
          | 845 |  | 863 |  | 
            
              | 846 | -  |  |  |