ActionField1132

Beschrijving: Add AssortmentReservableObject (ReservableObject) to Assortment. Custom: Nee

Propertiesbewerken

XMLbewerken

<Workflow Name="ActionField1132" Version="2025.07.28" WorkflowType="Standard" xmlns="urn:Ultimo.Framework.Workflow-mapping">
	<Security EditLevel="10" ViewLevel="20" UserContentLevel="30" />
	<Description>Add AssortmentReservableObject (ReservableObject) to Assortment.</Description>
	<Properties>
		<Property	Name="Assortment"							Type="Assortment"						Accessor="Root"		Direction="In" />

		<Property	Name="AssortmentReservableObjectList"		Type="List[AssortmentReservableObject]"	Accessor="Internal" />
		<Property	Name="CreatedAssortmentReservableObject"	Type="AssortmentReservableObject"		Accessor="Internal" />
		<Property	Name="EntityName"							Type="String"							Accessor="Internal" />
		<Property	Name="SelectedDomainObject"					Type="DomainObject"						Accessor="Internal" />
		<Property	Name="SelectionList"						Type="String"							Accessor="Internal" />
		<Property	Name="SqlWhereClause"						Type="String"							Accessor="Internal" />
	</Properties>
	<Execution>
		<UserContent Name="Pre" />

		<Validation Name="Check assortment type" Condition="${Assortment.Type} != 0" MessageCode="2243" />

		<Transaction>
			<GetList Name="Get current reservable objects on assortment" Type="AssortmentReservableObject" OutputProperty="${AssortmentReservableObjectList}" OrderBy="Id.ReservableObject" OrderDirection="Ascending">
				<Filters>
					<PropertyFilter	PropertyName="Id.Assortment"	Operator="="		PropertyValue="${Assortment}" />
				</Filters>
			</GetList>

			<Choose Name="Check list">
				<When Name="List not empty" Condition="${AssortmentReservableObjectList} != Empty">
					<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="(#foreach(${ReservableObject} in ${AssortmentReservableObjectList})#each'${ReservableObject.Id.ReservableObject.Id}'#between, #end)" />
				</When>

				<Otherwise Name="List empty">
					<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="('X')" />
				</Otherwise>
			</Choose>
		</Transaction>

		<Choose Name="Check type">
			<When Name="Type SpaceAndDelivery" Condition="${Assortment.Type} == 1">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Space" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Default" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="SpcResoId IS NOT NULL AND SpcContext = 1 AND SpcResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type Equipment" Condition="${Assortment.Type} == 2">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Equipment" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Installatie" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="EqmResoId IS NOT NULL AND EqmContext = 2 AND EqmResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type EquipmentFleet" Condition="${Assortment.Type} == 3">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Equipment" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Fleet" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="EqmResoId IS NOT NULL AND EqmContext = 8 AND EqmResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type ArticleCatering" Condition="${Assortment.Type} == 4">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Article" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Catering" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="ArtResoId IS NOT NULL AND ArtContext IN (2,4) AND ArtResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type Article" Condition="${Assortment.Type} == 5">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Article" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Voorraadmethode" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="ArtResoId IS NOT NULL AND ArtContext = 1 AND ArtResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type External" Condition="${Assortment.Type} == 6">
				<Assign Name="Set entity name" Property="${EntityName}" Value="External" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Default" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="ExtResoId IS NOT NULL AND ExtContext = 2 AND ExtResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type Employee" Condition="${Assortment.Type} == 7">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Employee" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Default" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="EmpResoId IS NOT NULL AND EmpContext = 1 AND EmpResoId NOT IN ${SqlWhereClause}" />
			</When>


			<When Name="Type ParkingSpace" Condition="${Assortment.Type} == 8">
				<Assign Name="Set entity name" Property="${EntityName}" Value="Space" />
				<Assign Name="Set selection list configuration" Property="${SelectionList}" Value="Default" />
				<Assign Name="Set sql where clause" Property="${SqlWhereClause}" Value="SpcResoId IS NOT NULL AND SpcContext = 4 AND SpcResoId NOT IN ${SqlWhereClause}" />
			</When>
		</Choose>

		<UserContent Name="BeforeDialog" />

		<SystemDialog Name="DialogSelectReservableObject" DialogName="SelectDomainObject">
			<Parameter	Name="EntityName"					Direction="In"		Value="${EntityName}" />
			<Parameter	Name="SelectionListConfiguration"	Direction="In"		Value="${SelectionList}" />
			<Parameter	Name="SqlWhereClause"				Direction="In"		Value="${SqlWhereClause}" />
			<Parameter	Name="DomainObject"					Direction="Out"									OutputProperty="${SelectedDomainObject}" />
		</SystemDialog>

		<Transaction>
			<Insert Name="InsertAssortmentReservableObject" ObjectType="AssortmentReservableObject" OutputProperty="${CreatedAssortmentReservableObject}">
				<Parameter	Name="Id.Assortment"		Direction="In"		Value="${Assortment}" />
				<Parameter	Name="Id.ReservableObject"	Direction="In"		Value="${SelectedDomainObject.ReservableObject}" />
				<Parameter	Name="Context"				Direction="In"		Value="AssortmentReservableObjectContext.Reservation" />
			</Insert>
		</Transaction>

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