import java.util.*

import com.haulmont.cuba.core.global.*

import com.haulmont.cuba.core.entity.*;

import com.groupstp.rtneo.entity.*

import com.haulmont.cuba.core.entity.FileDescriptor

import com.haulmont.cuba.core.app.FileStorageAPI

import java.io.InputStream

import java.io.InputStreamReader

import java.io.ByteArrayOutputStream

import org.apache.commons.io.IOUtils

import java.nio.charset.StandardCharsets;

import com.opencsv.CSVReader;

import com.groupstp.rtneo.service.BillService

import java.text.SimpleDateFormat

import org.apache.commons.collections.CollectionUtils

import java.util.stream.Collectors;

import com.groupstp.rtneo.core.bean.tools.*

def period1 = '2019-01-01'

def period2 = '2019-12-01'

def paymentLimit = '2020-01-10'

def contractLimit = '2020-01-10'

FileStorageAPI fileStorageAPI=AppBeans.get(FileStorageAPI.NAME);

BillService billService = AppBeans.get(BillService.NAME)

DatePeriodTools datePeriodTools = AppBeans.get(DatePeriodTools.class)

//Контрагенты для исключения из файла

String id='e068eda2-d8df-5f43-1b30-7f86de1a550c'

FileDescriptor fd = dataManager.load(FileDescriptor.class)

.id(UuidProvider.fromString(id))

.view(View.MINIMAL)

.optional().orElse(null);

if(fd == null){throw new RuntimeException("fileNotFound")}

InputStream inputStream=fileStorageAPI.openStream(fd)

CSVReader reader = new CSVReader(new InputStreamReader(inputStream, "UTF-8"));

List<String> listInn = reader.readAll().stream()

.map{e->e[0]}.collect(Collectors.toList())

def tariffs = dataManager.loadValues('select t.tariff*1.2, t.dateSince, t.dateTill from rtneo$Tariff t where t.name = 1')

.properties("tariff", "from", "to")

.list()

def df1 = new SimpleDateFormat("yyyy-MM-dd")

def dateView = new SimpleDateFormat("dd-MM-yyyy")

Calendar periodEnd = Calendar.getInstance();

periodEnd.setTime(df1.parse(period2));

Date paymentLimitDate = df1.parse(paymentLimit)

Calendar beginYear = Calendar.getInstance();

beginYear.setTime(df1.parse("2019-01-01"));

def i = 0;

def contragents = dataManager.loadValues('select distinct c.id, c.inn, c.kpp, c.personalAccount, c.name from rtneo$Payment e join rtneo$Contragent c on e.inn = c.inn where not e.inn is null and e.createTs <= :paymentLimitDate and not c.personalAccount is null and not e.inn in :exclude and size(c.contracts) > 0 order by c.inn')

.properties("id", "inn", "kpp", "pa", "name")

.parameter("exclude", listInn)

.parameter("paymentLimitDate", paymentLimitDate)

.firstResult(i*1000)

.maxResults(1000)

.list();

def accrualsGroup = new TreeMap<>();

def contragentsGroup = new TreeMap<>();

//Коллекция исключенных объектов

Map<String, String> excluded = new HashMap<>()

//Формируем структуру данных

