Source position: ociap.inc line 6917
function OCIExtractToOCINum(
hndl: Pdvoid;
err: POCIError;
keyname: Poratext;
valno: uword;
retval: POCINumber
):sword;