Source position: orl.inc line 1168
function OCINumberIsZero(
err: POCIError;
number: POCINumber;
result: Pboolean
):sword;