Author: byterock
Date: Fri Oct 24 17:45:25 2008
New Revision: 12001
Modified:
dbd-oracle/trunk/Changes
dbd-oracle/trunk/dbdimp.c
Log:
Fix for rt.cpan.org Ticket #=39232 binding large XMLTYPE fails on 64-bit perl from Jeff Klein
Modified: dbd-oracle/trunk/Changes
==============================================================================
--- dbd-oracle/trunk/Changes (original)
+++ dbd-oracle/trunk/Changes Fri Oct 24 17:45:25 2008
@@ -1,5 +1,6 @@
-=head1 Changes in DBD-Oracle 1.23(svn rev #####)
- Fix for rt.cpan.org Ticket #=38749 and added ora_oci_success_warn to display silent OCI warnings from John Scoles
+=head1 Changes in DBD-Oracle 1.23(svn rev #####)
+ Fix for rt.cpan.org Ticket #=39232 binding large XMLTYPE fails on 64-bit perl from Jeff Klein
+ Fix for rt.cpan.org Ticket #=38749 Warning of a NULL column in an aggregate function also added ora_oci_success_warn to display silent OCI warnings from John Scoles
Patch for UTF8 check on execute_array from David Mansfield and a little by John Scoles
Modified: dbd-oracle/trunk/dbdimp.c
==============================================================================
--- dbd-oracle/trunk/dbdimp.c (original)
+++ dbd-oracle/trunk/dbdimp.c Fri Oct 24 17:45:25 2008
@@ -1056,6 +1056,7 @@
dTHR;
OCIXMLType *xml = NULL;
STRLEN len;
+ ub4 buflen;
sword status;
ub1 src_type;
dvoid* src_ptr = NULL;
@@ -1090,9 +1091,9 @@
oci_error(sth, imp_sth->errhp, status, "OCILobCreateTemporary");
}
csid = (SvUTF8(source) && !CS_IS_UTF8(csid)) ? utf8_csid : CSFORM_IMPLIED_CSID(csform);
-
+ buflen = len;
OCILobWriteAppend_log_stat(imp_dbh->svchp, imp_dbh->errhp, src_ptr,
- &len, bufp, (ub4)len, OCI_ONE_PIECE,
+ &buflen, bufp, (ub4)len, OCI_ONE_PIECE,
NULL, NULL,
csid, csform, status);
lmpx.com only provides a reader for public news (NNTP) servers. It is not
affiliated with the servers or forums shown here and is not responsible for
the content of articles, which is written by their respective authors.