for(def contragent : contragents){

//Исключаем контрагентов с филиалами

if(contragents.stream().filter{e->e.getValue('inn') == contragent.getValue('inn')}.count() > 1){

excluded.putIfAbsent(contragent.getValue('inn'), "Fil")

continue;

}

//------------------------------------------------

//Исключаем контрагентов у кого есть арендаторы за которых он платит, не из БТ и нет перерасчета по факту за 2019 год

def isRent = dataManager.loadValue('select count(r) from rtneo$RealEstateRenter r where r.contragentRealEstate.contragent.id = :contragent and r.payOwner = true and (select count(c) from rtneo$Contract c where c.contragent.id = r.contragentRealEstate.contragent.id and (c.loadedFromBigTrio = true or (c.accepted = true and c.isFactRecalculation = true))) = 0', Integer.class)

.parameter("contragent", contragent.getValue('id'))

.optional().orElse(0)

if(isRent > 0){

excluded.putIfAbsent(contragent.getValue('inn'), "Rent")

continue

}

def payments = dataManager.load(Payment.class)

.query('select p from rtneo$Payment p where p.inn = :inn and p.createTs <= :paymentLimitDate')

.parameter('inn', contragent.getValue('inn'))

.parameter("paymentLimitDate", paymentLimitDate)

.view('_local')

.list();

if(payments.size() == 0) continue;

if(contragentsGroup[contragent.getValue('inn')] == null){

contragentsGroup[contragent.getValue('inn')] =[

'id' : contragent.getValue('id'),

'inn' : contragent.getValue('inn'),

'kpp' : contragent.getValue('kpp'),

'pa' : contragent.getValue('pa'),

'name' : contragent.getValue('name')

]

}

contragentsGroup[contragent.getValue('inn')]['payments'] = [:];

for(def payment : payments){

if(contragentsGroup[contragent.getValue('inn')]['payments'][dateView.format(payment.getDate())] == null){

contragentsGroup[contragent.getValue('inn')]['payments'][dateView.format(payment.getDate())] = [

'purpose' : payment.getPurpose(),

'sum' : payment.getSum()

]

}else{

contragentsGroup[contragent.getValue('inn')]['payments'][dateView.format(payment.getDate())]['sum'] += payment.getSum();

}

}

contragentsGroup[contragent.getValue('inn')]['accruals'] = [:];

accrualsGroup = [:];

beginYear.setTime(df1.parse("2019-01-01"));

Boolean failTariff = false

while(!beginYear.after(periodEnd)){

List<Accrual> accruals = billService.getBillsOnPeriod(UUID.fromString(contragent.getValue('id').toString()), beginYear.getTime())

def tariff = tariffs.stream().filter{e-> datePeriodTools.isPeriodIncluded(beginYear.getTime(), e.getValue('from'), e.getValue('to'))}.findFirst().orElse(null)

BigDecimal roundingTarif = new BigDecimal(tariff.getValue('tariff')).setScale(5, BigDecimal.ROUND_HALF_UP)

for(def accrual : accruals){

if(!accrual.getPrice().equals(roundingTarif)){

failTariff = true

}

tariffNoNDS = accrual.getPrice()*5/6;

if(accrualsGroup[dateView.format(accrual.getPeriod())]==null){

accrualsGroup[dateView.format(accrual.getPeriod())] = [

'period' : dateView.format(accrual.getPeriod()),

'number' : accrual.getDocumentNumber(),

'tariff' : tariffNoNDS,

'amountBase' : getNN(accrual.getAmountBase()),

'totalSumBaseNoNds' : getNN(accrual.getAmountBase())*tariffNoNDS,

'totalSumBase' : getNN(accrual.getTotalSumBase()),

'totalSum' : getNN(accrual.getTotalSum()),

'nds' : getNN(accrual.getNds()),

'residue' : 0,

'done' : false

]

}else{

accrualsGroup[dateView.format(accrual.getPeriod())]['amountBase'] += getNN(accrual.getAmountBase())

accrualsGroup[dateView.format(accrual.getPeriod())]['totalSumBaseNoNds'] += getNN(accrual.getAmountBase())*tariffNoNDS

accrualsGroup[dateView.format(accrual.getPeriod())]['totalSumBase'] += getNN(accrual.getTotalSumBase())

accrualsGroup[dateView.format(accrual.getPeriod())]['totalSum'] += getNN(accrual.getTotalSum())

}

}

beginYear.add(Calendar.MONTH, 1)

}

if(failTariff){

excluded.putIfAbsent(contragent.getValue('inn'), "Fail tariff")

continue

}

//Корректировка контрагентов со скидкой

// accrualsGroup.each{

//

// if(!it.getValue()['totalSum'].compareTo(it.getValue()['totalSumBase']) == 0){

// BigDecimal noNdsSum = it.getValue()['totalSum']/(100+it.getValue()['nds'])*100

// it.getValue().put('amountBase', noNdsSum/it.getValue()['tariff'])

// excluded.putIfAbsent(contragent.getValue('inn'), "discount")

// }

// }

Boolean isDiscount = false

accrualsGroup.each{

if(!it.getValue()['totalSum'].compareTo(it.getValue()['totalSumBase']) == 0)isDiscount = true

}

if(isDiscount){

excluded.putIfAbsent(contragent.getValue('inn'), "discount")

continue

}

contragentsGroup[contragent.getValue('inn')]['accruals'] = accrualsGroup;

}

//Выводим исключенные

_("-----------Excluded------------")

excluded.each{_(it)}

_("--------------End--------------")

//Форматируем данные для вывода

def res = [:]

