def remove_rec

cswap-bend-cli@0.1.0.0 · cliops.bend:213

import cswap-bend-cli@0.1.0.0/cliops.bend as Cliops
import Base
import cswap-bend-cli@0.1.0.0/store/base.bend as SBase
import cswap-bend-cli@0.1.0.0/store/seq.bend as SSeq
import cswap-bend-cli@0.1.0.0/json.bend as Json
import cswap-bend-cli@0.1.0.0/act.bend as Act
import cswap-bend-cli@0.1.0.0/cmd.bend as Cmd

213def remove_rec(m: Maybe<&2, Json.Json>, +ctx: SBase.Ctx, +num: String, +ni: Ni) -> Act.of(Cmd.Out):
214  match m:
215    case None{}:
216      Act.fail(Cmd.Out, 3, "Account-" ++ num ++ " does not exist")
217    case Some{rec}:
218      remove_confirm(ni_yes(ni), ni_noin(ni), ctx, num, SSeq.field_str(rec, "email"))

Uses (13)

Used by (1)