rename datetime, date and time with db_ prefix

add get_DB_date, get_DB_time and get_DB_datetime function into web_arg_utils

rename datetime, date and time with db_ prefix
add get_DB_date, get_DB_time and get_DB_datetime function into web_arg_utils
totoro
1 parent 8ac9630f
Showing 2 changed files with 60 additions and 8 deletions Show diff stats
database/db_types.anubis
web/CXM_web_arg_utils.anubis
@@ -12,10 +12,13 @@ public type DB_id:
   db_id(Int value).
 public type DB_datetime:
-  datetime(String datetime).
+  db_datetime(String datetime). //Date and time in ISO8601 format "YYYY-MM-DD hh:mm:ss"
 public type DB_date:
-  date(String date).
+  db_date(String date).        //Date in ISO8601 format "YYYY-MM-DD"
+  
+public type DB_time:
+  db_time(String time).        //Time in ISO8601 format "hh:mm:ss"
 public type DB_integer:
   db_integer(Int value).
@@ -36,7 +39,7 @@ public define String
   to_String
   (
     DB_date d
-  )= 
+  )=
   date(d).
@@ -44,12 +47,17 @@ public define String
 public define String
   to_String
   (
-    DB_datetime d
+    DB_datetime dt
   )=
-  datetime(d).
+  datetime(dt).
-
-    
+public define String
+  to_String
+  (
+    DB_time t
+  )=
+  time(t).
+  
 public define String
   to_DBString
   (
@@ -19,7 +19,51 @@ public define DB_id
   {
     not_found     then none,
     found(value)  then 
-      if value="none" then none else db_id(force_to_Int(value))
+      //Check if value is none which means no id provided
+      if value="none" then 
+        none 
+      else 
+        //Now try to convert the string into Int to get the id
+        if decimal_scan(value) is 
+        {
+          failure         then none, 
+          success(value)  then db_id(value)
+        }
+  }.
+public define Maybe(DB_date)
+  get_DB_date
+  (
+    List(Web_arg) lwa,
+    String        arg_name
+  ) =
+  if web_arg_value(lwa, arg_name) is
+  {
+    not_found     then failure,
+    found(value)  then success(db_date(value))
+  }.
+
+public define Maybe(DB_time)
+  get_DB_time
+  (
+    List(Web_arg) lwa,
+    String        arg_name
+  ) =
+  if web_arg_value(lwa, arg_name) is
+  {
+    not_found     then failure,
+    found(value)  then success(db_time(value))
+  }.
+
+public define Maybe(DB_datetime)
+  get_DB_datetime
+  (
+    List(Web_arg) lwa,
+    String        arg_name
+  ) =
+  if web_arg_value(lwa, arg_name) is
+  {
+    not_found     then failure,
+    found(value)  then success(db_datetime(value))
   }.
 public define Maybe(String)