declare namespace a = "http://pcs.portinfolink.nl/ecscoprar";
declare option ddtek:serialize 'indent=yes,omit-xml-declaration=no';

(:
: ----------------------------------------------------------------------------------------------------- :
: Copyright: (c) 2009 Portbase All Rights Reserved.                                     				:
: ----------------------------------------------------------------------------------------------------- :
: Portbase				*    No part of this file may be reproduced or 									:
:                       *    transmitted in any form or by any means,									:
: Seattleweg 7          *    electronic or mechanical, for the purpose,									:
: 3195 ND Rotterdam     *    without the express written permission of the								:
: The Netherlands       *    copyright holder. 															:
: ----------------------------------------------------------------------------------------------------- :
: title         = "ECS_COPRAR"																			:
: version       = "$Id: ECS_COPRAR_M121.xquery 81098 2009-05-20 08:24:27Z r.vander.hoeven $"			:
: author        = "Roel van der Hoeven"																	:
: company       = "Portbase"																			:
: email         = "r.vander.hoeven@portbase.com"														:
: ----------------------------------------------------------------------------------------------------- :
:)
let $input := ddtek:validate(/EDIFACT,'../dictionaries/applications/ecs/xsd/ECS_COPRAR_IN.xsd') 
return
<a:xlCoprar>
	<a:xlAgentsVoyageNumber>
		{
		let $RFF_VON := for $RFF in $input/EDIFACT/COPRAR/GROUP_1/RFF where $RFF/RFF0101/text() = 'VON' return $RFF/RFF0102/text() 
		return 
			if( string-length($RFF_VON) > 0 ) then
				$RFF_VON
			else
				$input/EDIFACT/COPRAR/GROUP_1/TDT/TDT02/text()
		}
	</a:xlAgentsVoyageNumber>
</a:xlCoprar>(: Stylus Studio meta-information - (c) 2004-2008. Progress Software Corporation. All rights reserved.

<metaInformation>
	<scenarios>
		<scenario default="yes" name="normal" userelativepaths="yes" externalpreview="no" useresolver="yes" url="converter:EDI?..\test\ECS_COPRAR\pre\COPRAR_var.edi" outputurl="..\test\ECS_COPRAR\post\COPRAR_var.xml" processortype="datadirect" tcpport="0"
		          profilemode="0" profiledepth="" profilelength="" urlprofilexml="" commandline="" additionalpath="" additionalclasspath="" postprocessortype="none" postprocesscommandline="" postprocessadditionalpath="" postprocessgeneratedext="" host=""
		          port="0" user="" password="" validateoutput="no" validator="internal" customvalidator=""/>
	</scenarios>
	<MapperMetaTag>
		<MapperInfo srcSchemaPathIsRelative="yes" srcSchemaInterpretAsXML="no" destSchemaPath="..\dictionaries\applications\ecs\xsd\ecscoprar.xsd" destSchemaRoot="xlCoprar" destSchemaPathIsRelative="yes" destSchemaInterpretAsXML="no">
			<SourceSchema srcSchemaPath="..\dictionaries\applications\ecs\xsd\ECS_COPRAR_IN.xsd" srcSchemaRoot="EDIFACT" AssociatedInstance="" loaderFunction="document" loaderFunctionUsesURI="no"/>
		</MapperInfo>
		<MapperBlockPosition>
			<template name="xquery_body">
				<block path="flwr" x="386" y="18"/>
				<block path="flwr/validate[0]" x="340" y="12"/>
			</template>
		</MapperBlockPosition>
		<TemplateContext></TemplateContext>
		<MapperFilter side="source"></MapperFilter>
	</MapperMetaTag>
</metaInformation>
:)