# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE.
#
-# $My2pg: my2pg.pl,v 1.23 2001/12/06 19:32:20 fonin Exp $
+# $My2pg: my2pg.pl,v 1.24 2001/12/06 19:32:20 fonin Exp $
# $Id$
# TODO:
#
# $Log: my2pg.pl,v $
+# Revision 1.24 2002/04/20 14:15:43 fonin
+# A table I was re-creating had a composite primary key, and I was using
+# the -d switch to maintain the table and column names
+# adding double quotes around them.
+#
+# The SQL code generated was something like this:
+#
+# CREATE TABLE "rinav" (
+# "UnidadeAtendimento" INT8 DEFAULT '0' NOT NULL,
+# "NumeroRinav" INT8 DEFAULT '0' NOT NULL,
+# -- ...
+# PRIMARY KEY ("UnidadeAtendimento"," NumeroRinav")
+# );
+#
+# Please note the space inside the second column name string in the PK
+# definition. Because of this PostgreSQL was not able to create the table.
+#
+# FIXED.
+#
# Revision 1.23 2002/02/07 22:13:52 fonin
# FLOAT8 is required.
$|=1;
print("------------------------------------------------------------------");
-print("\n-- My2Pg 1.23 translated dump");
+print("\n-- My2Pg 1.24 translated dump");
print("\n--");
print("\n------------------------------------------------------------------");
# push header to libtypes.c
open(LIBTYPES,">$libtypesource");
print LIBTYPES "/******************************************************";
-print LIBTYPES "\n * My2Pg \$Revision: 1.7 $ \translated dump";
+print LIBTYPES "\n * My2Pg \$Revision: 1.8 $ \translated dump";
print LIBTYPES "\n * User types definitions";
print LIBTYPES "\n ******************************************************/";
print LIBTYPES "\n\n#include <postgres.h>\n";
if(/PRIMARY KEY \((.*)\)/i) {
my $tmpfld=$1;
$tmpfld=~s/,/","/g if $dq;
+ $tmpfld=~s/ //g;
s/PRIMARY KEY (\(.*\))/PRIMARY KEY \($dq$tmpfld$dq\)/i;
s/(PRIMARY KEY \(.*\)).*/$1$check\n/i;
}
open(MAKE,">Makefile");
print MAKE "#
-# My2Pg \$Revision: 1.7 $ \translated dump
+# My2Pg \$Revision: 1.8 $ \translated dump
# Makefile
#