| definition: |
getColumnFourTuple :: [SetOp]
-> [FourColumnSelect a b c d]
-> [Option]
-> Maybe Int
-> DBAction [(a,b,c,d)]
getColumnFourTuple _ [] _ _ = return []
getColumnFourTuple setops (s:sels) options limit = do
let query = ((foldl (\quest (so, sel) -> quest ++ trSetOp so ++
trFourTupleSelectQuery sel)
(trFourTupleSelectQuery s)
(zip setops sels))
++ trOption options ++ trLimit limit++" ;")
(fun1, fun2, fun3, fun4) = getFourTupleValFuncs s
vals <- select query [] (getFourTupleTypes s)
return $ map (\ [val1, val2, val3, val4] -> ((fun1 val1),
(fun2 val2),
(fun3 val3),
(fun4 val4)))
vals
|
| demand: |
argument 2 |
| deterministic: |
deterministic operation |
| documentation: |
--- Gets four 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 FourColumnSelects 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`t with a list of a-Values as parameter --- (where a is the type of the column) |
| failfree: |
<FAILING> |
| indeterministic: |
referentially transparent operation |
| infix: |
no fixity defined |
| iotype: |
{(_,{[]},_,_) |-> _ || (_,{:},_,_) |-> _}
|
| name: |
getColumnFourTuple |
| precedence: |
no precedence defined |
| result-values: |
_ |
| signature: |
[Database.CDBI.QueryTypes.SetOp] -> [Database.CDBI.QueryTypes.FourColumnSelect a b c d] -> [Database.CDBI.Criteria.Option] -> Prelude.Maybe Prelude.Int -> Database.CDBI.Connection.DBAction [(a, b, c, d)] |
| solution-complete: |
operation might suspend on free variables |
| terminating: |
possibly non-terminating |
| totally-defined: |
possibly non-reducible on same data term |