def spend.fields

cswap-bend-cli@0.1.0.0 · usage/norm.bend:124

import Base
import cswap-bend-cli@0.1.0.0/json.bend as Json
import cswap-bend-cli@0.1.0.0/usage/text.bend as UText

124def spend.fields(+eu: Json.Json, +now: U32, +off: U32) -> Maybe<&2, Json.Json>:
125  do Maybe<&2, Json.Json>:
126    u : String <- num.field("used_credits", eu)
127    used : String <- UText.div100(u)
128    l : String <- num.field("monthly_limit", eu)
129    limit : String <- UText.div100(l)
130    p : String <- num.field("utilization", eu)
131    pct : String <- UText.float(p)
132    return spend.mk(used, limit, pct, Maybe.default(&2, Json.Json, Json.get("currency", eu), Json.JStr{"USD"}), eu, now, off)