Add summary chart, invoice links, and batch links to item transaction report

config/Reports/itemtransactions.xml

@@ -18,6 +18,7 @@
 	</menu>
 	<program>
 		<![CDATA[
+			var externpath = "file:///home/neal/TCS/";
 			this.windowTitle = "Typica - Item Transactions";
 			var itemBox = findChildObject(this, 'item');
 			var unitBox = findChildObject(this, 'unit');
@@ -46,6 +47,9 @@
 				output.writeAttribute("xmlns", "http://www.w3.org/1999/xhtml");
 				output.writeStartElement("head");
 				output.writeTextElement("title", "Item Transactions");
+				output.writeStartElement("script");
+				output.writeAttribute("src", "Scripts/d3.min.js");
+				output.writeEndElement();
 				output.writeStartElement("style");
 				output.writeAttribute("type", "text/css");
 				output.writeCDATA("tr.PURCHASE {background-color: #77FF77}");
@@ -126,7 +130,48 @@
 					}
 					output.writeEndElement() // table
 					
-					query.prepare("SELECT time::date, type, quantity / :c1, balance / :c2 FROM item_history(:item)");
+					output.writeStartElement("div");
+					output.writeAttribute("id", "chart");
+					output.writeEndElement();
+					
+					query.prepare("WITH q AS (SELECT roasted_id, unroasted_id, unroasted_quantity, unroasted_total_quantity, roasted_quantity, generate_subscripts(unroasted_quantity, 1) AS s FROM roasting_log) SELECT (SELECT name FROM items WHERE id = roasted_id) AS name, roasted_id, SUM(unroasted_quantity[s]) AS total, COUNT(unroasted_quantity[s]), SUM((unroasted_quantity[s]/unroasted_total_quantity)*roasted_quantity)::numeric(12,3) AS roast_proportion FROM q WHERE unroasted_id[s] = :item1 GROUP BY roasted_id UNION SELECT 'Green Sales', NULL, SUM(quantity), COUNT(1), NULL FROM sale WHERE item = :item2 UNION SELECT 'Inventory Adjustment', NULL, ((SELECT SUM(quantity) FROM purchase WHERE item = :item3) - (SELECT quantity FROM items WHERE id = :item4) - (SELECT SUM(quantity) FROM all_transactions WHERE type != 'PURCHASE' AND type != 'INVENTORY' AND item = :item5)), (SELECT COUNT(1) FROM inventory WHERE item = :item6), NULL UNION SELECT 'Loss', NULL, SUM(quantity), COUNT(1), NULL FROM loss WHERE item = :item7 UNION SELECT 'Current Inventory', NULL, (SELECT quantity FROM items WHERE id = :item8), NULL, NULL ORDER BY total DESC");
+					query.bind(":item1", itemBox.currentData());
+					query.bind(":item2", itemBox.currentData());
+					query.bind(":item3", itemBox.currentData());
+					query.bind(":item4", itemBox.currentData());
+					query.bind(":item5", itemBox.currentData());
+					query.bind(":item6", itemBox.currentData());
+					query.bind(":item7", itemBox.currentData());
+					query.bind(":item8", itemBox.currentData());
+					query.exec();
+					var chartData = "var data = [";
+					var roastedCoffeeLines = "";
+					var adjustmentLines = "";
+					var currentInventoryLine = "";
+					var conversion = 1;
+					if(unitBox.currentIndex == 0) {
+						conversion = 2.2;
+					}
+					while(query.next()) {
+						if(Number(query.value(1)) > 0) {
+							roastedCoffeeLines += "['" + query.value(0).replace(/\'/g, "\\x27") + "'," + query.value(2) / conversion + "," + query.value(3) + "," + query.value(4) / conversion + "],";
+						} else if (query.value(0) == "Current Inventory") {
+							currentInventoryLine = "['Current Inventory'," + query.value(2) / conversion + "," + query.value(3) + "," + query.value(4) / conversion + "]";
+						} else {
+							if(Number(query.value(3)) > 0) {
+								adjustmentLines += "['" + query.value(0) + "'," + query.value(2) / conversion + "," + query.value(3) + "," + query.value(4) / conversion + "],";
+							}
+						}
+					}
+					chartData = chartData + roastedCoffeeLines + adjustmentLines + currentInventoryLine + "];";
+					
+					output.writeTextElement("script", chartData);
+					
+					output.writeStartElement("script");
+					output.writeAttribute("src", "Scripts/greenusechart.js");
+					output.writeEndElement();
+					
+					query.prepare("SELECT time::date, type, quantity / :c1, balance / :c2, (SELECT files FROM roasting_log WHERE roasting_log.time = item_history.time AND item = ANY(unroasted_id)), (SELECT invoice_id FROM invoice_items WHERE item = item_id AND item_history.type = 'PURCHASE'), (SELECT vendor || ' ' || invoice FROM invoices WHERE id = (SELECT invoice_id FROM invoice_items WHERE item = item_id AND item_history.type = 'PURCHASE')), (SELECT name FROM items WHERE id = (SELECT roasted_id FROM roasting_log WHERE roasting_log.time = item_history.time AND item = ANY(unroasted_id))) FROM item_history(:item)");
 					switch(unitBox.currentIndex)
 					{
 						case 0:
@@ -146,6 +191,7 @@
 					output.writeTextElement("th", "Type");
 					output.writeTextElement("th", "Quantity");
 					output.writeTextElement("th", "Balance");
+					output.writeTextElement("th", "Record");
 					output.writeEndElement(); // tr
 					var prev_balance = "0";
 					var prev_prec = 0;
@@ -175,6 +221,23 @@
 						}
 						output.writeTextElement("td", query.value(3));
 						prev_balance = query.value(3);
+						if(query.value(1) == "PURCHASE") {
+							output.writeStartElement("td");
+							output.writeStartElement("a");
+							output.writeAttribute("href", "typica://script/i" + query.value(5));
+							output.writeCDATA(query.value(6) + " (" + query.value(5) + ")");
+							output.writeEndElement();
+							output.writeEndElement();
+						} else if(query.value(1) == "USE") {
+							output.writeStartElement("td");
+							output.writeStartElement("a");
+							output.writeAttribute("href", "typica://script/p" + query.value(4).slice(1,-1));
+							output.writeCDATA(query.value(7) + " " + query.value(4));
+							output.writeEndElement();
+							output.writeEndElement();
+						} else {
+							output.writeTextElement("td", "");
+						}
 						output.writeEndElement(); // tr
 					}
 					output.writeEndElement(); // table
