Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 03457b5b

Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt

  • ID 03457b5be4b3c0c62dbbb23bb682205669ea65d4
  • Vorgänger 8f7283f5
  • Nachfolger 157c1239

Perl-Upgrade-Scripte: db_query nun auch mit Bind-Parametern

Unterschiede anzeigen:

sql/Pg-upgrade2/umstellung_eur.pl
20 20 

  		




  21
  21
  
    
  foreach my $column (qw(accounting_method inventory_system profit_determination)) {


  		




  22
  22
  
    
    # this query will fail if columns already exist (new database)


  		




  23
  
  
    
    $self->db_query(qq|ALTER TABLE defaults ADD COLUMN ${column} TEXT|, 1);


  		




  
  23
  
    
    $self->db_query(qq|ALTER TABLE defaults ADD COLUMN ${column} TEXT|, may_fail => 1);


  		




  24
  24
  
    
  }


  		




  25
  25
  
    

  		




  26
  26
  
    
  my $accounting_method;


  		












Auch abrufbar als:  Unified diff