note description: "Class which allows EiffelStore to retrieve/store% %the content relative to a column of the table PROJECT" class PROJECT inherit ANY redefine out end create make feature -- Access project_id: INTEGER -- Auto-generated. name: STRING -- Auto-generated. logo: STRING -- Auto-generated. project_type: INTEGER -- Auto-generated. rcs_type: INTEGER -- Auto-generated. project_visibility: INTEGER -- Auto-generated. svn_path_doc: STRING -- Auto-generated. project_pretty_name: STRING -- Auto-generated. creation_time: INTEGER -- Auto-generated. creator_id: INTEGER -- Auto-generated. feature -- Initialization make do project_id := 0 name := "" logo := "" project_type := 0 rcs_type := 0 project_visibility := 0 svn_path_doc := "" project_pretty_name := "" creation_time := 0 creator_id := 0 end feature -- Settings set_project_id (a_project_id: INTEGER) --Set the value of project_id require value_exists: a_project_id > 0 do project_id := a_project_id ensure project_id_set: a_project_id = project_id end set_name (a_name: STRING) --Set the value of name require value_exists: a_name /= Void do name := a_name ensure name_set: a_name = name end set_logo (a_logo: STRING) --Set the value of logo require value_exists: a_logo /= Void do logo := a_logo ensure logo_set: a_logo = logo end set_project_type (a_project_type: INTEGER) --Set the value of project_type require value_exists: a_project_type >= 0 do project_type := a_project_type ensure project_type_set: a_project_type = project_type end set_rcs_type (a_rcs_type: INTEGER) --Set the value of rcs_type require value_exists: a_rcs_type >= 0 do rcs_type := a_rcs_type ensure rcs_type_set: a_rcs_type = rcs_type end set_project_visibility (a_project_visibility: INTEGER) --Set the value of project_visibility require value_exists: a_project_visibility >= 0 do project_visibility := a_project_visibility ensure project_visibility_set: a_project_visibility = project_visibility end set_svn_path_doc (a_svn_path_doc: STRING) --Set the value of svn_path_doc require value_exists: a_svn_path_doc /= Void do svn_path_doc := a_svn_path_doc ensure svn_path_doc_set: a_svn_path_doc = svn_path_doc end set_project_pretty_name (a_project_pretty_name: STRING) --Set the value of project_pretty_name require value_exists: a_project_pretty_name /= Void do project_pretty_name := a_project_pretty_name ensure project_pretty_name_set: a_project_pretty_name = project_pretty_name end set_creation_time (a_creation_time: INTEGER) --Set the value of creation_time require value_exists: a_creation_time >= 0 do creation_time := a_creation_time ensure creation_time_set: a_creation_time = creation_time end set_creator_id (a_creator_id: INTEGER) --Set the value of creator_id require value_exists: a_creator_id > 0 do creator_id := a_creator_id ensure creator_id_set: a_creator_id = creator_id end feature -- Output out: STRING do Result := "" Result.append (project_id.out + "%N") Result.append (name.out + "%N") Result.append (logo.out + "%N") Result.append (project_type.out + "%N") Result.append (rcs_type.out + "%N") Result.append (project_visibility.out + "%N") Result.append (svn_path_doc.out + "%N") Result.append (project_pretty_name.out + "%N") Result.append (creation_time.out + "%N") Result.append (creator_id.out + "%N") end end -- class PROJECT