print join ' ',$key,$le,fmt_mdy($date),fmt_mdy($rdate),$company,"|$pk|\n";