Revision 8cef58b2
Von Thomas Kasulke vor mehr als 17 Jahren hinzugefügt
bin/mozilla/ar.pl | ||
---|---|---|
79 | 79 |
|
80 | 80 |
# saving the history |
81 | 81 |
if(!exists $form->{addition} && ($form->{id} ne "")) { |
82 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber}; |
|
82 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
83 | 83 |
$form->{addition} = "ADDED"; |
84 | 84 |
$form->save_history($form->dbconnect(\%myconfig)); |
85 | 85 |
} |
... | ... | |
1093 | 1093 |
if (AR->post_transaction(\%myconfig, \%$form)) { |
1094 | 1094 |
# saving the history |
1095 | 1095 |
if(!exists $form->{addition} && $form->{id} ne "") { |
1096 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber}; |
|
1096 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
1097 | 1097 |
$form->{addition} = "POSTED"; |
1098 | 1098 |
$form->save_history($form->dbconnect(\%myconfig)); |
1099 | 1099 |
} |
... | ... | |
1112 | 1112 |
$form->{postasnew} = 1; |
1113 | 1113 |
# saving the history |
1114 | 1114 |
if(!exists $form->{addition} && $form->{id} ne "") { |
1115 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber}; |
|
1115 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
1116 | 1116 |
$form->{addition} = "POSTED AS NEW"; |
1117 | 1117 |
$form->save_history($form->dbconnect(\%myconfig)); |
1118 | 1118 |
} |
... | ... | |
1177 | 1177 |
if (AR->delete_transaction(\%myconfig, \%$form, $spool)) { |
1178 | 1178 |
# saving the history |
1179 | 1179 |
if(!exists $form->{addition}) { |
1180 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber}; |
|
1180 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
1181 | 1181 |
$form->{addition} = "DELETED"; |
1182 | 1182 |
$form->save_history($form->dbconnect(\%myconfig)); |
1183 | 1183 |
} |
Auch abrufbar als: Unified diff
$form->{snumber} durch $form->{snumbers} ersetzt, da dies eigentlich so vorgesehen war. :/