container: hledger-flow: paypal-business: add uniform quotes

- Allows undesirable characters in variable-text columns
- Related refactoring
This commit is contained in:
2026-02-13 11:39:04 -08:00
parent dae2880c06
commit 51342a6ef5

View File

@@ -2,7 +2,7 @@
# docker-finance | modern accounting for the power-user
#
# Copyright (C) 2021-2025 Aaron Fiore (Founder, Evergreen Crypto LLC)
# Copyright (C) 2021-2026 Aaron Fiore (Founder, Evergreen Crypto LLC)
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -43,8 +43,9 @@ function parse()
# Paypal is known to allow commas within description ("Name") and amounts
# TODO: refactor xan/sed -> gawk (the sed line should remove non-csv commas and quotations)
xan select "$(echo "$_header" | sed 's:"::g')" $global_in_path \
| sed -e 's:, : :g' -e 's:,",:,:g' -e 's:,"\([0-9]*\),:,\1:g' -e 's:,"-\([0-9]*\),:,\1:g' -e 's:"::g' \
| gawk -v global_year="$global_year" -v global_subaccount="$global_subaccount" \
| gawk --csv \
-v global_year="$global_year" \
-v global_subaccount="$global_subaccount" \
'{
if (NR<2 || $1 !~ global_year)
next
@@ -56,12 +57,14 @@ function parse()
printf $1 " " $2 OFS # Date/Time
# Name (description)
sub(/%/, "%%", $4)
printf $4 OFS # Name (description)
gsub(/"/, "", $4)
printf "\"" $4 "\"" OFS
printf $5 OFS # Type
printf $6 OFS # Status
printf $7 OFS # Currency
printf "\"" $5 "\"" OFS # Type
printf "\"" $6 "\"" OFS # Status
printf "\"" $7 "\"" OFS # Currency
# direction will be used in rules
sub(/^-/, "", $8)
@@ -72,8 +75,10 @@ function parse()
printf $13 OFS # Transaction ID
printf $(NF-4) OFS # Contact Phone Number
# Note
sub(/%/, "%%", $(NF-2))
printf $(NF-2) OFS # Note
gsub(/"/, "", $(NF-2))
printf "\"" $(NF-2) "\"" OFS
printf $(NF) OFS # Balance Impact
@@ -84,7 +89,7 @@ function parse()
printf "\n"
}' FS=, OFS=, >"$global_out_path"
}' OFS=, >"$global_out_path"
}
function main()