Source position: vdi.pas line 207
procedure vex_butv(
handle: SmallInt;
pusrcode: Pointer;
out psavcode: Pointer
);