Revision 8cef58b2
Von Thomas Kasulke vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/am.pl | ||
|---|---|---|
| 3154 | 3154 |
$sth->execute() || $form->dberror($query); |
| 3155 | 3155 |
$form->{title} = $locale->text("History Search");
|
| 3156 | 3156 |
$form->header(); |
| 3157 |
my @daten;
|
|
| 3157 |
my $daten = "";
|
|
| 3158 | 3158 |
while(my $hash_ref = $sth->fetchrow_hashref()){
|
| 3159 |
push(@daten, $form->get_history($dbh,$hash_ref->{id},$restriction));
|
|
| 3159 |
$daten = $form->get_history($dbh,$hash_ref->{id},$restriction);
|
|
| 3160 | 3160 |
} |
| 3161 | 3161 |
$dbh->disconnect(); |
| 3162 | 3162 |
print $form->parse_html_template("/common/show_history",
|
| 3163 |
{"DATEN" => @daten,
|
|
| 3164 |
"SUCCESS" => (length(@daten) > 0),
|
|
| 3163 |
{"DATEN" => $daten,
|
|
| 3164 |
"SUCCESS" => ($daten != 0 ? 1 : 0),
|
|
| 3165 | 3165 |
"NONEWWINDOW" => 1 |
| 3166 | 3166 |
}); |
| 3167 | 3167 |
$lxdebug->leave_sub(); |
| bin/mozilla/ap.pl | ||
|---|---|---|
| 1075 | 1075 |
if (AP->post_transaction(\%myconfig, \%$form)) {
|
| 1076 | 1076 |
# saving the history |
| 1077 | 1077 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 1078 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber};
|
|
| 1078 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1079 | 1079 |
$form->{addition} = "POSTED";
|
| 1080 | 1080 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1081 | 1081 |
} |
| ... | ... | |
| 1094 | 1094 |
$form->{postasnew} = 1;
|
| 1095 | 1095 |
# saving the history |
| 1096 | 1096 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 1097 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber};
|
|
| 1097 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1098 | 1098 |
$form->{addition} = "POSTED AS NEW";
|
| 1099 | 1099 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1100 | 1100 |
} |
| ... | ... | |
| 1159 | 1159 |
if (AP->delete_transaction(\%myconfig, \%$form, $spool)) {
|
| 1160 | 1160 |
# saving the history |
| 1161 | 1161 |
if(!exists $form->{addition}) {
|
| 1162 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber};
|
|
| 1162 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1163 | 1163 |
$form->{addition} = "DELETED";
|
| 1164 | 1164 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1165 | 1165 |
} |
| 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 |
} |
| bin/mozilla/ct.pl | ||
|---|---|---|
| 1284 | 1284 |
$form->{script} = "ap.pl";
|
| 1285 | 1285 |
# saving the history |
| 1286 | 1286 |
if(!exists $form->{addition}) {
|
| 1287 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber};
|
|
| 1287 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1288 | 1288 |
$form->{addition} = "SAVED";
|
| 1289 | 1289 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1290 | 1290 |
} |
| ... | ... | |
| 1299 | 1299 |
$form->{script} = "ar.pl";
|
| 1300 | 1300 |
# saving the history |
| 1301 | 1301 |
if(!exists $form->{addition}) {
|
| 1302 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber};
|
|
| 1302 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1303 | 1303 |
$form->{addition} = "SAVED";
|
| 1304 | 1304 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1305 | 1305 |
} |
| ... | ... | |
| 1315 | 1315 |
$form->{type} = "invoice";
|
| 1316 | 1316 |
# saving the history |
| 1317 | 1317 |
if(!exists $form->{addition}) {
|
| 1318 |
$form->{snumber} = qq|invnumber_| . $form->{invnumber};
|
|
| 1318 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
|
|
| 1319 | 1319 |
$form->{addition} = "SAVED";
|
| 1320 | 1320 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1321 | 1321 |
} |
| ... | ... | |
| 1331 | 1331 |
$form->{type} = "request_quotation";
|
| 1332 | 1332 |
# saving the history |
| 1333 | 1333 |
if(!exists $form->{addition}) {
|
| 1334 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1334 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1335 | 1335 |
$form->{addition} = "SAVED";
|
| 1336 | 1336 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1337 | 1337 |
} |
| ... | ... | |
| 1347 | 1347 |
$form->{type} = "sales_quotation";
|
| 1348 | 1348 |
# saving the history |
| 1349 | 1349 |
if(!exists $form->{addition}) {
|
| 1350 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1350 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1351 | 1351 |
$form->{addition} = "SAVED";
|
| 1352 | 1352 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1353 | 1353 |
} |
| ... | ... | |
| 1364 | 1364 |
($form->{db} eq 'customer') ? "sales_order" : "purchase_order";
|
| 1365 | 1365 |
# saving the history |
| 1366 | 1366 |
if(!exists $form->{addition}) {
|
| 1367 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1367 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1368 | 1368 |
$form->{addition} = "SAVED";
|
| 1369 | 1369 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1370 | 1370 |
} |
| ... | ... | |
| 1393 | 1393 |
} |
| 1394 | 1394 |
# saving the history |
| 1395 | 1395 |
if(!exists $form->{addition}) {
|
| 1396 |
$form->{snumber} = ($form->{"db"} eq "customer" ? qq|customernumber_| . $form->{customernumber} : qq|vendornumber_| . $form->{vendornumber});
|
|
| 1396 |
$form->{snumbers} = ($form->{"db"} eq "customer" ? qq|customernumber_| . $form->{customernumber} : qq|vendornumber_| . $form->{vendornumber});
|
|
| 1397 | 1397 |
$form->{addition} = "SAVED";
|
| 1398 | 1398 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1399 | 1399 |
} |
| ... | ... | |
| 1430 | 1430 |
} |
| 1431 | 1431 |
# saving the history |
| 1432 | 1432 |
if(!exists $form->{addition}) {
|
| 1433 |
$form->{snumber} = ($form->{"db"} eq "customer" ? qq|customernumber_| . $form->{customernumber} : qq|vendornumber_| . $form->{vendornumber});
|
|
| 1433 |
$form->{snumbers} = ($form->{"db"} eq "customer" ? qq|customernumber_| . $form->{customernumber} : qq|vendornumber_| . $form->{vendornumber});
|
|
| 1434 | 1434 |
$form->{addition} = "SAVED";
|
| 1435 | 1435 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1436 | 1436 |
} |
| ... | ... | |
| 1454 | 1454 |
$msg .= " deleted!"; |
| 1455 | 1455 |
# saving the history |
| 1456 | 1456 |
if(!exists $form->{addition}) {
|
| 1457 |
$form->{snumber} = ($form->{"db"} eq "customer" ? qq|customernumber_| . $form->{customernumber} : qq|vendornumber_| . $form->{vendornumber});
|
|
| 1457 |
$form->{snumbers} = ($form->{"db"} eq "customer" ? qq|customernumber_| . $form->{customernumber} : qq|vendornumber_| . $form->{vendornumber});
|
|
| 1458 | 1458 |
$form->{addition} = "DELETED";
|
| 1459 | 1459 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1460 | 1460 |
} |
| bin/mozilla/dn.pl | ||
|---|---|---|
| 556 | 556 |
DN->save_config(\%myconfig, \%$form); |
| 557 | 557 |
# saving the history |
| 558 | 558 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 559 |
$form->{addition} = "SAVED FOR DUNNING";
|
|
| 559 |
$form->{snumbers} = qq|dunning_id_| . $form->{"dunning_id"};
|
|
| 560 |
$form->{addition} = "SAVED FOR DUNNING";
|
|
| 560 | 561 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 561 | 562 |
} |
| 562 | 563 |
# /saving the history |
| ... | ... | |
| 610 | 611 |
} |
| 611 | 612 |
# saving the history |
| 612 | 613 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 613 |
$form->{addition} = "DUNNING STARTED";
|
|
| 614 |
$form->{snumbers} = qq|dunning_id_| . $form->{"dunning_id"};
|
|
| 615 |
$form->{addition} = "DUNNING STARTED";
|
|
| 614 | 616 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 615 | 617 |
} |
| 616 | 618 |
# /saving the history |
| bin/mozilla/gl.pl | ||
|---|---|---|
| 1544 | 1544 |
if (GL->delete_transaction(\%myconfig, \%$form)){
|
| 1545 | 1545 |
# saving the history |
| 1546 | 1546 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 1547 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1547 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1548 | 1548 |
$form->{addition} = "DELETED";
|
| 1549 | 1549 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1550 | 1550 |
} |
| ... | ... | |
| 1738 | 1738 |
undef($form->{callback});
|
| 1739 | 1739 |
# saving the history |
| 1740 | 1740 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 1741 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1741 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1742 | 1742 |
$form->{addition} = "SAVED";
|
| 1743 | 1743 |
$form->{what_done} = $locale->text("Buchungsnummer") . " = " . $form->{id};
|
| 1744 | 1744 |
$form->save_history($form->dbconnect(\%myconfig)); |
| ... | ... | |
| 1765 | 1765 |
$form->{storno} = 1;
|
| 1766 | 1766 |
# saving the history |
| 1767 | 1767 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 1768 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1768 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1769 | 1769 |
$form->{addition} = "STORNO";
|
| 1770 | 1770 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1771 | 1771 |
} |
| bin/mozilla/ic.pl | ||
|---|---|---|
| 3042 | 3042 |
} |
| 3043 | 3043 |
# saving the history |
| 3044 | 3044 |
if(!exists $form->{addition}) {
|
| 3045 |
$form->{snumber} = qq|partnumber_| . $form->{partnumber};
|
|
| 3045 |
$form->{snumbers} = qq|partnumber_| . $form->{partnumber};
|
|
| 3046 | 3046 |
$form->{addition} = "SAVED";
|
| 3047 | 3047 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 3048 | 3048 |
} |
| ... | ... | |
| 3165 | 3165 |
|
| 3166 | 3166 |
# saving the history |
| 3167 | 3167 |
if(!exists $form->{addition}) {
|
| 3168 |
$form->{snumber} = qq|partnumber_| . $form->{partnumber};
|
|
| 3168 |
$form->{snumbers} = qq|partnumber_| . $form->{partnumber};
|
|
| 3169 | 3169 |
$form->{addition} = "SAVED AS NEW";
|
| 3170 | 3170 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 3171 | 3171 |
} |
| ... | ... | |
| 3183 | 3183 |
$lxdebug->enter_sub(); |
| 3184 | 3184 |
# saving the history |
| 3185 | 3185 |
if(!exists $form->{addition}) {
|
| 3186 |
$form->{snumber} = qq|partnumber_| . $form->{partnumber};
|
|
| 3186 |
$form->{snumbers} = qq|partnumber_| . $form->{partnumber};
|
|
| 3187 | 3187 |
$form->{addition} = "DELETED";
|
| 3188 | 3188 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 3189 | 3189 |
} |
| bin/mozilla/io.pl | ||
|---|---|---|
| 1716 | 1716 |
call_sub($display_form); |
| 1717 | 1717 |
# saving the history |
| 1718 | 1718 |
if(!exists $form->{addition}) {
|
| 1719 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1719 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1720 | 1720 |
$form->{addition} = "PRINTED";
|
| 1721 | 1721 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1722 | 1722 |
} |
| ... | ... | |
| 1909 | 1909 |
|
| 1910 | 1910 |
# saving the history |
| 1911 | 1911 |
if(!exists $form->{addition}) {
|
| 1912 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1912 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1913 | 1913 |
if($form->{media} =~ /printer/) {
|
| 1914 | 1914 |
$form->{addition} = "PRINTED";
|
| 1915 | 1915 |
} |
| bin/mozilla/oe.pl | ||
|---|---|---|
| 1981 | 1981 |
|
| 1982 | 1982 |
# saving the history |
| 1983 | 1983 |
if(!exists $form->{addition}) {
|
| 1984 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1984 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 1985 | 1985 |
$form->{addition} = "SAVED";
|
| 1986 | 1986 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 1987 | 1987 |
} |
| ... | ... | |
| 2063 | 2063 |
|
| 2064 | 2064 |
# saving the history |
| 2065 | 2065 |
if(!exists $form->{addition}) {
|
| 2066 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 2066 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 2067 | 2067 |
$form->{addition} = "SAVED";
|
| 2068 | 2068 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 2069 | 2069 |
} |
| ... | ... | |
| 2135 | 2135 |
$form->redirect($msg); |
| 2136 | 2136 |
# saving the history |
| 2137 | 2137 |
if(!exists $form->{addition}) {
|
| 2138 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 2138 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 2139 | 2139 |
$form->{addition} = "DELETED";
|
| 2140 | 2140 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 2141 | 2141 |
} |
| bin/mozilla/pe.pl | ||
|---|---|---|
| 467 | 467 |
} |
| 468 | 468 |
# saving the history |
| 469 | 469 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 470 |
$form->{snumber} = qq|projectnumber_| . $form->{projectnumber};
|
|
| 470 |
$form->{snumbers} = qq|projectnumber_| . $form->{projectnumber};
|
|
| 471 | 471 |
$form->{addition} = "SAVED";
|
| 472 | 472 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 473 | 473 |
} |
| ... | ... | |
| 492 | 492 |
} |
| 493 | 493 |
# saving the history |
| 494 | 494 |
if(!exists $form->{addition}) {
|
| 495 |
$form->{snumber} = qq|projectnumber_| . $form->{projectnumber};
|
|
| 495 |
$form->{snumbers} = qq|projectnumber_| . $form->{projectnumber};
|
|
| 496 | 496 |
$form->{addition} = "DELETED";
|
| 497 | 497 |
$form->save_history($form->dbconnect(\%myconfig)); |
| 498 | 498 |
} |
| bin/mozilla/rp.pl | ||
|---|---|---|
| 2101 | 2101 |
} |
| 2102 | 2102 |
# saving the history |
| 2103 | 2103 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 2104 |
$form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 2104 |
$form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
|
|
| 2105 | 2105 |
$form->{addition} = "PRINTED";
|
| 2106 | 2106 |
$form->{what_done} = $form->{type};
|
| 2107 | 2107 |
$form->save_history($form->dbconnect(\%myconfig)); |
Auch abrufbar als: Unified diff
$form->{snumber} durch $form->{snumbers} ersetzt, da dies eigentlich so vorgesehen war. :/