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