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
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
|
-module(shr_map_summary).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-record
(
map_summary,
{
id :: binary(),
name :: binary()
}
).
-opaque type() :: #map_summary{}.
-export_type([type/0]).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-export
(
[
new/2
]
).
%%%% Accessors
-export
(
[
get_id/1,
get_name/1
]
).
-export
(
[
set_id/2,
set_name/2
]
).
-export
(
[
get_id_field/0,
get_name_field/0
]
).
%%%% Export
-export
(
[
encode/1
]
).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% LOCAL FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-spec new (binary(), binary()) -> type().
new (ID, Name) ->
#map_summary
{
id = ID,
name = Name
}.
%%%% Accessors
-spec get_id (type()) -> binary().
get_id (MapSummary) -> MapSummary#map_summary.id.
-spec get_name (type()) -> binary().
get_name (MapSummary) -> MapSummary#map_summary.name.
-spec set_id (binary(), type()) -> type().
set_id (Val, MapSummary) -> MapSummary#map_summary{ id = Val }.
-spec set_name (binary(), type()) -> type().
set_name (Val, MapSummary) -> MapSummary#map_summary{ name = Val }.
-spec get_id_field () -> non_neg_integer().
get_id_field () -> #map_summary.id.
-spec get_name_field () -> non_neg_integer().
get_name_field () -> #map_summary.name.
-spec encode ({non_neg_integer(), type()}) -> {list(any())}.
encode ({IX, MapSummary}) ->
{
[
{<<"ix">>, IX},
{<<"id">>, MapSummary#map_summary.id},
{<<"nme">>, MapSummary#map_summary.name}
]
}.
|
