ActionField469

Beschrijving: Copy InspectionLines from Inspectionplan to Processfunction. InspectionPlan is selected via CollectInput. Custom: Nee

Propertiesbewerken

XMLbewerken

<Workflow Name="ActionField469" Version="2025.07.28" WorkflowType="Standard" xmlns="urn:Ultimo.Framework.Workflow-mapping">
	<Security EditLevel="10" ViewLevel="20" UserContentLevel="30" />
	<Description>Copy InspectionLines from Inspectionplan to Processfunction. InspectionPlan is selected via CollectInput.</Description>
	<Properties>
		<Property	Name="ProcessFunction"				Type="ProcessFunction"		Accessor="Root"		Direction="In" />

		<Property	Name="InspectionPlanContext"		Type="Context"				Accessor="Optional"	Direction="In"		Default="InspectionPlanContext.CourseRoutePlan"	Comment="Only select InspectionPlans with this context" />

		<Property	Name="InspectionPlanSqlWhereClause"	Type="String"				Accessor="Optional"	Direction="Out" />

		<Property	Name="DeleteInspectionLines"		Type="RequestResult"		Accessor="Internal" />
		<Property	Name="InspectionLines"				Type="List[InspectionLine]"	Accessor="Internal" />
		<Property	Name="InspectionPlan"				Type="InspectionPlan"		Accessor="Internal" />
	</Properties>
	<Execution>
		<UserContent Name="Pre" />

		<Transaction>
			<GetList Name="Get InspectionLines of ProcessFunction" Type="InspectionLine" OutputProperty="${InspectionLines}" OrderBy="Id" OrderDirection="Ascending">
				<Filters>
					<PropertyFilter	PropertyName="ProcessFunction"	Operator="="		PropertyValue="${ProcessFunction}" />
				</Filters>
			</GetList>
		</Transaction>

		<When Name="ProcessFunction has inspectionlines » yes" Condition="${InspectionLines.Count} &gt; 0">
			<Question Name="Delete inspectionlines" Type="YesNoCancel" MessageCode="0102" OutputProperty="${DeleteInspectionLines}">
				<Parameter	Name="DomainObject"	Direction="In"		Value="${ProcessFunction}" />
			</Question>
		</When>

		<Assign Name="SetWhereClause" Property="${InspectionPlanSqlWhereClause}" Value="IspContext=${InspectionPlanContext}" />

		<Dialog Name="DialogInspectionPlan" TitleCode="SELECT_MAINTENANCE_ROUTE_PLAN">
			<Container>
				<SelectionList Name="InspectionPlan" OutputProperty="${InspectionPlan}" ColumnName="IspId" ViewfieldConfiguration="Looprouteplan" Required="True" SqlWhereClause="${InspectionPlanSqlWhereClause}" />
			</Container>
		</Dialog>

		<Transaction>
			<When Name="Trash Current InspectionLines of ProcessFunction" Condition="${DeleteInspectionLines} == Yes">
				<GetList Name="Get InspectionLines Of ProcessFunction" Type="InspectionLine" OutputProperty="${InspectionLines}" OrderBy="Id" OrderDirection="Ascending">
					<Filters>
						<PropertyFilter	PropertyName="ProcessFunction"	Operator="="		PropertyValue="${ProcessFunction}" />
					</Filters>
				</GetList>

				<ForEach Name="LoopEachInspectionLine" In="${InspectionLines}" As="InspectionLine">
					<Assign Name="Set ProcessFunctionMeasurementPoint empty" Property="${InspectionLine.ProcessFunctionMeasurementPoint}" Value="Empty" />

					<TrashObject Name="Trash current inspectionline" DomainObject="${InspectionLine}" />
				</ForEach>

				<Flush />
			</When>

			<Command Name="ProcessFunction_CopyFromInspectionPlan" CommandName="ProcessFunction_CopyFromInspectionPlan">
				<Parameter	Name="InspectionPlan"	Direction="In"		Value="${InspectionPlan}" />
				<Parameter	Name="ProcessFunction"	Direction="In"		Value="${ProcessFunction}" />
			</Command>
		</Transaction>

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