2 include "Simantics/Ontologies"
3 include "Simantics/SCL"
7 importJava "org.simantics.spreadsheet.common.TableCell" where
10 importJava "org.simantics.spreadsheet.common.TreeTableCell" where
14 getTreeTableCellData :: TreeTableCell -> <Proc> a
16 createTreeTableCell :: String -> a -> Maybe b -> Integer -> Integer -> Integer -> Boolean -> <Proc> TreeTableCell
18 createTreeTableCell2 :: String -> a -> Maybe b -> a -> Integer -> Integer -> Boolean -> <Proc> TreeTableCell
21 treeTableCellText :: TreeTableCell -> <Proc> String
23 treeTableCellFont :: TreeTableCell -> <Proc> Maybe IFont
25 treeTableCellRow :: TreeTableCell -> <Proc> Integer
27 treeTableCellColumn :: TreeTableCell -> <Proc> Integer
29 importJava "org.simantics.spreadsheet.common.SpreadsheetCell" where
32 importJava "org.simantics.spreadsheet.graph.SCL" where
33 toVariant :: a -> Variant
34 modelsSourceContribution :: Resource -> <ReadGraph> [Variable]
35 modelsSourceContributionLabeler :: Variable -> <ReadGraph> String
37 importJava "org.simantics.spreadsheet.graph.SpreadsheetGraphUtils" where
38 @JavaName "fullSynchronization"
39 fullSynchronizeSheet :: Variable -> <ReadGraph> Boolean
40 evaluateAll :: Variable -> <ReadGraph> ()
41 saveInitialCondition :: Variable -> Resource -> String -> <WriteGraph> Resource
42 findCell :: Variable -> String -> <ReadGraph> Maybe Variable
43 invalidateAll :: Variable -> <ReadGraph> ()
45 importJava "org.simantics.spreadsheet.util.SpreadsheetUtils" where
46 createSheet :: Resource -> String -> <WriteGraph> Resource
47 queryCells :: a -> [TableCell]
48 modifyCells1 :: [TableCell] -> (TableCell -> TableCell) -> [TableCell]
49 modifyCells :: [TableCell] -> [(TableCell -> TableCell)] -> [TableCell]
50 organizeCells :: Integer -> [String] -> [TableCell] -> [TableCell]
51 applyFont :: IFont -> (TableCell -> Boolean) -> TableCell -> TableCell
52 applyAlign :: Integer -> (TableCell -> Boolean) -> TableCell -> TableCell
53 applyForeground :: IColor -> (TableCell -> Boolean) -> TableCell -> TableCell
54 applyBackground :: IColor -> (TableCell -> Boolean) -> TableCell -> TableCell
55 simpleFont :: String -> String -> Integer -> IFont
56 rgbColor :: Integer -> Integer -> Integer -> IColor
57 selectRow :: Integer -> TableCell -> Boolean
58 selectColumn :: Integer -> TableCell -> Boolean
59 setSCLLine :: Resource -> Integer -> String -> <WriteGraph> ()
60 sheetRun :: Resource -> Variable -> <ReadGraph> Variable
62 importJava "org.simantics.spreadsheet.graph.SpreadsheetSessionManager" where
63 removeSpreadsheetSession :: Variable -> <Proc, WriteGraph> ()
65 importJava "org.simantics.spreadsheet.graph.ExcelImport" where
66 importBook :: Resource -> File -> <Proc> ()
68 createSpreadsheetBookAction :: Resource -> <Proc> ()
69 createSpreadsheetBookAction res = do
70 syncWrite (\() -> createSpreadsheetBookDefault res)
73 createSpreadsheetSheetAction :: Resource -> <Proc> ()
74 createSpreadsheetSheetAction res = do
75 syncWrite (\() -> createSpreadsheetDefault res)
78 createSpreadsheetDefault :: Resource -> <WriteGraph> Resource
79 createSpreadsheetDefault library = createSheet library $ findFreshEscapedName "Sheet" library
81 createSpreadsheetBookDefault :: Resource -> <WriteGraph> Resource
82 createSpreadsheetBookDefault library = createSpreadsheetBook library $ findFreshEscapedName "Book" library
84 createRange :: Resource -> Resource -> String -> String -> <WriteGraph> Resource
85 createRange library type_ name expression = do
86 range = newResource ()
87 claim range L0.InstanceOf type_
88 claimRelatedValue range L0.HasName name
89 createSCLValue range SHEET.ExpressionRange.cells SHEET.SCLValue expression
90 claim range L0.PartOf library
93 createSpreadsheetBook :: Resource -> String -> <WriteGraph> Resource
94 createSpreadsheetBook library name = do
97 claim book L0.InstanceOf SHEET.Book
98 claimRelatedValue book L0.HasName name
99 claim book L0.PartOf library
100 createSheet book "Sheet"
101 addCommentMetadata ("Created Spreadsheet Book " + name)