Re: help with TCL function - Mailing list pgsql-general

From darren@crystalballinc.com
Subject Re: help with TCL function
Date
Msg-id Pine.LNX.4.44.0309111229460.10514-100000@thread.crystalballinc.com
Whole thread Raw
In response to Re: help with TCL function  ("Jules Alberts" <jules.alberts@arbodienst-limburg.nl>)
List pgsql-general
Ok you can user the info exists function that is part of TCL

i.e. if { [info exists NEW($1)] } {

or if 1 is the problem do
if { [info exists 1] } {

This will allow you to determine if it exists.

If you want to see what variables exist at this level elog [info vars] and
it will show you all variables currently accessable

Also you can array names or array get the contents or the NEW array then
foreach id value (if using array get) you can put them lower.

HTH
Darren

On Thu, 11 Sep 2003, Jules Alberts wrote:

> Op 11 Sep 2003 (0:45), schreef ljb <lbayuk@mindspring.com>:
>
> > I think you're missing something. When you use a Tcl function as a
> > trigger, any arguments (like $1) are explicitly supplied in the CREATE
> > TRIGGER command. You either define the trigger to call the function with
> > a constant argument or not; there is no issue of NULL here or an
> > optional argument. Show us your CREATE TRIGGER command.
>
> -- This is the function
>
> create or replace function tlow() returns trigger as '
>   set NEW($1) [string tolower $NEW($1)]
>   return [array get NEW]'
> language 'pltcl';
>
> -- Now the table on which I use it
>
> create table bedrijf (
>   code varchar unique not null check (code <> ''),
>   kvk_nummer varchar,
> ) with oids;
>
> -- And two triggers
>
> create trigger tlow
>   before insert or update
>   on bedrijf for each row
>   execute procedure tlow('code');
>
> create trigger tlowkvk_nummer
>   before insert or update
>   on bedrijf for each row
>   execute procedure tlow('kvk_nummer');
>
> --
>
> As you can see, the column kvk_nummer is allowed to be null. But /if/
> it gets a value, that value should be converted to lowercase. So a sql
> statement like this should be allowed:
>
> insert into bedrijf (code) values ('FUBAR');
>
> However this will fail because the trigger tlowkvk_nummer will call
> tlow() without an argument. So I want to program tlow() defensively,
> after all my DB logic should work, independenlty of anything that goes
> on in the frontend.
>
> I think it's a valid thing to expect from a DB or programming language.
> Workarounds could be traversing all the frontend code to make sure no
> NULL values are used or not using this kind of constraint at all. Not
> really options IMO.
>
> Thanks for any help!
>
> ---------------------------(end of broadcast)---------------------------
> TIP 5: Have you checked our extensive FAQ?
>
>                http://www.postgresql.org/docs/faqs/FAQ.html
>

--
Darren Ferguson


pgsql-general by date:

Previous
From: Greg Stark
Date:
Subject: How to avoid inlining subquery result columns
Next
From: Vivek Khera
Date:
Subject: Re: A Question About Insertions -- Performance