# Copyright (c) 1994, Regents of the University of California
#
# IDENTIFICATION
-# $Header: /cvsroot/pgsql/src/interfaces/ecpg/lib/Attic/Makefile.in,v 1.52 1999/11/23 10:32:16 meskes Exp $
+# $Header: /cvsroot/pgsql/src/interfaces/ecpg/lib/Attic/Makefile.in,v 1.53 1999/12/07 10:29:16 meskes Exp $
#
#-------------------------------------------------------------------------
NAME= ecpg
SO_MAJOR_VERSION= 3
-SO_MINOR_VERSION= 0.7
+SO_MINOR_VERSION= 0.8
SRCDIR= @top_srcdir@
include $(SRCDIR)/Makefile.global
+#include <locale.h>
+
exec sql whenever sqlerror sqlprint;
exec sql include sqlca;
double f;
EXEC SQL END DECLARE SECTION;
FILE *dbgs;
+
+ setlocale(LC_ALL, "de_DE");
if ((dbgs = fopen("log", "w")) != NULL)
ECPGdebug(1, dbgs);
EXEC SQL BEGIN WORK;
- EXEC SQL CREATE TABLE test (f decimal(8,2), i int, a int[10]);
+/* EXEC SQL CREATE TABLE test (f decimal(8,2), i int, a int[10]);*/
+ EXEC SQL CREATE TABLE test (f float, i int, a int[10]);
- EXEC SQL INSERT INTO test(f,i,a) VALUES(17000.00,1,'{0,1,2,3,4,5,6,7,8,9}');
+ EXEC SQL INSERT INTO test(f,i,a) VALUES(404.90,1,'{0,1,2,3,4,5,6,7,8,9}');
/* EXEC SQL INSERT INTO test(f,i,a) VALUES(140787.0,2,:a);*/
EXEC SQL BEGIN WORK;
- EXEC SQL SELECT f::float
- INTO :f
- FROM test
- WHERE i = :i;
-
- printf("Found f::float=%f\n", f);
-
EXEC SQL SELECT f
INTO :f
FROM test
printf("Found f=%f\n", f);
+ EXEC SQL SELECT i
+ INTO :i
+ FROM test
+ WHERE f = :f;
+
+ printf("Found i=%d\n", i);
+
EXEC SQL DROP TABLE test;
EXEC SQL COMMIT;