Source position: lberh.inc line 248
function ber_get_stringb(
ber: PBerElement;
buf: pcchar;
var len: ber_len_t
):ber_tag_t;