David RENÉ / hayamiki

/*
 * Created by PyramIDE.
 * User: フランスのトトロ aka (David RENÉ) 
 * Date: 13/02/2016
 * Time: 11:15
 * © Calexium 
 */

read hayamiki_lib/types/model/columns.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                       then icn16_question,
    char_field(Int size)                then icn16_question,
    text_field                          then icn16_question
  }.