Source position: orl.inc line 2103
function OCIDateCompare(
err: POCIError;
date1: POCIDate;
date2: POCIDate;
result: Psword
):sword;