-- TTCN3 module extracted from ITU-T Z.169 (03/2011)
module Example1 {
import from XSD language "XML" all;
type record Shiporder {
XSD.String orderid,
XSD.String orderperson,
record
{
XSD.String name,
XSD.String address_1,
XSD.String city,
XSD.String country
} shipto,
record
{
XSD.String title,
XSD.String note optional,
XSD.PositiveInteger quantity,
XSD.Decimal price
} item
} with {
variant "name as uncapitalized";
variant(shipto.address_1)"name as ''address''";
variant(orderid) "attribute";
}
} with {
encode "XML";
}