On Tue, 12 Dec 2006, Igor Longagnani wrote:
Hi,
i am a newbie with DBIx::Class and Catalyst so i beg your pardon in
advance for my question:
I do use with success DBIx::Class in other situations (easy ones) and
I am trying to populate the option fields of a "select tag" named
"soggetto" described through CGI::Formbuilder
with data selected from an Oracle DB via DBIx::Class/Catalyst webapp
runinng on catalyst developement server on port 3000.
This is what doesn't work, i mean syntax is correct but output not what
i excpected:
Inside a Catalyst Controller class:
my @data = $c->model('myDB::AnaEsercenti')->search(undef,{select =>
[qw/userid name/]})->all();
$c->form->options({ soggetto => [EMAIL PROTECTED]);
I get the following (from HTML source page) build through a Template
Toolkit tag [% form.fieldrefs.soggetto.tag %]
<select class="fb_select" id="soggetto" name="soggetto">
<option value="">-select-</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4215d64)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4216544)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4216760)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421697c)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4216b98)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421b440)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421b65c)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421b878)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421ba94)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421bcb0)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421becc)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421c0e8)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421c304)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421f934)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421fb50)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421fd6c)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x421ff88)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x42201a4)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x42203c0)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x42205dc)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4223a5c)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4223c78)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4223e94)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x42240b0)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x42242cc)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x42244e8)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4224704)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4224920)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4227f48)</option>
<option>myApp::Model::myDB::AnaEsercenti=HASH(0x4228164)</option>
</select>
I know data is present because i enabled the debugger and through
$c->log->debug and Data::Dumper
i was able to find these kind of data structure for every record
bless( { "result_source" =>
$c->form->{"options"}{"soggetto"}[0]{"result_source"},
"_in_storage" => 1,
"_column_data" => {
"cognome" => undef,
"userid" => 99700001
}
}, 'myApp::Model::myDB::AnaUtenti' ),
but i couldnt find a proper, already existing method to extract that
"_column_data " data :)
I know am doing somethig wrong and i am doing my own micro-sub to
extract them
but i am sure i am missing something important.
Environment in WinXP is fully functional ( i don't get installation
errors nor excution ones except when i make syntax errors myself)
and is mainly composed by:
- Catalyst 5.7006
- DBIx::Class
- Template Toolkit
- CGI::FormBuilder
in their latest versions.
Thanks in advance for your precious efforts.
Hi Igor,
That looks more like a Catalyst/FormBuilder question.. You're passing it a
list of DBIx::Class objects, and it doesnt know what to do with them.
Try doing this instead:
my @data = $c->model('myDB::AnaEsercenti')->search(undef,{select
=> [qw/userid name/]})->all();
$c->form->options({ soggretto => [ map { [ $_->get_column('userid'),
$_->get_column('name') ]
} @data ] });
Jess
_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/
Searchable Archive: http://www.mail-archive.com/[email protected]/
