- my $sectionhead = $section->{'description'} || emt('Charges');
- $OUT .=
- '<p class="allcaps"><b><font size="+1">'. substr($sectionhead,0,1).
+ $OUT .= '<p class="allcaps"><b>';
+ my $sectionhead;
+ if ( $section->{'location'} ) {
+ $sectionhead = $section->{'location'}{'address1'};
+ $sectionhead .= ', '.$section->{'location'}{'address2'}
+ if length($section->{'location'}{'address2'});
+ $sectionhead .= ', ' .
+ $section->{'location'}{'city'} . ', ' .
+ $section->{'location'}{'state'} . ' ' .
+ $section->{'location'}{'zip'};
+ $OUT .= $sectionhead;
+ } else {
+ $sectionhead = $section->{'description'} || emt('Charges');
+ $OUT .= '<font size="+1">'. substr($sectionhead,0,1).