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.34 -r1.35
--- openacs-4/packages/invoices/catalog/invoices.en_US.ISO-8859-1.xml 13 Apr 2006 12:15:30 -0000 1.34
+++ openacs-4/packages/invoices/catalog/invoices.en_US.ISO-8859-1.xml 3 May 2006 05:56:37 -0000 1.35
@@ -62,6 +62,7 @@
Invoice copy
Credit
Covering letter for invoice
+ invoices
Offer
Order confirmation
Gross amount
@@ -77,6 +78,9 @@
Invoice
Cancel
Invoice count
+ Display documents
+ Email
+ Mark for later download
Invoice Item
Invoice item number
Invoice Item Title
@@ -218,6 +222,7 @@
View Invoices
<html><body><h3>Invoices</h3>%contact.salutation%,<p>see attached invoices %invoice_nrs%.<p>Best wishes,<br>WIENERS + WIENERS GmbH<br></html></body>
Invoices # %invoice_nrs%
+ Load prepared invoices
Invoice journal
Export Journal
Invoices of %long_month% %year%:
@@ -422,6 +427,8 @@
Rebate
Received on
Recipient
+ Customer type
+ New customer
All projects
All Offers
Show all offers
@@ -449,6 +456,7 @@
VAT number
Cancellation
Invoice copy
+ Credit
Send invoice
Year
Yes
Index: openacs-4/packages/invoices/www/invoice-send.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/invoices/www/invoice-send.tcl,v
diff -u -r1.17 -r1.18
--- openacs-4/packages/invoices/www/invoice-send.tcl 10 Apr 2006 11:26:01 -0000 1.17
+++ openacs-4/packages/invoices/www/invoice-send.tcl 3 May 2006 05:56:33 -0000 1.18
@@ -103,9 +103,6 @@
set file_size [file size $document_file]
set file_id [contact::oo::import_oo_pdf -oo_file $document_file -printer_name "pdfconv" -title $file_title -parent_id $invoice_id]
- # set file_id [cr_import_content -title $file_title -description "PDF version of this invoice" $invoice_id $document_file $file_size application/pdf "[clock seconds]-[expr round([ns_rand]*100000)]"]
- # content::item::set_live_revision -revision_id $file_id
-
lappend file_ids $file_id
# db_dml set_publish_status {}
}
@@ -139,11 +136,14 @@
db_dml set_publish_status_and_parent {}
db_dml set_context_id {}
}
+
+ # mark displayed pdf as sent
+ iv::invoice::set_pdf_status -invoice_id $invoice_id -status "sent"
+
if {$status == "new" || [empty_string_p $status]} {
iv::invoice::set_status -invoice_id $invoice_id -status "billed"
}
}
-
}
set cancel_url [export_vars -base invoice-list {organization_id}]