Source position: lberh.inc line 284
function ber_put_string(
ber: PBerElement;
const str: pcchar;
tag: ber_tag_t
):cint;