@@ -193,7 +256,59 @@
 				buffer.close();
 				query = query.invalidate();
 			}
-			refresh();
+			if(itemBox.currentData() > 0) {
+				refresh();
+			}
+			
+			/* Open invoices */
+			var openInvoice = function(url) {
+				var arg = url.slice(1, url.length);
+				var info = createWindow("invoiceinfo");
+				info.setInvoiceID(arg);
+				var query = new QSqlQuery();
+				query.exec("SELECT time, invoice, vendor FROM invoices WHERE id = " + arg);
+				query.next();
+				var timefield = findChildObject(info, 'date');
+				timefield.text = query.value(0);
+				var vendorfield = findChildObject(info, 'vendor');
+				vendorfield.text = query.value(2);
+				var invoicefield = findChildObject(info, 'invoice');
+				invoicefield.text = query.value(1);
+				var itemtable = findChildObject(info, 'itemtable');
+				itemtable.setQuery("SELECT record_type, item_id, description, (SELECT reference FROM items WHERE id = item_id) AS reference, (SELECT cost FROM purchase WHERE item = item_id) AS unit_cost, (SELECT quantity FROM purchase WHERE item = item_id) AS quantity, ((SELECT quantity FROM purchase WHERE item = item_id)/(SELECT conversion FROM lb_bag_conversion WHERE item = item_id))::numeric(12,2) AS sacks, cost FROM invoice_items WHERE invoice_id = " + arg + " AND record_type = 'PURCHASE' UNION SELECT record_type, NULL, description, NULL, NULL, NULL, NULL, cost FROM invoice_items WHERE invoice_id = " + arg + " AND record_type = 'FEE' ORDER BY item_id");
+				query = query.invalidate();
+			};
+			
+			/* Open batch data */
+			var openProfile = function(url) {
+				var arg = url.slice(1, url.length);
+				var details = createWindow("batchDetails");
+				var fakeTable = new Object;
+				fakeTable.holding = new Array(7);
+				fakeTable.data = function(r, c) {
+					return this.holding[c];
+				};
+				var query = new QSqlQuery();
+				query.exec("SELECT time, machine, (SELECT name FROM items WHERE id = roasted_id) AS name, unroasted_total_quantity AS green, roasted_quantity AS roasted, ((unroasted_total_quantity - roasted_quantity) / unroasted_total_quantity * 100::numeric)::numeric(12,2) AS weight_loss, duration, annotation FROM roasting_log WHERE files = '{" + arg + "}'");
+				query.next();
+				for(var i = 0; i < 8; i++) {
+					fakeTable.holding[i] = query.value(i);
+				}
+				query = query.invalidate();
+				details.loadData(fakeTable, 0);
+			};
+			
+			view.scriptLinkClicked.connect(function(url) {
+				var linkType = url[0];
+				switch(linkType) {
+					case 'i':
+						openInvoice(url);
+						break;
+					case 'p':
+						openProfile(url);
+						break;
+				}
+			});
 		]]>
 	</program>
 </window>

config/Scripts/greenusechart.js

