[Zope-Checkins] CVS: Products/DCOracle2/src - dco2.c:1.94
Matthew T. Kromer
matt@zope.com
Mon, 15 Oct 2001 13:37:09 -0400
Update of /cvs-repository/Products/DCOracle2/src
In directory cvs.zope.org:/tmp/cvs-serv7550/src
Modified Files:
dco2.c
Log Message:
Update to only do BindArrayOfStruct when processing a PL/SQL BEGIN statement
=== Products/DCOracle2/src/dco2.c 1.93 => 1.94 ===
if (status != OCI_SUCCESS)
return RaiseOCIError(self->sc->errhp, OCI_HTYPE_ERROR);
- } else if (self->bind[pos].flags & BIND_ARRAY_COLUMN) { /*static bind*/
+ } else if (self->bind[pos].flags & BIND_ARRAY_COLUMN
+ && self->type == OCI_STMT_BEGIN) { /*static bind*/
BindingArrayObject *bao = self->bind[pos].u.p;
-
TRACE(T_CALL,("sd","OCIBindArrayOfStruct", bao->ba->itemsize));
status = OCIBindArrayOfStruct(self->bind[pos].bindp,
@@ -2893,7 +2893,6 @@
if (status != OCI_SUCCESS)
return RaiseOCIError(self->sc->errhp, OCI_HTYPE_ERROR);
-
}
@@ -5451,6 +5450,8 @@
if (bindvalue == NULL) bindvalue = value;
} else bindvalue = value;
+
+ mybind.dty = bao->dty;
/*
** To avoid duplicating code, we actually call bindObject to let