Source position: lberh.inc line 235
type BERDecodeCallback = function(
ber: PBerElement;
data: Pointer;
mode: cint
):cint;