for(def contr : contragentsGroup){

def sumPay = 0

def residue = 0

contr.getValue()['payments'].each{p -> sumPay += p.getValue()['sum']}

res[contr.getValue()['inn']] = [

'id' : contr.getValue()['id'],

'inn' : contr.getValue()['inn'],

'kpp' : contr.getValue()['kpp'],

'pa' : contr.getValue()['pa'],

'name' : contr.getValue()['name'],

'sumPayments' : sumPay,

'accruals': [:]

]

// def accrual = []

for(def accrualFor : contr.getValue()['accruals']){

if(sumPay > accrualFor.getValue()['totalSum']){

accrualFor.getValue()['done'] = true

}else{

accrualFor.getValue()['done'] = false

}

if(sumPay >= 0){

residue = sumPay

accrualFor.getValue()['residue'] = residue

}

sumPay -= accrualFor.getValue()['totalSum']

res[contr.getValue()['inn']]['accruals'][accrualFor.getValue()['period']]=accrualFor

}

}

res.each{_(it)}

_("!Наименование!ЛС!ИНН!КПП!Объем!Сумма!Остаток")

for(def item : res){

def rAmount = BigDecimal.ZERO

def rTotalSum = BigDecimal.ZERO

def period

HashMap<String, Object> mapResults = new HashMap<>()

for(def accrual : item.getValue()['accruals']){

if(!accrual.getValue().getValue()['done'])continue

rAmount += accrual.getValue().getValue()['amountBase']

rTotalSum += accrual.getValue().getValue()['totalSum']

}

mapResults.put("name", item.getValue()['name'])

mapResults.put("pa", item.getValue()['pa'])

mapResults.put("inn", item.getValue()['inn'])

mapResults.put("kpp", item.getValue()['kpp'])

mapResults.put("amount", rAmount.setScale(5, BigDecimal.ROUND_HALF_DOWN))

mapResults.put("totalSum", rTotalSum.setScale(2, BigDecimal.ROUND_HALF_DOWN))

mapResults.put("payments", item.getValue()['sumPayments'].setScale(2, BigDecimal.ROUND_HALF_DOWN))

def balance = item.getValue()['sumPayments'] - rTotalSum

mapResults.put("balance", balance.setScale(2, BigDecimal.ROUND_HALF_DOWN))

dateView.format(endMonth.getTime())

// _(mapResults)

printItemFromResultMapMin(mapResults)

}

//Calendar endMonth = Calendar.getInstance();

//endMonth.setTime(df1.parse(period1));

//_("!Наименование услуги!Дата договора!Основной договор!Номер УПД!Дата УПД!Дата корр.!ИНН!КПП!ЛС!Объем!Цена без НДС!Сумма без НДС!НДС!Цена с НДС!Оплачен период!Остаток на начало периода")

//res = [:]

//for(def itemRes : res){

// List<Contract> contractList = dataManager.load(Contract.class)

// .query('select c from rtneo$Contract c where c.contragent.id = :contragent and c.accepted is not null and c.accepted = true and c.from < :contractLimit order by c.createTs')

// .parameter("contragent", itemRes.getValue()['id'])

// .parameter("contractLimit", df1.parse(contractLimit))

// .view("contract-browse")

// .list()

// Boolean keyOutput = false

// for(def item : itemRes.getValue()['accruals']){

// if(dateView.parse(item.getKey()).compareTo(df1.parse(period1))<0)continue

//// _(item)

// def total = item.getValue().getValue()

//

// endMonth.setTime(dateView.parse(total['period'].toString()));

// endMonth.set(Calendar.DAY_OF_MONTH, endMonth.getActualMaximum(Calendar.DAY_OF_MONTH))

//

// def month = getTextPeriod(dateView.parse(total['period']))

//

// //Выводим один не оплаченный месяц

// if(total['done']!=true && !keyOutput){

// keyOutput = true

// }else if(total['done']!=true && keyOutput){

// continue

// }

//

// log.debug("!Услуга Регионального оператора по обращению с ТКО за ${month}!!!!${dateView.format(endMonth.getTime())}!!${itemRes.getValue()['inn']}!${itemRes.getValue()['kpp']}!${itemRes.getValue()['pa']}!!!!!!${total['done']==true?'да':'нет'}!${total['residue']}")

//

// List<HashMap> itemsList = new ArrayList<>()

// for(Contract contract : contractList){

// KeyValueEntity totalAccrualContract = dataManager.loadValues('select a.documentNumber, max(a.period), sum(a.amountBase), sum(a.amountBase)*max(a.price), max(a.price), sum(a.ndsSum), sum(a.totalSum) from rtneo$Accrual a where a.contractPosition.contract.id = :contract and a.period = :period group by a.documentNumber')

// .properties("number", "period", "amount", "totalSumWithNDS", "price", "totalNDS", "totalSum")

// .parameter("contract", contract.getId())

// .parameter("period",dateView.parse(total['period']))

// .optional()

// .orElse(null)

