Source position: orl.inc line 2244
function OCIDateZoneToZone(
err: POCIError;
date1: POCIDate;
zon1: Poratext;
zon1_length: ub4;
zon2: Poratext;
zon2_length: ub4;
date2: POCIDate
):sword;