Revision c510d88b
Von Sven Schöling vor etwa 15 Jahren hinzugefügt
SL/OP.pm | ||
---|---|---|
36 | 36 |
|
37 | 37 |
use SL::DBUtils; |
38 | 38 |
|
39 |
use strict; |
|
40 |
|
|
39 | 41 |
sub overpayment { |
40 | 42 |
$main::lxdebug->enter_sub(); |
41 | 43 |
|
... | ... | |
70 | 72 |
do_query($form, $dbh, $query, @values); |
71 | 73 |
|
72 | 74 |
# add AR/AP |
73 |
($accno) = split /--/, $form->{ $form->{ARAP} }; |
|
75 |
my ($accno) = split /--/, $form->{ $form->{ARAP} };
|
|
74 | 76 |
|
75 | 77 |
$query = |
76 | 78 |
qq|INSERT INTO acc_trans (trans_id, chart_id, transdate, amount) | . |
Auch abrufbar als: Unified diff
und die restlichen .pm Module.