// String mainContractNumber = contract.getMainContract() != null ? contract.getMainContract().getNumber() : ''

// HashMap<String, Object> mapResults = new HashMap<>()

// if(totalAccrualContract == null){

//// _("!${contract.getNumber()}!No accruals in to period")

// }else{

// mapResults.put("cnumber", contract.getNumber())

// mapResults.put("cdate", contract.getMainContract()!=null ? '' : dateView.format(contract.getDate()))

// mapResults.put("cmnumber", mainContractNumber)

// mapResults.put("number", totalAccrualContract.getValue('number'))

// mapResults.put("period", dateView.format(endMonth.getTime()))

// mapResults.put("dateCor", contract.getMainContract()!=null?dateView.format(contract.getDate()):'')

// mapResults.put("amount", totalAccrualContract.getValue('amount'))

// mapResults.put("price", totalAccrualContract.getValue('price')*5/6)

// mapResults.put("totalSumNoNDS", totalAccrualContract.getValue('totalSum') - totalAccrualContract.getValue('totalNDS'))

// mapResults.put("totalNDS", totalAccrualContract.getValue('totalNDS'))

// mapResults.put("totalSum", totalAccrualContract.getValue('totalSum'))

// itemsList.add(mapResults)

// }

//

// }

//

// if(itemsList.size()>=1){

// printItemFromResultMap(itemsList.get(0))

// if(itemsList.size()>1){

// printItemFromResultMap(itemsList.get(itemsList.size()-1))

// }

// }

//

// }

//}

return true;

//Не используется

class itemResultComparator implements Comparator<HashMap<String, Object>>{

public int compare(HashMap<String, Object> a, HashMap<String, Object> b){

if(((String)a.get("cnumber")).equals((String)a.get("cnumber")))return 0;

if(((String)a.get("cnumber")).lenght() > 3 && ((String)b.get("cnumber")).lenght()<3)return 1;

if(((String)a.get("cnumber")).lenght() < 3 && ((String)b.get("cnumber")).lenght()>3)return -1;

return ((String)a.get("cnumber")).compareTo((String)b.get("cnumber"));

}

}

void printItemFromResultMapMin(HashMap<String, Object> current){

_("!${current.get('name')}!${current.get('pa')}!${current.get('inn')}!${current.get('kpp')}!${current.get('amount')}!${current.get('totalSum')}!${current.get('balance')}")

}

void printItemFromResultMap(HashMap<String, Object> current){

_("!${current.get('cnumber')}!${current.get('cdate')}!${current.get('cmnumber')}!${current.get('number')}!${current.get('period')}!${current.get('dateCor')}!!!!${current.get('amount')}!${current.get('price')}!${current.get('totalSumNoNDS')}!${current.get('totalNDS')}!${current.get('totalSum')}")

}

def getTextPeriod(Date date) {

def result=''

if (date != null) {

def monthesRP = ['январь','февраль','март','апрель','май','июнь','июль','август','сентябрь','октябрь','ноябрь','декабрь']

Calendar cal = Calendar.getInstance()

cal.setTime(date);

result+=monthesRP[cal.get(Calendar.MONTH)]

result+=" "+cal.get(Calendar.YEAR).toString()+" г."

}

return result

}

def getNN(BigDecimal value) {

return value == null ? BigDecimal.ZERO : value;

}

/**

* Логирование

*/

import com.haulmont.cuba.core.app.serialization.EntitySerializationAPI;

import com.groupstp.rtneo.util.JsonUtil;

import java.text.DateFormat;

import java.text.SimpleDateFormat;

private _(Object obj, String... options){

if(obj == null){log("LOG.ERROR: Object is null!!!");return}

if(options.size() == 0){log(obj)}

for(def option : options){

if(option.equals("str")){log(obj)}

if(option.equals("for")){obj.each({_(it)})}

if(option.equals("json")){

EntitySerializationAPI entitySerializationAPI = AppBeans.get(EntitySerializationAPI.NAME)

try{log(entitySerializationAPI.toJson(obj))}

catch(Exception e){log("LOG.ERROR: JSON entity serialization failed")}

}

if(option.equals("objJson")){

JsonUtil jsonUtil = AppBeans.get(JsonUtil.NAME)

try{log.(jsonUtil.toJson(obj))}

catch(Exception e){log("LOG.ERROR: JSON object serialization failed")}

}

if(option.equals("date")){

DateFormat df = new SimpleDateFormat("dd.MM.yyyy");

try{log(df.format(obj))}

catch(Exception e){log("LOG.ERROR: Failed date format")}

}

}

}

private log(Object obj){log.debug(obj)}