/**
* Copyright (c) 2015 Mustafa DUMLUPINAR, mdumlupinar@gmail.com
*
* This file is part of seyhan project.
*
* seyhan 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.
*
* This program 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 this program. If not, see <http://www.gnu.org/licenses/>.
*/
package controllers.waybill;
import static play.data.Form.form;
import html.trans_form_rows.WaybillTransRows;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import javax.persistence.OptimisticLockException;
import javax.persistence.PersistenceException;
import meta.GridHeader;
import meta.PageExtend;
import meta.RightBind;
import meta.RowCombining;
import models.SaleSeller;
import models.Stock;
import models.WaybillTrans;
import models.WaybillTransDetail;
import models.WaybillTransFactor;
import models.search.TransSearchParam;
import models.temporal.TransMultiplier;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import play.data.Form;
import play.data.validation.ValidationError;
import play.i18n.Messages;
import play.mvc.Controller;
import play.mvc.Result;
import utils.AuthManager;
import utils.CacheUtils;
import utils.CloneUtils;
import utils.DateUtils;
import utils.DocNoUtils;
import utils.Format;
import utils.NumericUtils;
import utils.QueryUtils;
import utils.TransStatusHistoryUtils;
import views.html.tools.components.trans_multiplier;
import views.html.waybills.transaction.form;
import views.html.waybills.transaction.list;
import com.avaje.ebean.Ebean;
import com.avaje.ebean.Page;
import controllers.Application;
import controllers.global.Profiles;
import enums.DocNoIncType;
import enums.Module;
import enums.Right;
import enums.RightLevel;
import enums.TransType;
/**
* @author mdpinar
*/
public class Transes extends Controller {
private final static Right[] ACCEPTABLE_RIGHTS = {
Right.IRSL_ALIS_IRSALIYESI,
Right.IRSL_SATIS_IRSALIYESI
};
private final static Logger log = LoggerFactory.getLogger(Transes.class);
private final static Form<WaybillTrans> dataForm = form(WaybillTrans.class);
private final static Form<TransSearchParam> paramForm = form(TransSearchParam.class);
/**
* Liste formu basliklarini doner
*
* @return List<GridHeader>
*/
private static List<GridHeader> getHeaderList() {
List<GridHeader> headerList = new ArrayList<GridHeader>();
headerList.add(new GridHeader(Messages.get("trans.no"), "8%").sortable("transNo"));
headerList.add(new GridHeader(Messages.get("status"), "8%", "center", "green").sortable("status"));
headerList.add(new GridHeader(Messages.get("contact"), "25%", false, true).sortable("contact.name"));
headerList.add(new GridHeader(Messages.get("date"), "8%", "center", null).sortable("transDate"));
headerList.add(new GridHeader(Messages.get("date.delivery"), "8%", "center", null).sortable("deliveryDate"));
if (Profiles.chosen().irsl_hasPrices) {
headerList.add(new GridHeader(Messages.get("amount"), "9%", "right", "red"));
if (Profiles.chosen().gnel_hasExchangeSupport) {
headerList.add(new GridHeader(Messages.get("currency"), "4%", "center", null));
}
}
headerList.add(new GridHeader(Messages.get("description")));
return headerList;
}
/**
* Liste formunda gosterilecek verileri doner
*
* @return PageExtend
*/
private static PageExtend<WaybillTrans> buildPage(TransSearchParam searchParam, Right right) {
List<Map<Integer, String>> dataList = new ArrayList<Map<Integer, String>>();
Page<WaybillTrans> page = WaybillTrans.page(searchParam, right);
List<WaybillTrans> modelList = page.getList();
if (modelList != null && modelList.size() > 0) {
for (WaybillTrans model : modelList) {
Map<Integer, String> dataMap = new HashMap<Integer, String>();
int i = -1;
dataMap.put(i++, model.id.toString());
dataMap.put(i++, model.transNo);
dataMap.put(i++, (model.status != null ? model.status.name : ""));
dataMap.put(i++, (model.contact != null ? model.contact.name : ""));
dataMap.put(i++, DateUtils.formatDateStandart(model.transDate));
dataMap.put(i++, (model.deliveryDate != null ? DateUtils.formatDateStandart(model.deliveryDate) : ""));
if (Profiles.chosen().irsl_hasPrices) {
dataMap.put(i++, Format.asMoney(model.netTotal));
if (Profiles.chosen().gnel_hasExchangeSupport) {
dataMap.put(i++, model.excCode);
}
}
dataMap.put(i++, model.description);
dataList.add(dataMap);
}
}
return new PageExtend<WaybillTrans>(getHeaderList(), dataList, page);
}
public static Result GO_HOME(RightBind rightBind) {
return redirect(
controllers.waybill.routes.Transes.list(rightBind)
);
}
public static Result list(RightBind rightBind) {
Result hasProblem = AuthManager.hasProblem(rightBind.value, RightLevel.Enable, ACCEPTABLE_RIGHTS);
if (hasProblem != null) return hasProblem;
Form<TransSearchParam> filledParamForm = paramForm.bindFromRequest();
return ok(
list.render(
buildPage(filledParamForm.get(), rightBind.value), rightBind, filledParamForm
)
);
}
public static Result save(RightBind rightBind) {
if (! CacheUtils.isLoggedIn()) return Application.login();
Form<WaybillTrans> filledForm = dataForm.bindFromRequest();
WaybillTrans model = filledForm.get();
Result hasProblem = AuthManager.hasProblem(rightBind.value, (model.id == null ? RightLevel.Insert : RightLevel.Update), ACCEPTABLE_RIGHTS);
if (hasProblem != null) return hasProblem;
checkFirstConstraints(filledForm);
if(filledForm.hasErrors()) {
return badRequest(form.render(filledForm, rightBind, WaybillTransRows.build(model)));
}
if (model.isCompleted != null && model.isCompleted ) {
flash("error", Messages.get("edit.striction.for_controller"));
return badRequest(form.render(filledForm, rightBind, WaybillTransRows.build(model)));
}
String editingConstraintError = model.checkEditingConstraints();
if (editingConstraintError != null) {
flash("error", editingConstraintError);
return badRequest(form.render(filledForm, rightBind, WaybillTransRows.build(model)));
}
model.workspace = CacheUtils.getWorkspaceId();
model.right = rightBind.value;
model.transType = rightBind.value.transType;
model.transYear = DateUtils.getYear(model.transDate);
model.transMonth = DateUtils.getYearMonth(model.transDate);
model.excEquivalent = model.netTotal;
int rowNo = 0;
String gnelExcCode = Profiles.chosen().gnel_excCode;
/*
* Stok ayarlari
*/
List<WaybillTransDetail> removeStockList = new ArrayList<WaybillTransDetail>();
Map<Integer, SaleSeller> sellerMap = SaleSeller.getModelMap();
for (WaybillTransDetail detail: model.details) {
if (detail.stock.id == null) {
removeStockList.add(detail);
continue;
}
detail.trans = model;
detail.workspace = model.workspace;
detail.receiptNo = model.receiptNo;
detail.contact = model.contact;
detail.transPoint = model.transPoint;
detail.privateCode = model.privateCode;
detail.transSource = model.transSource;
detail.status = model.status;
detail.right = model.right;
detail.transDate = model.transDate;
detail.deliveryDate = model.deliveryDate;
detail.transType = model.transType;
detail.rowNo = ++rowNo;
if (detail.depot == null || detail.depot.id == null) {
detail.depot = model.depot;
}
if (detail.seller != null && detail.seller.id != null) {
SaleSeller seller = sellerMap.get(detail.seller.id);
if (seller != null) detail.seller = seller;
} else if (model.seller != null && model.seller.id != null) {
detail.seller = model.seller;
}
detail.input = 0d;
detail.inTotal = 0d;
detail.output = 0d;
detail.outTotal = 0d;
if (detail.quantity == null) detail.quantity = 0d;
if (detail.unit2Ratio == null) detail.unit2Ratio = 0d;
if (detail.amount == null) detail.amount = 0d;
if (model.transType.equals(TransType.Input)) {
detail.input = detail.quantity.doubleValue() * detail.unitRatio.doubleValue();
detail.inTotal = detail.total;
} else {
detail.output = detail.quantity.doubleValue() * detail.unitRatio.doubleValue();
detail.outTotal = detail.total;
}
detail.netInput = detail.input;
detail.netInTotal = detail.inTotal;
detail.netOutput = detail.output;
detail.netOutTotal = detail.outTotal;
if (Profiles.chosen().irsl_hasPrices) {
if (detail.amount.doubleValue() * model.plusFactorTotal.doubleValue() > 0) {
detail.plusFactorAmount =
NumericUtils.round((detail.amount.doubleValue() / model.subtotal) * model.plusFactorTotal.doubleValue());
}
if (detail.amount.doubleValue() * model.minusFactorTotal.doubleValue() > 0) {
detail.minusFactorAmount =
NumericUtils.round((detail.amount.doubleValue() / model.subtotal) * model.minusFactorTotal.doubleValue(), Profiles.chosen().gnel_pennyDigitNumber);
}
} else {
detail.basePrice = 0d;
detail.price = 0d;
detail.taxRate = 0d;
detail.discountRate1 = 0d;
detail.discountRate2 = 0d;
detail.discountRate3 = 0d;
detail.amount = 0d;
detail.taxAmount = 0d;
detail.discountAmount = 0d;
detail.total = 0d;
detail.inTotal = 0d;
detail.outTotal = 0d;
detail.netInTotal = 0d;
detail.netOutTotal = 0d;
detail.excCode = gnelExcCode;
detail.excRate = 1d;
detail.excEquivalent = 0d;
detail.plusFactorAmount = 0d;
detail.minusFactorAmount = 0d;
}
detail.transYear = model.transYear;
detail.transMonth = model.transMonth;
}
model.details.removeAll(removeStockList);
List<WaybillTransFactor> removeList = new ArrayList<WaybillTransFactor>();
for (WaybillTransFactor other : model.factors) {
if (other.factor.id == null) {
removeList.add(other);
continue;
}
other.trans = model;
}
model.factors.removeAll(removeList);
checkSecondConstraints(filledForm);
if(filledForm.hasErrors()) {
return badRequest(form.render(filledForm, rightBind, WaybillTransRows.build(model)));
}
if (Profiles.chosen().stok_isRowCombining) doRowCombining(model);
Ebean.beginTransaction();
try {
try {
if (model.id == null) {
model.save();
if (model.status != null && model.status.id != null) {
TransStatusHistoryUtils.goForward(Module.waybill, model.id, model.status.id, Messages.get("first.init"));
}
} else {
model.update();
}
} catch (OptimisticLockException e) {
flash("error", Messages.get("exception.optimistic.lock"));
return badRequest(form.render(filledForm, rightBind, WaybillTransRows.build(model)));
}
Ebean.commitTransaction();
flash("success", Messages.get("saved", Messages.get(rightBind.value.key)));
} catch (PersistenceException pe) {
Ebean.rollbackTransaction();
log.error(pe.getMessage());
flash("error", Messages.get("unexpected.problem.occured", pe.getMessage()));
return badRequest(form.render(dataForm.fill(model), rightBind, WaybillTransRows.build(model)));
}
return GO_HOME(rightBind);
}
private static void doRowCombining(WaybillTrans model) {
Map<Integer, Integer> rowMap = new HashMap<Integer, Integer>();
Map<String, RowCombining> combineMap = new HashMap<String, RowCombining>();
List<WaybillTransDetail> removeStockList = new ArrayList<WaybillTransDetail>();
List<WaybillTransDetail> details = model.details;
for (int i = 0; i < details.size(); i++) {
WaybillTransDetail detail = details.get(i);
String key = detail.stock.id+"-"+detail.price;
RowCombining combining = combineMap.get(key);
if (combining == null) {
combining = new RowCombining(i, detail.stock.id, detail.price);
combineMap.put(key, combining);
} else {
removeStockList.add(detail);
rowMap.put(i, combining.row);
}
}
for (Map.Entry<Integer, Integer> entry : rowMap.entrySet()) {
WaybillTransDetail sourceDetail = details.get(entry.getKey());
WaybillTransDetail targetDetail = details.get(entry.getValue());
targetDetail.quantity += sourceDetail.quantity;
targetDetail.amount += sourceDetail.amount;
targetDetail.discountAmount += sourceDetail.discountAmount;
targetDetail.taxAmount += sourceDetail.taxAmount;
targetDetail.total += sourceDetail.total;
targetDetail.input += sourceDetail.input;
targetDetail.inTotal += sourceDetail.inTotal;
targetDetail.output += sourceDetail.output;
targetDetail.outTotal += sourceDetail.outTotal;
model.details.set(entry.getValue(), targetDetail);
}
model.details.removeAll(removeStockList);
}
public static Result create(RightBind rightBind) {
Result hasProblem = AuthManager.hasProblem(rightBind.value, RightLevel.Insert, ACCEPTABLE_RIGHTS);
if (hasProblem != null) return hasProblem;
WaybillTrans neu = new WaybillTrans();
neu.right = rightBind.value;
neu.transType = rightBind.value.transType;
if (Profiles.chosen().gnel_docNoIncType.equals(DocNoIncType.Full_Automatic)) neu.transNo = DocNoUtils.findLastTransNo(rightBind.value);
neu.receiptNo = DocNoUtils.findLastReceiptNo(rightBind.value);
return ok(form.render(dataForm.fill(neu), rightBind, WaybillTransRows.build(neu)));
}
public static Result edit(Integer id, RightBind rightBind) {
Result hasProblem = AuthManager.hasProblem(rightBind.value, RightLevel.Enable, ACCEPTABLE_RIGHTS);
if (hasProblem != null) return hasProblem;
if (id == null) {
flash("error", Messages.get("id.is.null"));
} else {
WaybillTrans model = WaybillTrans.findById(id);
if (model == null) {
flash("error", Messages.get("not.found", Messages.get("transaction")));
} else {
return ok(form.render(dataForm.fill(model), rightBind, WaybillTransRows.build(model)));
}
}
return GO_HOME(rightBind);
}
public static Result remove(Integer id, RightBind rightBind) {
Result hasProblem = AuthManager.hasProblem(rightBind.value, RightLevel.Delete, ACCEPTABLE_RIGHTS);
if (hasProblem != null) return hasProblem;
if (id == null) {
flash("error", Messages.get("id.is.null"));
} else {
WaybillTrans model = WaybillTrans.findById(id);
if (model == null) {
flash("error", Messages.get("not.found", Messages.get("transaction")));
} else {
if (model.isCompleted != null && model.isCompleted) {
flash("error", Messages.get("edit.striction.for_controller"));
return badRequest(form.render(dataForm.fill(model), rightBind, WaybillTransRows.build(model)));
} else {
String editingConstraintError = model.checkEditingConstraints();
if (editingConstraintError != null) {
flash("error", editingConstraintError);
return badRequest(form.render(dataForm.fill(model), rightBind, WaybillTransRows.build(model)));
}
Ebean.beginTransaction();
try {
model.delete();
TransStatusHistoryUtils.deleteAllHistory(Module.waybill, model.id);
Ebean.commitTransaction();
flash("success", Messages.get("deleted", Messages.get(rightBind.value.key)));
} catch (PersistenceException pe) {
Ebean.rollbackTransaction();
log.error(pe.getMessage());
flash("error", Messages.get("delete.violation", Messages.get(rightBind.value.key)));
return badRequest(form.render(dataForm.fill(model), rightBind, WaybillTransRows.build(model)));
}
}
}
}
return GO_HOME(rightBind);
}
/**
* Secilen kaydin kopyasini olusturur
*
* @param id
*/
public static Result createClone(Integer id) {
if (! CacheUtils.isLoggedIn()) return Application.login();
WaybillTrans source = WaybillTrans.findById(id);
Result hasProblem = AuthManager.hasProblem(source.right, RightLevel.Enable, ACCEPTABLE_RIGHTS);
if (hasProblem != null) return hasProblem;
TransMultiplier stm = new TransMultiplier();
stm.id = id;
stm.contact = source.contact;
stm.transNo = source.transNo;
stm.description = source.description;
Form<TransMultiplier> stmDataForm = form(TransMultiplier.class);
return ok(
trans_multiplier.render(stmDataForm.fill(stm), source.right)
);
}
/**
* Yeni kopyayi kaydeder
*/
public static Result saveClone() {
if (! CacheUtils.isLoggedIn()) return Application.login();
Form<TransMultiplier> stmDataForm = form(TransMultiplier.class);
Form<TransMultiplier> filledForm = stmDataForm.bindFromRequest();
Right right = Right.valueOf(filledForm.data().get("right"));
if(filledForm.hasErrors()) {
return badRequest(trans_multiplier.render(filledForm, right));
} else {
TransMultiplier stm = filledForm.get();
WaybillTrans waybillTrans = WaybillTrans.findById(stm.id);
WaybillTrans clone = CloneUtils.cloneTransaction(waybillTrans);
clone.isCompleted = Boolean.FALSE;
clone.status = Profiles.chosen().irsl_status;
clone.invoiceId = null;
clone.transDate = stm.transDate;
clone.transMonth = DateUtils.getYearMonth(stm.transDate);
clone.transYear = DateUtils.getYear(stm.transDate);
clone.deliveryDate = waybillTrans.deliveryDate;
clone.transNo = stm.transNo;
clone.depot = waybillTrans.depot;
clone.description = stm.description;
clone.contact = stm.contact;
clone.contactName = clone.contact.name;
clone.contactTaxNumber = clone.contact.taxNumber;
clone.contactTaxOffice = clone.contact.taxOffice;
clone.contactAddress1 = clone.contact.address1;
clone.contactAddress2 = clone.contact.address2;
for (WaybillTransDetail std : clone.details) {
std.id = null;
std.receiptNo = clone.receiptNo;
std.trans = clone;
std.contact = clone.contact;
std.completed = 0d;
std.cancelled = 0d;
CloneUtils.resetModel(std);
}
for (WaybillTransFactor stf : clone.factors) {
stf.id = null;
stf.trans = clone;
CloneUtils.resetModel(stf);
}
Ebean.beginTransaction();
try {
clone.save();
Ebean.commitTransaction();
return ok(Messages.get("saved", Messages.get(clone.right.key)));
} catch (PersistenceException pe) {
Ebean.rollbackTransaction();
log.error(pe.getMessage());
flash("error", Messages.get("unexpected.problem.occured", pe.getMessage()));
return badRequest(Messages.get("unexpected.problem.occured", pe.getMessage()));
}
}
}
private static void checkFirstConstraints(Form<WaybillTrans> filledForm) {
WaybillTrans model = filledForm.get();
if (model.transDate == null) {
filledForm.reject("transDate", Messages.get("error.required"));
}
if (model.contact.id == null) {
filledForm.reject("contact.name", Messages.get("is.not.null", Messages.get("contact")));
}
if (model.depot == null || model.depot.id == null) {
filledForm.reject("depot.id", Messages.get("is.not.null", Messages.get("depot")));
}
if (model.deliveryDate != null && model.deliveryDate.before(model.transDate)) {
filledForm.reject("deliveryDate", Messages.get("error.dateBefore", Messages.get("date.delivery")));
}
}
private static void checkSecondConstraints(Form<WaybillTrans> filledForm) {
WaybillTrans model = filledForm.get();
List<ValidationError> veList = new ArrayList<ValidationError>();
if (model.details != null && model.details.size() > 0) {
for (int i = 1; i < model.details.size() + 1; i++) {
WaybillTransDetail std = model.details.get(i-1);
if (std.quantity == null || std.quantity <= 0) {
veList.add(new ValidationError("stocks", Messages.get("cannot.be.zero.table", i)));
}
if (std.name != null && std.name.length() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.long.for.table", i, Messages.get("name"), 100)));
}
if (std.unit == null) {
veList.add(new ValidationError("stocks", Messages.get("is.not.null.for.table", i, Messages.get("unit"))));
}
if (Profiles.chosen().irsl_hasPrices) {
if (std.taxRate == null) std.taxRate = 0d;
if (std.discountRate1 == null) std.discountRate1 = 0d;
if (std.discountRate2 == null) std.discountRate2 = 0d;
if (std.discountRate3 == null) std.discountRate3 = 0d;
if (std.taxRate.doubleValue() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.high.for.table", i, Messages.get("tax_rate"), 100)));
}
if (std.discountRate1.doubleValue() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.high.for.table", i, Messages.get("stock.discount", 1), 100)));
}
if (std.discountRate2.doubleValue() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.high.for.table", i, Messages.get("stock.discount", 2), 100)));
}
if (std.discountRate3.doubleValue() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.high.for.table", i, Messages.get("stock.discount", 3), 100)));
}
if (std.discountRate1.doubleValue() + std.discountRate2.doubleValue() + std.discountRate3.doubleValue() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.high.for.table", i, Messages.get("stock.discount_rate_total"), 100)));
}
}
if (std.description != null && std.description.length() > 100) {
veList.add(new ValidationError("stocks", Messages.get("too.long.for.table", i, Messages.get("description"), 100)));
}
if (std.stock.id != null && Profiles.chosen().stok_hasLimitControls) {
Stock stock = Stock.findById(std.stock.id);
if (stock.maxLimit != null && stock.minLimit != null && (stock.maxLimit.doubleValue() > 0 || stock.minLimit.doubleValue() > 0)) {
double balance = Math.abs(QueryUtils.findStockBalance(stock.id, model.depot.id, std.id));
boolean isInput = model.transType.equals(TransType.Input);
if (isInput && balance + std.netInput.doubleValue() > stock.maxLimit.doubleValue()) {
veList.add(new ValidationError("stocks", Messages.get("greater.than.maximum.table", i, stock.maxLimit, (stock.maxLimit.doubleValue() - balance))));
} else if ((balance - std.netOutput.doubleValue() < stock.minLimit.doubleValue())) {
veList.add(new ValidationError("stocks", Messages.get("less.than.minimum.table", i, (stock.minLimit != null ? stock.minLimit : 0), balance)));
}
}
}
}
} else {
veList.add(new ValidationError("stocks", Messages.get("table.min.row.alert")));
}
if (veList.size() > 0) {
filledForm.errors().put("stocks", veList);
}
}
}