Source position: lincd.pp line 713
procedure set_sense_key(
var a: Trequest_sense;
__sense_key: TU8
);