[application idle event]
gnv_app.event pfc_idle()

[appmanager contructor event]
Idle(3600)  // that's 3600 seconds


[appmanager pfc_idle event]
IF SQLCA.of_IsConnected() THEN
   SQLCA.of_Disconnect()
   // HALT CLOSE the application
   // or call the pfc_logon event
END IF