Source position: errh.inc line 9
procedure verrx(
__status: Integer;
__format: PAnsiChar;
Arg: Pointer
);