Source position: orl.inc line 2569
function OCIStringAllocSize(
env: POCIEnv;
err: POCIError;
vs: POCIString;
allocsize: Pub4
):sword;