INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Database connection attribute"
project: "Visual Eiffel"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: dale
class CONNECTION_ATTRIBUTE
inherit

DALE_SERVER
end
creation

from_string,
make
feature -- Attributes:

keyword: STRING

label: STRING

choices: ARRAY [STRING]

value: STRING
feature -- Commands:

make (k, l: STRING; cs: like choices)
-- creation procedure
require
valid_keyword: k /= void and then not k.is_empty

from_string (s: STRING)
-- creation procedure; format grammar:
-- keyword[:label]=value|?|[{]choice1,choice2,...[}]
require
valid_string: s /= void and then not s.is_empty
feature -- Query:

print_it
-- ...
feature -- Settings:

set_value (v: STRING)
-- set attribute's value

set_keyword (k: STRING)
-- ...
require
valid_keyword: k /= void and then not k.is_empty

set_label (l: STRING)
-- ...

set_choices (cs: like choices)
-- ...
end -- class CONNECTION_ATTRIBUTE

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES