{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveGeneric #-}
module Database.Relational.Schema.OracleDataDictionary.ConsColumns where
import GHC.Generics (Generic)
import Data.Int (Int32)
import Database.Relational.TH (defineTableTypesAndRecord)
import Database.Relational.Schema.OracleDataDictionary.Config (config)
$(defineTableTypesAndRecord config
"SYS" "dba_cons_columns"
[ ("owner", [t|String|])
, ("constraint_name", [t|String|])
, ("table_name", [t|String|])
, ("column_name", [t|Maybe String|])
, ("position", [t|Maybe Int32|])
] [''Show, ''Generic])