Disconnect an inactive application

[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