Safe Haskell	None
Language	Haskell2010

OddJobs.Web

Contents

Orphan instances

Documentation

data OrderDirection Source #

Constructors

Asc
Desc

Instances

Enum OrderDirection Source #
Instance details Defined in OddJobs.Web Methods succ :: OrderDirection -> OrderDirection # pred :: OrderDirection -> OrderDirection # toEnum :: Int -> OrderDirection # fromEnum :: OrderDirection -> Int # enumFrom :: OrderDirection -> [OrderDirection] # enumFromThen :: OrderDirection -> OrderDirection -> [OrderDirection] # enumFromTo :: OrderDirection -> OrderDirection -> [OrderDirection] # enumFromThenTo :: OrderDirection -> OrderDirection -> OrderDirection -> [OrderDirection] #
Eq OrderDirection Source #
Instance details Defined in OddJobs.Web Methods (==) :: OrderDirection -> OrderDirection -> Bool # (/=) :: OrderDirection -> OrderDirection -> Bool #
Show OrderDirection Source #
Instance details Defined in OddJobs.Web Methods showsPrec :: Int -> OrderDirection -> ShowS # show :: OrderDirection -> String # showList :: [OrderDirection] -> ShowS #
Generic OrderDirection Source #
Instance details Defined in OddJobs.Web Associated Types type Rep OrderDirection :: Type -> Type # Methods from :: OrderDirection -> Rep OrderDirection x # to :: Rep OrderDirection x -> OrderDirection #
ToJSON OrderDirection Source #
Instance details Defined in OddJobs.Web Methods toJSON :: OrderDirection -> Value # toEncoding :: OrderDirection -> Encoding # toJSONList :: [OrderDirection] -> Value # toEncodingList :: [OrderDirection] -> Encoding #
FromJSON OrderDirection Source #
Instance details Defined in OddJobs.Web Methods parseJSON :: Value -> Parser OrderDirection # parseJSONList :: Value -> Parser [OrderDirection] #
type Rep OrderDirection Source #
Instance details Defined in OddJobs.Web type Rep OrderDirection = D1 (MetaData "OrderDirection" "OddJobs.Web" "odd-jobs-0.1.0-AG1ucQCmc3LHSWSLszrvJU" False) (C1 (MetaCons "Asc" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "Desc" PrefixI False) (U1 :: Type -> Type))

data OrderByField Source #

Constructors

OrdCreatedAt
OrdUpdatedAt
OrdLockedAt
OrdStatus
OrdJobType

Instances

Enum OrderByField Source #
Instance details Defined in OddJobs.Web Methods succ :: OrderByField -> OrderByField # pred :: OrderByField -> OrderByField # toEnum :: Int -> OrderByField # fromEnum :: OrderByField -> Int # enumFrom :: OrderByField -> [OrderByField] # enumFromThen :: OrderByField -> OrderByField -> [OrderByField] # enumFromTo :: OrderByField -> OrderByField -> [OrderByField] # enumFromThenTo :: OrderByField -> OrderByField -> OrderByField -> [OrderByField] #
Eq OrderByField Source #
Instance details Defined in OddJobs.Web Methods (==) :: OrderByField -> OrderByField -> Bool # (/=) :: OrderByField -> OrderByField -> Bool #
Show OrderByField Source #
Instance details Defined in OddJobs.Web Methods showsPrec :: Int -> OrderByField -> ShowS # show :: OrderByField -> String # showList :: [OrderByField] -> ShowS #
Generic OrderByField Source #
Instance details Defined in OddJobs.Web Associated Types type Rep OrderByField :: Type -> Type # Methods from :: OrderByField -> Rep OrderByField x # to :: Rep OrderByField x -> OrderByField #
ToJSON OrderByField Source #
Instance details Defined in OddJobs.Web Methods toJSON :: OrderByField -> Value # toEncoding :: OrderByField -> Encoding # toJSONList :: [OrderByField] -> Value # toEncodingList :: [OrderByField] -> Encoding #
FromJSON OrderByField Source #
Instance details Defined in OddJobs.Web Methods parseJSON :: Value -> Parser OrderByField # parseJSONList :: Value -> Parser [OrderByField] #
type Rep OrderByField Source #
Instance details Defined in OddJobs.Web type Rep OrderByField = D1 (MetaData "OrderByField" "OddJobs.Web" "odd-jobs-0.1.0-AG1ucQCmc3LHSWSLszrvJU" False) ((C1 (MetaCons "OrdCreatedAt" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "OrdUpdatedAt" PrefixI False) (U1 :: Type -> Type)) :+: (C1 (MetaCons "OrdLockedAt" PrefixI False) (U1 :: Type -> Type) :+: (C1 (MetaCons "OrdStatus" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "OrdJobType" PrefixI False) (U1 :: Type -> Type))))

data Filter Source #

Constructors

