using System;
using System.Collections;
using System.Web.UI.WebControls;
using ErrorBuilder;
using InMeta.Comparer.Estate;
using Integro.InMeta.Estate.Forms.EstateRent;
using Integro.InMeta.Runtime;
using Integro.InMeta.Web;
using Integro.MyTableRender;

public partial class EstateDebitorsListBySubRgnNew : WebPage
{
    private class ItogByAllContract
    {
        public int DebitContractCount = 0;
        public int CreditContractCount = 0;
        public decimal DebitSum = 0;
        public decimal CreditSum = 0;
        public decimal FixedDebitSum = 0;
        public decimal FixedCreditSum = 0;
    }

    private readonly ItogByAllContract itogsByAllContract = new ItogByAllContract();
    private string SubRgnName
    {
        get{
            string result;
            if (ddSubRgnList.SelectedValue == "all"){
                result = "по всем районам";
            }
            else{
                result = string.Format("в {0} районе", ddSubRgnList.SelectedItem.Text.Replace("ий", "ом"));
            }
            return result;
        }
    }

    private string ContractStateKindText
    {
        get { return ddContractStateKindList.SelectedItem.Text; }
    }

    private double FSumArea = 0;
    private decimal FSumMonthPayment = 0;
    private decimal FSumPaymentCharge = 0;
    private decimal FSumPayment = 0;
    private decimal FSumWriteOff = 0;
    private decimal FSumTransfer = 0;
    private decimal FSumBalance = 0;
    private decimal FSumPenlaty = 0;
	private decimal FSumPaymentTransferPrevPeriods = 0;
    private int FDebtMonthCount = 0;
    private decimal FDebtSum = 0;
    private DateTime FCurrentDate;
    private DateTime FStartDate = new DateTime(2008, 01,01);
    private decimal FLastBalanceValue = 0;
    private decimal FCorrectionBalanceValue = 0;
    private int FActiveContract = 0;
    private int FContractWithoutCharges = 0;

    private decimal FSumPenaltyCharges = 0;
    private decimal FSumPenaltyPayments = 0;
    private decimal FSumPenaltyWriteOff = 0;
    private decimal FSumPenaltyStartBalance = 0;
	decimal FSumPenaltyStartBalancePrevSums = 0;
	private decimal FSumPenaltyTransfered = 0;
	private decimal FSumPaymentPenaltyTransferPrevPeriods = 0;

    protected void Page_Load(object sender, EventArgs e)
    {
    	ReportPanel.Visible = false;
    	PolicyFailedInfoPanel.Visible = false;

		if (!Session.IsPolicyEnabled("UseEstateChargesAndPaymentsReports")){
			PolicyFailedInfoPanel.Visible = true;
			return;
		}

		ReportPanel.Visible = true;
        if (IsPostBack){
            FStartDate = new DateTime(Convert.ToDateTime(DateEditor.Text).Year, 01, 01);
        }
        else{
            DateEditor.Text = DateTime.Today.ToShortDateString();
            
            string RegionID = Session.Application.Settings.GetLocalSettings("RegionID", "00018019E1C5");
            DataObjectList subRgnList = Session["General/SubRgn"].Query("<Name/>", "Region = '" + RegionID + "'");
            foreach (DataObject subRgn in subRgnList){
                ListItem item = new ListItem(subRgn.GetString("Name"), subRgn.Id.ToString());
                ddSubRgnList.Items.Add(item);
            }
        }
    }

