Index: openacs-4/packages/invoices/invoices.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/invoices.info,v diff -u -r1.31 -r1.32 --- openacs-4/packages/invoices/invoices.info 24 Aug 2006 09:18:13 -0000 1.31 +++ openacs-4/packages/invoices/invoices.info 25 Oct 2006 21:18:56 -0000 1.32 @@ -7,15 +7,15 @@ f t - + Timo Hentschel Invoices package that will collect costs to invoice items in invoices and store data about received payment. 2005-11-15 Cognovis Collect costs to invoice items and invoices, store payment information. 0 - + Index: openacs-4/packages/invoices/catalog/invoices.de_DE.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/catalog/invoices.de_DE.ISO-8859-1.xml,v diff -u -r1.43 -r1.44 --- openacs-4/packages/invoices/catalog/invoices.de_DE.ISO-8859-1.xml 24 Aug 2006 09:18:14 -0000 1.43 +++ openacs-4/packages/invoices/catalog/invoices.de_DE.ISO-8859-1.xml 25 Oct 2006 21:18:56 -0000 1.44 @@ -1,5 +1,5 @@ - + Auftragsbest�tigungen Akzeptiert am @@ -144,6 +144,7 @@ <html><body><h3>Stornorechnung</h3>%data.contact_salutation%,<p>anbei finden Sie die Stornorechnung %data.invoice_nr%.<p>Mit freundlichen Gr&uuml;&szlig;en<br>WIENERS + WIENERS GmbH<br></html></body> Stornorechnung # %invoice_nr% Storno durch + Abgesagt Storno f�r beendet am Kundenkontakt @@ -154,13 +155,15 @@ erstellt am Datum an dem die Rechnung angelegt wurde erstellt von + Benutzer welcher die Rechnung angelegt hat Gutschrift Gutschrift erstellen <html><body><h3>Gutschrift</h3>%data.contact_salutation%,<p>anbei finden Sie die Rechnungsgutschrift %data.invoice_nr%.<p>Mit freundlichen Gr&uuml;&szlig;en<br>WIENERS + WIENERS GmbH<br></html></body> Gutschrift # %invoice_nr% Neue Gutschrift Neue Gutschrift erstellen W�hrung + W�hrung der Rechnung Rechnung l�schen Beschreibung Beschreibung auf der Rechnung @@ -253,8 +256,8 @@ Angebot akzeptieren Auftragsdatum Datum der Annahme - <html><body>%data.contact_salutation%, <p>vielen Dank f�r Ihren Auftrag!<p> -Die Details entnehmen Sie bitte der angeh�ngten PDF-Datei.<p>Viele Gr&uuml;&szlig;e<p>%am_name;noquote%<br>Kundenberatung<br/> + <html><body>%data.contact_salutation%, <p>vielen Dank f�r Ihren Auftrag!<p> +Die Details entnehmen Sie bitte der angeh�ngten PDF-Datei.<p>Viele Gr&uuml;&szlig;e<p>%am_name;noquote%<br>Kundenberatung<br/> Durchwahl: %am_directphoneno%<br><b>WIENERS+WIENERS GmbH</b></body></html> Auftragsbest�tigung # %offer_nr% Vielen Dank f�r die Annahme unseres Angebots. Wir werden Sie so schnell wie m�glich diesbez�glich kontaktieren. @@ -286,14 +289,15 @@ Beschreibung der Kostenaufstellung Projektaufstellung �ndern Sie d�rfen keine akzeptierte oder berechnete Kostenaufstellung �ndern. - <html><body>%data.contact_salutation%,<p>anbei erhalten Sie das gew�nschte Angebot als PDF-Datei.<p>Wenn Sie das Angebot akzeptieren und den Auftrag erteilen m�chten, klicken Sie bitte <a href="%accept_link;noquote%">hier</a>.<p>Sollte der Link nicht funktionieren, klicken Sie auf folgende URL:<br>%accept_link;noquote%<p>Oder kopieren Sie diese URL in Ihren Browser.<p>Viele Gr&uuml;&szlig;e<p>%am_name;noquote%<br>Kundenberatung<br/> + <html><body>%data.contact_salutation%,<p>anbei erhalten Sie das gew�nschte Angebot als PDF-Datei.<p>Wenn Sie das Angebot akzeptieren und den Auftrag erteilen m�chten, klicken Sie bitte <a href="%accept_link;noquote%">hier</a>.<p>Sollte der Link nicht funktionieren, klicken Sie auf folgende URL:<br>%accept_link;noquote%<p>Oder kopieren Sie diese URL in Ihren Browser.<p>Viele Gr&uuml;&szlig;e<p>%am_name;noquote%<br>Kundenberatung<br/> Durchwahl: %am_directphoneno%<br><b>WIENERS+WIENERS GmbH</b></body></html> Angebot # %offer_nr% Datei anh�ngen Dateien l�schen Zum L�schen von Dateien die entsprechende Checkbox markieren. Dateien zur internen Verwendung - diese werden nicht mit dem Angebot verschickt! Dateien + Angebots Dateien Ansicht Lieferdatum Abgabetermin, zu dem das Projekt an den Kunden ausgeliefert werden muss Timing Uhrzeit @@ -423,6 +427,7 @@ Monat Monat Mehr als ein Kunde + Negativer Rabatt Neu Neue Kunden Nein @@ -484,6 +489,7 @@ Insgesamt Gesamt Gesamtsumme + Summe netto (%amount_total%) ist gr��er als die Gesamtsumme der Positionen (%item_sum%). Hier g�be es einen negativen Rabatt der nicht erlaubt ist. Alle Angebote h Unmounted Index: openacs-4/packages/invoices/catalog/invoices.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/catalog/invoices.en_US.ISO-8859-1.xml,v diff -u -r1.45 -r1.46 --- openacs-4/packages/invoices/catalog/invoices.en_US.ISO-8859-1.xml 24 Aug 2006 09:18:14 -0000 1.45 +++ openacs-4/packages/invoices/catalog/invoices.en_US.ISO-8859-1.xml 25 Oct 2006 21:18:56 -0000 1.46 @@ -1,5 +1,5 @@ - + Order confirmation Accepted on @@ -424,6 +424,7 @@ Month Month More than one customer + Negative Rebate New New Clients No @@ -485,6 +486,7 @@ Total Total Total amount + Amount total (%amount_total%) is greater than the sum of the items (%item_sum%). This is a negative rebate which is not allowed. Total Offers h Unmounted Index: openacs-4/packages/invoices/www/invoice-pay.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/invoice-pay.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/invoices/www/invoice-pay.tcl 9 Dec 2005 18:26:33 -0000 1.3 +++ openacs-4/packages/invoices/www/invoice-pay.tcl 25 Oct 2006 21:18:57 -0000 1.4 @@ -12,10 +12,8 @@ # Make sure you only mark invoices as "Paid" that have the status billed -db_transaction { - foreach inv_id $invoice_id { - db_dml pay_invoice {} - } +foreach inv_id $invoice_id { + db_dml pay_invoice {} } set invoice_id [lindex $invoice_id 0] Index: openacs-4/packages/invoices/www/offer-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/offer-ae.tcl,v diff -u -r1.39 -r1.40 --- openacs-4/packages/invoices/www/offer-ae.tcl 19 Oct 2006 17:06:49 -0000 1.39 +++ openacs-4/packages/invoices/www/offer-ae.tcl 25 Oct 2006 21:18:57 -0000 1.40 @@ -708,6 +708,7 @@ if {[empty_string_p $amount_total]} { set amount_total $amount_sum } + set vat [format "%.2f" [expr $vat_percent * $amount_total / 100.]] set item_sum [format "%.2f" $item_sum] @@ -720,10 +721,15 @@ ad_script_abort } -# db_transaction { - if {[empty_string_p $amount_total]} { - set amount_total $amount_sum - } + if {[empty_string_p $amount_total]} { + set amount_total $amount_sum + } + + if {$amount_total > $item_sum} { + ad_return_error "[_ invoices.negative_rebate]" "[_ invoices.total_mount_less_amount_total]" + ad_script_abort + } + set new_offer_rev_id [iv::offer::new \ -title $title \ -description $description \ @@ -768,11 +774,14 @@ category::map_object -object_id $new_item_rev_id $item(category) } set offer_id [content::revision::item_id -revision_id $new_offer_rev_id] -# } + } -edit_data { - ns_log Notice "*** edit_data (on save)" - ns_log Notice "PaymentDays: $payment_days" + if {$amount_total > $item_sum} { + ad_return_error "[_ invoices.negative_rebate]" "[_ invoices.total_mount_less_amount_total]" + ad_script_abort + } + db_transaction { set new_offer_rev_id [iv::offer::edit \ -offer_id $offer_id \