Update to pgaccess 0.98.7.

Author: bmomjian

src/bin/pgaccess/README

@@ -22,7 +22,7 @@ PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
 ---------------------------------------------------------------------------
 
 
-PGACCESS 0.98.4 29 January 2000
+PGACCESS 0.98.7 27 January 2001
 ================================
 I dedicate this program to my little daughters Ana-Maria and Emilia and to my
 wife for their understanding. I hope they will forgive me for spending so many
@@ -32,8 +32,7 @@ time far from them.
 
 1. How to INSTALL ?
 
-You will need a Tcl/Tk package, at least Tcl 7.6 and Tk 4.2, recommended
-Tcl/Tk 8.x
+You will need a Tcl/Tk package greater than  8.0
 
 For Unix users, unpack the pgaccess-xxx.tar.gz archieve in you preferred
 directory (usually /usr/local).

src/bin/pgaccess/demo/formdemo.sql

@@ -1,47 +1,56 @@
 CREATE SEQUENCE "cities_id_seq" start 7 increment 1 maxvalue 2147483647 minvalue 1  cache 1 ;
-SELECT nextval ('cities_id_seq');
+SELECT nextval ('"cities_id_seq"');
 CREATE TABLE "pga_queries" (
 	"queryname" character varying(64),
 	"querytype" character,
 	"querycommand" text,
 	"querytables" text,
 	"querylinks" text,
 	"queryresults" text,
-	"querycomments" text);
+	"querycomments" text
+);
 CREATE TABLE "pga_forms" (
 	"formname" character varying(64),
-	"formsource" text);
+	"formsource" text
+);
 CREATE TABLE "pga_scripts" (
 	"scriptname" character varying(64),
-	"scriptsource" text);
+	"scriptsource" text
+);
 CREATE TABLE "pga_reports" (
 	"reportname" character varying(64),
 	"reportsource" text,
 	"reportbody" text,
 	"reportprocs" text,
-	"reportoptions" text);
+	"reportoptions" text
+);
 CREATE TABLE "phonebook" (
 	"name" character varying(32),
 	"phone_nr" character varying(16),
 	"city" character varying(32),
 	"company" bool,
-	"continent" character varying(16));
+	"continent" character varying(16)
+);
 CREATE TABLE "pga_layout" (
 	"tablename" character varying(64),
 	"nrcols" int2,
 	"colnames" text,
-	"colwidth" text);
+	"colwidth" text
+);
 CREATE TABLE "pga_schema" (
 	"schemaname" character varying(64),
 	"schematables" text,
-	"schemalinks" text);
+	"schemalinks" text
+);
 REVOKE ALL on "pga_schema" from PUBLIC;
 GRANT ALL on "pga_schema" to PUBLIC;
 CREATE TABLE "cities" (
-	"id" int4 DEFAULT nextval ( '"cities_id_seq"' ) NOT NULL,
+	"id" int4 DEFAULT nextval('cities_id_seq'::text) NOT NULL,
 	"name" character varying(32) NOT NULL,
-	"prefix" character varying(16) NOT NULL);
+	"prefix" character varying(16) NOT NULL
+);
 REVOKE ALL on "cities" from PUBLIC;
+GRANT INSERT,SELECT,RULE on "cities" to "teo";
 CREATE FUNCTION "getcityprefix" (int4 ) RETURNS varchar AS 'select prefix from cities where id = $1 ' LANGUAGE 'SQL';
 COPY "pga_queries" FROM stdin;
 Query that can be saved as view	S	select * from phonebook where continent='usa'    	\N	\N	\N	\N

src/bin/pgaccess/doc/html/download.html

@@ -10,30 +10,11 @@ <h2>
 Download</h2>
 
 <hr>
-<br>The primary site for PgAccess downloads is:
+<br>The primary site for PgAccess download is:
 <ul><a href="ftp://ftp.flex.ro/pub/pgaccess">ftp://ftp.flex.ro/pub/pgaccess</a>
 <ul>
-<li>
-<a href="ftp://ftp.flex.ro/pub/pgaccess/pgaccess-0.98.5.tar.gz">Unix tar.gz
-file</a></li>
-
-<li>
-<a href="ftp://ftp.flex.ro/pub/pgaccess/pgaccess-0.98.5.zip">Windows .zip
-file</a></li>
-</ul>
-</ul>
-
-<p>Another one (just with a little bit faster, try this one first) would
-be :
-<ul><a href="ftp://speedy.flex.ro/pub/pgaccess">ftp://speedy.flex.ro/pub/pgaccess</a>
-<ul>
-<li>
-<a href="ftp://speedy.flex.ro/pub/pgaccess/pgaccess-0.98.5.tar.gz">Unix tar.gz
-file</a></li>
-
-<li>
-<a href="ftp://speedy.flex.ro/pub/pgaccess/pgaccess-0.98.5.zip">Windows .zip
-file</a></li>
+<li><a href="ftp://ftp.flex.ro/pub/pgaccess/pgaccess-0.98.7.tar.gz">Unix tar.gz file</a></li>
+<li><a href="ftp://ftp.flex.ro/pub/pgaccess/pgaccess-0.98.7.zip">Windows ZIP file</a></li>
 </ul>
 </ul>
 

src/bin/pgaccess/doc/html/main.html

@@ -14,7 +14,7 @@ <h1>
 using Visual Tcl, the best tool for developing Tcl/Tk applications I've
 ever seen.
 <p><b>Last version</b>
-<br>Last stable version is 0.98.5 , released on 30 March 2000. Read <a href="whatsnew.html">what's
+<br>Last stable version is 0.98.7 , released on 27 January 2001. Read <a href="whatsnew.html">what's
 new</a> .
 <p><b>Portability issues</b>
 <br>PgAccess is available for every platform where PostgreSQL was ported
@@ -27,9 +27,7 @@ <h1>
 <br>- HPUX
 <br>- Irix
 <br>- Windows 95,98,NT
-<p>PgAccess needs Tcl/Tk versions 8.0.x and higher thought PgAccess. For
-win32 platforms there are some special DLL's that have to be downloaded
-and installed, more information <a href="win32.html">here</a>.
+<p>PgAccess needs Tcl/Tk versions 8.0.x and higher. For win32 platforms there are some special DLL's that have to be downloaded and installed, more information <a href="win32.html">here</a>.
 <p>PgAccess is protected by the following <a href="copyright.html">copyright</a>.
 </body>
 </html>

src/bin/pgaccess/doc/html/whatsnew.html

@@ -5,6 +5,24 @@
    <meta name="GENERATOR" content="Mozilla/4.72 [en] (X11; I; Linux 2.2.14 i586) [Netscape]">
 </head>
 <body bgcolor="#FEFEDF">
+<b>27 January 2001 - PgAccess 0.98.7</b>
+<ul>
+<li>
+Fixed table creation when all columns are inherited and no new columns are added
+</li>
+<li>
+Geometry improvements in diagram definition
+</li>
+<li>
+added DLL's for Win32, Tcl/Tk 8.3.x and PostgreSQL 7.x
+</li>
+</ul>
+
+<b>1 May 2000 - PgAccess 0.98.6</b>
+<ul>
+<li>
+fixed a ugly bug in forms, query opening procedure</li>
+</ul>
 <b>30 March 2000 - PgAccess 0.98.5</b>
 <ul>
 <li>

src/bin/pgaccess/lib/forms.tcl

@@ -803,6 +803,7 @@ switch $PgAcVar(fdobj,$item,class) {
 			set DataControlVar($base.$name,recno) 0
 			set DataControlVar($base.$name,nrecs) \[pg_result \$res -numTuples\]
 			setCursor NORMAL
+			pg_result \$res -clear
 		}"
 		namespace eval ::DataControl($base.$name) "proc setSQL {sqlcmd} {
 			global DataControlVar

src/bin/pgaccess/lib/help/create_database.hlp

@@ -18,7 +18,7 @@ CREATE DATABASE name \[ WITH LOCATION = 'dbpath' \]
 " {} "CREATEDB" {italic} "
        Message returned if the command completes successfully. 
 
-" {} "NOTICE: createdb: database \"name\" already exists." {italic} "
+" {} "WARN: createdb: database \"name\" already exists." {italic} "
        This occurs if database specified already exists. 
 
 " {} "ERROR: Unable to create database directory directory" {italic} "

src/bin/pgaccess/lib/help/vacuum.hlp

@@ -17,7 +17,7 @@ VACUUM \[ VERBOSE \] ANALYZE \[ table \[ (column \[, ...\] ) \] \]
 	Prints a detailed vacuum activity report for each table. 
 
 " {} "ANALYZE" {italic} "
-	Updates column statistics used by the optimizer to determine the most efficient way to execute a query. The statistics represent the dispersion of the data in each column. This information is valuable when several execution paths are possible. 
+	Updates column statistics used by the optimizer to determine the most efficient way to execute a query. The statistics represent the disbursion of the data in each column. This information is valuable when several execution paths are possible. 
 
 " {} "table" {italic} "
 	The name of a specific table to vacuum. Defaults to all tables. 

src/bin/pgaccess/lib/languages/czech

@@ -346,7 +346,7 @@ array set Messages {
 
 "File" "Soubor"
 
-"Your table has no fields!" "Tabulka nem� polo�ky!"
+"Your table has no columns!" "Tabulka nem� polo�ky!"
 
 "Height" "V��ka"
 

src/bin/pgaccess/lib/languages/deutsch

@@ -346,7 +346,7 @@ array set Messages {
 
 "File" "Datei"
 
-"Your table has no fields!" "Die Tabelle hat keine Felder."
+"Your table has no columns!" "Die Tabelle hat keine Felder."
 
 "Height" "H�he"