Bewerken: ActionField919

Sectie: XML

Reden:

## XML

```xml
<Workflow Name="ActionField919" Version="2025.07.28" WorkflowType="Standard" xmlns="urn:Ultimo.Framework.Workflow-mapping">
	<Security EditLevel="10" ViewLevel="20" UserContentLevel="30" />
	<Description>Toggle Done or Applicable of ObjectInspectionLine. Setting values to False only possible for Employee who has set them to True.</Description>
	<Properties>
		<Property	Name="ObjectInspectionLine"								Type="ObjectInspectionLine"			Accessor="Root"		Direction="In" />

<Property	Name="AnswerUntickRequiredOption"						Type="RequestResult"				Accessor="Internal"						Default="No" />
		<Property	Name="ChangeAllowed"									Type="Boolean"						Accessor="Internal" />
		<Property	Name="Count"											Type="Int64"						Accessor="Internal" />
		<Property	Name="Date"												Type="DateTime"						Accessor="Internal"						Default="#{Environment.CurrentDateTime}" />
		<Property	Name="Employee"											Type="Employee"						Accessor="Internal"						Default="#{User.EmployeeId}" />
		<Property	Name="ErrorEmployee"									Type="Employee"						Accessor="Internal" />
		<Property	Name="ErrorMessage"										Type="Int32"						Accessor="Internal" />
		<Property	Name="HighRiskOption"									Type="ObjectInspectionLine"			Accessor="Internal"																	Comment="Holds root option that is no longer applicable and has high risk set, used in message" />
		<Property	Name="HighRiskOptionsBefore"							Type="List[ObjectInspectionLine]"	Accessor="Internal"																	Comment="Holds the first applicable (or unticked just now) option that has high risk set" />
		<Property	Name="LotoOption"										Type="ObjectInspectionLine"			Accessor="Internal"																	Comment="Holds root option that is no longer applicable and has LOTO set, used in message" />
		<Property	Name="LotoOptionsBefore"								Type="List[ObjectInspectionLine]"	Accessor="Internal"																	Comment="Holds the first applicable (or unticked just now) option that has LOTO set" />
		<Property	Name="OptionsRequiringCheck"							Type="String"						Accessor="Internal"																	Comment="after deleting a link, the remark text of an ObjectInspectionLine may not be valid any longer" />
		<Property	Name="PotentiallyUnessentialObjectConfirmationRoles"	Type="List[ObjectConfirmationRole]"	Accessor="Internal" />
		<Property	Name="QuestionNumber"									Type="UltimoString"					Accessor="Internal" />
	</Properties>
	<Execution>
		<UserContent Name="Pre" />

<Transaction>
			<WorkflowCall Name="Permit_GetPotentiallyUnessentialConfirmationRoles" WorkflowName="Permit_GetPotentiallyUnessentialConfirmationRoles">
				<Parameter	Name="ObjectInspectionLine"								Direction="In"		Value="${ObjectInspectionLine}" />
				<Parameter	Name="Permit"											Direction="In"		Value="${ObjectInspectionLine.Permit}" />
				<Parameter	Name="PotentiallyUnessentialObjectConfirmationRoles"	Direction="Out"												OutputProperty="${PotentiallyUnessentialObjectConfirmationRoles}" />
				<Parameter	Name="QuestionNumber"									Direction="Out"												OutputProperty="${QuestionNumber}" />
			</WorkflowCall>

<WorkflowCall Name="aren't we allowed after all?" WorkflowName="Employee_ConfirmationRoleCheckChangeAllowed">
				<Parameter	Name="Employee"			Direction="In"		Value="${Employee}" />
				<Parameter	Name="ChangeAllowed"	Direction="Out"							OutputProperty="${ChangeAllowed}" />
			</WorkflowCall>

<GetCount Name="get count of required links" Type="ObjectInspectionLineLink" OutputProperty="${Count}">
				<Joins>
					<Join	Name="Source"	Alias="src"	Type="InnerJoin" />
				</Joins>
				<Filters>
					<PropertyFilter	PropertyName="Destination"		Operator="="		PropertyValue="${ObjectInspectionLine}" />
					<PropertyFilter	PropertyName="Required"			Operator="="		PropertyValue="True" />
					<PropertyFilter	PropertyName="src.Applicable"	Operator="="		PropertyValue="True" />
				</Filters>
			</GetCount>

<When Name="check whether there are any loto lines" Condition="${ObjectInspectionLine.Applicable} == False &amp;&amp; ${ObjectInspectionLine.Permit.LockoutTagoutApplicable?} == True">
				<GetList Name="Get Loto lines" Type="ObjectInspectionLine" OutputProperty="${LotoOptionsBefore}" OrderBy="Id" OrderDirection="Ascending" Top="1">
					<Joins>
						<Join	Name="Permit"	Alias="permit"	Type="InnerJoin" />
					</Joins>
					<Filters>
						<CombinedFilter FilterOperator="And">
							<PropertyFilter	PropertyName="SetsPermitLockoutTagoutApplicable"	Operator="="		PropertyValue="True" />
							<PropertyFilter	PropertyName="Applicable"							Operator="="		PropertyValue="True" />
							<PropertyFilter	PropertyName="Permit"								Operator="="		PropertyValue="${ObjectInspectionLine.Permit}" />
							<PropertyFilter	PropertyName="permit.Context"						Operator="="		PropertyValue="PermitContext.WorkPermit" />
						</CombinedFilter>
					</Filters>
				</GetList>

<When Name="if the clicked ObjectInspectionLine is Loto, set it" Condition="${ObjectInspectionLine.SetsPermitLockoutTagoutApplicable} == True &amp;&amp; ${ObjectInspectionLine.Permit.Context} == PermitContext.WorkPermit">
					<AddToList Name="add to LotoOptionsBefore" List="${LotoOptionsBefore}" Item="${ObjectInspectionLine}" />
				</When>
			</When>

<When Name="check whether there are any highrisk lines" Condition="${ObjectInspectionLine.Applicable} == False &amp;&amp; ${ObjectInspectionLine.Permit.HighRisk?} == True">
				<GetList Name="Get Highrisk lines" Type="ObjectInspectionLine" OutputProperty="${HighRiskOptionsBefore}" OrderBy="Id" OrderDirection="Ascending" Top="1">
					<Filters>
						<CombinedFilter FilterOperator="And">
							<PropertyFilter	PropertyName="SetsPermitHighRisk"	Operator="="		PropertyValue="True" />
							<PropertyFilter	PropertyName="Applicable"			Operator="="		PropertyValue="True" />
							<PropertyFilter	PropertyName="Permit"				Operator="="		PropertyValue="${ObjectInspectionLine.Permit}" />
						</CombinedFilter>
					</Filters>
				</GetList>

<When Name="if the clicked ObjectInspectionLine is HighRisk, set it" Condition="${ObjectInspectionLine.SetsPermitHighRisk} == True">
					<AddToList Name="add to HighRiskOptionsBefore" List="${HighRiskOptionsBefore}" Item="${ObjectInspectionLine}" />
				</When>
			</When>
		</Transaction>

<When Name="Option has been marked as required?" Condition="${ObjectInspectionLine.Applicable} == False &amp;&amp; ${Count} != 0">
			<When Name="Employee is allowed to change options of other roles?" Condition="${ChangeAllowed} == True">
				<Question Name="Continue to untick this required option?" Type="YesNo" MessageCode="3360" Default="No" OutputProperty="${AnswerUntickRequiredOption}">
					<Parameter	Name="ObjectInspectionLine"	Direction="In"		Value="${ObjectInspectionLine}" />
				</Question>
			</When>
		</When>

<Transaction>
			<Choose Name="some possible scenarios">
				<When Name="Can we unset required option" Condition="${ObjectInspectionLine.Applicable} == False &amp;&amp; ${Count} != 0">
					<When Name="AnswerUntickRequiredOption" Condition="${AnswerUntickRequiredOption} == No">
						<Assign Name="Revert Applicable" Property="${ObjectInspectionLine.Applicable}" Value="True" />

<When Name="Employee is not allowed to change options of other roles" Condition="${ChangeAllowed} == False">
							<Assign Name="Set ErrorMessage: Required option" Property="${ErrorMessage}" Value="2700" />
						</When>
					</When>
				</When>

<When Name="Allowed to change options of other roles" Condition="${ChangeAllowed} == True">
					<Assign Name="Set ErrorMessage to 0" Property="${ErrorMessage}" Value="0" />
				</When>

<When Name="No validation just log" Condition="${ObjectInspectionLine.Permit} == Empty || ${ObjectInspectionLine.Permit.Status} != PermitStatus.Created">
					<When Name="Revert Applicable" Condition="${ObjectInspectionLine.Applicable} == False &amp;&amp; ${ObjectInspectionLine.ApplicableEmployee} != Empty &amp;&amp; ${ObjectInspectionLine.ApplicableEmployee} != ${Employee}">
						<Assign Name="Set Error Message Not Applicable" Property="${ErrorMessage}" Value="1681" />
						<Assign Name="Set Error Employee Not Applicable" Property="${ErrorEmployee}" Value=" ${ObjectInspectionLine.ApplicableEmployee}" />
						<Assign Name="Revert Applicable" Property="${ObjectInspectionLine.Applicable}" Value="True" />
					</When>

<When Name="Revert Done" Condition="${ObjectInspectionLine.Done} == False &amp;&amp; ${ObjectInspectionLine.DoneEmployee} != Empty &amp;&amp; ${ObjectInspectionLine.DoneEmployee} != ${Employee}">
						<Assign Name="Set Error Message Not Done" Property="${ErrorMessage}" Value="1682" />
						<Assign Name="Set Error Employee Not Done" Property="${ErrorEmployee}" Value="${ObjectInspectionLine.DoneEmployee}" />
						<Assign Name="Revert Done" Property="${ObjectInspectionLine.Done}" Value="True" />
					</When>
				</When>
			</Choose>

<When Name="not 2700" Condition="${ErrorMessage} != 2700">
				<WorkflowCall Name="Done values" WorkflowName="ObjectInspectionLine_SetDoneValues">
					<Parameter	Name="Date"					Direction="In"		Value="${Date}" />
					<Parameter	Name="ObjectInspectionLine"	Direction="In"		Value="${ObjectInspectionLine}" />
				</WorkflowCall>

<WorkflowCall Name="Applicable values" WorkflowName="ObjectInspectionLine_SetApplicableValues">
					<Parameter	Name="Applicable"				Direction="In"		Value="${ObjectInspectionLine.Applicable}" />
					<Parameter	Name="ChangeAllowed"			Direction="In"		Value="${ChangeAllowed}" />
					<Parameter	Name="Date"						Direction="In"		Value="${Date}" />
					<Parameter	Name="ObjectInspectionLine"		Direction="In"		Value="${ObjectInspectionLine}" />
					<Parameter	Name="OptionsRequiringCheck"	Direction="Out"													OutputProperty="${OptionsRequiringCheck}" />
				</WorkflowCall>
			</When>

<When Name="When WorkPermit is a template" Condition="${ObjectInspectionLine.Permit.Context} == PermitContext.WorkPermitTemplate">
				<GetCount Name="Name" Type="ObjectInspectionLine" OutputProperty="${Count}">
					<Joins>
						<Join	Name="InspectionPlanLine"	Alias="Ipl"	Type="InnerJoin" />
					</Joins>
					<Filters>
						<PropertyFilter	PropertyName="Permit"									Operator="="		PropertyValue="${ObjectInspectionLine.Permit}" />
						<PropertyFilter	PropertyName="Applicable"								Operator="="		PropertyValue="True" />
						<PropertyFilter	PropertyName="Ipl.SetsPermitLockoutTagoutApplicable"	Operator="="		PropertyValue="True" />
					</Filters>
				</GetCount>

<Assign Name="Update LockoutTagoutApplicable on permit" Property="${ObjectInspectionLine.Permit.LockoutTagoutApplicable}" Value="=${Count} == 0 ? False : True" Comment="Prevent LockoutTagoutApplicable being set on permits created from this template" />
			</When>

<WorkflowCall Name="ObjectInspectionLine_ActionField919_NoErrorMessage" WorkflowName="ObjectInspectionLine_ActionField919_NoErrorMessage">
				<Parameter	Name="ErrorMessage"				Direction="In"		Value="${ErrorMessage}" />
				<Parameter	Name="HighRiskOptionsBefore"	Direction="In"		Value="${HighRiskOptionsBefore}" />
				<Parameter	Name="LotoOptionsBefore"		Direction="In"		Value="${LotoOptionsBefore}" />
				<Parameter	Name="ObjectInspectionLine"		Direction="In"		Value="${ObjectInspectionLine}" />
				<Parameter	Name="HighRiskOption"			Direction="Out"											OutputProperty="${HighRiskOption}" />
				<Parameter	Name="LotoOption"				Direction="Out"											OutputProperty="${LotoOption}" />
			</WorkflowCall>
		</Transaction>

<When Name="No errors occurred" Condition="${ErrorMessage} == 0">
			<WorkflowCall Name="Permit_RemovePotentiallyUnessentialConfirmationRoles" WorkflowName="Permit_RemovePotentiallyUnessentialConfirmationRoles">
				<Parameter	Name="ObjectInspectionLine"								Direction="In"		Value="${ObjectInspectionLine}" />
				<Parameter	Name="Permit"											Direction="In"		Value="${ObjectInspectionLine.Permit}" />
				<Parameter	Name="PotentiallyUnessentialObjectConfirmationRoles"	Direction="In"		Value="${PotentiallyUnessentialObjectConfirmationRoles}" />
				<Parameter	Name="QuestionNumber"									Direction="In"		Value="${QuestionNumber}" />
			</WorkflowCall>
		</When>

<UserContent Name="Post" />

<WorkflowCall Name="ObjectInspectionLine_ActionField919_ShowMessage" WorkflowName="ObjectInspectionLine_ActionField919_ShowMessage">
			<Parameter	Name="ErrorEmployee"									Direction="In"		Value="${ErrorEmployee}" />
			<Parameter	Name="ErrorMessage"										Direction="In"		Value="${ErrorMessage}" />
			<Parameter	Name="HighRiskOption"									Direction="In"		Value="${HighRiskOption}" />
			<Parameter	Name="LotoOption"										Direction="In"		Value="${LotoOption}" />
			<Parameter	Name="ObjectInspectionLine"								Direction="In"		Value="${ObjectInspectionLine}" />
			<Parameter	Name="OptionsRequiringCheck"							Direction="In"		Value="${OptionsRequiringCheck}" />
			<Parameter	Name="PotentiallyUnessentialObjectConfirmationRoles"	Direction="In"		Value="${PotentiallyUnessentialObjectConfirmationRoles}" />
		</WorkflowCall>
	</Execution>
</Workflow>
```