Source position: ociap.inc line 7469
var OCIExtractSetKey: function(
hndl: Pdvoid;
err: POCIError;
name: Poratext;
_type: ub1;
flag: ub4;
defval: Pdvoid;
intrange: Psb4;
var strlist: Poratext
):sword;