Revision 487d4f1f
Von Stephan Köhler vor mehr als 18 Jahren hinzugefügt
SL/Form.pm | ||
---|---|---|
412 | 412 |
$main::lxdebug->leave_sub(); |
413 | 413 |
} |
414 | 414 |
|
415 |
# write Trigger JavaScript-Code ($qty = 1 - only one Trigger) |
|
415 |
# write Trigger JavaScript-Code ($qty = quantity of Triggers) |
|
416 |
# changed it to accept an arbitrary number of triggers - sschoeling |
|
416 | 417 |
sub write_trigger { |
417 | 418 |
$main::lxdebug->enter_sub(); |
418 | 419 |
|
419 |
my ($self, $myconfig, $qty, |
|
420 |
$inputField_1, $align_1, $button_1, |
|
421 |
$inputField_2, $align_2, $button_2) |
|
422 |
= @_; |
|
420 |
my $self = shift; |
|
421 |
my $myconfig = shift; |
|
422 |
my $qty = shift; |
|
423 | 423 |
|
424 | 424 |
# set dateform for jsscript |
425 | 425 |
# default |
... | ... | |
448 | 448 |
} |
449 | 449 |
} |
450 | 450 |
|
451 |
$trigger_1 = qq| |
|
451 |
while ($#_ >= 2) { |
|
452 |
push @triggers, qq| |
|
452 | 453 |
Calendar.setup( |
453 | 454 |
{ |
454 |
inputField : "$inputField_1",
|
|
455 |
inputField : "|.(shift).qq|",
|
|
455 | 456 |
ifFormat :"$ifFormat", |
456 |
align : "$align_1",
|
|
457 |
button : "$button_1"
|
|
457 |
align : "|.(shift).qq|",
|
|
458 |
button : "|.(shift).qq|"
|
|
458 | 459 |
} |
459 | 460 |
); |
460 | 461 |
|; |
461 |
|
|
462 |
if ($qty == 2) { |
|
463 |
$trigger_2 = qq| |
|
464 |
Calendar.setup( |
|
465 |
{ |
|
466 |
inputField : "$inputField_2", |
|
467 |
ifFormat :"$ifFormat", |
|
468 |
align : "$align_2", |
|
469 |
button : "$button_2" |
|
470 |
} |
|
471 |
); |
|
472 |
|; |
|
473 | 462 |
} |
474 | 463 |
$jsscript = qq| |
475 | 464 |
<script type="text/javascript"> |
476 |
<!-- |
|
477 |
$trigger_1 |
|
478 |
$trigger_2 |
|
479 |
//--> |
|
465 |
<!--|.join("", @triggers).qq|//--> |
|
480 | 466 |
</script> |
481 | 467 |
|; |
482 | 468 |
|
SL/IS.pm | ||
---|---|---|
805 | 805 |
# set values which could be empty to 0 |
806 | 806 |
$form->{terms} *= 1; |
807 | 807 |
$form->{taxincluded} *= 1; |
808 |
my $datepaid = ($form->{paid}) ? qq|'$form->{datepaid}'| : "NULL"; |
|
809 |
my $duedate = ($form->{duedate}) ? qq|'$form->{duedate}'| : "NULL"; |
|
808 |
my $datepaid = ($form->{paid}) ? qq|'$form->{datepaid}'| : "NULL"; |
|
809 |
my $duedate = ($form->{duedate}) ? qq|'$form->{duedate}'| : "NULL"; |
|
810 |
my $deliverydate = ($form->{deliverydate}) ? qq|'$form->{deliverydate}'| : "NULL"; |
|
810 | 811 |
|
811 | 812 |
# fill in subject if there is none |
812 | 813 |
$form->{subject} = qq|$form->{label} $form->{invnumber}| |
... | ... | |
839 | 840 |
paid = $form->{paid}, |
840 | 841 |
datepaid = $datepaid, |
841 | 842 |
duedate = $duedate, |
843 |
deliverydate = $deliverydate, |
|
842 | 844 |
invoice = '1', |
843 | 845 |
shippingpoint = '$form->{shippingpoint}', |
844 | 846 |
shipvia = '$form->{shipvia}', |
... | ... | |
1164 | 1166 |
|
1165 | 1167 |
# retrieve invoice |
1166 | 1168 |
$query = qq|SELECT a.invnumber, a.ordnumber, a.quonumber, a.cusordnumber, |
1167 |
a.transdate AS invdate, a.paid, |
|
1169 |
a.transdate AS invdate, a.deliverydate, a.paid,
|
|
1168 | 1170 |
a.shippingpoint, a.shipvia, a.terms, a.notes, a.intnotes, |
1169 | 1171 |
a.duedate, a.taxincluded, a.curr AS currency, |
1170 | 1172 |
a.employee_id, e.name AS employee |
SL/OE.pm | ||
---|---|---|
628 | 628 |
|
629 | 629 |
($form->{currency}) = split /:/, $form->{currencies}; |
630 | 630 |
|
631 |
# set reqdate if this is an invoice->order conversion. If someone knows a better check to ensure |
|
632 |
# we come from invoices, feel free. |
|
633 |
$form->{reqdate} = $form->{deliverydate} if ($form->{deliverydate} and $form->{callback} =~ /action=ar_transactions/); |
|
634 |
|
|
631 | 635 |
if ($form->{id} or @ids) { |
632 | 636 |
|
633 | 637 |
# retrieve order for single id |
bin/mozilla/ic.pl | ||
---|---|---|
2228 | 2228 |
|
2229 | 2229 |
#write Trigger |
2230 | 2230 |
$jsscript = |
2231 |
Form->write_trigger(\%myconfig, "1", "priceupdate", "BL", "trigger1", "", |
|
2232 |
"", ""); |
|
2231 |
Form->write_trigger(\%myconfig, "1", "priceupdate", "BL", "trigger1"); |
|
2233 | 2232 |
} else { |
2234 | 2233 |
|
2235 | 2234 |
# without JavaScript Calendar |
bin/mozilla/io.pl | ||
---|---|---|
1586 | 1586 |
} |
1587 | 1587 |
|
1588 | 1588 |
map { $form->{$_} = $locale->date(\%myconfig, $form->{$_}, 1) } |
1589 |
("${inv}date", "${due}date", "shippingdate"); |
|
1589 |
("${inv}date", "${due}date", "shippingdate", "deliverydate");
|
|
1590 | 1590 |
|
1591 | 1591 |
@a = qw(name street zipcode city country); |
1592 | 1592 |
|
... | ... | |
1616 | 1616 |
push @a, |
1617 | 1617 |
qw(shiptoname shiptostreet shiptozipcode shiptocity shiptocountry shiptoemail shippingpoint shipvia company address signature employee contact department_1 department_2); |
1618 | 1618 |
|
1619 |
push @a, ("${inv}date", "${due}date", email, cc, bcc); |
|
1619 |
push @a, ("${inv}date", "${due}date", "deliverydate", email, cc, bcc);
|
|
1620 | 1620 |
|
1621 | 1621 |
$form->format_string(@a); |
1622 | 1622 |
|
bin/mozilla/is.pl | ||
---|---|---|
334 | 334 |
<td width="4"><input type=button name=duedate id="trigger2" value=| |
335 | 335 |
. $locale->text('button') . qq|></td></td> |
336 | 336 |
|; |
337 |
$button3 = qq| |
|
338 |
<td width="13"><input name=deliverydate id=deliverydate size=11 title="$myconfig{dateformat}" value=$form->{deliverydate}></td> |
|
339 |
<td width="4"><input type=button name=deliverydate id="trigger3" value=| |
|
340 |
. $locale->text('button') . qq|></td></td> |
|
341 |
|; |
|
337 | 342 |
|
338 | 343 |
#write Trigger |
339 | 344 |
$jsscript = |
340 |
Form->write_trigger(\%myconfig, "2", "invdate", "BL", "trigger1", |
|
341 |
"duedate", "BL", "trigger2"); |
|
345 |
Form->write_trigger(\%myconfig, "3", "invdate", "BL", "trigger1", |
|
346 |
"duedate", "BL", "trigger2", |
|
347 |
"deliverydate", "BL", "trigger3"); |
|
342 | 348 |
} else { |
343 | 349 |
|
344 | 350 |
# without JavaScript Calendar |
... | ... | |
470 | 476 |
<th align=right>| . $locale->text('Due Date') . qq|</th> |
471 | 477 |
$button2 |
472 | 478 |
</tr> |
479 |
<tr> |
|
480 |
<th align=right>| . $locale->text('Delivery Date') . qq|</th> |
|
481 |
$button3 |
|
482 |
</tr> |
|
473 | 483 |
<tr> |
474 | 484 |
<th align=right nowrap>| . $locale->text('Order Number') . qq|</th> |
475 | 485 |
<td><input name=ordnumber size=11 value="$form->{ordnumber}"></td> |
bin/mozilla/oe.pl | ||
---|---|---|
1809 | 1809 |
$form->isblank("ordnumber", $locale->text('Order Number missing!')) if ( +{ map { $form->{"ordnumber_$_"}, 1 } ( 1 .. $form->{rowcount}-1 ) }->{''} ); |
1810 | 1810 |
$form->isblank("transdate", $locale->text('Order Date missing!')) if ( +{ map { $form->{"transdate_$_"}, 1 } ( 1 .. $form->{rowcount}-1 ) }->{''} ); |
1811 | 1811 |
|
1812 |
# also copy deliverydate from the order |
|
1813 |
$form->{deliverydate} = $form->{reqdate} if $form->{reqdate}; |
|
1812 | 1814 |
} else { |
1813 | 1815 |
$form->isblank("quonumber", $locale->text('Quotation Number missing!')); |
1814 | 1816 |
$form->isblank("transdate", $locale->text('Quotation Date missing!')); |
doc/latex-template-variablen.html | ||
---|---|---|
474 | 474 |
<td>Angebotsnummer</td> |
475 | 475 |
</tr> |
476 | 476 |
<tr> |
477 |
<td><code>shippingdate</code></td>
|
|
477 |
<td><code>deliverydate</code></td>
|
|
478 | 478 |
<td>Lieferdatum</td> |
479 | 479 |
</tr> |
480 | 480 |
<tr> |
sql/Pg-upgrade-2.1.1-2.1.2.sql | ||
---|---|---|
256 | 256 |
-- |
257 | 257 |
-- add unqiue constraint to project |
258 | 258 |
ALTER TABLE project ADD constraint project_projectnumber_key UNIQUE(projectnumber); |
259 |
-- |
|
260 |
-- add column deliverydate to ar |
|
261 |
ALTER TABLE ar ADD COLUMN deliverydate date; |
|
259 | 262 |
|
260 | 263 |
update defaults set version = '2.1.2'; |
sql/lx-office.sql | ||
---|---|---|
285 | 285 |
"paid" numeric (15,5), |
286 | 286 |
"datepaid" date, |
287 | 287 |
"duedate" date, |
288 |
"deliverydate" date, |
|
288 | 289 |
"invoice" boolean DEFAULT 'f', |
289 | 290 |
"shippingpoint" text, |
290 | 291 |
"terms" smallint DEFAULT 0, |
templates/German-invoice.html | ||
---|---|---|
49 | 49 |
<th align=right>Nummer</th><td> </td><td><%invnumber%></td></tr> |
50 | 50 |
</tr> |
51 | 51 |
|
52 |
<tr> |
|
53 |
<th align=right>Lieferdatum</th><td> </td><td><%deliverydate%></td></tr> |
|
54 |
</tr> |
|
52 | 55 |
<!-- |
53 | 56 |
<tr> |
54 | 57 |
<th align=right>Clerk:</th><td> </td><td><%username%></td> |
templates/German-invoice.tex | ||
---|---|---|
88 | 88 |
\begin{tabular}[t]{l@{\hspace{0.3cm}}l} |
89 | 89 |
\textbf{Datum} & <%invdate%> \\ |
90 | 90 |
\textbf{Nummer} & <%invnumber%> \\ |
91 |
\textbf{Lieferdatum} & <%deliverydate%> \\ |
|
91 | 92 |
\end{tabular} |
92 | 93 |
|
93 | 94 |
\vspace{1cm} |
Auch abrufbar als: Unified diff
Merge von 833,836-838 aus unstable: Lieferdatum in Rechnungen
-833
Lieferdatum in Rechnungen.
Lieferdatum wird nicht auf automatisch gesetzt und ist zur Zeit auch nicht vom Programm erfordert.
Es wird bei der Konvertierung von und in Auftraege beibehalten.
-836
Aenderung von write_trigger zusammen mit einem Aufruf im alten Format
hat einen Javascript-Fehler beim Waren erfassen erzeugt.
Fixed.
-837
Export des Lieferdatums fuer gedruckte Rechnungen.
Die Variable ist <%deliverydate%>.
Anbei Rechnungen mit Lieferdatum in tex und html.
(Sollte sich jemand anschauen der weiss wie die auszusehen haben)
-838
Doku Update zu r837