David RENÉ / hayamiki_lib

Commit 7a8ff83c22790cfdf3ed774a66df739b006b8914

Authored by totoro
1 parent 3fd0eef6

continue working on HK form... Still not finished

Showing 31 changed files with 257 additions and 132 deletions   Show diff stats
Inline Side-by-side
ds_files/ds_types.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -254,5 +254,27 @@ public define List(DS_Type) hayamiki_lib_types_description =
254 254 ])
255 255 ]),
256 256  
  257 + ds_type("HK_Form_Tab", [
  258 + alternative("hk_form_tab", [
  259 + component(string, "fk_table_name"),
  260 + component(string, "fk_col_name"),
  261 + component(string, "list_view_name")
  262 + ])
  263 + ]),
  264 +
  265 + ds_type("HK_Form", no_message, [
  266 + alternative("hk_form_in_list", [
  267 + component(string, "table_name", comment("database table name which belonging this form")),
  268 + component(string, "view_name", comment("name of the view")),
  269 + component(list, extern_type("HK_Form_Entry", view_types+"hk_form_entry.anubis"), "list"),
  270 + component(list, extern_type("HK_Form_Tab", view_types+"hk_form_tab.anubis"), "tabs")
  271 + ]),
  272 + alternative("hk_form_in_table", [
  273 + component(string, "table_name", comment("database table name which belonging this form")),
  274 + component(string, "view_name", comment("name of the view")),
  275 + component(extern_type("HK_Form_Table", view_types+"hk_form_table.anubis"), "form_in_table")
  276 + ])
  277 + ])
  278 +
257 279 ]
258 280 .
... ...
model/types/hk_app.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_app_name.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_database.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_datetime_field_attr.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_display.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_edit_view.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_edit_view_table.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_edit_view_table_cell.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_edit_view_table_line.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_fk_view.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_help_text.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_icon.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_int_choice.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_int_choices.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_list_view.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_model.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_model_attr.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_model_column.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_model_field.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_table.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_text_choice.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_text_choices.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
model/types/hk_text_field_attr.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:12:46
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form.anubis
  Show/Hide comments   View file @7a8ff83
