Code:
SELECT TblNursOrders.[Select], TblNursOrders.Nr, TblNursOrders.Anno, TblNursOrders.OrderDate, Plants_1.PlantType AS Fruit, TblNursOrders.PlantIDScion AS SCult, Plants_1.Ipno, Plants_1.Clone AS SClone, Plants_1.Phyto, IIf( Not IsNull([Plants_1].[CommercialAgent]), [Plants_1].[CommercialAgent],
IIf(
Not IsNull([Plants_1].[Partnership]), [Plants_1].[Partnership],
IIf(
Not IsNull([Plants_1].[NucliusResponse]), [Plants_1].[NucliusResponse],
IIf(
Not IsNull([Plants_1].[Origin]), [Plants_1].[Origin],
"O Gaats geen Agent"
)
)
)
) AS Agent, TblNursOrders.PlantIDRoot AS RCult, Plants.Ipno, Plants.Clone AS RClone, Plants.Phyto, TblNursOrders.OrderAmount, TblNursOrders.OrderSize, TblNursOrders.OrderBy, TblNursOrders.Allocated, TblNursOrders.Contract, TblNursOrders.CommentNurs AS [Nurs Comment], TblNursOrders.rRL2Pay, TblNursOrders.sRL2Pay, TblNursOrders.Comment, TblNursOrders.Cerified, TblNursOrders.DeliveryNo, TblNursOrders.DeliveryDate, TblNursOrders.DeliveryQuantity, TblNursOrders.DeliverySizes, TblNursOrders.CertifiedType, TblNursOrders.SourceScion AS SSource, TblNursOrders.SourceRoot AS RSource, TblNursOrders.Nursery, TblNursOrders.NurseryConfirm AS Confirm, TblNursOrders.DeliveryNotePrinted, TblNursOrders.DeliveryType, TblNursOrders.Gebied, TblNursOrders.BevestigingsbriefGestuur, TblNursOrders.BevestigingsbriefOntvang, TblNursOrders.KontrakGestuur, TblNursOrders.KontrakOntvang, TblNursOrders.DepositobriefGestuur, TblNursOrders.DepositobriefOntvang, TblNursOrders.OrderID, TblNursOrders.CountOrder, TblNursOrders.TreePrice, TblNursOrders.PayableTo, Round(Nz(TblNursOrders.TreePrice,0) * Nz(TblNursOrders.Allocated,0), 2) AS TotalTreesPrice
FROM TblLicence AS TblLicence_1 RIGHT JOIN (((TblNursOrders INNER JOIN Plants ON TblNursOrders.PlantIDRoot = Plants.PlantID) INNER JOIN Plants AS Plants_1 ON TblNursOrders.PlantIDScion = Plants_1.PlantID) LEFT JOIN TblLicence ON Plants.PlantID = TblLicence.PlantID) ON TblLicence_1.PlantID = Plants_1.PlantID
WHERE TblNursOrders.Nr = [Forms]![frmNursOrder]![Nr]
AND TblNursOrders.Anno = [Forms]![frmNursOrder]![Anno]
ORDER BY Plants_1.Clone, TblNursOrders.PlantIDRoot, TblNursOrders.OrderAmount DESC;
I checked if the tables are updateable and they are.