regression_test/BER_x682_wa/x682.asn

   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 --/////////////////////////////////////////////////////////////////////////////
   8 X682
   9 DEFINITIONS
  10
  11 AUTOMATIC TAGS
  12 EXTENSIBILITY IMPLIED
  13
  14 ::=
  15 BEGIN
  16
  17 /*
  18 ERROR-CLASS ::= CLASS
  19 {
  20   &category     PrintableString(SIZE(1)),
  21   &code         INTEGER,
  22   &Type
  23 }
  24 WITH SYNTAX {&category &code &Type}
  25
  26 ErrorSet ERROR-CLASS ::=
  27 {
  28   {"A" 1 INTEGER} |
  29   {"A" 2 VisibleString} |
  30   {"B" 1 PrintableString} |
  31   {"B" 2 BOOLEAN}
  32 }
  33
  34 ErrorReturn ::= SEQUENCE
  35 {
  36   errorCategory ERROR-CLASS.&category ({ErrorSet}) OPTIONAL,
  37   errors        SEQUENCE OF SEQUENCE
  38   {
  39     errorCode   ERROR-CLASS.&code({ErrorSet}{@errorCategory}),
  40     errorInfo   ERROR-CLASS.&Type({ErrorSet}{@errorCategory,@.errorCode})
  41   } OPTIONAL
  42 }
  43
  44 */
  45
  46 ErrorReturn ::= SEQUENCE
  47 {
  48   errorCategory PrintableString(SIZE(1)) OPTIONAL,
  49   errors        SEQUENCE OF SEQUENCE
  50   {
  51     errorCode   INTEGER,
  52     errorInfo   [99] CHOICE
  53     {
  54       iNTEGER [1] INTEGER,
  55       visibleString [1] VisibleString,
  56       printableString [1] PrintableString,
  57       bOOLEAN [1] BOOLEAN
  58     }
  59     /*#asn1_compiler#
  60       OPENTYPE
  61       @errorCategory    @.errorCode     ;
  62         "A"     1       iNTEGER         ;
  63         "A"     2       visibleString   ;
  64         "B"     1       printableString ;
  65         "B"     2       bOOLEAN         ;
  66     #asn1_compiler#*/
  67   } OPTIONAL
  68 }
  69
  70 errorReturn1 ErrorReturn ::=
  71 {
  72   errorCategory "A",
  73   errors
  74   {
  75     {
  76       errorCode 1,
  77       errorInfo iNTEGER : 20020716
  78     },
  79     {
  80       errorCode 2,
  81       errorInfo visibleString : "If U can decode this, U can be happy. Smile! :-)"
  82     }
  83   }
  84 }
  85
  86   ber-errorReturn1 OCTET STRING ::= '304D800141A148300C020101BF6306810401317DEC3038020102BF63328130496620552063616E206465636F646520746869732C20552063616E2062652068617070792E20536D696C6521203A2D29'H
  87
  88 END