ActionField1648

Beschrijving: Reset cycle and cost in case the user ticked checkbox TransferNextTime. Inform user and ask to continue. Custom: Nee

Propertiesbewerken

XMLbewerken

<Workflow Name="ActionField1648" Version="2025.07.28" WorkflowType="Standard" xmlns="urn:Ultimo.Framework.Workflow-mapping">
	<Security EditLevel="10" ViewLevel="20" UserContentLevel="30" />
	<Description>Reset cycle and cost in case the user ticked checkbox TransferNextTime. Inform user and ask to continue.</Description>
	<Properties>
		<Property	Name="MaintenancePartActivity"			Type="MaintenancePartActivity"				Accessor="Root"		Direction="In" />

		<Property	Name="MaintenancePartActivityExtraList"	Type="List[MaintenancePartActivityExtra]"	Accessor="Internal" />
		<Property	Name="MaintenancePartActivityToUpdate"	Type="MaintenancePartActivity"				Accessor="Internal" />
		<Property	Name="Response"							Type="RequestResult"						Accessor="Internal" />
	</Properties>
	<Execution>
		<UserContent Name="Pre" />

		<When Name="Ticked TransferNextTime?" Condition="${MaintenancePartActivity.DataProvider} == HUMBLE &amp;&amp; ${MaintenancePartActivity.TransferNextTime} == True">
			<Question Name="Ask to continue" Type="YesNo" MessageCode="3143" Default="Yes" OutputProperty="${Response}" />

			<Transaction>
				<GetItem Name="MaintenancePartActivity" Type="MaintenancePartActivity" OutputProperty="${MaintenancePartActivityToUpdate}" Comment="Necessary to show updated TransferNextTime on screen after user responded No.">
					<Filters>
						<PropertyFilter	PropertyName="Id"	Operator="="		PropertyValue="${MaintenancePartActivity}" />
					</Filters>
				</GetItem>

				<Choose Name="Response">
					<When Name="Response is Yes" Condition="${Response} == Yes">
						<Assign Name="Reset MaintenanceCycle" Property="${MaintenancePartActivityToUpdate.MaintenanceCycle}" Value="0" />
						<Assign Name="Reset ExternalCost" Property="${MaintenancePartActivityToUpdate.ExternalCost}" Value="=#createcompanymoney(0, MaintenancePartActivity.ExternalCost)" />
						<Assign Name="Reset MaterialCost" Property="${MaintenancePartActivityToUpdate.MaterialCost}" Value="=#createcompanymoney(0, MaintenancePartActivity.MaterialCost)" />
						<Assign Name="Reset ToolsCost" Property="${MaintenancePartActivityToUpdate.ToolsCost}" Value="=#createcompanymoney(0, MaintenancePartActivity.ToolsCost)" />
						<Assign Name="Reset LabourCost" Property="${MaintenancePartActivityToUpdate.LabourCost}" Value="=#createcompanymoney(0, MaintenancePartActivity.LabourCost)" />

						<GetList Name="GetList MaintenancePartActivityExtra" Type="MaintenancePartActivityExtra" OutputProperty="${MaintenancePartActivityExtraList}" OrderBy="Id" OrderDirection="Ascending">
							<Filters>
								<PropertyFilter	PropertyName="Id.MaintenancePartActivity"	Operator="="		PropertyValue="${MaintenancePartActivity}" />
							</Filters>
						</GetList>

						<ForEach Name="ForEach MaintenancePartActivityExtra" In="${MaintenancePartActivityExtraList}" As="MaintenancePartActivityExtra">
							<DeleteObject Name="Delete MaintenancePartActivityExtra" DomainObject="${MaintenancePartActivityExtra}" />
						</ForEach>

						<Flush Comment="Flush to force trigger TRSD_MAINTENANCEPARTACTEXTRA to summarize costs on extras to activity; this provides MaintenancePartActivity_CostUpdate with updated values." />

						<WorkflowCall Name="MaintenancePartActivity_CostUpdate" WorkflowName="MaintenancePartActivity_CostUpdate">
							<Parameter	Name="MaintenancePartActivityObject"	Direction="In"		Value="${MaintenancePartActivity}" />
						</WorkflowCall>
					</When>

					<Otherwise Name="Response is No">
						<Assign Name="Reset TransferNextTime" Property="${MaintenancePartActivityToUpdate.TransferNextTime}" Value="False" />
					</Otherwise>
				</Choose>
			</Transaction>
		</When>

		<UserContent Name="Post" />
	</Execution>
</Workflow>