include "Simantics/DB"
include "Simantics/Ontologies"
include "Simantics/SCL"
+include "Simantics/UI"
include "Document/All"
+include "Spreadsheet/Solver"
include "File"
importJava "org.simantics.spreadsheet.common.TableCell" where
data TableCell
+@inline
+editProperty :: Serializable a => CellEditor -> String -> String -> a -> Maybe Consumer -> <SpreadsheetTransaction> ()
+editProperty editor location property value consumer = editProperty_ editor location property value binding consumer
+
importJava "org.simantics.spreadsheet.common.TreeTableCell" where
data TreeTableCell
treeTableCellRow :: TreeTableCell -> <Proc> Integer
@JavaName getColumn
treeTableCellColumn :: TreeTableCell -> <Proc> Integer
-
-importJava "org.simantics.spreadsheet.common.SpreadsheetCell" where
- data SpreadsheetCell
importJava "org.simantics.spreadsheet.graph.SCL" where
toVariant :: a -> Variant
saveInitialCondition :: Variable -> Resource -> String -> <WriteGraph> Resource
findCell :: Variable -> String -> <ReadGraph> Maybe Variable
invalidateAll :: Variable -> <ReadGraph> ()
+ extRefVariable :: Variable -> <ReadGraph> Variant
+ extRefActiveVariable :: Variable -> <ReadGraph> Variant
+ forRows :: Variable -> String -> Integer -> Integer -> (Variable -> <ReadGraph,Proc> ()) -> <ReadGraph> ()
+ rowCell :: Variable -> Integer -> <ReadGraph> Maybe Variable
+ offsetCell :: Variable -> Integer -> Integer -> <ReadGraph> Maybe Variable
+ cellEditor :: Resource -> <ReadGraph> CellEditor
+ syncExec :: CellEditor -> OperationMode -> (<SpreadsheetTransaction, Proc> a) -> <Proc> a
+ cellColumn :: Variable -> <ReadGraph> Integer
+ spreadsheetBook :: Variable -> <Proc> SpreadsheetBook
importJava "org.simantics.spreadsheet.util.SpreadsheetUtils" where
createSheet :: Resource -> String -> <WriteGraph> Resource
selectColumn :: Integer -> TableCell -> Boolean
setSCLLine :: Resource -> Integer -> String -> <WriteGraph> ()
sheetRun :: Resource -> Variable -> <ReadGraph> Variable
+ @JavaName "sheetRun"
+ bookRun :: Resource -> Variable -> <ReadGraph> Variable
-importJava "org.simantics.spreadsheet.graph.SpreadsheetSessionManager" where
- removeSpreadsheetSession :: Variable -> <Proc, WriteGraph> ()
+sheetRunDefault = bookRunDefault
+
+bookRunDefault :: Resource -> <ReadGraph> Variable
+bookRunDefault book = bookRun book (resourceVariable book)
importJava "org.simantics.spreadsheet.graph.ExcelImport" where
importBook :: Resource -> File -> <Proc> ()
+importSpreadsheetBookAction :: Resource -> <Proc> ()
+importSpreadsheetBookAction res = match fileDialog "foo" [("Excel file", "*.xls"), ("Excel File", "*.xlsx")] with
+ Nothing -> ()
+ Just file -> importBook res file
+
createSpreadsheetBookAction :: Resource -> <Proc> ()
createSpreadsheetBookAction res = do
syncWrite (\() -> createSpreadsheetBookDefault res)