Anubis / Xlib

Commit e87afa6d6cfb2d0a6dff55576bb57e79661964eb

Authored by totoro
1 parent 2cff260c

add to_JsonValue for DB_id

Showing 1 changed file with 12 additions and 0 deletions   Show diff stats
Inline Side-by-side
database/db_types.anubis
  Show/Hide comments   View file @e87afa6
@@ -13,6 +13,7 @@ transmit calexium_lib/database/types/db_date.anubis @@ -13,6 +13,7 @@ transmit calexium_lib/database/types/db_date.anubis
13 transmit calexium_lib/database/types/db_time.anubis 13 transmit calexium_lib/database/types/db_time.anubis
14 transmit calexium_lib/database/types/db_datetime.anubis 14 transmit calexium_lib/database/types/db_datetime.anubis
15 transmit calexium_lib/database/types/db_integer.anubis 15 transmit calexium_lib/database/types/db_integer.anubis
  16 +transmit calexium_lib/web/CXM_json.anubis
16 17
17 /* DB_id will is deprecated. Please use next version below all upper case */ 18 /* DB_id will is deprecated. Please use next version below all upper case */
18 //public type DB_id: 19 //public type DB_id:
@@ -34,6 +35,17 @@ public define String @@ -34,6 +35,17 @@ public define String
34 db_id(_idx) then abs_to_decimal(_idx) 35 db_id(_idx) then abs_to_decimal(_idx)
35 }. 36 }.
36 37
  38 +public define JsonValue
  39 + to_JsonValue
  40 + (
  41 + DB_id idx
  42 + )=
  43 + if idx is
  44 + {
  45 + none then json_string("none"),
  46 + db_id(_idx) then json_int(_idx)
  47 + }.
  48 +
37 public define String 49 public define String
38 String s + DB_id idx = 50 String s + DB_id idx =
39 s + to_String(idx) 51 s + to_String(idx)