| 
      
            Lines 98-104
          subtest 'Test renew desensitize' => sub {
      
      
        Link Here
      
     | 
  
        
          | 98 | 
          subtest 'Checkin V2' => sub { | 
          98 | 
          subtest 'Checkin V2' => sub { | 
        
        
          | 99 | 
              my $schema = Koha::Database->new->schema;  | 
          99 | 
              my $schema = Koha::Database->new->schema;  | 
        
        
          | 100 | 
              $schema->storage->txn_begin;  | 
          100 | 
              $schema->storage->txn_begin;  | 
        
          
            
              | 101 | 
                  plan tests => 39;  | 
              101 | 
                  plan tests => 40;  | 
            
        
          | 102 | 
              $C4::SIP::Sip::protocol_version = 2;  | 
          102 | 
              $C4::SIP::Sip::protocol_version = 2;  | 
        
        
          | 103 | 
              test_checkin_v2();  | 
          103 | 
              test_checkin_v2();  | 
        
        
          | 104 | 
              $schema->storage->txn_rollback;  | 
          104 | 
              $schema->storage->txn_rollback;  | 
        
  
    | 
      
            Lines 897-902
          sub test_checkin_v2 {
      
      
        Link Here
      
     | 
  
        
          | 897 | 
              is( substr($response,2,1), '0', 'OK flag is false' );  | 
          897 | 
              is( substr($response,2,1), '0', 'OK flag is false' );  | 
        
        
          | 898 | 
              is( substr($response,5,1), 'Y', 'Alert flag is set' );  | 
          898 | 
              is( substr($response,5,1), 'Y', 'Alert flag is set' );  | 
        
        
          | 899 | 
              check_field( $respcode, $response, FID_SCREEN_MSG, 'Invalid Item', 'Check screen msg', 'regex' );  | 
          899 | 
              check_field( $respcode, $response, FID_SCREEN_MSG, 'Invalid Item', 'Check screen msg', 'regex' );  | 
        
            
               | 
               | 
              900 | 
                  check_field( $respcode, $response, FID_PERM_LOCN, '', 'Check that AQ is in the response');  | 
            
        
          | 900 | 
           | 
          901 | 
           | 
        
        
          | 901 | 
              # Not checked out, toggle option checked_in_ok  | 
          902 | 
              # Not checked out, toggle option checked_in_ok  | 
        
        
          | 902 | 
              $siprequest = CHECKIN . 'N' . 'YYYYMMDDZZZZHHMMSS' .  | 
          903 | 
              $siprequest = CHECKIN . 'N' . 'YYYYMMDDZZZZHHMMSS' .  | 
        
            
              | 903 | 
              -   | 
               | 
               |