Source position: orl.inc line 967
function OCINumberToInt(
err: POCIError;
number: POCINumber;
rsl_length: uword;
rsl_flag: uword;
rsl: Pdvoid
):sword;