ActionField1275

Beschrijving: Select part of CostCenter and check part-of relation. Custom: Nee

Propertiesbewerken

XMLbewerken

<Workflow Name="ActionField1275" Version="2025.07.28" WorkflowType="Standard" xmlns="urn:Ultimo.Framework.Workflow-mapping">
	<Security EditLevel="10" ViewLevel="20" UserContentLevel="30" />
	<Description>Select part of CostCenter and check part-of relation.</Description>
	<Properties>
		<Property	Name="CostCenter"					Type="CostCenter"		Accessor="Root"		Direction="In" />

		<Property	Name="ChainWithPartOfIds"			Type="String"			Accessor="Internal" />
		<Property	Name="ErrorType"					Type="PartOfErrorType"	Accessor="Internal" />
		<Property	Name="OtherDomainObject"			Type="DomainObject"		Accessor="Internal" />
		<Property	Name="PartOfCostCenter"				Type="CostCenter"		Accessor="Internal" />
		<Property	Name="ReplacePartOfCostCenter"		Type="Boolean"			Accessor="Internal"						Default="False" />
		<Property	Name="ShowDescriptionsInMessages"	Type="Boolean"			Accessor="Internal"						Default="True"	Comment="Specify whether DomainObject descriptions should be shown in messages" />
		<Property	Name="ShowIdsInMessages"			Type="Boolean"			Accessor="Internal"						Default="True"	Comment="Specify whether DomainObject ids should be shown in messages" />
	</Properties>
	<Execution>
		<UserContent Name="Pre" />

		<When Name="Costcenter is part of another costcenter" Condition="${CostCenter.PartOfCostCenter} != Empty">
			<Dialog Name="EditOrRemovePartOfCostCenterSelectionDialog" TitleCode="CHOOSECOSTCENTER">
				<Container Border="True">
					<RadioGroup Name="RemoveOrReplace" Value="true" OutputProperty="${ReplacePartOfCostCenter}">
						<Item Description="REPLPARTOFCOSTCENTER" Value="true" />
						<Item Description="REMOVEPARTOFCOSTCENTER" Value="false" />
					</RadioGroup>
				</Container>
			</Dialog>

			<When Name="When answer is remove (and not replace)" Condition="${ReplacePartOfCostCenter} == False">
				<Transaction>
					<Assign Name="Clear partofcoscenter from costcenter" Property="${CostCenter.PartOfCostCenter}" Value="Empty" />
				</Transaction>

				<Stop Name="Stop" Mode="EndAll" />
			</When>
		</When>

		<SystemDialog Name="SelectPartOfCostCenter" DialogName="SelectDomainObject">
			<Parameter	Name="EntityName"					Direction="In"		Value="CostCenter" />
			<Parameter	Name="SelectionListConfiguration"	Direction="In"		Value="Default" />
			<Parameter	Name="SqlWhereClause"				Direction="In"		Value="CcrId &lt;&gt; '${CostCenter.Id}'" />
			<Parameter	Name="DomainObject"					Direction="Out"													OutputProperty="${PartOfCostCenter}" />
		</SystemDialog>

		<Transaction>
			<Assign Name="Set PartOf" Property="${CostCenter.PartOfCostCenter}" Value="${PartOfCostCenter}" />

			<Command Name="Check part-of relation for DomainObject" CommandName="DomainObject_CheckPartOf">
				<Parameter	Name="DomainObject"			Direction="In"		Value="${CostCenter}" />
				<Parameter	Name="PartOfPropertyName"	Direction="In"		Value="PartOfCostCenter" />
				<Parameter	Name="ChainWithPartOfIds"	Direction="Out"									OutputProperty="${ChainWithPartOfIds}" />
				<Parameter	Name="OtherDomainObject"	Direction="Out"									OutputProperty="${OtherDomainObject}" />
				<Parameter	Name="PartOfErrorType"		Direction="Out"									OutputProperty="${ErrorType}" />
			</Command>
		</Transaction>

		<UserContent Name="Post" />

		<Choose Name="Check ErrorType">
			<When Name="ErrorType is Self" Condition="${ErrorType} == Self">
				<Message Name="ErrorSelf" MessageCode="2623">
					<Parameter	Name="DomainObject"	Direction="In"		Value="${CostCenter}" />
					<Parameter	Name="ShowDescr"	Direction="In"		Value="${ShowDescriptionsInMessages}" />
					<Parameter	Name="ShowId"		Direction="In"		Value="${ShowIdsInMessages}" />
				</Message>
			</When>


			<When Name="ErrorType is Other" Condition="${ErrorType} == Other">
				<Message Name="ErrorOther" MessageCode="2624">
					<Parameter	Name="DomainObject"			Direction="In"		Value="${CostCenter}" />
					<Parameter	Name="OtherDomainObject"	Direction="In"		Value="${OtherDomainObject}" />
					<Parameter	Name="ShowDescr"			Direction="In"		Value="${ShowDescriptionsInMessages}" />
					<Parameter	Name="ShowId"				Direction="In"		Value="${ShowIdsInMessages}" />
				</Message>
			</When>


			<When Name="ErrorType is List" Condition="${ErrorType} == List">
				<Message Name="ErrorList" MessageCode="2625">
					<Parameter	Name="ChainWithPartOfIds"	Direction="In"		Value="${ChainWithPartOfIds}" />
					<Parameter	Name="DomainObject"			Direction="In"		Value="${CostCenter}" />
					<Parameter	Name="OtherDomainObject"	Direction="In"		Value="${OtherDomainObject}" />
					<Parameter	Name="ShowDescr"			Direction="In"		Value="${ShowDescriptionsInMessages}" />
					<Parameter	Name="ShowId"				Direction="In"		Value="${ShowIdsInMessages}" />
				</Message>
			</When>
		</Choose>
	</Execution>
</Workflow>