From 52636b561c552adb72dd3ce9c85ea2d0f0d5d377 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Mon, 15 Oct 2012 10:57:51 +0000 Subject: [PATCH] 2012-10-15 12:57 UTC+0200 Viktor Szakats (harbour syenar.net) * contrib/hbpgsql/tests/simple.prg ! fixed SQL query syntax (via xhb) --- harbour/ChangeLog | 4 ++++ harbour/contrib/hbpgsql/tests/simple.prg | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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 )