X-Git-Url: https://git.plutz.net/?a=blobdiff_plain;f=ledgers%2Fiban_assign.awk;h=0491617699a1989491e83bdd0ed718c65fa5c89e;hb=919a0cfd686d6cc28b54d823c2e3f37a46a4b2b1;hp=68a572716be79a172e86975d561426a1b46c3153;hpb=819aebfb5343f918d510ba65c56e84ea24496ae6;p=confetti diff --git a/ledgers/iban_assign.awk b/ledgers/iban_assign.awk index 68a5727..0491617 100755 --- a/ledgers/iban_assign.awk +++ b/ledgers/iban_assign.awk @@ -1,5 +1,7 @@ #!/bin/awk -f +function dbg( text ) { print text >>"/dev/stderr"; } + function STRING( inp ) { gsub(/\\/, "\\\\", inp); gsub(/\n/, "\\n", inp); @@ -52,7 +54,7 @@ BEGIN { fn = n = uid = iban = tmp = ""; split("", ibans); } -strftime("%Y-%m-%d", $1, "UTC") == $2 && strftime("%Y-%m-%d", $3, "UTC") == $4 { ledger = 1; } +/^BEGIN:LEDGERS$/ { ledger = 1; } ledger && strftime("%Y-%m-%d", $2, "UTC") == $1 { if ($3 in iban_uid) { @@ -71,12 +73,6 @@ ledger && strftime("%Y-%m-%d", $2, "UTC") == $1 { } END { - for (iban in sure) { - line = "sure " iban; - split(sure[iban], uids, / /); - for (k in uids) line = line " " STRING(uids[k] "/" uid_fn[uids[k]]); - print line; - } for (iban in unsure) { line = "guess " iban " " STRING(unsure_rec[iban]); split(unsure[iban], uids, / /); @@ -87,4 +83,10 @@ END { line = "unknown " iban " " unknown[iban]; print line; } + for (iban in sure) { + line = "sure " iban; + split(sure[iban], uids, / /); + for (k in uids) line = line " " STRING(uids[k] "/" uid_fn[uids[k]]); + print line; + } }