| 12345678910111213141516171819202122 |
- #!/bin/sh
- switch="-c"
- limit="-t (/Liabilities/?(/Huquq/?a/P{2.22AU}<={-1.0}: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
|
