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

read tools/basis.anubis
transmit display.anubis
transmit model.anubis
transmit xlib/web/json.anubis

transmit hayamiki_lib/model/types/hk_table.anubis
transmit hayamiki_lib/model/types/hk_constraint.anubis

public define HK_Table         
  hk_table 
  ( 
    String     name,        //name of the table
    HK_Model   model,
    HK_Display display
  )=
  hk_table(name, "", model, display).

public define JsonValue
  to_JSON
  (    
    HK_Table table
  )=
  json_object("_HK_TABLE", 
    [ json_member("name",       json_string(table.name)),
      json_member("short_name", json_string(table.short_name)),
      json_member("model",      to_JSON(table.model)),
      json_member("hk_display", to_JSON(table.display))
    ]
  ).