Source position: ociap.inc line 6910
function OCIExtractToInt(
hndl: Pdvoid;
err: POCIError;
keyname: Poratext;
valno: uword;
retval: Psb4
):sword;