Revision 4bb7391d
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
SL/AR.pm | ||
---|---|---|
171 | 171 |
# insert detail records in acc_trans |
172 | 172 |
$query = qq|INSERT INTO acc_trans (trans_id, chart_id, amount, transdate, project_id, taxkey) |
173 | 173 |
VALUES (?, (SELECT c.id FROM chart c WHERE c.accno = ?), ?, ?, ?, ?)|; |
174 |
@values = (conv_i($form->{id}), conv_i($form->{AR_amounts}{"amount_$i"}), conv_i($form->{"amount_$i"}), conv_date($form->{transdate}), $project_id,
|
|
174 |
@values = (conv_i($form->{id}), $form->{AR_amounts}{"amount_$i"}, conv_i($form->{"amount_$i"}), conv_date($form->{transdate}), $project_id,
|
|
175 | 175 |
conv_i($form->{"taxkey_$i"})); |
176 | 176 |
do_query($form, $dbh, $query, @values); |
177 | 177 |
|
... | ... | |
179 | 179 |
# insert detail records in acc_trans |
180 | 180 |
$query = qq|INSERT INTO acc_trans (trans_id, chart_id, amount, transdate, project_id, taxkey) |
181 | 181 |
VALUES (?, (SELECT c.id FROM chart c WHERE c.accno = ?), ?, ?, ?, ?)|; |
182 |
@values = (conv_i($form->{id}), conv_i($form->{AR_amounts}{"tax_$i"}), conv_i($form->{"tax_$i"}), conv_date($form->{transdate}), $project_id,
|
|
182 |
@values = (conv_i($form->{id}), $form->{AR_amounts}{"tax_$i"}, conv_i($form->{"tax_$i"}), conv_date($form->{transdate}), $project_id,
|
|
183 | 183 |
conv_i($form->{"taxkey_$i"})); |
184 | 184 |
do_query($form, $dbh, $query, @values); |
185 | 185 |
} |
Auch abrufbar als: Unified diff
Kontonummern müssen nicht numerisch sein
Fix für Bug 1530.