Source position: lberh.inc line 254
function ber_get_stringal(
ber: PBerElement;
var bv: PBerval
):ber_tag_t;