Source position: lberh.inc line 327
procedure ber_init2(
ber: PBerElement;
bv: PBerval;
options: cint
);