Commit 72b91df3 authored by Yong Liu's avatar Yong Liu

Refs #5732

parent f40fc852
......@@ -5284,32 +5284,15 @@ compareDataExport <- function(comparedScript, len, ...){
mbar$GUI$Quit$handler = quitGUI
mbar$GUI$Restart$handler = restartGUI
mbar$GUI$"Check for updates"$handler = updates22 <- function(...)updates2(restart=TRUE)
mbar$Data$"Choose R-Dataset"$handler = setDataSet
#TODO: change handler
mbar$Data$"View Dataset"$"View original dataset"$handler = viewOriginalDataset
mbar$Data$"View Dataset"$"View current dataset"$handler = viewDataset
mbar$Data$"View Dataset"$"Compare dataset"$handler = compareDataset
mbar$Data$"View Dataset"$"View Observations violating 3-anonymity"$handler = function(h, ...) viewkanon()
mbar$Data$"View Dataset"$"View observations with risk above the benchmark"$handler = function(h, ...) viewhigh()
mbar$Data$"View Dataset"$"Observations violating 2 l-diversity"$handler = function(h, ...) ldiv1()
mbar$Data$"Import"$handler = newDataImport
mbar$Data$"Export"$handler = newDataExport
mbar$Data$"View"$"Original dataset"$handler = viewOriginalDataset
mbar$Data$"View"$"Current dataset"$handler = viewDataset
mbar$Data$"View"$"View Observations violating 3-anonymity"$handler = function(h, ...) viewkanon()
mbar$Data$"View"$"Observations with risk above the benchmark"$handler = function(h, ...) viewhigh()
mbar$Data$"View"$"Compare dataset"$handler = compareDataset
mbar$Data$"Variable Manager"$handler = function(h, ...) CreateVariableManager()
mbar$Data$"NewImport"$handler = newDataImport
mbar$Data$Import$"Import R Dataset"$handler = loadDataSet
mbar$Data$Import$"Import CSV"$handler = importCSV
mbar$Data$Import$"Import SPSS"$handler = importSPSS
mbar$Data$Import$"Import SAS"$handler = importSAS
mbar$Data$Import$"Import STATA"$handler = loadSTATA
mbar$Data$"NewExport"$handler = newDataExport
mbar$Data$Export$"Export R Dataset"$handler = saveToFile
mbar$Data$Export$"Export R Object"$handler = saveToVariable
mbar$Data$Export$"Export CSV"$handler = exportCSV
mbar$Data$Export$"Export SPSS"$handler = exportSPSS
mbar$Data$Export$"Export SAS"$handler = exportSAS
mbar$Data$Export$"Export STATA"$handler = exportSTATA
#mbar$Data$"Generate Report"$"Full report (for internal use)"$handler=function(...)exportReport(version=2)
#mbar$Data$"Generate Report"$"Short report (for external use)"$handler=function(...)exportReport(version=3)
#mbar$Script$"New"$handler = newScript
mbar$Script$"Import"$handler = loadScript
mbar$Script$"Export"$handler = saveScript
mbar$Script$"View"$handler = viewScript
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment