]> gerrit.simantics Code Review - simantics/district.git/blob - org.simantics.district.network/scl/Simantics/District/TechType.scl
Add enable/disable feature for tech type tables
[simantics/district.git] / org.simantics.district.network / scl / Simantics / District / TechType.scl
1 import "Simantics/DB"
2 import "Map" as Map
3
4 importJava "org.simantics.district.network.techtype.TechTypeUtils" where
5     "Update component properties from tech type table: `updateComponent component`"
6     updateComponent :: Resource -> <Proc> ()
7     "Reset all components to values in a tech type table: `resetComponents table`"
8     resetComponents :: Resource -> <Proc> ()
9     "Reset all map diagram elements to values in a tech type table: `resetMapElements table`"
10     resetMapElements :: Resource -> <Proc> ()
11     "Load a tech type table for a given component type from a CSV file: `loadTechTypeTable componentType filePath`"
12     loadTechTypeTable :: Resource -> String -> <Proc> ()
13     
14     "Get a possible tech type key property name for a component type"
15     getPossibleTechTypeKeyName :: Resource -> <ReadGraph> Maybe String
16     "Get a possible tech type table in a model for a component type: `getPossibleTechTypeTable model componentType`"
17     getPossibleTechTypeTable :: Resource -> Resource -> <ReadGraph> Maybe Resource
18     "Get data from a tech type table"
19     getTechTypeData :: Resource -> <ReadGraph> Map.T String (Map.T String String)
20     "Get data for enabled items in a tech type table"
21     getEnabledTechTypeData :: Resource -> <ReadGraph> Map.T String (Map.T String String)
22     "Get a possible row from a tech type table for the given key value"
23     getPossibleTechTypeItem :: Resource -> String -> <ReadGraph> Maybe (Map.T String String)