    protected void OKBtn_Click(object sender, EventArgs e)
    {
        FCurrentDate = Convert.ToDateTime(DateEditor.Text);
        if (!ParamsFillIsCorrect()){
            Response.Write("Неверно введен один из параметров");
            return;
        }
        if (EdtMonthCount.Text != ""){
            FDebtMonthCount = Convert.ToInt32(EdtMonthCount.Text);
        }

        if (EdtDebtSum.Text != ""){
            FDebtSum = Convert.ToDecimal(EdtDebtSum.Text);
        }

        string SubRgnConditions = "";
        if (ddSubRgnList.SelectedValue != "all"){
            SubRgnConditions = " and BuildingID.General_PostAddr.SubRgn = '" + ddSubRgnList.SelectedValue+"'";
        }
        DataObjectList processList = Session[EstateRentClasses.Process].Query(
            "<RentContractProcessKind>" +
                "<Abbreviation/>" +
            "</RentContractProcessKind>" +
            "<Estate_RentContract>" +
                "<ContractNo/>" +
                "<ContractCode/>" +
            "</Estate_RentContract>" +
            "<Estate_RentPretender>" +
                "<Subject>" +
                    "<query-view name='PostAddrView'/>" +
                    "<Inn/>"+
                    "<SocialNo/>"+
                 "</Subject>" +                 
            "</Estate_RentPretender>" +
            "<Estate_RentObject>" +
                "<RentArea/>" +
            "</Estate_RentObject>" +
            "<Estate_RentCalculation>" +
                "<RentCalculatedPayment/>" +
            "</Estate_RentCalculation>" +
            "<Estate_RentPayment>" +
                "<RentPaymentValue/>" +
            "</Estate_RentPayment>" +
            "<Estate_RentPaymentCharge>" +
                "<OwnerPayment/>" +
            "</Estate_RentPaymentCharge>" +
            "<BuildingID>" +
               "<General_PostAddr>" +
                    "<SubRgn/>" +
               "</General_PostAddr>" +
            "</BuildingID>",
            "RentContractProcessKind.Abbreviation = 'ДА' " + SubRgnConditions);
        if (processList.Count == 0){
            Response.Write("<font color='red'>По данному району договоров не найдено</font>");
            return;
        }

        TableRender table = new TableRender(holder, "<h5>Привееет " + ContractStateKindText +
            " договорам аренды помещений, расположенных " + SubRgnName + " г. Оренбурга по состоянию на " +
            FCurrentDate.ToShortDateString() + "</h5>");

        ReportErrorsBuilder errorsBuilder = new ReportErrorsBuilder("EstateDebitorsListBySubRgnNew");
       
        FormingHeaderDataTable(table);
        FormingDataTable(processList, table, errorsBuilder);
        FillItogInformation(table);
        FormingErrors(errorsBuilder);

        btnExportToExcel.Enabled = true;
        btnExportToWord.Enabled = true;
    }

    private void FormingErrors(ReportErrorsBuilder errorsBuilder)
    {
        if(errorsBuilder.ErrorIsExist) {
            LblErrorCaption.Visible = true;
            HyperLinkError.Visible = true;
            string logfilePath = errorsBuilder.CreateErrorTableFile();
            LblErrorCaption.Text = "<font color='red'>При формировании отчета возникли ошибки</font>";
            HyperLinkError.Text = "Просмотреть ошибки";
            HyperLinkError.NavigateUrl = logfilePath;

            LblErrorCaption.Visible = true;
            HyperLinkError.Visible = true;
        }
    }

	private void GetSubRgnNameAndFillRow(string subRgnId, TableRender table)
	{
		if (ddSubRgnList.SelectedValue == "all"){
			if (subRgnId != "000000000001"){
				DataObject subRgn = Session["General/SubRgn"].GetObject(new DataId(subRgnId));
				SetSubRgnRow(table, subRgn.GetString("Name"));
			}
			else{
				SetSubRgnRow(table, "Район не задан");
			}
		}
	}

	private void SortProcessBySubRgn(DataObjectList processList, Hashtable ProcessBySubRgnList)
	{
		foreach (DataObject process in processList){
			DataObject lastProcessInHierarchy = WorkUtils.GetEstateLastDSVI(process);

			if (!ContractStateKindIsCorrect(lastProcessInHierarchy)){
			    continue;
			}
			SortingProcessBySubRgn(lastProcessInHierarchy, ProcessBySubRgnList);
		}
	}

	private BalanceInfoForProcess FormingData(DataObject process)
    {
		BalanceInfoForProcess infoByRCP = FinishBalanceInfoCalculator.GetCalculatedBalance(process, FStartDate, FCurrentDate);
		
		return infoByRCP;
    }

	private decimal GetPenaltyTransferedSum(BalanceInfoForProcess infoByRCP)
	{
		decimal penaltyTransferSum = 0;
		foreach (TransferSumInfo transferSumInfo in infoByRCP.TransferSumInfos)
		{
			if (!transferSumInfo.IsPenalty) continue;

			penaltyTransferSum += GetTransferSumByPayment(transferSumInfo);

			penaltyTransferSum += GetTransferSumByDebt(transferSumInfo);
		}
		return penaltyTransferSum;
	}

	private decimal GetTransferSumByDebt(TransferSumInfo transferSumInfo)
	{
		decimal transferSum = 0;
		if (transferSumInfo.TransferSumKind == TransferSumKind.Debt)
		{
			if (transferSumInfo.TransferSumLocation == TransferSumLocation.FromContract)
			{
				transferSum += transferSumInfo.TransferSum;
			}
			if (transferSumInfo.TransferSumLocation == TransferSumLocation.ToContract)
			{
				transferSum += transferSumInfo.TransferSum * -1;
			}
		}
		return transferSum;
	}

