1 /******************************************************************************
2 * Copyright (c) 2000-2014 Ericsson Telecom AB
3 * All rights reserved. This program and the accompanying materials
4 * are made available under the terms of the Eclipse Public License v1.0
5 * which accompanies this distribution, and is available at
6 * http://www.eclipse.org/legal/epl-v10.html
7 ******************************************************************************/
10 const integer c_imported_i :=11;
14 type enumerated Days { Monday, Tuesday, Wednesday, Thursday, Friday, Saturday, Sunday };
28 type record EmptyRec { }
37 type record of universal charstring RoUCS;
38 type record of charstring RoCS;
39 type record of octetstring RoOS;
40 type record of integer RoI;
42 type record of verdicttype RoV;
43 type record of float RoF;
45 type integer IntArr[3];
46 type float FloatArr[3];
47 type universal charstring StrArr[4];
55 type record of Date Dates;
57 type record PhoneNumber {
58 integer country_prefix,
59 integer network_prefix,
62 variant(country_prefix) "JSON: name as CountryPrefix";
63 variant(network_prefix) "JSON: name as NetworkPrefix";
64 variant(local_number) "JSON : name as LocalNumber"
68 type record Profile0 {
71 charstring email_addr optional,
72 Dates meetings optional
78 charstring email_addr optional,
79 Dates meetings optional
81 //variant(email_addr) "JSON : omit as null";
82 variant(meetings) "JSON:omit as null";
83 variant(phone_no) "JSON: name as phone";
84 variant(email_addr) "JSON: name as email";
93 variant(date_val) "JSON:name as date";
94 variant(i_val) "JSON:name as int";
95 variant(f_val) "JSON:name as float";
96 variant(cs_val) "JSON:name as string";
101 float price optional,
104 variant(price) "JSON:omit as null"
111 enumerated { Tiny, Small, Average, Large, Huge } sizeval,
116 record of charstring rocsval
119 universal charstring ucsval,
121 record of integer roival,
125 hexstring productID optional
128 variant "JSON:as value";
129 variant (prod2val.productID) "JSON:name as code";
130 variant(unival) "JSON:as value";
133 type record of Thing Stuff;
143 universal charstring ucs,
144 enumerated { Tiny, Small, Medium, Large, Huge } size,
147 variant(cs) "JSON : default(empty)";
148 variant(i) "JSON:default(-19)";
149 variant(f) "JSON:default(1.0e6)";
150 variant(size) "JSON:default(Tiny)";
151 variant(os) "JSON : default(1DE7)";
152 variant(ucs) "JSON:default(üres)";
153 variant(bs) "JSON:default (101)";
154 variant(hs) "JSON:default(DEAD)";
155 variant(vt) "JSON:default(fail)";
156 variant(b) "JSON:default(false)";