1   -/*
2   - * Created by PyramIDE.
3   - * User: Totoro
4   - * Date: 15/11/2011
5   - * Time: 20:32
  1 +/*
  2 + * Created by 伝作 (Densaku).
  3 + * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
  4 + * Date: 2017-04-04
  5 + * Time: 17:26:31
  6 + *
6 7 */
7 8  
8   -read calexium_lib/web/CXM_making_a_web_site.anubis
9   -transmit calexium_lib/web/CXM_common.anubis
10   -read hayamiki_lib/types/hayamiki.anubis
11   -read hayamiki_lib/view/types/hk_form_table.anubis
12   -
13   -//public type VT_edit_selector:
14   -// vt_edit_selector((SQLite3DataBase db, HK_Referer referer, String filter) -> List((List(CoreAttrs), WebArgValue, String)) get).
15   -//
16   -//
17   -//public type VT_edit_entry:
18   -// hidden (String name, String value),
19   -// label (String s_name),
20   -// primary_key (String idx),
21   -// information (String s_name, String c_name, String v_name, Int width, HK_Help_Text help), //s_name = show_name for translation, v_name = string to show
22   -// text (String s_name, String c_name, String value, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
23   -// password (String s_name, String c_name, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
24   -// foreign_text(String s_name, String c_name, DB_id selected, VT_edit_selector selector, HK_Help_Text help),
25   -// choices_text(String s_name, String c_name, String selected, VT_edit_selector selector, HK_Help_Text help),
26   -// text_area (String s_name, String c_name, String value, HK_Text_Field_Attr area_att, HK_Help_Text help), //s_name = show_name for translate, c_name = table column name
27   -// boolean (String s_name, String c_name, Bool value, HK_Help_Text help),
28   -// integer (String s_name, String c_name, Int value, HK_Help_Text help),
29   -// float (String s_name, String c_name, Float value, HK_Help_Text help),
30   -// choices_int (String s_name, String c_name, Int selected, VT_edit_selector selector, HK_Help_Text help),
31   -// date (String s_name, String c_name, String value, HK_Help_Text help),
32   -// time (String s_name, String c_name, String value, HK_Help_Text help),
33   -// datetime (String s_name, String c_name, String value, HK_Help_Text help),
34   -// color (String s_name, String c_name, String value, HK_Help_Text help)
35   -//.
36   -
37   -//public define VT_edit_entry text (String s_name, String c_name, String value) = text(s_name, c_name, value, no_help_text).
38   -//public define VT_edit_entry foreign_text(String s_name, String c_name, DB_id selected, VT_edit_selector selector) = foreign_text(s_name, c_name, selected, selector, no_help_text).
39   -//public define VT_edit_entry text_area (String s_name, String c_name, String value) = text_area(s_name, c_name, value, none, no_help_text).
40   -//public define VT_edit_entry boolean(String s_name, String c_name, Bool value) = boolean(s_name, c_name, value, no_help_text).
41   -//public define VT_edit_entry integer(String s_name, String c_name, Int value) = integer(s_name, c_name, value, no_help_text).
42   -//public define VT_edit_entry float(String s_name, String c_name, Float value) = float(s_name, c_name, value, no_help_text).
43   -//public define VT_edit_entry information(String s_name, String c_name, String v_name, HK_Help_Text help) = information(s_name, c_name, v_name, 0, help).
44   -
45   -
46   -public type HK_Form_Tab: //HK_V_Edit_Tab:
47   - hk_ve_form_tab(String fk_table_name, String fk_col_name, String list_view_name)
48   -.
49   -
50   -public type HK_Form: //VT_edit:
51   - hk_form_in_list (String table_name, String view_name, List(HK_Form_Entry) list, List(HK_Form_Tab) tabs),
52   - hk_form_in_table(String table_name, String view_name, HK_Form_Table ve_table)
53   -.
54   -
55   -
56   -public type VT_view_model_entry:
57   - //hidden (String name, String value),
58   - primary_key ,
59   - information (String label, String column_name, Int width, HK_Help_Text help), //s_name = show_name for translation, v_name = string to show
60   - text (String label, String column_name, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
61   - password (String label, String column_name, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
62   - foreign_text(String label, String column_name, HK_Form_Selector selector, HK_Help_Text help),
63   - choices_text(String label, String column_name, HK_Form_Selector selector, HK_Help_Text help),
64   - text_area (String label, String column_name, HK_Help_Text help), //s_name = show_name for translate, c_name = table column name
65   - boolean (String label, String column_name, HK_Help_Text help),
66   - integer (String label, String column_name, HK_Help_Text help),
67   - float (String label, String column_name, HK_Help_Text help),
68   - choices_int (String label, String column_name, HK_Form_Selector selector, HK_Help_Text help),
69   - date (String label, String column_name, HK_Help_Text help),
70   - time (String label, String column_name, HK_Help_Text help),
71   - datetime (String label, String column_name, HK_Help_Text help),
72   - color (String label, String column_name, HK_Help_Text help).
73   -
74   -
75   -public type VT_view_model:
76   - vt_view_model(List(VT_view_model_entry) list).
77   -
78   -public type VT_view_entry:
79   - text(String text),
80   - link(String id, String text),
81   - link_id_action(String id, String text, WEB_Action_Name link_id_action),
82   - icon(String icon_path).
83   -
84   -public type VT_view_row_header:
85   - vt_view_row_header(List(VT_view_entry) list).
86   -
87   -public type VT_view_row:
88   - vt_view_row(Int db_id, List(VT_view_entry) list).
89   -
90   -public type VT_View_DB_Calls:
91   - vt_view_db_calls(
92   - (SQLite3DataBase db, String clause) -> Int get_count,
93   - (SQLite3DataBase db, HK_Referer referer, String clause) -> JsonMember get_rows_json
94   -// (SQLite3DataBase db, String clause) -> List(VT_view_row) get_rows
  9 +transmit system/muscle.anubis
  10 +transmit system/convert.anubis
  11 +transmit tools/basis.anubis
  12 +
  13 +transmit hayamiki_lib/view/types/hk_form_table.anubis
  14 +transmit hayamiki_lib/view/types/hk_form_tab.anubis
  15 +transmit hayamiki_lib/view/types/hk_form_entry.anubis
  16 +
  17 +public type HK_Form:
  18 + hk_form_in_list(
  19 + String table_name, //database table name which belonging this form
  20 + String view_name, //name of the view
  21 + List(HK_Form_Entry) list,
  22 + List(HK_Form_Tab) tabs
  23 + ),
  24 + hk_form_in_table(
  25 + String table_name, //database table name which belonging this form
  26 + String view_name, //name of the view
  27 + HK_Form_Table form_in_table
95 28 )
96 29 .
97   -
98   -public type VT_view:
99   - vt_view(String table_name, String view_name, VT_view_model view_model, VT_view_row_header header, VT_View_DB_Calls db_calls).
100   -
101   -
102   -public type HK_Form_action:
103   - new_entry,
104   - edit_entry(String idx).
105   -
106   -public define String default_select = "--------------------". //20 dash
107   -public define (List(CoreAttrs),WebArgValue,String) selector_default_entry = ([], wav("none"),default_select).
... ...
view/types/hk_form_tab.anubis 0 → 100644
  Show/Hide comments   View file @7a8ff83
  1 +/*
  2 + * Created by 伝作 (Densaku).
  3 + * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
  4 + * Date: 2017-04-04
  5 + * Time: 17:26:31
  6 + *
  7 + */
  8 +
  9 +transmit system/muscle.anubis
  10 +transmit system/convert.anubis
  11 +transmit tools/basis.anubis
  12 +
  13 +
  14 +public type HK_Form_Tab:
  15 + hk_form_tab(
  16 + String fk_table_name,
  17 + String fk_col_name,
  18 + String list_view_name
  19 + )
  20 +.
  21 +
  22 + HK_Form_Tab message format
  23 + ==========================
  24 +
  25 +
  26 +public define Message
  27 + to_Message
  28 + (
  29 + HK_Form_Tab _hk_form_tab
  30 + )=
  31 + with _hk_form_tab_message = message((Word32)0), //
  32 + forget(add_string(_hk_form_tab_message, "__TYPE__", "HK_Form_Tab"));
  33 + if _hk_form_tab is
  34 + {
  35 + //Alternative hk_form_tab
  36 + hk_form_tab(_fk_table_name, _fk_col_name, _list_view_name) then
  37 + forget(add_string(_hk_form_tab_message, "__TYPE_ALT__", "hk_form_tab"));
  38 + // [type = String] hk_form_tab.fk_table_name
  39 + forget(add_string(_hk_form_tab_message, "fk_table_name", _fk_table_name));
  40 + // [type = String] hk_form_tab.fk_col_name
  41 + forget(add_string(_hk_form_tab_message, "fk_col_name", _fk_col_name));
  42 + // [type = String] hk_form_tab.list_view_name
  43 + forget(add_string(_hk_form_tab_message, "list_view_name", _list_view_name)),
  44 +
  45 + };
  46 + _hk_form_tab_message
  47 +.
  48 +
  49 +public define Maybe(HK_Form_Tab)
  50 + from_Message
  51 + (
  52 + Message _hk_form_tab_message
  53 + )=
  54 + if find_string(_hk_form_tab_message, "__TYPE__") is {failure then failure, success(__type__) then
  55 + if find_string(_hk_form_tab_message, "__TYPE_ALT__") is {failure then failure, success(__type_alt__) then
  56 + if __type__ = "HK_Form_Tab" then
  57 + //Alternative hk_form_tab
  58 + if __type_alt__ = "hk_form_tab" then //Alternative hk_form_tab
  59 + // [type = String] hk_form_tab.fk_table_name
  60 + if find_string(_hk_form_tab_message, "fk_table_name") is {failure then failure, success(fk_table_name) then
  61 + // [type = String] hk_form_tab.fk_col_name
  62 + if find_string(_hk_form_tab_message, "fk_col_name") is {failure then failure, success(fk_col_name) then
  63 + // [type = String] hk_form_tab.list_view_name
  64 + if find_string(_hk_form_tab_message, "list_view_name") is {failure then failure, success(list_view_name) then
  65 +
  66 + success(hk_form_tab(fk_table_name, fk_col_name, list_view_name))
  67 + }}}
  68 + else
  69 + failure //No valid Alternative found !
  70 + else
  71 + failure //Type not found in message !
  72 + }}
  73 +.
  74 +
... ...
view/types/hk_form_table.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:26:31
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form_table_cell.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:26:31
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form_table_line.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-04
5   - * Time: 01:16:47
  5 + * Time: 17:26:31
6 6 *
7 7 */
8 8  
... ...
view/types/hk_view.anubis 0 → 100644
  Show/Hide comments   View file @7a8ff83
  1 +/*
  2 + * Created by PyramIDE.
  3 + * User: Totoro
  4 + * Date: 15/11/2011
  5 + * Time: 20:32
  6 + */
  7 +
  8 +read calexium_lib/web/CXM_making_a_web_site.anubis
  9 +transmit calexium_lib/web/CXM_common.anubis
  10 +read hayamiki_lib/types/hayamiki.anubis
  11 +read hayamiki_lib/view/types/hk_form_table.anubis
  12 +
  13 +//public type VT_edit_selector:
  14 +// vt_edit_selector((SQLite3DataBase db, HK_Referer referer, String filter) -> List((List(CoreAttrs), WebArgValue, String)) get).
  15 +//
  16 +//
  17 +//public type VT_edit_entry:
  18 +// hidden (String name, String value),
  19 +// label (String s_name),
  20 +// primary_key (String idx),
  21 +// information (String s_name, String c_name, String v_name, Int width, HK_Help_Text help), //s_name = show_name for translation, v_name = string to show
  22 +// text (String s_name, String c_name, String value, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
  23 +// password (String s_name, String c_name, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
  24 +// foreign_text(String s_name, String c_name, DB_id selected, VT_edit_selector selector, HK_Help_Text help),
  25 +// choices_text(String s_name, String c_name, String selected, VT_edit_selector selector, HK_Help_Text help),
  26 +// text_area (String s_name, String c_name, String value, HK_Text_Field_Attr area_att, HK_Help_Text help), //s_name = show_name for translate, c_name = table column name
  27 +// boolean (String s_name, String c_name, Bool value, HK_Help_Text help),
  28 +// integer (String s_name, String c_name, Int value, HK_Help_Text help),
  29 +// float (String s_name, String c_name, Float value, HK_Help_Text help),
  30 +// choices_int (String s_name, String c_name, Int selected, VT_edit_selector selector, HK_Help_Text help),
  31 +// date (String s_name, String c_name, String value, HK_Help_Text help),
  32 +// time (String s_name, String c_name, String value, HK_Help_Text help),
  33 +// datetime (String s_name, String c_name, String value, HK_Help_Text help),
  34 +// color (String s_name, String c_name, String value, HK_Help_Text help)
  35 +//.
  36 +
  37 +//public define VT_edit_entry text (String s_name, String c_name, String value) = text(s_name, c_name, value, no_help_text).
  38 +//public define VT_edit_entry foreign_text(String s_name, String c_name, DB_id selected, VT_edit_selector selector) = foreign_text(s_name, c_name, selected, selector, no_help_text).
  39 +//public define VT_edit_entry text_area (String s_name, String c_name, String value) = text_area(s_name, c_name, value, none, no_help_text).
  40 +//public define VT_edit_entry boolean(String s_name, String c_name, Bool value) = boolean(s_name, c_name, value, no_help_text).
  41 +//public define VT_edit_entry integer(String s_name, String c_name, Int value) = integer(s_name, c_name, value, no_help_text).
  42 +//public define VT_edit_entry float(String s_name, String c_name, Float value) = float(s_name, c_name, value, no_help_text).
  43 +//public define VT_edit_entry information(String s_name, String c_name, String v_name, HK_Help_Text help) = information(s_name, c_name, v_name, 0, help).
  44 +
  45 +
  46 +public type HK_Form_Tab: //HK_V_Edit_Tab:
  47 + hk_ve_form_tab(String fk_table_name, String fk_col_name, String list_view_name)
  48 +.
  49 +
  50 +public type HK_Form: //VT_edit:
  51 + hk_form_in_list (String table_name, String view_name, List(HK_Form_Entry) list, List(HK_Form_Tab) tabs),
  52 + hk_form_in_table(String table_name, String view_name, HK_Form_Table ve_table)
  53 +.
  54 +
  55 +
  56 +public type VT_view_model_entry:
  57 + //hidden (String name, String value),
  58 + primary_key ,
  59 + information (String label, String column_name, Int width, HK_Help_Text help), //s_name = show_name for translation, v_name = string to show
  60 + text (String label, String column_name, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
  61 + password (String label, String column_name, HK_Help_Text help), //s_name = show_name for translation, c_name = table column name
  62 + foreign_text(String label, String column_name, HK_Form_Selector selector, HK_Help_Text help),
  63 + choices_text(String label, String column_name, HK_Form_Selector selector, HK_Help_Text help),
  64 + text_area (String label, String column_name, HK_Help_Text help), //s_name = show_name for translate, c_name = table column name
  65 + boolean (String label, String column_name, HK_Help_Text help),
  66 + integer (String label, String column_name, HK_Help_Text help),
  67 + float (String label, String column_name, HK_Help_Text help),
  68 + choices_int (String label, String column_name, HK_Form_Selector selector, HK_Help_Text help),
  69 + date (String label, String column_name, HK_Help_Text help),
  70 + time (String label, String column_name, HK_Help_Text help),
  71 + datetime (String label, String column_name, HK_Help_Text help),
  72 + color (String label, String column_name, HK_Help_Text help).
  73 +
  74 +
  75 +public type VT_view_model:
  76 + vt_view_model(List(VT_view_model_entry) list).
  77 +
  78 +public type VT_view_entry:
  79 + text(String text),
  80 + link(String id, String text),
  81 + link_id_action(String id, String text, WEB_Action_Name link_id_action),
  82 + icon(String icon_path).
  83 +
  84 +public type VT_view_row_header:
  85 + vt_view_row_header(List(VT_view_entry) list).
  86 +
  87 +public type VT_view_row:
  88 + vt_view_row(Int db_id, List(VT_view_entry) list).
  89 +
  90 +public type VT_View_DB_Calls:
  91 + vt_view_db_calls(
  92 + (SQLite3DataBase db, String clause) -> Int get_count,
  93 + (SQLite3DataBase db, HK_Referer referer, String clause) -> JsonMember get_rows_json
  94 +// (SQLite3DataBase db, String clause) -> List(VT_view_row) get_rows
  95 + )
  96 +.
  97 +
  98 +public type VT_view:
  99 + vt_view(String table_name, String view_name, VT_view_model view_model, VT_view_row_header header, VT_View_DB_Calls db_calls).
  100 +
  101 +
  102 +public type HK_Form_action:
  103 + new_entry,
  104 + edit_entry(String idx).
  105 +
  106 +public define String default_select = "--------------------". //20 dash
  107 +public define (List(CoreAttrs),WebArgValue,String) selector_default_entry = ([], wav("none"),default_select).
... ...
view/view_table_renderer.anubis
  Show/Hide comments   View file @7a8ff83
... ... @@ -6,7 +6,7 @@
6 6 *
7 7 */
8 8  
9   -read hayamiki_lib/view/view_table_types.anubis
  9 +read hayamiki_lib/view/types/hk_form_entry.anubis
10 10 read hayamiki_lib/view/jqgrid.anubis
11 11 read hayamiki_lib/view/view_table_manager_types.anubis
12 12 read hayamiki_lib/view/view_table_manager.anubis
... ... @@ -377,7 +377,7 @@ public define List(CXM_Form_Field)
377 377 String fk_clause,
378 378 HK_Referer table_referer,
379 379 (String) -> String _T,
380   - List(VT_edit_entry) list,
  380 + List(HK_Form_Entry) list,
381 381 Bool new_entry,
382 382 List(CXM_Form_Field) so_far
383 383 )=
... ... @@ -460,7 +460,7 @@ define HTML_Head_Tag
460 460 define List(HTML_Head_Tag)
461 461 get_editor_header
462 462 (
463   - List(VT_edit_entry) list
  463 + List(HK_Form_Entry) list
464 464 )=
465 465 [js(js_file("ckeditor/ckeditor.js")),
466 466 get_rich_editor_inline(list),
... ...