ActionField1775

Beschrijving: Toggle UltimoSettings.PurchasePricePerSite. Custom: Nee

XMLbewerken

<Workflow Name="ActionField1775" Version="2025.07.28" WorkflowType="Standard" xmlns="urn:Ultimo.Framework.Workflow-mapping">
	<Security EditLevel="10" ViewLevel="20" UserContentLevel="30" />
	<Description>Toggle UltimoSettings.PurchasePricePerSite.</Description>
	<Properties>
		<Property	Name="Articles"						Type="List[Article]"		Accessor="Internal"						Default="Empty" />
		<Property	Name="ArticleSites"					Type="List[ArticleSite]"	Accessor="Internal"						Default="Empty" />
		<Property	Name="RecordAuthorizationActive"	Type="Boolean"				Accessor="Internal" />
	</Properties>
	<Execution>
		<UserContent Name="Pre" />

		<Validation Name="When PurchasePricePerSite True" Condition="#{UltimoSettings.PurchasePricePerSite} == False" MessageCode="3622" />

		<Transaction>
			<Command Name="CheckForRecordAuthorization" CommandName="CheckForRecordAuthorization">
				<Parameter	Name="RecordAuthorizationActive"	Direction="Out"		OutputProperty="${RecordAuthorizationActive}" />
			</Command>

			<Validation Name="Record Authorization Change" Condition="${RecordAuthorizationActive} == False" MessageCode="3620" />
		</Transaction>

		<Validation Name="When StockLevelPerSite False" Condition="#{UltimoSettings.StockLevelPerSite} == True" MessageCode="3624" />

		<ContinuationQuestion Name="Set PurchasePricePerSite to True?" MessageCode="3621" />

		<Transaction IncludeTrashedObjects="True">
			<Command Name="Update Ummsettings" CommandName="UmmSettingUpdatePurchasePricePerSite" />

			<GetList Name="ArticleSites" Type="ArticleSite" OutputProperty="${ArticleSites}" OrderBy="Id" OrderDirection="Ascending" />

			<ForEach Name="All ArticleSites" In="${ArticleSites}" As="ArticleSite">
				<Assign Name="Set PurchasePrice" Property="${ArticleSite.PurchasePrice}" Value="${ArticleSite.Id.Article.PurchasePrice}" />
				<Assign Name="Set PurchasePriceDate" Property="${ArticleSite.PurchasePriceDate}" Value="${ArticleSite.Id.Article.PurchasePriceDate}" />
				<Assign Name="Set Vat" Property="${ArticleSite.Vat}" Value="${ArticleSite.Id.Article.Vat}" />
				<Assign Name="Set Raise" Property="${ArticleSite.Raise}" Value="${ArticleSite.Id.Article.Raise}" />
				<Assign Name="Set ChargeRaiseInternal" Property="${ArticleSite.ChargeRaiseInternal}" Value="${ArticleSite.Id.Article.ChargeRaiseInternal}" />
				<Assign Name="Set ChargeRaiseExternal" Property="${ArticleSite.ChargeRaiseExternal}" Value="${ArticleSite.Id.Article.ChargeRaiseExternal}" />
			</ForEach>

			<GetList Name="Articles" Type="Article" OutputProperty="${Articles}" OrderBy="Id" OrderDirection="Ascending" />

			<ForEach Name="All Articles" In="${Articles}" As="Article">
				<Assign Name="Empty PurchasePrice" Property="${Article.PurchasePrice}" Value="Empty" />
				<Assign Name="Empty PurchasePriceDate" Property="${Article.PurchasePriceDate}" Value="Empty" />
				<Assign Name="Empty Vat" Property="${Article.Vat}" Value="Empty" />
				<Assign Name="Empty Raise" Property="${Article.Raise}" Value="Empty" />
				<Assign Name="Empty ChargeRaiseInternal" Property="${Article.ChargeRaiseInternal}" Value="Empty" />
				<Assign Name="Empty ChargeRaiseExternal" Property="${Article.ChargeRaiseExternal}" Value="Empty" />
			</ForEach>
		</Transaction>

		<Command Name="ClearCache" CommandName="ClearCache" />

		<Message Name="Changing setting PurchasePricePerSite ready." MessageCode="3623" />

		<UserContent Name="Post" />

		<View Name="OpenScreen" ViewName="DataEntryScreen">
			<Parameter	Name="ScreenName"	Direction="In"		Value="umm01" />
		</View>
	</Execution>
</Workflow>