Source position: lberh.inc line 266
function ber_scanf(
ber: PBerElement;
const fmt: pcchar
):ber_tag_t;