/* * Created by PyramIDE. * User: フランスのトトロ aka (David RENÉ) * Date: 13/02/2016 * Time: 11:15 * © Calexium */ read calexium_lib/web/widgets/icons_set.anubis read hayamiki_lib/model/columns.anubis read hayamiki_lib/model/icons.anubis public define String /** to_String return the String of the given model of the column 'col' */ to_Icon ( HK_Model_Column col, String current_type_name, String general_type_name ) = since col is hk_column(name, col_type, _, _), if col_type is { p_key then icn16_key, boolean_field then "to_Icon("+current_type_name+"."+name+")", date_field(attrs) then icn16_clock, time_field(attrs) then icn16_clock, datetime_field(attrs) then icn16_clock, foreign_key(app,foreign_table,_) then icn16_question, integer_field(choice) then icn16_question, float_field then icn16_question, char_field(choice, size) then icn16_question, password_field(min_size) then icn16_question, text_field(_) then icn16_question, color_field then icn16_question, phone_field then icn16_phone, email_field then icn16_email }.