Source position: lberh.inc line 280
function ber_put_ostring(
ber: PBerElement;
const str: pcchar;
len: ber_len_t;
tag: ber_tag_t
):cint;