Source position: oraoci.pp line 867
function OCIErrorGet(
hndlp: pointer;
recordno: Cardinal;
sqlstate: PChar;
var errcodep: PLongint;
bufp: PChar;
bufsiz: Cardinal;
AType: Cardinal
):sword;