Implement sqlToTypeAs

Author: ThomasTJdev

README.md

@@ -547,6 +547,21 @@ ____
 
 The `totypes` module contains procs to convert the result to types.
 
+```nim
+type
+  Person = ref object
+    id: int
+    username: string
+    age: int
+    secretIdent: string
+    is_nimmer: bool
+
+let
+  columns = @["name AS username","id","ident AS secretIdent"]
+  val = db.getRow(sql("SELECT " & columns.join(",") & " FROM my_table WHERE id = 1"))
+  res = sqlToTypeAs(Person, columns, val)
+```
+
 ```nim
 type
   Person = ref object

sqlbuilder.nimble

@@ -1,6 +1,6 @@
 # Package
 
-version       = "1.1.1"
+version       = "1.1.2"
 author        = "ThomasTJdev"
 description   = "SQL builder"
 license       = "MIT"

src/sqlbuilderpkg/totypes.nim

@@ -63,4 +63,25 @@ proc sqlToType*[T](t: typedesc[T], columns, val: seq[string]): T =
 proc sqlToType*[T](t: typedesc[T], columns: seq[string], vals: seq[seq[string]]): seq[T] =
   for v in vals:
     result.add(sqlToType(t, columns, v))
-  return result
+  return result
+
+
+proc sqlToTypeAs*[T](t: typedesc[T], columns, val: seq[string]): T =
+  let tmp = t()
+
+  for fieldName, field in tmp[].fieldPairs:
+    var
+      found = false
+    for ci in 0..columns.high:
+      let cSplit = columns[ci].toLowerAscii().split(" as ")
+      if cSplit.len() == 2:
+        if cSplit[1].strip() == fieldName:
+          parseVal(val[ci], field)
+          found = true
+          break
+    if not found:
+      parseVal(field)
+    else:
+      found = false
+
+  return tmp