TDeviseState

type TDeviseState = record

  KssNumber: Byte;

  NumberInHall: Byte;

  KKMDate: TDateTime;

  KKMTime: TDateTime;

  Flags: Byte;

  FabNumber: DWord;

  Model: Byte;

  Version: string;

  Mode: Byte;

  CheckNum: Integer;

  NumSmena: Integer;

  CheckState: Byte;

  CheckSum: Currency;

  DecimalSep: Byte;

  Port: Byte;

end;