add fields to program #612