Source position: lberh.inc line 290
function ber_put_boolean(
ber: PBerElement;
boolval: ber_int_t;
tag: ber_tag_t
):cint;