	private decimal GetTransferSumByPayment(TransferSumInfo transferSumInfo)
	{
		decimal transferSum = 0;
		if (transferSumInfo.TransferSumKind == TransferSumKind.Payment)
		{
			if (transferSumInfo.TransferSumLocation == TransferSumLocation.FromContract){
				transferSum += transferSumInfo.TransferSum * -1;
			}
			if (transferSumInfo.TransferSumLocation == TransferSumLocation.ToContract){
				transferSum += transferSumInfo.TransferSum;
			}
		}
		return transferSum;
	}

	private void SetSubRgnRow(TableRender table, string subRgnName)
    {
        TableRow row = new TableRow();
        table.AddReportCell(row, "<b>" + subRgnName + " район</b>", 13, HorizontalAlign.Center);
        table.TableReport.Rows.Add(row);
    }

    private void SortingProcessBySubRgn(DataObject lastDsvi, Hashtable ProcessBySubRgnList)
    {
        DataObject building = lastDsvi.GetLink("BuildingID");
        DataObject buildingAddr = building.GetChilds(EstateRentClasses.PostAddr).First;
        
        string subRgnId;
        if (!buildingAddr["SubRgn"].IsNull){
            subRgnId = buildingAddr.GetLink("SubRgn").Id.ToString();
        }
        else{
            subRgnId = "000000000001";
        }

        if (ProcessBySubRgnList.ContainsKey(subRgnId)){
            ArrayList processList = (ArrayList)ProcessBySubRgnList[subRgnId];
            processList.Add(lastDsvi);
        }
        else{
            ArrayList processList = new ArrayList();
            processList.Add(lastDsvi);
            ProcessBySubRgnList.Add(subRgnId, processList);
        }
    }

    private bool ParamsFillIsCorrect()
    {
        bool result = true;
        if (EdtMonthCount.Text != ""){
            try{
                Convert.ToInt32(EdtMonthCount.Text);
            }
            catch { result = false; }
        }

        if (EdtDebtSum.Text != ""){
            try{
                Convert.ToDecimal(EdtDebtSum.Text);
            }
            catch { result = false; }
        }

        return result;
    }

    private bool ProcessIsRightConditions(DataObject process, BalanceInfoForProcess infoByRCP)
    {
        bool result = true;
        if (ddDebtKindList.SelectedValue != "all"){
            if (ddDebtKindList.SelectedValue == "debt" && infoByRCP.FinishBalanceValue <= 0){
                result = false;
            }
            if ((ddDebtKindList.SelectedValue == "credit") && (infoByRCP.FinishBalanceValue >= 0)){
                result = false;
            }
        }
        if (FDebtMonthCount > 0 && FDebtMonthCount > GetMonthCountDebt(process, infoByRCP)){
            result = false;
        }
        
        if (FDebtSum > 0 && FDebtSum > infoByRCP.FinishBalanceValue){
            result = false;
        }

        return result;
    }


    private void FillDataTable(TableRender table, DataObject process, DataObject lastDsvi, BalanceInfoForProcess infoByRCP)
    {
        FActiveContract++;
        TableRow dataRow = new TableRow();
        table.AddReportCell(dataRow, GetContractNo(process));
        table.AddReportCell(dataRow, GetContractCode(process));
        table.AddReportCell(dataRow, GetPretenderName(lastDsvi));
        table.TableReport.Rows.Add(dataRow);
    }


    private string GetPretenderName(DataObject process)
    {
        DataObjectChildList pretenderChildList = process.GetChilds(EstateRentClasses.Pretender);
        if(pretenderChildList.Count == 0){
            return string.Empty;
        }

        DataObject pretender = pretenderChildList.First;

        if (pretender["Subject"].IsNull){
            return string.Empty;
        }

        return pretender.GetLink("Subject").GetViewHtml("PostAddrView");
    }


    private string GetContractCode(DataObject process)
    {
        if(!process["RootRCP"].IsNull) {
            process = process.GetLink("RootRCP");
        }
        
        return EstateUtils.GetContract(process).GetString("ContractCode", string.Empty);
    }

    private string GetContractNo(DataObject process)
    {
        if (!process["RootRCP"].IsNull){
            process = process.GetLink("RootRCP");
        }


        return EstateUtils.GetContract(process).GetString("ContractNo", string.Empty);
    }

    private void FormingHeaderDataTable(TableRender table)
    {
        TableRow row = new TableRow();
        table.AddReportCell(row, "<b>Номер договора</b>");
        table.AddReportCell(row, "<b>Шифр</b>");
        table.AddReportCell(row, "<b>Арендатор</b>");
        table.TableReport.Rows.Add(row);
    }

}