diff --git a/harbour/ChangeLog b/harbour/ChangeLog index e89f411107..7fcaea31de 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,10 @@ The license applies to all entries newer than 2009-04-28. */ +2012-10-15 12:57 UTC+0200 Viktor Szakats (harbour syenar.net) + * contrib/hbpgsql/tests/simple.prg + ! fixed SQL query syntax (via xhb) + 2012-10-15 12:20 UTC+0200 Viktor Szakats (harbour syenar.net) * contrib/hbformat/hbfmtcls.prg * new TOFIX: diff --git a/harbour/contrib/hbpgsql/tests/simple.prg b/harbour/contrib/hbpgsql/tests/simple.prg index fc179167e1..c18d43f0e3 100644 --- a/harbour/contrib/hbpgsql/tests/simple.prg +++ b/harbour/contrib/hbpgsql/tests/simple.prg @@ -71,7 +71,7 @@ PROCEDURE Main( cHost, cDatabase, cUser, cPass ) FOR i := 1 TO 10 cQuery := "INSERT INTO test(code, dept, name, sales, tax, salary, budget, Discount, Creation, Description) " +; - "VALUES( " + Str( i ) + ', 2, "TEST", "y", 5, 3000, 1500.2, 7.5, "2003-12-17", "Short Description about what ? ")' + "VALUES( " + Str( i ) + ", 2, 'TEST', 'y', 5, 3000, 1500.2, 7.5, '2003-12-17', 'Short Description about what ? ')" oQuery := oServer:Query( cQuery )