Page 1 of 1

Unable to add new record for table in another schema

Posted: Mon 09 Aug 2010 16:27
by jcanepa
I have a Delphi form with two pgQueries one in the public schema and another in a user-created schema "general".
When I try to add a new record in the "general" schema I get the error:
relation "priced_item_priced_item_id_seq" does not exist.

I've tried changing the reference to the sequence to:
"general.priced_item_priced_item_id_seq" with no luck

Any ideas?

Does the VCL support multiple schemas?

Posted: Tue 10 Aug 2010 10:27
by bork
Hello

There can be some causes:
- The priced_item_priced_item_id_seq table doesn't exist in the current (default) schema. In this case you should specify table name with schema name: select * from general.priced_item_priced_item_id_seq
- The priced_item_priced_item_id_seq table was created with case sensitive name. In this case the table name should be quoted and the TPgQuery.Options.QuoteNames option should be set to True.

Yes, PgDAC supports multiple schemas.

schemas in TPgQuery

Posted: Tue 10 Aug 2010 12:21
by jcanepa
Thanks for the quick reply.

It's all lowercase and it is a different schema "general" as opposed to "public". I am still unable to get it to function correctly.

Here's the form definition of the TPgQuery:
object qluLookup: TPgQuery
SQLInsert.Strings = (
'INSERT INTO general.priced_item'
' (priced_item_id)'
'VALUES'
' (:priced_item_id)')
SQLDelete.Strings = (
'DELETE FROM general.priced_item'
'WHERE'
' priced_item_id = :Old_priced_item_id')
SQLUpdate.Strings = (
'UPDATE general.priced_item'
'SET'
' priced_item_id = :priced_item_id'
'WHERE'
' priced_item_id = :Old_priced_item_id')
SQLRefresh.Strings = (
'SELECT priced_item_id FROM general.priced_item'
'WHERE'
' priced_item_id = :priced_item_id')
SQLLock.Strings = (
'SELECT * FROM general.priced_item'
'WHERE'
' priced_item_id = :Old_priced_item_id'
'FOR UPDATE NOWAIT')
Connection = dm.db
SQL.Strings = (
'SELECT priced_item_id FROM general.priced_item'
'WHERE'
' priced_item_id = :priced_item_id')
Options.DefaultValues = True
Left = 315
Top = 5
ParamData =
object qluLookuppriced_item_id: TLargeintField
AutoGenerateValue = arAutoInc
DefaultExpression = 'nextval('#39'general.priced_item_priced_item_id_seq'#39'::regclass)'
FieldName = 'priced_item_id'
end
end

Posted: Thu 12 Aug 2010 06:02
by bork
Hello

I created a new table with auto-increment field in the public schema and sequence in the other schema:

Code: Select all

CREATE TABLE test_table
(
  id integer NOT NULL DEFAULT nextval('test.seq_test_table'::regclass),
  "name" character varying(250),
  CONSTRAINT test_table_pk PRIMARY KEY (id)
)

CREATE SEQUENCE test.seq_test_table
  INCREMENT 1
  MINVALUE 1
  MAXVALUE 9223372036854775807
  START 1
  CACHE 1;
In Delphi an auto-increment field has the following definition:

Code: Select all

    object PgQuery1id: TIntegerField
      AutoGenerateValue = arAutoInc
      DefaultExpression = 'nextval(''test.seq_test_table''::regclass)'
      FieldName = 'id'
    end
And all works correctly.

Maybe you don't have enough permissions. Please try to execute the following query in TPgQuery:

Code: Select all

  select nextval('general.priced_item_priced_item_id_seq')
If you have enough permissions, this query will return the next value of the sequence.