@@ -, +, @@ --- installer/data/mysql/atomicupdate/bug_6759.perl | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 installer/data/mysql/atomicupdate/bug_6759.perl --- a/installer/data/mysql/atomicupdate/bug_6759.perl +++ a/installer/data/mysql/atomicupdate/bug_6759.perl @@ -0,0 +1,15 @@ +$DBversion = 'XXX'; # will be replaced by the RM +if ( CheckVersion($DBversion) ) { + + $dbh->do(qq{ + UPDATE + accountlines + SET + accounttype = 'ACCOUNT' + WHERE + accounttype = 'A'; + }); + + SetVersion($DBversion); + print "Upgrade to $DBversion done (Bug 11573 - Fix accounttypes for 'A')\n"; +} --