// uniCenta oPOS - Touch Friendly Point Of Sale
// Copyright (c) 2009-2013 uniCenta & previous Openbravo POS works
// http://www.unicenta.net/unicentaopos
//
// This file is part of uniCenta oPOS
//
// uniCenta oPOS is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// uniCenta oPOS is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with uniCenta oPOS. If not, see <http://www.gnu.org/licenses/>.
package com.openbravo.pos.sales;
import com.openbravo.pos.customers.CustomerInfoExt;
import com.openbravo.pos.inventory.TaxCategoryInfo;
import com.openbravo.pos.ticket.TaxInfo;
import com.openbravo.pos.ticket.TicketInfo;
import com.openbravo.pos.ticket.TicketLineInfo;
import com.openbravo.pos.ticket.TicketTaxInfo;
import java.util.ArrayList;
import java.util.Collections;
import java.util.Comparator;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
/**
*
* @author adrianromero
*/
public class TaxesLogic {
private List<TaxInfo> taxlist;
private Map<String, TaxesLogicElement> taxtrees;
public TaxesLogic(List<TaxInfo> taxlist) {
this.taxlist = taxlist;
// JG June 2013 use diamond inference
taxtrees = new HashMap<>();
// Order the taxlist by Application Order...
// JG June 2013 use diamond inference
List<TaxInfo> taxlistordered = new ArrayList<>();
taxlistordered.addAll(taxlist);
Collections.sort(taxlistordered, new Comparator<TaxInfo>() {
@Override
public int compare(TaxInfo o1, TaxInfo o2) {
if (o1.getApplicationOrder() < o2.getApplicationOrder()) {
return -1;
} else if (o1.getApplicationOrder() == o2.getApplicationOrder()) {
return 0;
} else {
return 1;
}
}
});
// Generate the taxtrees
// JG June 2013 use diamond inference
HashMap<String, TaxesLogicElement> taxorphans = new HashMap<>();
for (TaxInfo t : taxlistordered) {
TaxesLogicElement te = new TaxesLogicElement(t);
// get the parent
TaxesLogicElement teparent = taxtrees.get(t.getParentID());
if (teparent == null) {
// orphan node
teparent = taxorphans.get(t.getParentID());
if (teparent == null) {
teparent = new TaxesLogicElement(null);
taxorphans.put(t.getParentID(), teparent);
}
}
teparent.getSons().add(te);
// Does it have orphans ?
teparent = taxorphans.get(t.getId());
if (teparent != null) {
// get all the sons
te.getSons().addAll(teparent.getSons());
// remove the orphans
taxorphans.remove(t.getId());
}
// Add it to the tree...
taxtrees.put(t.getId(), te);
}
}
public void calculateTaxes(TicketInfo ticket) throws TaxesException {
// JG June 2013 use diamond inference
List<TicketTaxInfo> tickettaxes = new ArrayList<>();
for (TicketLineInfo line: ticket.getLines()) {
tickettaxes = sumLineTaxes(tickettaxes, calculateTaxes(line));
}
ticket.setTaxes(tickettaxes);
}
public List<TicketTaxInfo> calculateTaxes(TicketLineInfo line) throws TaxesException {
TaxesLogicElement taxesapplied = getTaxesApplied(line.getTaxInfo());
return calculateLineTaxes(line.getSubValue(), taxesapplied);
}
private List<TicketTaxInfo> calculateLineTaxes(double base, TaxesLogicElement taxesapplied) {
// JG June 2013 use diamond inference
List<TicketTaxInfo> linetaxes = new ArrayList<>();
if (taxesapplied.getSons().isEmpty()) {
TicketTaxInfo tickettax = new TicketTaxInfo(taxesapplied.getTax());
tickettax.add(base);
linetaxes.add(tickettax);
} else {
double acum = base;
for (TaxesLogicElement te : taxesapplied.getSons()) {
List<TicketTaxInfo> sublinetaxes = calculateLineTaxes(
te.getTax().isCascade() ? acum : base,
te);
linetaxes.addAll(sublinetaxes);
acum += sumTaxes(sublinetaxes);
}
}
return linetaxes;
}
private TaxesLogicElement getTaxesApplied(TaxInfo t) throws TaxesException {
if (t == null) {
throw new TaxesException(new java.lang.NullPointerException());
}
return taxtrees.get(t.getId());
}
private double sumTaxes(List<TicketTaxInfo> linetaxes) {
double taxtotal = 0.0;
for (TicketTaxInfo tickettax : linetaxes) {
taxtotal += tickettax.getTax();
}
return taxtotal;
}
private List<TicketTaxInfo> sumLineTaxes(List<TicketTaxInfo> list1, List<TicketTaxInfo> list2) {
for (TicketTaxInfo tickettax : list2) {
TicketTaxInfo i = searchTicketTax(list1, tickettax.getTaxInfo().getId());
if (i == null) {
list1.add(tickettax);
} else {
i.add(tickettax.getSubTotal());
}
}
return list1;
}
private TicketTaxInfo searchTicketTax(List<TicketTaxInfo> l, String id) {
for (TicketTaxInfo tickettax : l) {
if (id.equals(tickettax.getTaxInfo().getId())) {
return tickettax;
}
}
return null;
}
public double getTaxRate(String tcid) {
return getTaxRate(tcid, null);
}
public double getTaxRate(TaxCategoryInfo tc) {
return getTaxRate(tc, null);
}
public double getTaxRate(TaxCategoryInfo tc, CustomerInfoExt customer) {
if (tc == null) {
return 0.0;
} else {
return getTaxRate(tc.getID(), customer);
}
}
public double getTaxRate(String tcid, CustomerInfoExt customer) {
if (tcid == null) {
return 0.0;
} else {
TaxInfo tax = getTaxInfo(tcid, customer);
if (tax == null) {
return 0.0;
} else {
return tax.getRate();
}
}
}
public TaxInfo getTaxInfo(String tcid) {
return getTaxInfo(tcid, null);
}
public TaxInfo getTaxInfo(TaxCategoryInfo tc) {
return getTaxInfo(tc.getID(), null);
}
public TaxInfo getTaxInfo(TaxCategoryInfo tc, CustomerInfoExt customer) {
return getTaxInfo(tc.getID(), customer);
}
public TaxInfo getTaxInfo(String tcid, CustomerInfoExt customer) {
TaxInfo defaulttax = null;
for (TaxInfo tax : taxlist) {
if (tax.getParentID() == null && tax.getTaxCategoryID().equals(tcid)) {
if ((customer == null || customer.getTaxCustCategoryID() == null) && tax.getTaxCustCategoryID() == null) {
return tax;
} else if (customer != null && customer.getTaxCustCategoryID() != null && customer.getTaxCustCategoryID().equals(tax.getTaxCustCategoryID())) {
return tax;
}
if (tax.getTaxCustCategoryID() == null) {
defaulttax = tax;
}
}
}
// No tax found
return defaulttax;
}
}