Revision 9a194d6a
Von G. Richardson vor fast 13 Jahren hinzugefügt
| SL/RP.pm | ||
|---|---|---|
| 1293 | 1293 |
$main::lxdebug->leave_sub(); |
| 1294 | 1294 |
} |
| 1295 | 1295 |
|
| 1296 |
sub get_taxaccounts {
|
|
| 1297 |
$main::lxdebug->enter_sub(); |
|
| 1298 |
|
|
| 1299 |
my ($self, $myconfig, $form) = @_; |
|
| 1300 |
|
|
| 1301 |
# connect to database |
|
| 1302 |
my $dbh = $form->dbconnect($myconfig); |
|
| 1303 |
|
|
| 1304 |
# get tax accounts |
|
| 1305 |
my $query = |
|
| 1306 |
qq|SELECT c.accno, c.description, t.rate |
|
| 1307 |
FROM chart c, tax t |
|
| 1308 |
WHERE (c.link LIKE '%CT_tax%') AND (c.id = t.chart_id) |
|
| 1309 |
ORDER BY c.accno|; |
|
| 1310 |
$form->{taxaccounts} = selectall_hashref_query($form, $dbh, $query);
|
|
| 1311 |
|
|
| 1312 |
$dbh->disconnect; |
|
| 1313 |
|
|
| 1314 |
$main::lxdebug->leave_sub(); |
|
| 1315 |
} |
|
| 1316 |
|
|
| 1317 | 1296 |
sub tax_report {
|
| 1318 | 1297 |
$main::lxdebug->enter_sub(); |
| 1319 | 1298 |
|
Auch abrufbar als: Unified diff
Überreste von CT_tax entfernt
Wird nirgends mehr verwendet, bzw. sind die aufgerufenen
Funktionen dazu schon lange auskommentiert. Auch aus den
Kontenrahmen und Updatescripts entfernt, da beim Speichern
eines Kontos die CT_tax Information in link eh verloren geht.
Es gibt in rp.pl auch noch Referenzen auf die Berichte
"tax_collected" und "tax_paid", aber keine Menüpunkte oder
Druckvorlagen dazu, können die auch raus?