Thanks!
Can you send me that as a context diff (diff -u oci8.c.orig oci8.c,
or diff -c oci8.c.orig oci8.c)?
Tim.
On Sat, Oct 06, 2001 at 01:46:32AM +0400, Oleg Bakiev wrote:
> Hi Tim.
> I've found a bug in DBD::Oracle which is related to LOBs and case sensitive
> field names. I have to use 1.06 version but the bug still presents in 1.12.
>
> I've made a quick hack which fixes it:
>
> C:\SW_ENV\sw_env_1.3\DBD-Oracle-1.06>diff oci8.c.orig oci8.c
> 1253,1254c1253,1262
> < if (SvCUR(phs->ora_field) != SvCUR(sv)
> < || ibcmp( SvPV(phs->ora_field,na), SvPV(sv,na), SvCUR(sv) ) )
> ---
> > char bfield[256];
> > strcpy(bfield,SvPV(phs->ora_field,na));
> > if (bfield[0] == '\"' && bfield[strlen(bfield) - 1] == '\"') {
> > strcpy(bfield, bfield + 1);
> > bfield[strlen(bfield) - 1] = 0;
> > }
> > /* if (SvCUR(phs->ora_field) != SvCUR(sv)
> > || ibcmp( SvPV(phs->ora_field,na), SvPV(sv,na), SvCUR(sv) ) )*/
> > if (strlen(bfield) != SvCUR(sv)
> > || ibcmp( bfield, SvPV(sv,na), SvCUR(sv) ) )
> 1277c1285,1287
> < sprintf(sql_field, "%s%s \"%s\"",
> ---
> >
> >
> > sprintf(sql_field, "%s\"%s\" \"%s\"",
>
>
> Regards, Oleg
>
>
>
>
>
