Remove comments from QuasiQuote

This commit is contained in:
Rene Vergara 2024-08-12 08:58:45 -05:00
parent 17f6d557a1
commit 9b48ce2b68
Signed by: pitmutt
GPG key ID: 65122AD495A7F5B2

220
src/DB.hs
View file

@ -39,161 +39,161 @@ share
[mkPersist sqlSettings, mkMigrate "migrateAll"]
[persistLowerCase|
ZgoBlock
block_id Int --Block Id number
block_confs Int default=0 -- Block confirnations
block_network String default="" -- Block Network
block_height Int default=0 -- Block Height
block_time Int default=0 -- Block time
block_id Int
block_confs Int default=0
block_network String default=""
block_height Int default=0
block_time Int default=0
UniqueBlock block_id
deriving Show Eq
ZgoBlockTx
blocktx_block_id Int --'Block Tx parent
blocktx_id Int -- Block Tx record Id
blocktx_txid String -- Block Tx Id
blocktx_block_id Int
blocktx_id Int
blocktx_txid String
UniqueBlockTx blocktx_block_id blocktx_id
deriving Show Eq
ZgoCountry
country_code String -- Two Character Country Code
country_name String -- Country unique name
country_code String
country_name String
UniqueCountryCode country_code
deriving Show Eq
ZgoItem
item_owner_id Int -- Owner Id
item_id String -- Item Id
item_name String -- Item name',
item_description T.Text default="" -- Item description
item_cost Float default=0.0 -- Item Unit price
item_owner_id Int
item_id String
item_name String
item_description T.Text default=""
item_cost Float default=0.0
UniqueItemId item_owner item_id
deriving Show Eq
ZgoLanguages
encode_id String -- Language encoding id
view_name String default-"" -- View name that use this language'
view_element String default="" -- 'Element name
view_element_text T.Text default="" -- Text to be displayed'
encode_id String
view_name String default-""
view_element String default=""
view_element_text T.Text default=""
UniqueLanguage encode_id view_name view_element
deriving Show Eq
ZgoOrders
order_id Int -- Order Id
order_zaddress T.Text -- Order zcash address
order_session T.Text -- Order session id
order_timestamp Int -- Order timestamp
order_closed Word8 -- Order closed flag
order_currency String -- Order currency
order_price Float default=0.0 -- Order ZEC price
order_total Float default=0.0 -- Order total amount
order_totalzec Float default=0.0 -- Order total in ZEC
order_paid Word8 default=0 -- Order paid status
order_token String default="" -- Order token
order_extinv String default="" -- Order External Invoice
order_shortcode String default='' -- Order invoice shortcode
order_taxamount Float default=0.0 -- Order tax amount
order_tipamount Float default=0.0 -- Order tip amount
order_vatamount Float default=0.0 -- Orcer VAT amount'
order_id Int
order_zaddress T.Text
order_session T.Text
order_timestamp Int
order_closed Word8
order_currency String
order_price Float default=0.0
order_total Float default=0.0
order_totalzec Float default=0.0
order_paid Word8 default=0
order_token String default=""
order_extinv String default=""
order_shortcode String default=''
order_taxamount Float default=0.0
order_tipamount Float default=0.0
order_vatamount Float default=0.0
UniqueOrderId order_id
deriving Show Eq
ZgoOrderLines
orderline_orderid Int default=0 -- Orderlines Order Id
orderline_line Int default=0 -- Orderlines Line number
orderline_qty Int default=0 -- Orderline item qty
orderline_name T.Text default="" -- Orderline item description
orderline_cost Float default=0.0 -- Orderline item cost
orderline_orderid Int default=0
orderline_line Int default=0
orderline_qty Int default=0
orderline_name T.Text default=""
orderline_cost Float default=0.0
UniqueOrderLine orderline_orderid orderline_line
deriving Show Eq
ZgoOwner
owner_id Int --'Owner ID number
owner_co_name String default="" -- Company''s name
owner_firstname String -- Owner's first name
owner_lastname String -- Owner's last name
owner_email String -- Owner's email address
owner_street String -- Owner's street
owner_city String -- Owner's city
owner_state String -- Owner's state
owner_zipcode String -- Owner's zip code
owner_phone String -- Owner's phone number
owner_country String -- Owner's country
owner_website String -- Owner's website URL
owner_currency String -- Owner's currency',
owner_zcaddress String -- Owner's zcash address
owner_usezats Word8 -- Use zats for display
owner_crmtoken T.Text -- Owner's crm token
owner_usetax Word8 -- Use tax flag
owner_taxvalue Float -- Tax rate to use
owner_usevat Word8 -- Use vat flag
owner_vat Float -- Vat rate to use
owner_payconf Word8 -- Confirm payment flag
owner_viewkey T.Text -- Viewing Key for payment confirmation
owner_invoices Word8 -- Use zgo invoices
owner_tips Word8 -- Activate tips
owner_paid Word8 -- True if account is paid
owner_expiration Int -- Expiration date-time
owner_id Int
owner_co_name String default=""
owner_firstname String
owner_lastname String
owner_email String
owner_street String
owner_city String
owner_state String
owner_zipcode String
owner_phone String
owner_country String
owner_website String
owner_currency String
owner_zcaddress String
owner_usezats Word8
owner_crmtoken T.Text
owner_usetax Word8
owner_taxvalue Float
owner_usevat Word8
owner_vat Float
owner_payconf Word8
owner_viewkey T.Text
owner_invoices Word8
owner_tips Word8
owner_paid Word8
owner_expiration Int
UniqueOwnerId owner_id
UniqueOwnerZcashAddr owner_zcaddress
deriving Show Eq
ZgoPayment
payment_id Int -- Payment Id
payment_delta Int -- Payment delta
payment_done Word8 -- Payment done flag
payment_zaddress T.Text -- Payment zcash address
payment_session String default="" -- Payment session
payment_blocktime Int default=0 -- Payment blocktime
payment_amount Float default=0.0 -- Payment amount
payment_txid String default ="" -- Payment transaction id
payment_memo T.Text default="" -- Payment Memo
payment_id Int
payment_delta Int
payment_done Word8
payment_zaddress T.Text
payment_session String default=""
payment_blocktime Int default=0
payment_amount Float default=0.0
payment_txid String default =""
payment_memo T.Text default=""
UniquePaymentId payment_id
deriving Show Eq
ZgoPrice
price_id Int -- Price Id
price_delta Int default=0 -- Price delta
price_done Word8 default=0 -- Price done flag
price_zaddress T.Text default="" -- Price zcash address
price_session String default="" -- Price session
price_blocktime Int default=0 -- Price blocktime
price_amount Float default=0.0 -- Price amount
price_txid String default="" -- Price transaction id
price_memo T.Text default="" -- Price Memo
price_id Int
price_delta Int default=0
price_done Word8 default=0
price_zaddress T.Text default=""
price_session String default=""
price_blocktime Int default=0
price_amount Float default=0.0
price_txid String default=""
price_memo T.Text default=""
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
pro_id Int
pro_zaddress T.Text default=""
pro_expiration Int default=0
pro_closed Word8 default=0
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
tx_id Int
tx_zaddress T.Text default=""
tx_expiration Int default=0
tx_closed Word8 default=0
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
user_id Int
user_zaddress T.Text
user_session String
user_blocktime Int
user_pin String
user_validated Word8 default=0
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
xero_id Int
xero_client_id String default=""
xero_client_secret String default=""
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
xerotoken_id Int
xerotoken_zaddress T.Text
xerotoken_access_token T.Text
xerotoken_expires Int
xerotoken_refreshtoken String
xerotoken_accexpires Int
xerotoken_accCode String
xerotoken_refexpires Int
UniqueXeroTokenId xerotoken_id
deriving Show Eq
|]