feat(ui): 'Lager til' viser kun bygninger der kan tage flowets lagervarer (paller -> palleskure der tager varen); valgt palleskur bruges til palleture (v1.19.2.0)

tests/test_adRunsController.lua

@@ -721,6 +721,25 @@ do
     ADRunsController.updateRun(sbRun.id, {storeBuildingIds = {}})
     check("SB tom = ingen tvang", #ADRunsController.getStoreMarkers(adEnv, ADRuns.getRun(ADRunsController.store, sbRun.id)), 0)
 end
+-- CS: "Lager til" viser kun bygninger der kan tage flowets lagervarer (æg-paller: kun palleskure der tager æg)
+do
+    local EGG, SILAGE = 501, 502
+    local shed = {id = "shed1", kind = "objectStorage", placeable = {takesEggs = true}}
+    local shedNo = {id = "shed2", kind = "objectStorage", placeable = {takesEggs = false}}
+    local silo = {id = "silo9", kind = "silo", placeable = {}, unloadMarker = {id = 901}}
+    unloadAt[901] = {accepts = {[SILAGE] = 100000}, getIsFillTypeSupported = function(_, ft) return ft == SILAGE end}
+    local accBefore, storeBefore = ADSources.objectStorageAccepts, ADLoadSwap and ADLoadSwap.isStoreTarget
+    ADSources.objectStorageAccepts = function(placeable, ft) return ft == EGG and placeable.takesEggs end
+    ADLoadSwap = ADLoadSwap or {}
+    ADLoadSwap.isStoreTarget = function(station, ft) return station.getIsFillTypeSupported(station, ft) end
+    local eggs = {{fillType = EGG, isPallet = true}}
+    check("CS palleskur der tager æg", ADRunsController.canStoreAt(adEnv, shed, eggs), true)
+    check("CS palleskur der ikke tager æg", ADRunsController.canStoreAt(adEnv, shedNo, eggs), false)
+    check("CS silo kan ikke tage æg-paller", ADRunsController.canStoreAt(adEnv, silo, eggs), false)
+    check("CS silo tager ensilage", ADRunsController.canStoreAt(adEnv, silo, {{fillType = SILAGE, isPallet = false}}), true)
+    ADSources.objectStorageAccepts = accBefore
+    ADLoadSwap.isStoreTarget = storeBefore
+end
 ADBuildings = nil; ADSources = nil; ADOutbound = nil
 
 -- RC-navne: køretøjer får AD-førernavn efter forløbet; ude af forløb -> modelnavnet igen