-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathUser.Model.cls
More file actions
65 lines (54 loc) · 1.18 KB
/
User.Model.cls
File metadata and controls
65 lines (54 loc) · 1.18 KB
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
Class User.Model Extends %Persistent
{
Property ResourceType As %String;
Property Id As %String;
Property Identifier As Identifier;
Property Name As Name;
Property Gender As %String;
Property BirthDate As %String;
Property Address As Address;
Property Meta As Meta;
ClassMethod getJSON() As %DynamicObject
{
s ot=##Class(%DynamicObject).%FromJSON(%request.Content)
return ot
}
Storage Default
{
<Data name="ModelDefaultData">
<Value name="1">
<Value>%%CLASSNAME</Value>
</Value>
<Value name="2">
<Value>ResourceType</Value>
</Value>
<Value name="3">
<Value>Id</Value>
</Value>
<Value name="4">
<Value>Identifier</Value>
</Value>
<Value name="5">
<Value>Name</Value>
</Value>
<Value name="6">
<Value>Gender</Value>
</Value>
<Value name="7">
<Value>BirthDate</Value>
</Value>
<Value name="8">
<Value>Address</Value>
</Value>
<Value name="9">
<Value>Meta</Value>
</Value>
</Data>
<DataLocation>^User.ModelD</DataLocation>
<DefaultData>ModelDefaultData</DefaultData>
<IdLocation>^User.ModelD</IdLocation>
<IndexLocation>^User.ModelI</IndexLocation>
<StreamLocation>^User.ModelS</StreamLocation>
<Type>%Library.CacheStorage</Type>
}
}