Revision ec03bff2
Von Bernd Bleßmann vor fast 2 Jahren hinzugefügt
| SL/AP.pm | ||
|---|---|---|
| 180 | 180 |
|
| 181 | 181 |
# Link this record to the record it was created from. |
| 182 | 182 |
my $convert_from_oe_id = delete $form->{convert_from_oe_id};
|
| 183 |
if (!$form->{postasnew} && $convert_from_oe_id) {
|
|
| 183 |
if ($convert_from_oe_id) {
|
|
| 184 | 184 |
RecordLinks->create_links('dbh' => $dbh,
|
| 185 | 185 |
'mode' => 'ids', |
| 186 | 186 |
'from_table' => 'oe', |
| bin/mozilla/ap.pl | ||
|---|---|---|
| 892 | 892 |
} |
| 893 | 893 |
$form->{storno} = 0;
|
| 894 | 894 |
|
| 895 |
$form->{id} = 0 if $form->{postasnew};
|
|
| 896 |
|
|
| 897 | 895 |
if (AP->post_transaction(\%myconfig, \%$form)) {
|
| 898 | 896 |
# create webdav folder |
| 899 | 897 |
if ($::instance_conf->get_webdav) {
|
| bin/mozilla/ar.pl | ||
|---|---|---|
| 841 | 841 |
$form->{AR}{receivables} = $form->{ARselected};
|
| 842 | 842 |
$form->{storno} = 0;
|
| 843 | 843 |
|
| 844 |
$form->{id} = 0 if $form->{postasnew};
|
|
| 845 | 844 |
$form->error($locale->text('Cannot post transaction!')) unless AR->post_transaction(\%myconfig, \%$form);
|
| 846 | 845 |
|
| 847 | 846 |
# saving the history |
| bin/mozilla/ir.pl | ||
|---|---|---|
| 1020 | 1020 |
($form->{AP_paid}) = split /--/, $form->{AP_paid};
|
| 1021 | 1021 |
$form->{storno} ||= 0;
|
| 1022 | 1022 |
|
| 1023 |
$form->{id} = 0 if $form->{postasnew};
|
|
| 1024 |
|
|
| 1025 |
|
|
| 1026 | 1023 |
relink_accounts(); |
| 1027 | 1024 |
if (IR->post_invoice(\%myconfig, \%$form)){
|
| 1028 | 1025 |
# saving the history |
| bin/mozilla/is.pl | ||
|---|---|---|
| 1143 | 1143 |
|
| 1144 | 1144 |
$form->{label} = $form->{type} eq 'credit_note' ? $locale->text('Credit Note') : $locale->text('Invoice');
|
| 1145 | 1145 |
|
| 1146 |
$form->{id} = 0 if $form->{postasnew};
|
|
| 1147 |
|
|
| 1148 |
# get new invnumber in sequence if no invnumber is given or if posasnew was requested |
|
| 1149 |
if ($form->{postasnew}) {
|
|
| 1150 |
if ($form->{type} eq "credit_note") {
|
|
| 1151 |
undef($form->{cnnumber});
|
|
| 1152 |
} else {
|
|
| 1153 |
undef($form->{invnumber});
|
|
| 1154 |
} |
|
| 1155 |
} |
|
| 1156 |
|
|
| 1157 | 1146 |
relink_accounts(); |
| 1158 | 1147 |
|
| 1159 | 1148 |
my $terms = get_payment_terms_for_invoice(); |
Auch abrufbar als: Unified diff
Abfragen von $form->{postasnew} enfternt bei …
Einkaufsrechnung
Verkaufsrechnung
Kreditorenbuchung
Debitorenbuchung
Wird nirgends gesetzt - nur abgefragt.
Siehe auch commit 5427e0941067
"ap/ar/gl/io.pl: nicht benutzte Routine post_as_new entfernt"