| CHARGES
   
   
    
      <%=
      foreach my $line ( @detail_items ) {
        $OUT .=
          '| Ref | Description | Amount |  '.
            ''
        ;
        foreach my $ext_desc ( @{$line->{'ext_description'} } ) {
          $OUT .=
            '| '. $line->{'ref'}. ''.
            ' | '. $line->{'description'}. ''.
            ' | '. $line->{'amount'}. ''.
          ' |  '.
              ''
        }
      }
      my $style = 'border-top: 3px solid #000000;';
      my $linenum = 0;
      foreach my $line ( @total_items ) {
        $style .= 'border-bottom: 3px solid #000000;'
          if ++$linenum == scalar(@total_items);
        $OUT .=
          '| '.
              ' | - '. $ext_desc. ''.
              ' | '.
            ' |  '.
            qq('
        ;
        $style='';
      }
    %>| ).
            qq( | ).
              $line->{'total_item'}. ''.
            qq( | ).
              $line->{'total_amount'}. ''.
          ' |  
 <%= $notes %>
 
 <%= $footer %>
 |