separate pages in ledger section, stubs for account page

[confetti] / ledgers / iban_assign.awk

diff --git a/ledgers/iban_assign.awk b/ledgers/iban_assign.awk
index eac5b445b3be06587879b36c619b9f4335ada116..0491617699a1989491e83bdd0ed718c65fa5c89e 100755 (executable)
--- 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(iban_uid[iban], uids, / /);
-    for (uid in uids) line = line "    " STRING(uid "/" uid_fn[uid]);
-    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;
+  }
 }