X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main%2Fquick-charge.html;h=06ffd75e6e4a674352aa5d076fbe2d74fd04a250;hb=ab02d4756be1fca80ef12ae74f4dda9ee5f01106;hp=9e4fb8c6e03b005a523b60e8763e7c0eb768a1e5;hpb=7a97ed31c38e975c6548083039ff2ce31c6d8cf3;p=freeside.git diff --git a/httemplate/view/cust_main/quick-charge.html b/httemplate/view/cust_main/quick-charge.html index 9e4fb8c6e..06ffd75e6 100644 --- a/httemplate/view/cust_main/quick-charge.html +++ b/httemplate/view/cust_main/quick-charge.html @@ -1,49 +1,73 @@ -<% - my( $cust_main ) = @_; - my $conf = new FS::Conf; -%> + - <% } %> +
- <% - my $sth = dbh->prepare('SELECT DISTINCT taxclass FROM cust_main_county') - or die dbh->errstr; - $sth->execute or die $sth->errstr; - my %taxclasses = map { $_->[0] => 1 } @{$sth->fetchall_arrayref}; - my @taxclasses = grep $_, keys %taxclasses; - %> - - <% foreach my $taxclass ( @taxclasses ) { %> - -
+<%init> + +my( $cust_main ) = @_; + +