Sample use in spec | (#tool -> #tasks ),
(#coordinator -> (
(#class -> #MobileEditor ),
(#configuration -> (
(#title -> 'Tasks'),
(#navigationBar -> (#left -> (
(#refresh -> [:coordinator |
coordinator hide: #( tasks note reports ).
coordinator show: #warning.
(coordinator @ #warning) text: (self label: '<center><b><u>ToDo:</u></b> IMLT8System >>#sendResults:</center><p><hr><p><center><h1>Sending data to LIMS...</h1></center>').
coordinator applicationModel sendResults: [
(coordinator @ #warning) text: (self label: '<center><h1>Downloading tasks from LIMS...</h1></center>').
coordinator applicationModel
receiveTasksSuccess: [
coordinator hide: #warning.
coordinator show: #(tasks note reports ).
coordinator refresh: #( tasks note ).
] error: [:error |
coordinator hide: #warning.
coordinator show: #( tasks note reports ).
coordinator refresh: #( tasks note ).
coordinator applicationModel warning: error.
]
]
] ) ))
),
... |