---------------------------------------------------------------------------
-PGACCESS 0.98 29 August 1999
+PGACCESS 0.98.4 29 January 2000
================================
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
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"' ) NOT NULL,
"name" character varying(32) NOT NULL,
"prefix" character varying(16) NOT NULL);
REVOKE ALL on "cities" from PUBLIC;
-GRANT UPDATE,DELETE,SELECT,RULE on "cities" to "fane";
-GRANT ALL on "cities" to "liviu";
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
<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.tar.gz">Unix tar.gz
+<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.zip">Windows .zip
+<a href="ftp://ftp.flex.ro/pub/pgaccess/pgaccess-0.98.5.zip">Windows .zip
file</a></li>
</ul>
</ul>
<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.tar.gz">Unix tar.gz
+<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.zip">Windows .zip
+<a href="ftp://speedy.flex.ro/pub/pgaccess/pgaccess-0.98.5.zip">Windows .zip
file</a></li>
</ul>
</ul>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
- <meta name="GENERATOR" content="Mozilla/4.61 [en] (X11; I; Linux 2.2.12 i586) [Netscape]">
+ <meta name="GENERATOR" content="Mozilla/4.7 [en] (X11; I; Linux 2.2.12-20 i586) [Netscape]">
</head>
<body bgcolor="#FEFEDF">
name "namespace" while executing "namespace eval Mainlib</tt> ..."</b>
<blockquote>That means 100% that you have an older version of Tcl/Tk that
don't recognize namespaces command. Please upgrade to Tcl/Tk 8.0.x minimum</blockquote>
+<b>9. When saving big forms with a lot of widgets and code inside, a big
+error message appears, PgAccess crashes, cannot recover old form, pga_forms
+table appears to be corrupted.</b>
+<blockquote>Your form source is exceeding 8000 bytes. A PostgreSQL record
+cannot hold more than 8 Kb and pga_forms table is corrupted. Sorry for
+your work :-( , your old form cannot be recovered anymore if you don't
+have a backup (dumped) database. Upgrade to PgAccess 0.98.3 that will prevent
+saving of those big forms. In order to make your form sources smaller,
+define some scripts for your form initialize routines or for other big
+portions of code and call them from the form code with the command <tt>Scripts::execute
+"Your space saving code script name"</tt></blockquote>
+<p><br><b>10. I have a dual boot machine with Linux and Windows 9x installed.
+PgAccess works fine from Linux but when trying to connect under Windows
+it says something about wrong access rights to the same database. Tcl/Tk
+version and PostgreSQL server version matches libpgtcl and libpq DLL's.</b>
+<blockquote>Check your Windows TCP/IP configuration. If you configured
+the Windows TCP/IP machine address to by dynamic allocated by the server
+then it got another IP address, different from Linux. If you have host
+based authentication then you have no rights for the database. Change the
+Windows TCP/IP configuration and set up manually the same TCP/IP address
+as from Linux installation or change the pg_hba.conf configuration file
+from the server to allow access to the database from the whole domain not
+from a single IP address.</blockquote>
+
+<br>
<br>
<br>
<br>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
- <meta name="GENERATOR" content="Mozilla/4.61 [en] (X11; I; Linux 2.2.12 i586) [Netscape]">
+ <meta name="GENERATOR" content="Mozilla/4.72 [en] (X11; I; Linux 2.2.14 i586) [Netscape]">
</head>
<body bgcolor="#FEFEDF">
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
, released on 29 August 1999. Read <a href="whatsnew.html">what's
-new</a> in 0.98.
+<br>Last stable version is 0.98
.5 , released on 30 March 2000. 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
and where a Tcl/Tk package is available. PgAccess has been reported running
on :
<br>- Linux
<br>- FreeBSD
+<br>- NetBSD
<br>- Solaris
<br>- HPUX
<br>- Irix
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
- <meta name="GENERATOR" content="Mozilla/4.61 [en] (X11; I; Linux 2.2.11 i586) [Netscape]">
+ <meta name="GENERATOR" content="Mozilla/4.72 [en] (X11; I; Linux 2.2.14 i586) [Netscape]">
</head>
<body bgcolor="#FEFEDF">
+<b>30 March 2000 - PgAccess 0.98.5</b>
+<ul>
+<li>
+added the "new database" feature</li>
+
+<li>
+added the czech and spanish message file</li>
+</ul>
+<b>29 January 2000 - PgAccess 0.98.4</b>
+<ul>
+<li>
+fixed a problem granting or revoking rights from PUBLIC</li>
+
+<li>
+added the portuguese message file translation</li>
+
+<li>
+fixed the preferences window problems for big screens 1280x1024</li>
+</ul>
+<b>17 January 2000 - PgAccess 0.98.3</b>
+<ul>
+<li>
+prevent saving of big forms that source size has more than 8000 bytes so
+pga_forms table does not crash anymore, read <a href="faq.html">FAQ</a>
+how to make your form sources smaller</li>
+
+<li>
+other very small bug fixes (less important)</li>
+
+<li>
+some windows can resize now up to 1280x1024 on big screens</li>
+
+<li>
+deutsh, russian and magyar message file available</li>
+
+<li>
+FAQ updates</li>
+</ul>
<b>29 August 1999</b> - PgAccess 0.98 has been released!
<ul>
<li>
}
lappend info [list $PgAcVar(fdobj,$i,class) $PgAcVar(fdobj,$i,name) $PgAcVar(fdobj,$i,coord) $PgAcVar(fdobj,$i,command) $PgAcVar(fdobj,$i,label) $PgAcVar(fdobj,$i,variable) $PgAcVar(fdobj,$i,value) $PgAcVar(fdobj,$i,relief) $PgAcVar(fdobj,$i,fcolor) $PgAcVar(fdobj,$i,bcolor) $PgAcVar(fdobj,$i,borderwidth) $wfont]
}
+ if {[string length $info]>8000} {
+ tk_messageBox -title [intlmsg Error] -message [intlmsg "Form too big!\nSource size [string length $info] bytes\nCannot save !"]
+ return 0
+ }
sql_exec noquiet "delete from pga_forms where formname='$PgAcVar(fdvar,formtitle)'"
regsub -all "'" $info "''" info
sql_exec noquiet "insert into pga_forms values ('$PgAcVar(fdvar,formtitle)','$info')"
showError [intlmsg "You must supply the function language!"]
} else {
set funcbody [.pgaw:Function.fs.text1 get 1.0 end]
- regsub -all "\n" $funcbody " " funcbody
+ # regsub -all "\n" $funcbody " " funcbody
+ regsub -all {'} $funcbody {''} funcbody
if {$PgAcVar(function,nametodrop) != ""} {
if {! [sql_exec noquiet "drop function $PgAcVar(function,nametodrop)"]} {
return
set x [expr {($sw - 640)/2}]
set y [expr {($sh - 480)/2}]
wm geometry $base 640x480+$x+$y
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 1 1
We recommend that active production databases be cleaned nightly, in order to keep statistics relatively current. The VACUUM query may be executed at any time, however. In particular, after copying a large class into Postgres or after deleting a large number of records, it may be a good idea to issue a VACUUM query. This will update the system catalogs with the results of all recent changes, and allow the Postgres query optimizer to make better choices in planning user queries.
+If the server crashes during a VACUUM command, chances are it will leave a lock file hanging around. Attempts to re-run the VACUUM command result in an error message about the creation of a lock file. If you are sure VACUUM is not running, remove the pg_vlock file in your database directory (i.e. PGDATA/base/dbname/pg_vlock).
+
" {} "Synopsis" {bold} "
VACUUM \[ VERBOSE \] \[ ANALYZE \] \[ table \]
VACUUM \[ VERBOSE \] ANALYZE \[ table \[ (column \[, ...\] ) \] \]
array set Messages {
-"Label" "Cimke"
+"Label" "Címke"
"Save schema" "Séma mentése"
-"Is unique ?" "Egyedi (UNIQUE) ?"
+"Is unique ?" "Egyedi ?"
"Report builder" "Jelentés szerkesztõ"
"Criteria" "Feltételek"
-"FATAL ERROR upgrading PgAccess table" "FATÁLIS HIBA keletkezett a PgAccess tábla frissitése közben"
+"FATAL ERROR upgrading PgAccess table" "SÚLYOS HIBA a PgAccess tábla frissítése közben"
-"Save this query as a view" "Nézetként (VIEW) akarod elmenteni a lekérdezést?"
+"Save this query as a view" "Lekérdezés mentése nézetként?"
-"Page header" "Oldal fejléc"
+"Page header" "Fejléc"
"Query name" "Lekérdezés név"
"Please select an object first!" "Elõször válassz egy objektumot!"
-"Fields :" "Mezõk :"
+"Fields :" "Mezõk"
"Name" "Név"
"File name" "Fájl név"
-"Detail record" "Részletes bejegyzés"
+"Detail record" "Részletes rekord"
-"Auto-load the last opened database at startup" "Az utolsóként használt adatbázis automatikus nyitésa inditáskor"
+"repAuto-load the last opened database at startup" "Az utolsóként használt adatbázis automatikus megnyitása indításkor?"
"Maxvalue" "Maximális érték"
"Report fields" "Jelentés mezõk"
-"Test form" "Teszt kérdõiv (FORM)"
+"Test form" "Teszt ûrlap"
-"Error trying to connect to database '%s' on host %s \n\nPostgreSQL error message:%s" "Hiba a(z) '%s' nevû adatbázishoz kapcsolódás közben a(z) '%s' szerveren.\n\nPostgreSQL hibaüzenet:%s"
+"Error trying to connect to database '%s' on host %s \n\nPostgreSQL error message:%s" "Hiba a(z) '%s' adatbázishoz kapcsolódás közben a(z) %s szerveren.\n\nPostgreSQL
+hibaüzenet:%s"
-"No field type ?" "Nincs a mezõnek tipusa ?"
+"No field type ?" "Nincs a mezõnek típusa ?"
"User without name?" "Felhasználó név nélkül ?"
-"You have to supply a name for this schema!" "Nevet kell adj ennek a sémának !"
+"You have to supply a name for this schema!" "A sémához név megadása szükséges !"
"Last value" "Legutóbbi érték"
-"Preferences" "Beállitások"
+"Preferences" "Beállítások"
-"View '%s' already exists!\nOverwrite ?" "A(z) '%s' nevû nézet (VIEW) már létezik!\n Felülirás ?"
+"View '%s' already exists!\nOverwrite ?" "A(z) '%s' nézet már létezik!\n Felülírás ?"
-"You have to select an index!" "Választanod kell egy indexet!"
+"You have to select an index!" "Választani kell egy indexet!"
-"Field type" "Mezõtipus"
+"Field type" "Mezõtípus"
"Script name" "Szkript neve"
"Reload" "Újratölt"
-"Remove table %s from query?" "Törölni akarod a(z) '%s' táblát ebbõl a lekérdezésbõl ?"
+"Remove table %s from query?" "%s tábla eltávolítása a lekérdezésbõl ?"
"SQL window" "SQL ablak"
-"Allow user to create other users" "Engedély a felhasználónak új felhasználó készitésére"
+"Allow user to create other users" "Engedély másik felhasználó létrehozására"
-"Delete current record ?" "Az aktuális bejegyzés törlése ?"
+"Delete current record ?" "Aktuális rekord törlése ?"
"List box" "Lista"
-"Save to query builder" "Mentsd a lekérdezés szerkesztõbe"
+"Save to query builder" "Mentés a lekérdezés szerkesztõbe"
"fixed width" "fix szélesség"
"Yes" "Igen"
-"Add label" "Adj hozzá cimkét"
+"Add label" "Címke hozzáadása"
-"Sequence created!" "A szekvencia (SEQUENCE) elkészült!"
+"Sequence created!" "A szekvencia elkészült!"
"Field information" "Mezõ információ"
-
+
"Design" "Tervezés"
"Field" "Mezõ"
-"You have to supply an external file name!" "Meg kell adj egy külsõ fájlnevet!"
+"You have to supply an external file name!" "Meg kell adni egy külsõ fájlnevet!"
-"Increment" "Növelés"
+"Increment" "Növel"
"No" "Nem"
-"Form design" "Kérdõiv (FORM) tervezés"
+"Form design" "Ûrlap tervezés"
-"You must supply a return type!" "Szükség van visszatérési értékre!"
+"You must supply a return type!" "Meg kell adni visszatérési értéket!"
-"Remove field from result ?" "A mezö törlése az eredménybõl ?"
+"Remove field from result ?" "Mezõ eltávolítása az eredménybõl ?"
-"There is another object (a %s) with the same name.\nPlease change it!" "Van már ilyen nevû (%s) objektum!\nLégyszives változtasd meg!"
+"There is another object (a %s) with the same name.\nPlease change it!" "Már van egy (%s) nevû objektum. \n Kérlek változtasd meg!"
"This query has no commands?" "Ebben a lekérdezésben nincs parancs?"
-"Execute query" "Lekérdezés futtatása"
+"Execute query" "Lekérdezés végrehajtása"
"field cannot be null" "a mezõ nem lehet NULL"
"Help" "Súgó"
-"Rename column" "Az oszlop átnevezése"
+"Rename column" "Oszlop átnevezése"
"Database" "Adatbázis"
"Information" "Információ"
-"Close" "Zárás"
+"Close" "Bezár"
-"Command" "Utasitás"
+"Command" "Parancs"
"Table" "Tábla"
-"verify password" "jelszó ellenõrzés"
+"verify password" "jelszó ellenõrzése"
"Vacuum" "Porszivózás (VACUUM)"
"Default value" "Alapérték"
-"Import" "Behozatal"
+"Import" "Import"
"Delete index" "Index törlés"
-"Move up" "Mozgasd fel"
+"Move up" "Mozgatás fel"
"index properties" "index tulajdonságok"
-"check" "ellenõrzi"
+"check" "ellenõrzés"
-"Create new table" "Új tábla készités"
+"Create new table" "Új tábla készítése"
-"Visual query designer" "Lekérdezés tervezõ"
+"Visual query designer" "Vizuális lekérdezés tervezõ"
-"Delete all" "Törölni mindet"
+"Delete all" "Mindent töröl"
-"You are going to delete\n\n %s \n\nProceed?" "Le fogod törölni az alábbit:\n\n %s \n\nFolytatod?"
+"You are going to delete\n\n %s \n\nProceed?" "Biztosan törölni akarja %s-t ?"
"Schema name" "Séma neve"
-"Error executing query" "Hiba a lekérdezés futtatása közben"
+"Error executing query" "Hiba a lekérdezés végrehajtása közben"
"Report name" "Jelentés neve"
-"Add field" "Mezõ hozzáadás"
+"Add field" "Mezõ hozzáadása"
"Field name" "Mezõnév"
-"FATAL ERROR searching for PgAccess system tables" "FATÁLIS HIBA a PgAccess rendszertáblák keresésénél"
+"FATAL ERROR searching for PgAccess system tables" "SÚLYOS HIBA a PgAccess rendszertáblák keresésekor"
-"A big number of rows displayed in table view will take a lot of memory!" "A nézetnél (VIEW) kijelzendõ sorok nagy száma miatt sok memória fog lefoglalódni !"
+"A big number of rows displayed in table view will take a lot of memory!" "Sok oszlop mutatása a táblanézetben sok memóriát igényel!"
-"Preview" "Elõzetes nézet"
+"Preview" "Elõnézet"
"Users" "Felhasználók"
"Owner" "Tulajdonos"
-"Form's window internal name" "Kérdõiv (FORM) ablakának belsõ használatú neve"
+"Form's window internal name" "Ûrlap ablak belsõ használatú neve"
-"Sort field" "Mezõ rendezése"
+"Sort field" "Mezõk rendezése"
"New name is the same as the old one!" "Az új név megegyezik a régivel!"
"Warning" "Figyelem"
-"Suggestions at" "Javaslatok itt:"
+"Suggestions at" "Javaslatok"
"Functions" "Függvények"
"Schema" "Séma"
-"Open" "Nyit"
+"Open" "Megnyit"
"size" "méret"
"Define new user" "Új felhasználó definiálása"
-"Move down" "Mozgasd le"
+"Move down" "mozgatás le"
"Design script" "Szkript tervezés"
"FINAL WARNING" "UTOLSÓ FIGYELMEZTETÉS"
-"Add table" "Tábla hozzáadás"
+"Add table" "Tábla hozzáadása"
-"Table viewer font" "Tábla nézõ betûkészlet"
+"Table viewer font" "Tábla nézõ betûtípusa"
-"The field type is not specified!" "A mezõ tipusa nincs megadva!"
+"The field type is not specified!" "A mezõ típusa nincs megadva!"
-"Close test form" "Zárd le a teszt kérdõivet (FORM)"
+"Close test form" "Teszt ûrlap bezárása"
-"Export table" "Tábla kivitel"
+"Export table" "Tábla export"
-"Add new index" "Ûj index hozzáadás"
+"Add new index" "Új index hozzáadása"
"Left" "Bal"
"Field delimiter" "Mezõ határoló"
-"Add formula" "Formula hozzáadás"
+"Add formula" "Formula hozzáadása"
-"Open database" "Adatbázis megnyitás"
+"Open database" "Adatbázis megnyitása"
"Return" "Visszatérés"
-"Changed fonts may appear in the next working session!" "A megváltoztatott betûkészlet a következõ futtatásnál lesz látható!"
+"Changed fonts may appear in the next working session!" "A megáltoztatott betûtípusok csak a következõ futtatáskor látszódnak majd!"
"Error" "Hiba"
"Enter a field name" "Adj meg egy mezõnevet !"
-"field name" "Mezõnév"
+"field name" "mezõ név"
-"Forms" "Kérdõivek"
+"Forms" "Ûrlapok"
"Cannot add column" "Nem lehet oszlopot hozzáadni"
"Preferred language" "Választott nyelv"
-"Execute SQL" "SQL futtatás"
+"Execute SQL" "SQL futtatása"
"Sequences" "Szekvenciák"
"Language" "Nyelv"
-"Query '%s' was not found!" "A(z) '%s' nevû lekérdezés nem található!"
+"Query '%s' was not found!" "%s lekérdezés nem található!"
"Object" "Objektum"
-"Font fixed" "Fix betûkészlet"
+"Font fixed" "Fix betûtípus"
-"Table name" "Táblanév"
+"Table name" "Táblanév"
-"Export" "Kivitel"
+"Export" "Export"
-"Change user" "Felhasználócsere"
+"Change user" "Felhasználó változtatása"
-"You must give object a new name!" "Az objektumnak új nevet kell adjál!"
+"You must give object a new name!" "Új nevet kell adni az objektumnak!"
"Query" "Lekérdezés"
"User name" "Felhasználónév"
-"Font normal" "Normális betûkészlet"
+"Font normal" "Normál betûtípus"
-"Import table" "Tábla bevitel"
+"Import table" "Tábla import"
-"Toolbar" "Eszközpult"
+"Toolbar" "Eszközsor"
"Radio btn" "Rádiógomb"
"You must supply a name for this function!" "Hiányzik a függvény neve!"
-"You have to select index fields!" "Az index mezõket kell választanod!"
+"You have to select index fields!" "Index mezõket kell választani!"
-"Constraint" "Kényszer (CONSTRAINT)"
+"Constraint" "Kényszer"
-"The script must have a name" "Hiányzik a szkript neve"
+"The script must have a name" "A szkriptnek nevet kell adni"
"Save" "Mentés"
"Exit" "Kilépés"
-"Inherits" "örökli"
+"Inherits" "Örökli"
-"Delete field" "Mezõ törlés"
+"Delete field" "Mezõ törlése"
-"About" "A programról"
+"About" "A PgAccess-rõl"
-"Empty field name ?" "Nom de champ inexistant ?"
+"Empty field name ?" "Üres mezõnév ?"
-"All report information will be deleted.\n\nProceed ?" "Toutes les informations de l'état vont être détruites\n\nContinuer ?"
+"All report information will be deleted.\n\nProceed ?" "Minden jelentés infomáció törölve lesz.\n\nRendben ?"
"Host" "Szerver"
-"vacuuming database %s ..." "A(z) %s adatbázis porszivózása ..."
+"vacuuming database %s ..." "%s adatbázis porszivózása ..."
-"Indexes defined" "Definiált indexek"
+"Indexes defined" "Indexek definiálva"
"You must specify field size!" "Hiányzik a mezõméret!"
-"Schema '%s' already exists!" "A(z) '%s' schéma már létezik!"
+"Schema '%s' already exists!" "'%s' séma már létezik!"
-"There is another field with the same name: '%s'!\n\nReplace it ?" "Már van ilyen nevû mezõ: '%s'!\n\nFelülirás ?"
+"There is another field with the same name: '%s'!\n\nReplace it ?" "Már van '%s' nevû mezõ!\n\nCserélhetõ ?"
"Contents" "Tartalom"
"Variable" "Változó"
-"Error executing query\n\n%s\n\nPostgreSQL error message:\n%s\nPostgreSQL status:%s" "Hiba a lekérdezés futtatása közben\n\n%s\n\nPostgreSQL hibaüzenet:\n%s\nPostgreSQL státusz:%s"
+"Error executing query\n\n%s\n\nPostgreSQL error message:\n%s\nPostgreSQL status:%s" "Hiba(z) %s lekérdezés végrehajtásakor\n\nPostgreSQL hibaüzenet:\n%s\nPostgreSQL állapot:%s"
"Filter conditions" "Szûrõfeltételek"
-"Error retrieving query definition" "Hiba a lekérdezés definiciójának betöltésénél"
+"Error retrieving query definition" "Hiba a lekérdezés definíció betöltésekor"
-"Error deleting view" "Hiba a nézet (VIEW) törlésénél"
+"Error deleting view" "Hiba a nézet törléskor"
"New" "Új"
"Tables" "Táblák"
-"Create" "Elkészit"
+"Create" "Létrehoz"
-"Forms need an internal name, only literals, low case" "A kérdõiveknek (FORM) kell egy belsõ név, csak kisbetûkkel"
+"Forms need an internal name, only literals, low case" "Az ûrlapoknak kell egy belsõ név, csak kisbetûkbõl állhat!"
-"Do you want to save the form into the database?" "El akarod menteni a kérdõivet (FORM) az adatbázisba ?"
-
-"Schema '%s' was not found!" "A(z) '%s' nevû séma nem található!"
+"Do you want to save the form into the database?" "Kívánod lementeni az ûrlapot az adatbázisba?"
-"proportional" "megfelelõ"
+"Schema '%s' was not found!" "'%s' séma nem található!"
-"Function saved!" "A függvény elmentve!"
+"proportional" "propócionális"
+
+"Function saved!" "Függvény elmentve!"
"with OIDs" "OID-ekkel"
"Table information" "Tábla információ"
-"Error inserting new record" "Hiba az üj bejegyzés tárolásával"
+"Error inserting new record" "Hiba az új rekord beszúrása közben"
-"Column name '%s' already exists in this table!" "A(z) '%s' nevû oszlop már létezik ebben a táblában !"
+"Column name '%s' already exists in this table!" "'%s' nevû oszlop már van ebben a táblában !"
"File" "Fájl"
"You will always get the latest version at:" "A legfrissebb verzió megszerezhetõ innen:"
-"Form must have a name" "Hiányzik a kérdõiv (FORM) neve !"
+"Form must have a name" "Hiányzik az ûrlap neve !"
"Password" "Jelszó"
"Valid until (date)" "Érvényes eddig (dátum)"
-"Report source" "A jelentés forrása"
+"Report source" "Jelentés forrása"
-"Allow user to create databases" "Engedély a felhasználónak új adatbázis készitésére"
+"Allow user to create databases" "Adatbázis létrehozás engedélyezése a felhasználónak"
"Cancel" "Mégsem"
-"Is clustered ?" "CLUSTER-elt ?"
+"Is clustered ?" "Klaszterezett ?"
-"Add new column" "Új oszlop hozzáadás"
+"Add new column" "Új oszlop hozzáadása"
"Show SQL" "SQL parancsok"
"New name" "Új név"
-"Table '%s' not found!" "A(z) '%s' nevû tábla nem található!"
+"Table '%s' not found!" "'%s' tábla nem található!"
-"Form name" "Kérdõiv (FORM) név"
+"Form name" "Ûrlap név"
-"Visual designer" "Tervezõ"
+"Visual designer" "Vizuális tervezõ"
-"You choose to delete index\n\n %s \n\nProceed?" "Biztos, hogy akarod törölni az alábbi indexet?\n\n %s"
+"You choose to delete index\n\n %s \n\nProceed?" "%s\n\n index törlését választottad?\n\nBiztos vagy benne?"
-"Error retrieving from" "Hiba a betöltésnél errõl a helyrõl"
+"Error retrieving from" "Hiba betöltés közben"
-"Save query definition" "A lekérdezés elmentése"
+"Save query definition" "Lekérdezés definíció elmentése"
-"A Tcl/Tk interface to\nPostgreSQL\nby Constantin Teodorescu" "Egy Tcl/Tk felület a\nPostgreSQL-hez\nKészitette: Constantin Teodorescu"
+"A Tcl/Tk interface to\nPostgreSQL\nby Constantin Teodorescu" "Tcl/Tk felület a\nPostgreSQL-hez.\n Készítette: Constantin Teodorescu"
-"Operation completed!" "Beavatkozás végrehajtva!"
+"Operation completed!" "Mûvelet végrehajtva!"
-"Max rows displayed in table/query view" "Maximális sorok száma a tábláknál/lekérdezéseknél"
+"Max rows displayed in table/query view" "Maximálisan megjelenített sorok száma a tábla/lekérdezés nézetben"
-"Passwords do not match!" "A jelszók nem egyeznek!"
+"Passwords do not match!" "Nem egyeznek a jelszavak!"
"Rename" "Átnevezés"
-"Entry" "Bejegyzés"
+"Entry" "Bevitel"
-"Error retrieving schema definition" "Hiba a séma-definició betöltése közben"
+"Error retrieving schema definition" "Hiba a séma definíció betöltése közben"
-"This is an action query!\n\nExecute it?" "Ez nem lekérdezés, hanem parancs.\nFuttatás ?"
+"This is an action query!\n\nExecute it?" "Ez egy lekérdezés !\nVégrehajtás ?"
-"Error retrieving view definition for" "Hiba a nézet (VIEW) betöltése közben "
+"Error retrieving view definition for" "Hiba a nézetdefiníció betöltése közben"
-"options" "beállitások"
+"options" "opciók"
-"Sequence '%s' not found!" "A(z) '%s' nevû szekvencia nem található!"
+"Sequence '%s' not found!" "'%s' szekvencia nem található"
"Text" "Szöveg"
-"Tcl error executing pg_exec %s\n\n%s" "Tcl hiba a pg_exec futtatásánál %s\n\n%s"
+"Tcl error executing pg_exec %s\n\n%s" "Tcl hiba pg_exec futtatásakor %s\n\n%s"
"Width" "Szélesség"
-"You have to supply a name for this query!" "Hiányzik a lekérdezés neve!"
+"You have to supply a name for this query!" "Nevet kell adni ehhez a lekérdezéshez!"
"Accessing data. Please wait ..." "Adatelérés. Kis türelmet ..."
-"Report footer" "A jelentés alja"
+"Report footer" "Jelentés lábléc"
"Parameters" "Paraméterek"
"Queries" "Lekérdezések"
-"Query '%s' already exists!" "A(z) '%s' nevû lekérdezés már létezik!"
+"Query '%s' already exists!" "'%s' lekérdezés már létezik!"
-"Font bold" "Vastag betûkészlet"
+"Font bold" "Félkövér betûtípus"
"Query builder" "Lekérdezés szerkesztõ"
-"Error defining view" "Hiba a nézet (VIEW) definiálásánál"
+"Error defining view" "Hiba a nézet definícióban"
-"Top" "Csúcs"
+"Top" "Teteje"
-"You must supply a name for your table!" "Hiányzik a tábla neve!"
+"You must supply a name for your table!" "Nevet kell adni a táblának!"
-"Page footer" "A lap alja"
+"Page footer" "Lábléc"
-"Font italic" "Dõlt betûkészlet"
+"Font italic" "Dõlt betûtípus"
"Field name not entered!" "A mezõnév hiányzik!"
-"Index name cannot be null!" "Az index nem lehet NULL!"
+"Index name cannot be null!" "Az indexnév nem lehet NULL"
"Sort" "Rendezés"
-"Import-Export table" "Tábla behozatal/kivitel"
+"Import-Export table" "Tábla import/export"
"Point" "Pont"
-"type" "tipus"
+"type" "típus"
-"You should supply a name for this sequence" "Hiányzik a szekvencia neve!"
+"You should supply a name for this sequence" "Nevet kell adni ehhez a szekvenciának"
-"Remove link ?" "A kapcsolat törlése?"
+"Remove link ?" "Kapcsolat eltávolítása?"
-"You have to supply a table name!" "Hiányzik a tábla neve!"
+"You have to supply a table name!" "Meg kell adni táblanevet!"
"Report header" "Jelentés fejléc"
"Attributes" "Attribútumok"
-"Table '%s' already in schema" "A(z) '%s' tábla már szerepel a sémában!"
+"Table '%s' already in schema" "'%s' tábla már szerepel a sémában"
"Username" "Felhasználó név"
"Minvalue" "Minimális érték"
-"Sequence name" "Szekvencianév"
+"Sequence name" "Szekvencia neve"
-"Define sequence" "Szekvencia definiálás"
+"Define sequence" "Szekvencia definiálása"
"Function" "Függvény"
-"Sorting and filtering not (yet) available from queries!\n\nPlease enter them in the query definition!" "A rendezés és szûrés (még) nem megoldott a lekérdezéseknél!\n\nHasználd õket a lekérdezés definiciókban!"
+"Sorting and filtering not (yet) available from queries!\n\nPlease enter them in the query definition!" "A rendezés és szûrés (még) nem érhetõ el a lekérdezésbõl!\n\n Használd õket a lekérdezés definicióban!"
"Reports" "Jelentések"
-
+
"Columns" "Oszlopok"
"Indexes" "Indexek"
"not null" "nem NULL"
-"Cluster index" "Index CLUSTER-elés"
+"Cluster index" "Klaszter index"
-"index columns" "indexelt oszlopok"
+"index columns" "oszlopok indexelése"
-"Add user" "Felhasználó hozzáadás"
+"Add user" "Felhasználó hozzáadása"
"Change permissions" "Engedélyek megváltoztatása"
-"select" "olvasás"
+"select" "kiválaszt"
-"update" "frissités"
+"update" "frissíts"
-"insert" "tárolás"
+"insert" "beszúr"
-"rule" "szabályok"
+"rule" "szabály"
-"Identification" "Azonositás"
+"Identification" "Azonosítás"
-"Owner ID" "Tulajdonos azonositó"
+"Owner ID" "Tulajdonos azonosító"
"Has primary key ?" "Van elsõdleges kulcsa ?"
"Index fields" "Index mezõk"
-"Table OID" "Tábla OID"
-
-}
-
+"Table OID" "Tábla tulajdonos azonosító"
+}
"Last value" "Ultima valoare"
-"Preferences" "Preferinþe"
+"Preferences" "Opþiuni"
"View '%s' already exists!\nOverwrite ?" "Vederea '%s' mai exista!\nO suprainscriem ?"
"Save" "Salveazã"
-"Exit" "Terminare"
+"Exit" "Terminã"
"Inherits" "Strãmoºi"
"There is another field with the same name: '%s'!\n\nReplace it ?" "Mai exista un cimp cu acelasi nume: '%s'!\n\nIl inlocuim cu descrierea noua?"
-"Contents" "Conþinut"
+"Contents" "Cuprins"
"Views" "Vederi"
"primary key" "cheie primarã"
-"Back" "Inapoi"
+"Back" "Înapoi"
"Columns" "Coloane"
}
set PgAcVar(Old_Object_Name) $temp
Window show .pgaw:RenameObject
+ wm transient .pgaw:RenameObject .pgaw:Main
}
-background #efefef -cursor left_ptr
wm focusmodel $base passive
wm geometry $base 332x390+96+172
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
menu $base.fm.mndb.01 \
-borderwidth 1 -font $PgAcVar(pref,font_normal) \
-tearoff 0
+ $base.fm.mndb.01 add command \
+ -command {Window show .pgaw:NewDatabase ; wm transient .pgaw:NewDatabase .pgaw:Main} -label [intlmsg New]
$base.fm.mndb.01 add command \
-command {
Window show .pgaw:OpenDB
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 287x151+259+304
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 272x105+294+262
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
place $base.b2 -x 155 -y 65 -width 80 -anchor nw -bordermode ignore
}
+proc vTclWindow.pgaw:NewDatabase {base} {
+ if {$base == ""} {
+ set base .pgaw:NewDatabase
+ }
+ if {[winfo exists $base]} {
+ wm deiconify $base; return
+ }
+ toplevel $base -class Toplevel
+ wm focusmodel $base passive
+ wm geometry $base 272x105+294+262
+ wm maxsize $base 1280 1024
+ wm minsize $base 1 1
+ wm overrideredirect $base 0
+ wm resizable $base 0 0
+ wm title $base [intlmsg "New"]
+ label $base.l1 -borderwidth 0 -text [intlmsg {Name}]
+ entry $base.e1 -background #fefefe -borderwidth 1 -textvariable PgAcVar(New_Database_Name)
+ button $base.b1 -borderwidth 1 -command {
+ set retval [sql_exec noquiet "create database $PgAcVar(New_Database_Name)"]
+ if {$retval} {
+ Window destroy .pgaw:NewDatabase
+ }
+ } -text [intlmsg Create]
+ button $base.b2 -borderwidth 1 -command {Window destroy .pgaw:NewDatabase} -text [intlmsg Cancel]
+ place $base.l1 -x 15 -y 28 -anchor nw -bordermode ignore
+ place $base.e1 -x 100 -y 25 -anchor nw -bordermode ignore
+ place $base.b1 -x 55 -y 65 -width 80 -anchor nw -bordermode ignore
+ place $base.b2 -x 155 -y 65 -width 80 -anchor nw -bordermode ignore
+}
+
proc vTclWindow.pgaw:GetParameter {base} {
if {$base == ""} {
set x [expr ($sw - 297)/2]
set y [expr ($sh - 98)/2]
wm geometry $base 297x98+$x+$y
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 551x408+192+169
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 1 1
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 471x177+168+243
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 1 1
wm title $base [intlmsg "About"]
label $base.l1 -borderwidth 3 -font -Adobe-Helvetica-Bold-R-Normal-*-*-180-*-*-*-*-* -relief ridge -text PgAccess
label $base.l2 -relief groove -text [intlmsg "A Tcl/Tk interface to\nPostgreSQL\nby Constantin Teodorescu"]
- label $base.l3 -borderwidth 0 -relief sunken -text {v 0.98}
+ label $base.l3 -borderwidth 0 -relief sunken -text {v 0.98.5}
label $base.l4 -relief groove -text "[intlmsg {You will always get the latest version at:}]
http://www.flex.ro/pgaccess
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 283x172+119+210
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
}
toplevel $base -class Toplevel
wm focusmodel $base passive
- wm geometry $base 450x360+100+213
+ wm geometry $base 500x400+100+113
wm maxsize $base 1009 738
wm minsize $base 1 1
wm overrideredirect $base 0
- wm resizable $base 0 0
+ wm resizable $base 1 1
wm deiconify $base
wm title $base [intlmsg "Preferences"]
bind $base <Key-Escape> "Window destroy .pgaw:Preferences"
frame $base.fpl.flb \
-height 75 -relief sunken -width 125
listbox $base.fpl.flb.llb \
- -borderwidth 1 -height 6 -yscrollcommand {.pgaw:Preferences.fpl.flb.vsb set}
+ -borderwidth 1 -height 3 -yscrollcommand {.pgaw:Preferences.fpl.flb.vsb set}
scrollbar $base.fpl.flb.vsb \
-borderwidth 1 -command {.pgaw:Preferences.fpl.flb.llb yview} -orient vert
frame $base.fb \
pack $base.fal.st \
-in .pgaw:Preferences.fal -anchor center -expand 0 -fill x -side top -anchor w
pack $base.fpl \
- -in .pgaw:Preferences -anchor center -expand 0 -fill x -side top
+ -in .pgaw:Preferences -anchor center -expand 1 -fill both -side top
pack $base.fpl.lt \
-in .pgaw:Preferences.fpl -anchor center -expand 0 -fill none -side top
pack $base.fpl.flb \
- -in .pgaw:Preferences.fpl -anchor center -expand 0 -fill none -side top
+ -in .pgaw:Preferences.fpl -anchor center -expand 1 -fill y -side top
pack $base.fpl.flb.llb \
- -in .pgaw:Preferences.fpl.flb -anchor center -expand 0 -fill none -side left
+ -in .pgaw:Preferences.fpl.flb -anchor center -expand 1 -fill y -side left
pack $base.fpl.flb.vsb \
- -in .pgaw:Preferences.fpl.flb -anchor center -expand 0 -fill y -side right
+ -in .pgaw:Preferences.fpl.flb -anchor center -expand 1 -fill y -side right
pack $base.fb \
-in .pgaw:Preferences -anchor center -expand 0 -fill none -side bottom
grid $base.fb.btnsave \
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 542x364+150+150
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 652x426+96+120
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 495x500+230+50
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 1 1
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 759x530+10+13
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 1 1
showError [intlmsg "User without name?"]
return
}
- sql_exec noquiet "revoke all on \"$PgAcVar(tblinfo,tablename)\" from $PgAcVar(permission,username)"
+ if {$PgAcVar(permission,username)=="PUBLIC"} {
+ set usrname PUBLIC
+ } else {
+ set usrname "\"$PgAcVar(permission,username)\""
+ }
+ sql_exec noquiet "revoke all on \"$PgAcVar(tblinfo,tablename)\" from $usrname"
if {$PgAcVar(permission,select)} {
- sql_exec noquiet "GRANT SELECT on \"$PgAcVar(tblinfo,tablename)\" to $PgAcVar(permission,username)"
+ sql_exec noquiet "GRANT SELECT on \"$PgAcVar(tblinfo,tablename)\" to $usrname"
}
if {$PgAcVar(permission,insert)} {
- sql_exec noquiet "GRANT INSERT on \"$PgAcVar(tblinfo,tablename)\" to $PgAcVar(permission,username)"
+ sql_exec noquiet "GRANT INSERT on \"$PgAcVar(tblinfo,tablename)\" to $usrname"
}
if {$PgAcVar(permission,update)} {
- sql_exec noquiet "GRANT UPDATE on \"$PgAcVar(tblinfo,tablename)\" to $PgAcVar(permission,username)"
+ sql_exec noquiet "GRANT UPDATE on \"$PgAcVar(tblinfo,tablename)\" to $usrname"
}
if {$PgAcVar(permission,rule)} {
- sql_exec noquiet "GRANT RULE on \"$PgAcVar(tblinfo,tablename)\" to $PgAcVar(permission,username)"
+ sql_exec noquiet "GRANT RULE on \"$PgAcVar(tblinfo,tablename)\" to $usrname"
}
refreshTableInformation
}
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 650x400
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 650 400
wm overrideredirect $base 0
wm resizable $base 1 1
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 634x392+78+181
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
-background #c7c3c7
wm focusmodel $base passive
wm geometry $base 522x398+152+135
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 334x203+265+266
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 302x114+195+175
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 215x75+258+213
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 273x147+256+266
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 0 0
toplevel $base -class Toplevel
wm focusmodel $base passive
wm geometry $base 759x530+10+13
- wm maxsize $base 1009 738
+ wm maxsize $base 1280 1024
wm minsize $base 1 1
wm overrideredirect $base 0
wm resizable $base 1 1
#!/bin/sh
-PATH_TO_WISH=__wish__
-PGACCESS_HOME=__POSTGRESDIR__/pgaccess
+PATH_TO_WISH=/usr/bin/wish
+PGACCESS_HOME=/usr/local/pgaccess
export PATH_TO_WISH
export PGACCESS_HOME
-exec $PATH_TO_WISH $PGACCESS_HOME/main.tcl "$@"
+exec ${PATH_TO_WISH} ${PGACCESS_HOME}/main.tcl "$@"
+
projects / users / rhaas / postgres.git / commitdiff