function_test/Semantic_Analyser/xer/emb_untag_SE.ttcn

   1 /******************************************************************************
   2  * Copyright (c) 2000-2016 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  * Contributors:
   9  *   Balasko, Jeno
  10  *   Raduly, Csaba
  11  *
  12  ******************************************************************************/
  13 module emb_untag_SE {   //^In TTCN-3 module `emb_untag_SE'://
  14
  15 // 25.2.3
  16 type record e1 { //^In type definition//
  17   record of universal charstring field_1, //^error: All the other components should be ATTRIBUTE or ANY-ATTRIBUTE//
  18
  19   charstring field_2 //^Due to this UNTAGGED component// \
  20   //^error: There shall be no UNTAGGED on any character-encodable component of a type with DEFAULT-FOR-EMPTY//
  21 }
  22 with {
  23   variant "embedValues"
  24   variant (field_2) "untagged"
  25 }
  26
  27
  28
  29 }
  30 with {
  31 encode "XML"
  32 }