Source position: orl.inc line 849
function OCINumberNeg(
err: POCIError;
number: POCINumber;
result: POCINumber
):sword;