[Catalyst] Issues with Session::Store::DBIC + MSSQL

[fREW Schmidt]

Hey guys,

I am trying to set up Session::Store::DBIC but I am getting no love.  Here
is all of the relevant (afaik) data:

Error:

[Tue Aug 4 09:54:25 2009] acd_server.pl:
> DBIx::Class::ResultSet::find_or_create(): DBI Exception: DBD::ODBC::st
> fetchrow_array failed: [Microsoft][SQL Native Client]String data, right
> truncation (SQL-01004) [for Statement "SELECT me.id, me.session_data,
> me.expires FROM Session me WHERE ( me.id =3D ? )" with ParamValues:
> 1=3D'session:c28d6383a2b334128738f4b70ee08ff7df5cd737'] at
> c:/strawberry/perl/site/lib/Catalyst/Plugin/Session/Store/DBIC/Delegate.pm
> line 73
>

SQL Creation Script

CREATE TABLE dbo.Session
> (
> id char(72) NOT NULL,
> session_data text,
> expires int
> ) ON [PRIMARY]
> TEXTIMAGE_ON [PRIMARY]
> GO
> ALTER TABLE dbo.Session ADD CONSTRAINT
> PK_Session PRIMARY KEY CLUSTERED
> (
> id
> ) WITH( STATISTICS_NORECOMPUTE =3D OFF, IGNORE_DUP_KEY =3D OFF, ALLOW_ROW=
_LOCKS
> =3D ON, ALLOW_PAGE_LOCKS =3D ON) ON [PRIMARY]
>
> GO
> COMMIT
>

DBIC Model:

package ACD::Schema::Result::Session;
> use base DBIx::Class;
> use strict;
> use warnings;
> use Method::Signatures::Simple;
> use CLASS;
>
> CLASS->load_components(qw/Core/);
> CLASS->table('Session');
> CLASS->add_columns(qw/ id session_data expires /);
> CLASS->set_primary_key('id');
>
> 'Truth-fact!';
>

Configuration in ACD.pm

   session =3D> {
>       dbic_class =3D> 'DB::Session',
>       expires    =3D> 60*60, # one hour
>    },
>


Does anyone have any ideas regarding this?
--
fREW Schmidt
http://blog.afoolishmanifesto.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.scsys.co.uk/pipermail/catalyst/attachments/20090804/f3990=
f8f/attachment.htm