Sistema de inventário

adopt Arcane.Text as Text

blueprint Produto(codigo, nome, preco, quantidade):
    action valor_total():
        yield self.preco * self.quantidade

    action baixa(qtd):
        guard qtd smaller_eq self.quantidade, "estoque insuficiente para " + self.nome
        self.quantidade := self.quantidade - qtd
        yield self.quantidade

    action toString():
        yield self.codigo + " " + self.nome

estoque := [
    spawn Produto("P01", "Mouse", 80.0, 15),
    spawn Produto("P02", "Teclado", 200.0, 4),
    spawn Produto("P03", "Monitor", 1200.0, 2),
    spawn Produto("P04", "Cabo", 25.0, 60)
]

valores := estoque >> morph p: p.valor_total()
patrimonio := valores >> distill acc, v: acc + v 0

criticos := estoque >> sift p: p.quantidade smaller 5

out Text.box("Inventario")
cycle p in estoque:
    out "  " + p.codigo + " " + p.nome.pad_end(10) + str(p.quantidade).pad_start(4) + "  R$ " + str(p.valor_total())

out ""
out "patrimonio: R$", patrimonio
out "criticos:", criticos >> morph p: p.nome

assert round(patrimonio, 2) is 5900.0, "patrimonio"
assert len(criticos) is 2, "dois produtos criticos"

estoque[0].baixa(5)
assert estoque[0].quantidade is 10, "baixa aplicada"

erro := no
monitor:
    estoque[2].baixa(99)
handle e:
    erro := yes
    out "erro:", e
assert erro is yes, "baixa acima do estoque e bloqueada"