예약된 작업 상태 요약
모든 ScheduledTasks의 상태를 표시하는 함수를 생성합니다.
In[1]:=
DisplayTasks[] := Module[{tasks},
tasks = ScheduledTasks[];
Grid[Take[
Reverse@SortBy[
Map[{Style[ScheduledTaskInformation[#, "Name"], 14,
FontFamily -> "Source Sans Pro"],
Style[ScheduledTaskInformation[#, "Status"], 14,
FontFamily -> "Source Sans Pro"],
NextScheduledTaskTime[#]} &, tasks], Last], 10],
Alignment -> {Left, Top}]
]매시간마다 정보를 표시하고 업데이트할 AutoRefreshed 개체를 배치합니다.
In[2]:=
CloudDeploy[AutoRefreshed[DisplayTasks[], "Hourly"], "TaskDisplay"]Out[2]=
