Source position: ibase60.inc line 2316
var isc_decode_date: procedure(
_para1: PISC_QUAD;
_para2: pointer
);