Problem creating a row with a manually specified primary key via CDBI::FromCGI

Booger has asked for the wisdom of the Perl Monks concerning the following question:

Hello folks:

I'm using MySQL and have some tables where I can't use auto_increment on the primary keys (for some weird reason I won't bother to explain) and want to control the sequence of said primary keys manually.

Ex: a user submits a form having a couple of input fields and I receive them in a hash $r->{params} (yes - I'm using Maypole).

The piece of code that creates a new row in the database according to the form data looks something like this:

$r->{params}{$self->primary_columns} = &some_value;

$h = CGI::Untaint->new(%{$r->{params}});

$obj = $self->create_from_cgi($h);
[download]

Which to me, looks fine.

Apparently it's not.

Whenever this portion of code gets executed I receive the following error:

Can't insert new Library::Book: DBD::mysql::st execute failed: 
Column 'id' cannot be null [for Statement "INSERT INTO book (name, aut
+hor, id) VALUES (?, ?, ?)"]
at
/usr/local/lib/perl5/site_perl/5.8.5/DBIx/ContextualFetch.pm line 51, 
+<GEN2> line 7. 
at 
/usr/local/lib/perl5/site_perl/5.8.5/Class/DBI/FromCGI.pm line 246
[download]

I've searched and searched and can't seem to discover what exactly is causing the manually set primary key to be ignored.

Any suggestions or comments would be greatly appreciated. Thanks!

Comment on Problem creating a row with a manually specified primary key via CDBI::FromCGI Select or Download Code

Replies are listed 'Best First'.

Re: Problem creating a row with a manually specified primary key via CDBI::FromCGI
by PodMaster (Abbot) on Oct 10, 2004 at 13:29 UTC

$r->{params}

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.

[reply]
[d/l]

Re^2: Problem creating a row with a manually specified primary key via CDBI::FromCGI

by Booger (Pilgrim) on Oct 15, 2004 at 16:18 UTC

Thanks for the suggestion PodMaker... the problem turned out to be the result of some custom work I'd done elsewhere... *sigh*.

[reply]

Back to Seekers of Perl Wisdom