amount="${record#* * * * * }" amount="${amount%% *}"
printf '[p .principal . %s][p .date %s][p .amount %s][p .subject . %s]' \
"$(UNSTRING "$principal" |HTML)" "$date" "$(credit "$amount")" "$(UNSTRING "$subject" |HTML)"
amount="${record#* * * * * }" amount="${amount%% *}"
printf '[p .principal . %s][p .date %s][p .amount %s][p .subject . %s]' \
"$(UNSTRING "$principal" |HTML)" "$date" "$(credit "$amount")" "$(UNSTRING "$subject" |HTML)"