Konto_check

Kurzversion des Tests

# Mini-Programm für AWK (kleine Variante)
{ printf "%s: %d (%s)\n",$0,ret=konto_check($1,$2),retval2txt(ret) }

Langversion des Tests

# Mini-Programm für AWK (große Variante mit Bankinfo)
{
   if($1 && $2){              # Test nur, falls BLZ und Konto angegeben sind
      ret=konto_check($1,$2)  # testen
      if(bank_valid($1)>0)    # bei gültiger BLZ Infos holen
         bank_info=", Bank: " bank_name($1) ", " bank_plz($1) " " bank_ort($1)
      else 
         bank_info=""
      print $0 ": " ret " (" retval2txt(ret) ")" bank_info
   }
}

IBAN- und BIC-Generierung aus einer Liste von Bankverbindungen

# Mini-Programm für die BIC- und IBAN-Generierung mittels awk
{ iban=iban_gen($1,$2); rv=kc_retval(); printf "%-20s: %11s / %22s (%4d => %s)\n",$0,iban_bic_gen($1,$2),iban,rv,retval2txt(rv) }