| Line 0
          
      
      
        Link Here | 
          
            
              | 0 | -  | 1 | $DBversion = 'XXX'; # will be replaced by the RM | 
            
              |  |  | 2 | if( CheckVersion( $DBversion ) ) { | 
            
              | 3 |  | 
            
              | 4 |     $dbh->do(q| | 
            
              | 5 |         UPDATE items | 
            
              | 6 |         LEFT JOIN issues ON issues.itemnumber=items.itemnumber | 
            
              | 7 |         SET items.onloan=CAST(issues.date_due AS DATE) | 
            
              | 8 |         WHERE items.onloan IS NULL | 
            
              | 9 |     |); | 
            
              | 10 |  | 
            
              | 11 |     NewVersion( $DBversion, 27808, "Adjust items.onloan if needed"); | 
            
              | 12 | } |