-
Notifications
You must be signed in to change notification settings - Fork 0
/
UEntity.pas
62 lines (38 loc) · 1.19 KB
/
UEntity.pas
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
unit UEntity;
interface
uses
Aurelius.Mapping.Attributes, System.SysUtils, System.DateUtils, Aurelius.types.Nullable;
type
[Entity, AutoMapping]
TProduto = class
private
FId: integer;
FNome: string;
FCategoria: string;
FMarca: string;
FModa: string;
FSetor: string;
FCor: string;
FTamanho: string;
FValorEntrada: double;
[ Column( 'VALOR_SAIDA', []) ]
FValorSaida: double;
FDataEntrada: TDateTime;
[ Column('DATA_SAIDA', []) ]
FDataUltimaEdicao: Nullable <TDateTime>;
public
property Id: integer read FId write FId;
property Nome: string read FNome write FNome;
property Categoria: string read FCategoria write FCategoria;
property Marca: string read FMarca write FMarca;
property Moda: string read FModa write FModa;
property Setor: string read FSetor write FSetor;
property Cor: string read FCor write FCor;
property Tamanho: string read FTamanho write FTamanho;
property ValorEntrada: double read FValorEntrada write FValorEntrada;
property ValorSaida: double read FValorSaida write FValorSaida;
property DataEntrada: TDateTime read FDataEntrada write FDataEntrada;
property DataUltimaEdicao: Nullable <TDateTime> read FDataUltimaEdicao write FDataUltimaEdicao;
end;
implementation
end.