Source position: fmtbcd.pp line 390
function FormatBCD(
const Format: string;
BCD: tBCD
):FmtBCDStringtype;