format Dept_SubTotal =
 ------                                       --------  ----------  --------------
  @###                                         @######   @#####.##   $@########.##
  $prevdept,                                   $dptqty,    $dptwgt,        $dptamt
   
.