| definition: |
getColumnFiveTuple :: [SetOp]
-> [FiveColumnSelect a b c d e]
-> [Option]
-> Maybe Int
-> DBAction [(a,b,c,d,e)]
getColumnFiveTuple _ [] _ _ = return []
getColumnFiveTuple setops (s:sels) options limit = do
let query = ((foldl (\quest (so, sel) -> quest ++ trSetOp so ++
trFiveTupleSelectQuery sel)
(trFiveTupleSelectQuery s)
(zip setops sels))
++ trOption options ++ trLimit limit++" ;")
(fun1, fun2, fun3, fun4, fun5) = getFiveTupleValFuncs s
vals <- select query [] (getFiveTupleTypes s)
return $ map (\ [val1, val2, val3, val4, val5] -> ((fun1 val1),
(fun2 val2),
(fun3 val3),
(fun4 val4),
(fun5 val5)))
vals
|
| demand: |
argument 2 |
| deterministic: |
deterministic operation |
| documentation: |
--- Gets five Columns from the database. --- @param setops - list of Setoperators to combine queries if more than one is --- given, can be empty otherwise --- @param sels - list of FiveColumnSelects to specify queries, if there --- are more requests than can be combined with setoperators --- they will be ignored ---@param options - order-by-clause for whole query ---@param limit - value to reduce number of returned rows ---@return a `DBAction` with a list of a-values --- (where a is the type of the column) |
| failfree: |
<FAILING> |
| indeterministic: |
referentially transparent operation |
| infix: |
no fixity defined |
| iotype: |
{(_,{[]},_,_) |-> _ || (_,{:},_,_) |-> _}
|
| name: |
getColumnFiveTuple |
| precedence: |
no precedence defined |
| result-values: |
_ |
| signature: |
[Database.CDBI.QueryTypes.SetOp] -> [Database.CDBI.QueryTypes.FiveColumnSelect a b c d e] -> [Database.CDBI.Criteria.Option] -> Prelude.Maybe Prelude.Int -> Database.CDBI.Connection.DBAction [(a, b, c, d, e)] |
| solution-complete: |
operation might suspend on free variables |
| terminating: |
possibly non-terminating |
| totally-defined: |
possibly non-reducible on same data term |