rvv001 - zgo-backend database module

database structure v0.1 defined in DB.hs

src/DB.hs

@@ -153,4 +153,47 @@ share
     price_memo T.Text default=""  -- Price Memo
     UniquePriceId price_id 
     deriving Show Eq 
+  ZgoProsession
+    pro_id Int  -- Prosession record id
+    pro_zaddress T.Text default=""  -- Prosession zcash address
+    pro_expiration Int default=0  -- Prosession expiration date/time
+    pro_closed Word8 default=0  -- Prosession closed flag
+    UniqueProSesId pro_id
+    UniqueProSesZad pro_zaddress
+    deriving Show Eq 
+  ZgoTransaction
+    tx_id Int  -- Transaction ID
+    tx_zaddress T.Text default=""  -- Transaction Zcash Address
+    tx_expiration Int default=0  -- Transaction Expiration Date/Time
+    tx_closed Word8 default=0  -- Transaction Closed flag
+    UniqueTxId tx_id
+    deriving Show Eq 
+  ZgoUser
+    user_id Int  -- User Id
+    user_zaddress T.Text  -- User zcash address,
+    user_session String  -- User session id
+    user_blocktime Int  -- User block time
+    user_pin String  -- User pin
+    user_validated Word8 default=0  -- User validated flag
+    UniqueUserId user_id 
+    UniqueUserZad user_zaddress
+    deriving Show Eq 
+  ZgoXero 
+    xero_id Int  -- Xero Id
+    xero_client_id String default=""  -- Xero client id
+    xero_client_secret String default=""  -- Xero client secret word
+    UniqueXeroId xero_id  
+    UniqueXeroClientId xero_client_id 
+    deriving Show Eq 
+  ZgoXeroToken 
+    xerotoken_id Int  -- Xero account id
+    xerotoken_zaddress T.Text  -- Xero zcash address
+    xerotoken_access_token  T.Text  -- Xero account access token
+    xerotoken_expires Int  -- Xero token expiration date/time
+    xerotoken_refreshtoken String  -- Xero refresh token
+    xerotoken_accexpires Int  -- Xero account expire date/time
+    xerotoken_accCode String  -- Xero account code
+    xerotoken_refexpires Int  -- Xero reference expire date/time
+    UniqueXeroTokenId xerotoken_id
+    deriving Show Eq