Filter
Fields filterStatuses :: [Status] filterCreatedAfter :: Maybe UTCTime filterCreatedBefore :: Maybe UTCTime filterUpdatedAfter :: Maybe UTCTime filterUpdatedBefore :: Maybe UTCTime filterJobTypes :: [Text] filterOrder :: Maybe (OrderByField, OrderDirection) filterPage :: Maybe (Int, Int) filterRunAfter :: Maybe UTCTime

Instances

Eq Filter Source #
Instance details Defined in OddJobs.Web Methods (==) :: Filter -> Filter -> Bool # (/=) :: Filter -> Filter -> Bool #
Show Filter Source #
Instance details Defined in OddJobs.Web Methods showsPrec :: Int -> Filter -> ShowS # show :: Filter -> String # showList :: [Filter] -> ShowS #
Generic Filter Source #
Instance details Defined in OddJobs.Web Associated Types type Rep Filter :: Type -> Type # Methods from :: Filter -> Rep Filter x # to :: Rep Filter x -> Filter #
Semigroup Filter Source #
Instance details Defined in OddJobs.Web Methods (<>) :: Filter -> Filter -> Filter # sconcat :: NonEmpty Filter -> Filter # stimes :: Integral b => b -> Filter -> Filter #
Monoid Filter Source #
Instance details Defined in OddJobs.Web Methods mempty :: Filter # mappend :: Filter -> Filter -> Filter # mconcat :: [Filter] -> Filter #
ToJSON Filter Source #
Instance details Defined in OddJobs.Web Methods toJSON :: Filter -> Value # toEncoding :: Filter -> Encoding # toJSONList :: [Filter] -> Value # toEncodingList :: [Filter] -> Encoding #
FromJSON Filter Source #
Instance details Defined in OddJobs.Web Methods parseJSON :: Value -> Parser Filter # parseJSONList :: Value -> Parser [Filter] #
ToHttpApiData Filter Source #
Instance details Defined in OddJobs.Web Methods toUrlPiece :: Filter -> Text # toEncodedUrlPiece :: Filter -> Builder # toHeader :: Filter -> ByteString # toQueryParam :: Filter -> Text #
FromHttpApiData Filter Source #
Instance details Defined in OddJobs.Web Methods parseUrlPiece :: Text -> Either Text Filter # parseHeader :: ByteString -> Either Text Filter # parseQueryParam :: Text -> Either Text Filter #
type Rep Filter Source #
Instance details Defined in OddJobs.Web type Rep Filter = D1 (MetaData "Filter" "OddJobs.Web" "odd-jobs-0.1.0-AG1ucQCmc3LHSWSLszrvJU" False) (C1 (MetaCons "Filter" PrefixI True) (((S1 (MetaSel (Just "filterStatuses") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Status]) :: S1 (MetaSel (Just "filterCreatedAfter") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime))) :: (S1 (MetaSel (Just "filterCreatedBefore") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)) :: S1 (MetaSel (Just "filterUpdatedAfter") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)))) :: ((S1 (MetaSel (Just "filterUpdatedBefore") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)) :: S1 (MetaSel (Just "filterJobTypes") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Text])) :: (S1 (MetaSel (Just "filterOrder") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe (OrderByField, OrderDirection))) :: (S1 (MetaSel (Just "filterPage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe (Int, Int))) :: S1 (MetaSel (Just "filterRunAfter") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)))))))

blankFilter :: Filter Source #

data Routes route Source #

Constructors

Routes
Fields rFilterResults :: route :- (QueryParam "filters" Filter :> Get '[HTML] (Html ())) rStaticAssets :: route :- ("assets" :> Raw)

Instances

Generic (Routes route) Source #
Instance details Defined in OddJobs.Web Associated Types type Rep (Routes route) :: Type -> Type # Methods from :: Routes route -> Rep (Routes route) x # to :: Rep (Routes route) x -> Routes route #
type Rep (Routes route) Source #
Instance details Defined in OddJobs.Web type Rep (Routes route) = D1 (MetaData "Routes" "OddJobs.Web" "odd-jobs-0.1.0-AG1ucQCmc3LHSWSLszrvJU" False) (C1 (MetaCons "Routes" PrefixI True) (S1 (MetaSel (Just "rFilterResults") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (route :- (QueryParam "filters" Filter :> Get (HTML ': ([] :: [Type])) (Html ())))) :*: S1 (MetaSel (Just "rStaticAssets") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (route :- ("assets" :> Raw)))))

filterJobsQuery :: TableName -> Filter -> (Query, [Action]) Source #

filterJobs :: Connection -> TableName -> Filter -> IO [Job] Source #

countJobs :: Connection -> TableName -> Filter -> IO Int Source #

Orphan instances

ToJSON Status Source #
Instance details Methods toJSON :: Status -> Value # toEncoding :: Status -> Encoding # toJSONList :: [Status] -> Value # toEncodingList :: [Status] -> Encoding #
FromJSON Status Source #
Instance details Methods parseJSON :: Value -> Parser Status # parseJSONList :: Value -> Parser [Status] #