    class
    	DATABASE_APPL [reference G -> DATABASE create default_create end]

    General
    	cluster: dbms-support
    	description: "General application"
    	create: login_and_connect, login, default_create

    Ancestors
    	DB_CONSTANT
    	GENERAL_APPL*
    	HANDLE_SPEC [G -> DATABASE create default_create end]
    	HANDLE_USE

    Queries
    	db_spec: DATABASE
    	is_logged_to_base: BOOLEAN

    Commands
    	login (user_name, password: STRING_8)
    	login_and_connect (user_name, password: STRING_8)
    	set_application (application_name: STRING_8)
    	set_base
    	set_data_source (dsn: STRING_8)
    	set_group (groupid: STRING_8)
    	set_hostname (host_name: STRING_8)
    	set_role (roleid, rolepasswd: STRING_8)