summaryrefslogtreecommitdiff
path: root/contrib/bal
blob: 423e3e417178fc0fe30a8c49b79ade7f2ba76b3d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#!/bin/sh

switch="-c"
limit="-t (/Liabilities/?a<0:Ua>100)&a"

if [ "$1" = "-C" -o "$1" = "-U" ]; then
  switch="$1"
  shift
elif [ "$1" = "-b" -o "$1" = "-e" -o "$1" = "-p" ]; then
  switch="$1 $2"
  shift 2
fi

accts="$@"
if [ -z "$accts" ]; then
  accts="-Equity -Income -Expenses"
else
  limit=""
fi

ledger -VQ $switch $limit -s -S "-UT" balance $accts