Commit | Line | Data |
---|---|---|
970ed795 | 1 | --///////////////////////////////////////////////////////////////////////////// |
d44e3c4f | 2 | -- Copyright (c) 2000-2016 Ericsson Telecom AB |
970ed795 EL |
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 | |
d44e3c4f | 7 | -- |
8 | -- Contributors: | |
9 | -- Balasko, Jeno | |
10 | -- Kulcsar, Endre | |
11 | -- Szabados, Kristof | |
12 | -- | |
970ed795 EL |
13 | --///////////////////////////////////////////////////////////////////////////// |
14 | Test330A --Note tha only &TypeField and &fixedTypeValueField are supported in May | |
15 | ||
16 | DEFINITIONS | |
17 | ||
18 | AUTOMATIC TAGS | |
19 | ||
20 | ::= | |
21 | BEGIN | |
22 | ||
23 | ASN1-Type1 ::= INTEGER | |
24 | ||
25 | ASN1-Type2 ::= BOOLEAN | |
26 | ||
27 | ASN1-Type3 ::= BIT STRING | |
28 | ||
29 | ASN1-Type4 ::= OCTET STRING | |
30 | ||
31 | -- an object class example | |
32 | MY-CLASS-1 ::= CLASS | |
33 | { | |
34 | &TypeField OPTIONAL, | |
35 | &fixedTypeValueField ASN1-Type1 UNIQUE OPTIONAL | |
36 | ||
37 | -- The following are not supported: | |
38 | --&variableTypeValueField &TypeField OPTIONAL, | |
39 | --&FixedTypeValueSetField ASN1-Type2, | |
40 | --&VariableTypeValueSetField &TypeField OPTIONAL, | |
41 | --&objectField OBJECTCLASS1 OPTIONAL, | |
42 | --&ObjectSetField OBJECTCLASS1 OPTIONAL | |
43 | } | |
44 | WITH SYNTAX | |
45 | { | |
46 | [FIELDA &TypeField] | |
47 | [FIELDB &fixedTypeValueField] | |
48 | } | |
49 | ||
50 | -- object examples | |
51 | -- note that currently type aliases have to be used | |
52 | myObject1 MY-CLASS-1 ::= {FIELDA ASN1-Type2 FIELDB 5} | |
53 | ||
54 | myObject2 MY-CLASS-1 ::= {FIELDA ASN1-Type3 FIELDB 2 } | |
55 | ||
56 | myObject3 MY-CLASS-1 ::= {FIELDA ASN1-Type4 FIELDB 3 } | |
57 | ||
58 | MyObjectSet1 MY-CLASS-1 ::= { myObject1 | myObject2 | myObject3} | |
59 | ||
60 | MyExampleMessageType1 ::= SEQUENCE | |
61 | { | |
62 | ||
63 | field1 MY-CLASS-1.&fixedTypeValueField ({MyObjectSet1}) OPTIONAL, --Type | |
64 | ||
65 | field2 MY-CLASS-1.&TypeField ({MyObjectSet1}) OPTIONAL | |
66 | --open Type | |
67 | ||
68 | } | |
69 | ||
70 | END |