Sync with 5.4.2

[deliverable/titan.core.git] / regression_test / XML / XmlWorkflow / XmlTest_expectedTtcns / www_example_org_substitutiongroup_complextype_block_e.ttcn

/*******************************************************************************
* Copyright (c) 2000-2015 Ericsson Telecom AB
*
* XSD to TTCN-3 Translator version: CRL 113 200/5 R3A                       
*
* All rights reserved. This program and the accompanying materials
* are made available under the terms of the Eclipse Public License v1.0
* which accompanies this distribution, and is available at
* http://www.eclipse.org/legal/epl-v10.html
*******************************************************************************/
//
//  File:          www_example_org_substitutiongroup_complextype_block_e.ttcn
//  Description:
//  References:
//  Rev:
//  Prodnr:
//  Updated:       Thu Nov 12 12:43:46 2014
//  Contact:       http://ttcn.ericsson.se
//
////////////////////////////////////////////////////////////////////////////////
//	Generated from file(s):
//	- substitutiongroup_complextype_block_e.xsd
//			/* xml version = "1.0" encoding = "UTF-8" */
//			/* targetnamespace = "www.example.org/substitutiongroup/complextype/block/e" */
////////////////////////////////////////////////////////////////////////////////
//     Modification header(s):
//-----------------------------------------------------------------------------
//  Modified by:
//  Modification date:
//  Description:
//  Modification contact:
//------------------------------------------------------------------------------
////////////////////////////////////////////////////////////////////////////////


module www_example_org_substitutiongroup_complextype_block {


import from XSD all;


/* SUBSTITUTABLE PARENT TYPE */


type record ParentType
{
	record of XSD.String foo_list,
	XSD.String bar
}
with {
  variant (foo_list) "untagged";
  variant (foo_list[-]) "name as 'foo'";
};


type RestrictedType RestrictedTypeElem
with {
  variant "element";
};


/* The restricting type is: */


type record RestrictedType
{
	record length(1 .. infinity) of XSD.String foo_list,
	XSD.String bar
}
with {
  variant "name as uncapitalized";
  variant (foo_list) "untagged";
  variant (foo_list[-]) "name as 'foo'";
};


type union Head_group
{
	RestrictedType head,
	RestrictedTypeElem restrictedTypeElem
}
with {
  variant "untagged";
  variant (head) "form as qualified";
  variant (restrictedTypeElem) "name as capitalized";
  variant (restrictedTypeElem) "block";
};


}
with {
  encode "XML";
  variant "namespace as 'www.example.org/substitutiongroup/complextype/block' prefix 'this'";
  variant "controlNamespace 'http://www.w3.org/2001/XMLSchema-instance' prefix 'xsi'";
}