Idle と IdleEnd イベントを使って、Web ページにアクティビティがあったかどうかを決定します。ユーザーのキーボードやマウスによる入力がない場合、Idle のタイマーのイベントが 5 秒ごとに起動されます。IdleEnd イベントは、処理がすでにアイドル状態の時、キーボードやマウスの入力があった場合に起動されます。
これらのイベントを使用して、アイドル・セッションの強制サインオフを行うことができます。
* アイドル状態 5 秒ごとに、アイドル・タイマーが起動
Evtroutine Handling(#Sys_Appln.Idle) Seconds(#Seconds)
* 15 秒間データ入力がない場合
If ((#Seconds = 15) *And (*Not #TimedOut))
#TimedOut := True
Endif
Endroutine
* ユーザー入力を検知
Evtroutine Handling(#Sys_Appln.IdleEnd)
#TimedOut := False
Endroutine