@@ -0,0 +1,116 @@
+// Data access functions
+var label = function(d) {return d[0];};
+var greenValue = function(d) {return d[1];};
+var transactionCount = function(d) {return d[2];};
+var roastValue = function(d) {return d[3];};
+
+// Chart parameters
+var valueLabelWidth = 0; // Temporary, will be updated when labels are generated
+var barHeight = 30;
+var barHeight2 = barHeight / 2;
+var barLabelWidth = 0;
+var barLabelPadding = 5;
+var gridLabelHeight = 18;
+var gridChartOffset = 3;
+var maxBarWidth = 500;
+
+// Scales
+var x1s = d3.scale.linear().domain([0, d3.max(data, function(d) { return greenValue(d); })*1.15]).range([0, maxBarWidth]);
+var x2s = d3.scale.linear().domain([0, d3.max(data, function(d) { return transactionCount(d); })*1.15]).range([0, maxBarWidth]);
+var ys = d3.scale.ordinal().domain(d3.range(0, data.length)).rangeBands([0, data.length * barHeight]);
+var ytext = function(d, i) {return ys(i) + ys.rangeBand() / 2;};
+var ybar = function(d, i) {return ys(i);};
+var ybar2 = function(d, i) {return ys(i) + (barHeight2 / 2)};
+var ybar3 = function(d, i) {return ys(i);};
+var ybar4 = function(d, i) {return ys(i) + barHeight;};
+
+// Chart
+var svg = d3.select("#chart").append("svg")
+	.attr("width", 1000)
+	.attr("height", gridLabelHeight + gridLabelHeight + gridChartOffset + data.length * barHeight);
+
+// Bar labels
+var yxe = svg.append("g")
+	.attr("class", "y axis left");
+yxe.selectAll("text").data(data).enter().append("text")
+	.attr("y", ytext)
+	.attr("stroke", "none")
+	.attr("fill", "black")
+	.attr("dy", ".35em")
+	.attr("text-anchor", "end")
+	.text(label);
+// Determine maximum label width
+yxe.selectAll("text").each(function() {
+	if(barLabelWidth < this.getComputedTextLength()) {
+		barLabelWidth = this.getComputedTextLength();
+	}
+});
+barLabelWidth += 10;
+yxe.attr("transform", "translate(" + (barLabelWidth - barLabelPadding) + "," + (gridLabelHeight + gridChartOffset) + ")");
+
+// Weight axis
+var x1xe = svg.append("g")
+	.attr("class", "x axis top")
+	.attr("transform", "translate(" + barLabelWidth + "," + gridLabelHeight + ")");
+	
+x1xe.selectAll("text").data(x1s.ticks(10)).enter().append("text")
+	.attr("x", x1s)
+	.attr("dy", -3)
+	.attr("text-anchor", "middle")
+	.text(String);
+// Top ticks extend approximately half way down the chart
+x1xe.selectAll("line").data(x1s.ticks(10)).enter().append("line")
+	.attr("x1", x1s)
+	.attr("x2", x1s)
+	.attr("y1", 0)
+	.attr("y2", ys.rangeExtent()[1] /2)
+	.style("stroke", "#ccc");
+
+// Transaction count axis
+var x2xe = svg.append("g")
+	.attr("class", "x axis bottom")
+	.attr("transform", "translate(" + barLabelWidth + "," + (ys.rangeExtent()[1] + gridChartOffset + gridLabelHeight + gridLabelHeight) + ")");
+
+x2xe.selectAll("text").data(x2s.ticks(10)).enter().append("text")
+	.attr("x", x2s)
+	.attr("dy", -3)
+	.attr("text-anchor", "middle")
+	.text(String);
+// Bottom ticks extend approximately half way up the chart	
+x2xe.selectAll("line").data(x2s.ticks(10)).enter().append("line")
+	.attr("x1", x2s)
+	.attr("x2", x2s)
+	.attr("y1", -gridLabelHeight - (ys.rangeExtent()[1] /2))
+	.attr("y2", -gridLabelHeight)
+	.style("stroke", "#ccc");
+
+// Green coffee bars
+var gbars = svg.append("g")
+	.attr("transform", "translate(" + barLabelWidth + "," + (gridLabelHeight + gridChartOffset) + ")");
+gbars.selectAll("rect").data(data).enter().append("rect")
+	.attr("y", ybar)
+	.attr("height", barHeight)
+	.attr("width", function(d) {return x1s(greenValue(d));})
+	.attr("stroke", "white")
+	.attr("fill", "royalblue");
+
+// Roasted coffee bars
+var rbars = svg.append("g")
+	.attr("transform", "translate(" + barLabelWidth + "," + (gridLabelHeight + gridChartOffset) + ")");
+rbars.selectAll("rect").data(data).enter().append("rect")
+	.attr("y", ybar2)
+	.attr("height", barHeight2)
+	.attr("width", function(d) {return x1s(roastValue(d));})
+	.attr("stroke", "white")
+	.attr("fill", "orangered");
+
+// Transaction ticks
+var tticks = svg.append("g")
+	.attr("transform", "translate(" + barLabelWidth + "," + (gridLabelHeight + gridChartOffset) + ")");
+tticks.selectAll("line").data(data).enter().append("line")
+	.attr("x1", function(d) {return x2s(transactionCount(d));})
+	.attr("x2", function(d) {return x2s(transactionCount(d));})
+	.attr("y1", ybar3)
+	.attr("y2", ybar4)
+	.attr("stroke-width", "3")
+	.style("stroke", "black");