source: trunk/Modules/Attendance/UAttendance.pas

Last change on this file was 4, checked in by chronos, 12 years ago
File size: 854 bytes
Line 
1unit UAttendance;
2
3{$mode delphi}
4
5interface
6
7uses
8 Classes, SysUtils;
9
10type
11 THoliday = class
12 Id: Integer;
13 Name: string;
14 Date: TDate;
15 end;
16
17 TOperation = class
18 Id: string;
19 Name: string;
20 end;
21
22 TUser = class
23 Id: string;
24 Login: string;
25 Password: string;
26 FirstName: string;
27 SecondName: string;
28 CardId: string;
29 Enabled: string;
30 end;
31
32 TTerminalProtocol = class
33 Name: string;
34 end;
35
36 TTerminal = class
37 Id: string;
38 Name: string;
39 IPAddress: string;
40 Port: string;
41 Protocol: TTerminalProtocol;
42 end;
43
44 TUserPassage = class
45 Id: Integer;
46 Terminal: TTerminal;
47 User: TUser;
48 Time: TDateTime;
49 Operation: TOperation;
50 end;
51
52 TUserPresence = class
53 Id: Integer;
54 User: TUser;
55 TimeFrom: TDateTime;
56 TimeTo: TDateTime;
57 end;
58
59
60implementation
61
62end.
63
Note: See TracBrowser for help on using the repository browser.