ConstructionCost/web/building_saas/main/js/models/calc_program.js

/**
 * Created by CSL on 2017-07-19.
 * 计算程序。所有定额、清单、父清单的计算都从此入。
 */

/*  新版GLD 取消了默认清单模板，所以这里废弃。先留着，预防不时之需。
let defaultBillTemplate = {
    ID: 15,
    name: "清单公式",
    calcItems: [
        {
            ID: 1,
            code: "1",
            name: "定额直接费",
            dispExpr: "F2+F3+F4",
            expression: "@('2')+@('3')+@('4')",
            statement: "人工费+材料费+机械费",
            feeRate: null,
            memo: ''
        },
        {
            ID: 2,
            code: "1.1",
            name: "人工费",
            dispExpr: "HJ",
            expression: "HJ",
            statement: "合计",
            feeRate: 50,
            fieldName: 'labour',
            memo: ''
        },
        {
            ID: 3,
            code: "1.2",
            name: "材料费",
            dispExpr: "HJ",
            expression: "HJ",
            statement: "合计",
            feeRate: 30,
            fieldName: 'material',
            memo: ''
        },
        {
            ID: 4,
            code: "1.3",
            name: "机械费",
            dispExpr: "HJ",
            expression: "HJ",
            statement: "合计",
            feeRate: 20,
            fieldName: 'machine',
            memo: ''
        },
        {
            ID: 5,
            code: "2",
            name: "企业管理费",
            dispExpr: "F1",
            expression: "@('1')",
            statement: "定额直接费",
            feeRate: null,
            fieldName: 'manage',
            memo: ''
        },
        {
            ID: 6,
            code: "3",
            name: "利润",
            dispExpr: "F1",
            expression: "@('1')",
            statement: "定额直接费",
            feeRate: null,
            fieldName: 'profit',
            memo: ''
        },
        {
            ID: 7,
            code: "4",
            name: "风险费用",
            dispExpr: "F1",
            expression: "@('1')",
            statement: "定额直接费",
            feeRate: null,
            fieldName: 'risk',
            memo: ''
        },
        {
            ID: 8,
            code: "5",
            name: "综合单价",
            dispExpr: "F1+F5+F6+F7",
            expression: "@('1')+@('5')+@('6')+@('7')",
            statement: "定额直接费+企业管理费+利润+风险费用",
            feeRate: null,
            fieldName: 'common',
            memo: ''
        }
    ]
};*/
let calcTools = {
    getNodeByFlag: function (flag) {
        let bill = cbTools.findBill(flag);
        if (bill) return this.getNodeByID(bill.ID)
        else return null;
    },
    getNodeByID: function (ID){
        return cbTools.getNodeByID(ID);
    },

    isBill: function(treeNode){
        return treeNode.sourceType === ModuleNames.bills;
    },
    isLeafBill: function(treeNode){
        return treeNode.sourceType === ModuleNames.bills &&
            treeNode.source.children &&
            treeNode.source.children.length === 0;
    },
    isNullBill: function (treeNode) {
        return this.isLeafBill(treeNode) && (treeNode.children.length === 0) && (!treeNode.data.calcBase);
    },
    isTotalCostBill: function (treeNode) {
        return treeNode.data.flagsIndex && treeNode.data.flagsIndex.fixed && treeNode.data.flagsIndex.fixed.flag &&
            treeNode.data.flagsIndex.fixed.flag == fixedFlag.ENGINEERINGCOST;
    },
    isRationCategory: function(treeNode){
        return treeNode.sourceType === ModuleNames.ration;
    },
    isRationItem: function(treeNode){
        return this.isRationCategory(treeNode) && treeNode.data.type === rationType.ration;
    },
    isVolumePrice: function (treeNode) {
        return this.isRationCategory(treeNode) && treeNode.data.type === rationType.volumePrice;
    },
    isGljRation: function (treeNode) {
        return this.isRationCategory(treeNode) && treeNode.data.type === rationType.gljRation;
    },

    initFees: function (treeNode){
        if (!treeNode.data.fees) {
            treeNode.data.fees = [];
            treeNode.data.feesIndex = {};
            treeNode.changed = true;
        }
        else if (!treeNode.data.feesIndex){
            treeNode.data.feesIndex = {};
            for (let fee of treeNode.data.fees){
                treeNode.data.feesIndex[fee.fieldName] = fee;
            };
            treeNode.changed = true;
        };
    },
    initFeeField: function (treeNode, fieldName){
        this.initFees(treeNode);
        if (!treeNode.data.feesIndex[fieldName]) {
            let fee = {
                'fieldName': fieldName,
                'unitFee': 0,
                'totalFee': 0,
                'tenderUnitFee': 0,
                'tenderTotalFee': 0
            };
            treeNode.data.fees.push(fee);
            treeNode.data.feesIndex[fieldName] = fee;
            treeNode.changed = true;
        };
    },
    checkFeeField: function (treeNode, feeObj){
        if (!feeObj) return;
        if (feeObj.fieldName == '') return;

        // 初始化前先拦截末定义的情况
        if (!treeNode.data.feesIndex || !treeNode.data.feesIndex[feeObj.fieldName]){
            if (feeObj.unitFee == 0 && feeObj.totalFee == 0) return;
        }

        this.initFeeField(treeNode, feeObj.fieldName);

        if (treeNode.data.feesIndex[feeObj.fieldName].unitFee != feeObj.unitFee){
            treeNode.data.feesIndex[feeObj.fieldName].unitFee = feeObj.unitFee;
            treeNode.changed = true;
        };

        if (treeNode.data.feesIndex[feeObj.fieldName].totalFee != feeObj.totalFee){
            treeNode.data.feesIndex[feeObj.fieldName].totalFee = feeObj.totalFee;
            treeNode.changed = true;
        };
    },
    initSummaryFee: function (treeNode){
        if (!treeNode.data.summaryFees){
            treeNode.data.summaryFees = {
                totalFee: 0,
                estimateFee: 0,
                safetyFee: 0,
                chargeFee: 0
            };
            treeNode.changed = true;
        };
    },
    // 参数fieldName值: 'common.totalFee'、'equipment.unitFee'
    getFee: function (treeNode, fieldName) {
        if (!treeNode) return 0;
        let ns = fieldName.split(".");
        if (ns.length != 2)
            return 0
        else if (treeNode.data.feesIndex[ns[0]] && treeNode.data.feesIndex[ns[0]][ns[1]])
            return parseFloat(treeNode.data.feesIndex[ns[0]][ns[1]])
        else
            return 0;
    },
    rationBaseFee: function (treeNode, gljTypes, priceType){
        if (!treeNode.data.gljList) return 0;
        let me = this, result = 0;
        let price = 0, temp = 0, temp2 = 0;
        for (let glj of treeNode.data.gljList) {
            if (gljTypes.indexOf(glj.type) >= 0) {
/*                if (priceType == priceTypes.ptDiffPrice){
                    let aprice = me.uiGLJPrice(glj["adjustPrice"]);
                    let mprice = me.uiGLJPrice(glj["marketPrice"]);
                    temp = (me.uiGLJQty(glj["quantity"]) * mprice).toDecimal(decimalObj.process) - (me.uiGLJQty(glj["quantity"]) * aprice).toDecimal(decimalObj.process);
                    temp = temp.toDecimal(decimalObj.process);
                }*/
                if (priceType == priceTypes.ptDiffPrice){
                    let aprice = me.uiGLJPrice(glj["adjustPrice"]);
                    let mprice = me.uiGLJPrice(glj["marketPrice"]);
                    if (aprice != mprice){
                        temp = (temp + (me.uiGLJQty(glj["quantity"]) * mprice).toDecimal(decimalObj.process)).toDecimal(decimalObj.process);
                        temp2 = (temp2 + (me.uiGLJQty(glj["quantity"]) * aprice).toDecimal(decimalObj.process)).toDecimal(decimalObj.process);
                    }
                }
                else {
                    if (priceType == priceTypes.ptBasePrice){ price = me.uiGLJPrice(glj["basePrice"]);}
                    else if (priceType == priceTypes.ptAdjustPrice){price = me.uiGLJPrice(glj["adjustPrice"]);}
                    else if (priceType == priceTypes.ptMarketPrice){price = me.uiGLJPrice(glj["marketPrice"]);}
                    temp = (me.uiGLJQty(glj["quantity"]) * price).toDecimal(decimalObj.process);
                    result = (result + temp).toDecimal(decimalObj.process);
                };
            };
        };

        if (priceType == priceTypes.ptDiffPrice){
            result = (temp.toDecimal(decimalObj.ration.unitPrice) - temp2.toDecimal(decimalObj.ration.unitPrice)).toDecimal(decimalObj.ration.unitPrice);
        }
        else{
            result = result.toDecimal(decimalObj.ration.unitPrice);
        };

        return result;
    },
    machineLabourFee: function (gljArr) {
        if (!gljArr) return 0;
        let result = 0;
        for (let glj of gljArr) {
            if (glj.type == gljType.GENERAL_MACHINE) {
                // 获取机械组成物
                let mds = projectObj.project.composition.getCompositionByGLJ(glj);
                if (!mds) mds = [];
                let mdSum = 0;
                for (let md of mds) {
                    if (md.type == gljType.MACHINE_LABOUR) {
                        let q = md["consumption"] ? md["consumption"] : 0;
                        let p = md["basePrice"] ? md["basePrice"] : 0;
                        mdSum = mdSum + (q * p).toDecimal(decimalObj.process);
                        mdSum = (mdSum).toDecimal(decimalObj.process);
                    }
                }
                result = result + (glj["quantity"] * mdSum).toDecimal(decimalObj.process);
                result = (result).toDecimal(decimalObj.process);
            }
        }
        return result;
    },
    // 父清单暂估费的汇总计算走计算程序逻辑，不在这里。这里的小数取舍比较复杂，必须严格遵循需求，不能随意改动，否则计算结果会有误差：如差1分钱。
    estimateFee: function (treeNode, isBase = false){
        let me = this, sumU = 0, sumT = 0;
        // 总造价暂估费
        if (me.isTotalCostBill(treeNode)){
            let nodes = projectObj.project.mainTree.roots;
            for (let node of nodes){
                if (me.isTotalCostBill(node)) break;
                let eU = 0, eT = 0;
                if (node.data.feesIndex && node.data.feesIndex.estimate){
                    eU = node.data.feesIndex.estimate.unitFee;
                    eT = node.data.feesIndex.estimate.totalFee;
                }
                else {
                    eU = 0, eT = 0;
                };
                sumU = (sumU + parseFloatPlus(eU)).toDecimal(decimalObj.process);
                sumT = (sumT + parseFloatPlus(eT)).toDecimal(decimalObj.process);
            };
            sumU = (sumU).toDecimal(decimalObj.bills.unitPrice);
            sumT = (sumT).toDecimal(decimalObj.bills.totalPrice);
        }
        else{
            if (!treeNode.data.gljList) return;
            // 单价
            for (let glj of treeNode.data.gljList) {
                if (!allMaterialTypes.includes(glj.type)) continue;
                if (glj.isEstimate){
                    sumU = sumU + (me.uiGLJQty(glj.quantity) * me.uiGLJPrice(glj.marketPrice)).toDecimal(decimalObj.process);
                    sumU = sumU.toDecimal(decimalObj.process);
                }
                else{   // 组成物
                    if (!compositionTypes.includes(glj.type)) continue;
                    let mds = projectObj.project.composition.getCompositionByGLJ(glj);
                    if (!mds) mds = [];
                    for (let md of mds){
                        if (!md.isEstimate) continue;
                        let mdU = (me.uiGLJQty(md.consumption) * me.uiGLJPrice(md.marketPrice)).toDecimal(decimalObj.glj.unitPrice);
                        sumU = sumU + (mdU * me.uiGLJQty(glj.quantity)).toDecimal(decimalObj.process);
                        sumU = sumU.toDecimal(decimalObj.process);
                    }
                }
            };
            sumU = sumU.toDecimal(decimalObj.bills.unitPrice);
            if (isBase) return sumU;

            // 合价：数量要先累计，然后乘单价，最后汇总
            let isGatherEstimate = (projectObj.project.property.zanguCalcMode == zanguCalcType.gatherMaterial);
            if (isGatherEstimate){
                let GLJObjs = [];
                let rq = me.uiNodeQty(treeNode);
                for (let glj of treeNode.data.gljList) {
                    if (!allMaterialTypes.includes(glj.type)) continue;
                    if (glj.isEstimate){
                        GLJObjs.push({code: glj.code, name: glj.name, specs: glj.specs, unit: glj.unit, type: glj.type,
                            quantity: (rq * glj.quantity).toDecimal(decimalObj.process),
                            marketPrice: glj.marketPrice});
                    }
                    else{   // 组成物
                        if (!compositionTypes.includes(glj.type)) continue;
                        let mds = projectObj.project.composition.getCompositionByGLJ(glj);
                        if (!mds) mds = [];
                        for (let md of mds){
                            if (md.isEstimate){
                                let isExist = false;
                                let totalQ = (rq * me.uiGLJQty(glj.quantity)).toDecimal(decimalObj.glj.quantity);
                                let mdQ = (totalQ * me.uiGLJQty(md.consumption)).toDecimal(decimalObj.process);

                                for (let obj of GLJObjs){
                                    if (gljOprObj.getIndex(md, gljKeyArray) == gljOprObj.getIndex(obj, gljKeyArray)){
                                        isExist = true;
                                        obj.quantity = (obj.quantity + mdQ).toDecimal(decimalObj.glj.quantity);
                                        break;
                                    }
                                };
                                if (!isExist)
                                    GLJObjs.push({code: md.code, name: md.name, specs: md.specs, unit: md.unit, type: md.type,
                                        quantity: mdQ, marketPrice: md.marketPrice});
                            }
                        }
                    }
                };

                for (let obj of GLJObjs){
                    sumT = sumT + (me.uiGLJQty(obj.quantity) * me.uiGLJPrice(obj.marketPrice)).toDecimal(decimalObj.process);
                    sumT = sumT.toDecimal(decimalObj.process);
                };
                sumT = sumT.toDecimal(decimalObj.bills.totalPrice);
            }
            else
                sumT = (me.uiNodeQty(treeNode) * sumU).toDecimal(decimalObj.bills.totalPrice);
        };

        me.checkFeeField(treeNode, {'fieldName': 'estimate', 'unitFee': sumU, 'totalFee': sumT});
    },
    marketPriceToBase: function (treeNode, baseName) {
        if (treeNode.data.type != rationType.volumePrice && treeNode.data.type != rationType.gljRation) return;
        let result = 0, me = this;
        if (
            (treeNode.data.subType === gljType.LABOUR && baseName === calcBaseNames.DEJJRGF) ||
            (baseMaterialTypes.includes(treeNode.data.subType) && baseName === calcBaseNames.DEJJCLF) ||
            (treeNode.data.subType === gljType.GENERAL_MACHINE && baseName === calcBaseNames.DEJJJXF) ||
            (treeNode.data.subType === gljType.MAIN_MATERIAL && baseName === calcBaseNames.ZCF) ||
            (treeNode.data.subType === gljType.EQUIPMENT && baseName === calcBaseNames.SBF)) {
            if (treeNode.data.type == rationType.volumePrice)
                result = treeNode.data.marketUnitFee ? parseFloat(treeNode.data.marketUnitFee).toDecimal(decimalObj.ration.unitPrice) : 0
            else if (treeNode.data.type == rationType.gljRation)
                // result = treeNode.data.basePrice ? parseFloat(treeNode.data.basePrice).toDecimal(decimalObj.ration.unitPrice) : 0;
                // 这里因为是算基数所以要取基价，但不能直接取basePrice，受限于项目属性的三个选项。
                result = gljOprObj.getBasePrice(treeNode);
        }
        else if (treeNode.data.subType === gljType.GENERAL_MACHINE && baseName === calcBaseNames.DEJJJSRGF) {
            let glj = {
                'code': treeNode.data.code,
                'name': treeNode.data.name,
                'specs': treeNode.data.specs,
                'unit': treeNode.data.unit,
                'quantity': 1,
                'type': treeNode.data.subType      // 注意：这里要取subType
            };
            result = me.machineLabourFee([glj]);
        }
        else if (
            (treeNode.data.type == rationType.gljRation) &&
            ((treeNode.data.subType === gljType.LABOUR && baseName === calcBaseNames.RGFJC) ||
                (baseMaterialTypes.includes(treeNode.data.subType) && baseName === calcBaseNames.CLFJC) ||
                (treeNode.data.subType === gljType.GENERAL_MACHINE && baseName === calcBaseNames.JXFJC))
        ) {
            let aprice = me.uiGLJPrice(treeNode.data.adjustPrice);
            let mprice = me.uiGLJPrice(treeNode.data.marketUnitFee);
            result = (mprice - aprice).toDecimal(decimalObj.ration.unitPrice);
        }
        return result;
    },
    partASupplyFee: function (treeNode, baseName) {
        if (!treeNode.data.gljList) return 0;
        let projectGLJ = projectObj.project.projectGLJ;

        let supplyT = [];
        if (baseName.includes('甲供'))
            supplyT = [supplyType.BFJG, supplyType.WQJG]  // 字段中存储的是汉字、数字混杂！
        else if (baseName.includes('甲定'))
            supplyT = [supplyType.JDYG];

        let gljT = [], compT = [];
        if (baseName == calcBaseNames.JGDEJJRGF || baseName == calcBaseNames.JDDEJJRGF){
            gljT = [gljType.LABOUR];
        }
        else if (baseName == calcBaseNames.JGDEJJCLF || baseName == calcBaseNames.JDDEJJCLF){
            gljT = baseMaterialTypes;
            compT = compositionTypes;
        }
        else if (baseName == calcBaseNames.JGDEJJJXF || baseName == calcBaseNames.JDDEJJJXF){
            gljT = baseMachineTypes;
            compT = [gljType.GENERAL_MACHINE];
        }
        else if (baseName == calcBaseNames.JGZCF || baseName == calcBaseNames.JDZCF){
            gljT = [gljType.MAIN_MATERIAL];
            compT = [gljType.MAIN_MATERIAL];
        }
        else if (baseName == calcBaseNames.JGSBF || baseName == calcBaseNames.JDSBF){
            gljT = [gljType.EQUIPMENT];
        };
        // alert(JSON.stringify(projectGLJ.testGLJs()));
        let supplyGLJs = projectGLJ.getGLJsBySupply(supplyT, gljT);
        if (supplyGLJs.length == 0) return 0;
        let supplyGLJsIdx = {};
        for (let sglj of supplyGLJs){supplyGLJsIdx[sglj.id] = sglj};

        function isSupply(composition, supplies) {
            for (let supply of supplies){
                if(supply.code == composition.code && supply.name == composition.name && supply.unit == composition.unit &&
                    supply.specs == composition.specs && supply.type == composition.type ){
                    composition.basePrice = supply.unit_price.base_price;
                    return true;
                }
            };
            return false;
        };

        let sum = 0;
        for (let glj of treeNode.data.gljList){
            // 组成物的母体。母体如果有组成物，则母体无法作为甲供材料，无法设置，此时要看其组成物是否是甲供材料；母体如果没有组成物，则母体有可能成为甲供材料。
            if (compT.includes(glj.type)) {
                if (supplyGLJsIdx[glj.projectGLJID]) {  // 组成物的母体是甲供材料
                    sum = (sum + glj.basePrice * glj.quantity).toDecimal(decimalObj.process);
                }
                else{  // 组成物明细
                    let pGLJ = projectGLJ.getDataByID(glj.projectGLJID);
                    let compositions = pGLJ.ratio_data;
                    if (compositions.length > 0){
                        for (let c of compositions){
                            if (isSupply(c, supplyGLJs)) {
                                sum = (sum + c.basePrice * c.consumption * glj.quantity).toDecimal(decimalObj.process);
                            }
                        };
                    }
                }
            }
            else {
                let tempSGLJ = supplyGLJsIdx[glj.projectGLJID];
                if (tempSGLJ) {
                    // 处理部分甲供
                    if (baseName.includes('甲供') && (tempSGLJ.supply == supplyType.BFJG)){
                        let Q = tempSGLJ.quantity ? tempSGLJ.quantity : 1;
                        let X = tempSGLJ.supply_quantity / Q;
                        sum = (sum + glj.basePrice * glj.quantity * X).toDecimal(decimalObj.process);
                    }
                    else
                        sum = (sum + glj.basePrice * glj.quantity).toDecimal(decimalObj.process);
                }
            };

        };
        sum = sum.toDecimal(decimalObj.ration.unitPrice);
        return sum;
    },
    getCalcType: function (treeNode) {
        if (this.isRationCategory(treeNode)){
            return treeNodeCalcType.ctRationCalcProgram;
        }
        else if (this.isNullBill(treeNode)){
            return treeNodeCalcType.ctNull;
        }
        else if (this.isLeafBill(treeNode)) {
            if (treeNode.children && treeNode.children.length > 0){
                // 清单单价计算模式下的叶子清单：取自己的计算程序ID，找到自己的计算程序计算。(汇总清单所有定额的工料机)
                if (projectObj.project.property.billsCalcMode === leafBillGetFeeType.billsPrice)
                    return treeNodeCalcType.ctBillCalcProgram;
                else                                        // 前三种计算模式下的叶子清单：汇总定额的计算程序的费用类别
                    return treeNodeCalcType.ctGatherRationsFees;
            }
            else{                                          // 公式计算
                return treeNodeCalcType.ctCalcBaseValue;
            };
        }
        else if (this.isBill(treeNode)) {                              // 父清单：汇总子清单的费用类别
            return treeNodeCalcType.ctGatherBillsFees;
        }
        else {
            return treeNodeCalcType.ctRationCalcProgram;
        };
    },
    cutNodeForSave(treeNode){
        let me = this;
        /*  subType、quantity、calcBase、programID、marketUnitFee等等字段较为特殊，它们的改变一定会触发计算并导致计算
            结果的变化，从而引发保存动作。将这些字段放在该位置跟计算结果一起保存，可减少前端跟后端的通讯频率。              */
        let data = {
            projectID: projectObj.project.ID(),
            ID: treeNode.data.ID,
            unit: treeNode.data.unit,   //对清单来说，改变单位，工程量精度会跟着改变从而影响计算。
            subType: treeNode.data.subType,
            quantity: treeNode.data.quantity,
            calcBase: treeNode.data.calcBase,
            calcBaseValue: treeNode.data.calcBaseValue,
            programID: treeNode.data.programID,
            marketUnitFee: treeNode.data.marketUnitFee,
            marketTotalFee: treeNode.data.marketTotalFee,
            fees: treeNode.data.fees,
            isFromDetail:treeNode.data.isFromDetail,
            feeRate: treeNode.data.feeRate,
            feeRateID: treeNode.data.feeRateID,
            contain: treeNode.data.contain,
            quantityEXP: treeNode.data.quantityEXP,
            summaryFees: treeNode.data.summaryFees
        };

        // 定额大类
        if (me.isRationCategory(treeNode)) {
            data.isSubcontract = treeNode.data.isSubcontract;

            //定额类型的工料机做特殊处理
            if(me.isGljRation(treeNode)){
                data.code = treeNode.data.code;
                data.projectGLJID = treeNode.data.projectGLJID;
                delete data.marketUnitFee;
            };
        };

        // 优化掉 undefined 属性
        data = JSON.parse(JSON.stringify(data));
        return data;
    },

    uiNodeQty: function (treeNode){
        return parseFloatPlus(treeNode.data.quantity).toDecimal(decimalObj.decimal("quantity", treeNode));
    },
    // 界面显示的工料机价格，包括定额价、市场价等。参数 price 传入一个普通的价格数值即可。
    uiGLJPrice: function (price){
        if (price)
            return parseFloat(price).toDecimal(decimalObj.glj.unitPrice)
        else return 0;
    },
    // 界面显示的工料机数量。参数 quantity 传入一个普通的数量数值即可。
    uiGLJQty: function (quantity){
        if (quantity)
            return parseFloat(quantity).toDecimal(decimalObj.glj.quantity)
        else return 0;
    }
};

const calcBaseNames = {
    DEJJRGF: '定额基价人工费',
    DEJJCLF: '定额基价材料费',
    DEJJJXF: '定额基价机械费',
    DEJJJSRGF: '定额基价机上人工费',
    RGFJC: '人工费价差',
    CLFJC: '材料费价差',
    JXFJC: '机械费价差',
    ZCF: '主材费',
    SBF: '设备费',
    RGGR: '人工工日',
    JGDEJJRGF: '甲供定额基价人工费',
    JGDEJJCLF: '甲供定额基价材料费',
    JGDEJJJXF: '甲供定额基价机械费',
    JGZCF: '甲供主材费',
    JGSBF: '甲供设备费',
    JDDEJJRGF: '甲定定额基价人工费',
    JDDEJJCLF: '甲定定额基价材料费',
    JDDEJJJXF: '甲定定额基价机械费',
    JDZCF: '甲定主材费',
    JDSBF: '甲定设备费',
    ZGCLF: '暂估材料费',
    FBDEJJRGF: '分包定额基价人工费',
    FBDEJJCLF: '分包定额基价材料费',
    FBDEJJJXF: '分包定额基价机械费',
    FBZCF: '分包主材费',
    FBSBF: '分包设备费',
    FBRGGR: '分包人工工日'
};

const rationCalcBases = {
    '定额基价人工费': function (node) {
        return calcTools.rationBaseFee(node, [gljType.LABOUR], priceTypes.ptBasePrice);
    },
    '定额基价材料费': function (node) {
        return calcTools.rationBaseFee(node, baseMaterialTypes, priceTypes.ptBasePrice);
    },
    '定额基价机械费': function (node) {
        return calcTools.rationBaseFee(node, [gljType.GENERAL_MACHINE], priceTypes.ptBasePrice);
    },
    '定额基价机上人工费': function (node) {
        return calcTools.machineLabourFee(node.data.gljList);
    },
    '人工费价差': function (node) {
        return calcTools.rationBaseFee(node, [gljType.LABOUR], priceTypes.ptDiffPrice);
    },
    '材料费价差': function (node) {
        return calcTools.rationBaseFee(node, baseMaterialTypes, priceTypes.ptDiffPrice);
    },
    '机械费价差': function (node) {
        return calcTools.rationBaseFee(node, [gljType.GENERAL_MACHINE], priceTypes.ptDiffPrice);
    },
    '主材费': function (node) {
        return calcTools.rationBaseFee(node, [gljType.MAIN_MATERIAL], priceTypes.ptMarketPrice);
    },
    '设备费': function (node) {
        return calcTools.rationBaseFee(node, [gljType.EQUIPMENT], priceTypes.ptMarketPrice);
    },
    '人工工日': function (node) {
        if (!node.data.gljList) return 0;
        let rst = 0;
        for (let glj of node.data.gljList) {
            if (glj.type == gljType.LABOUR) {
                rst = rst + (calcTools.uiGLJQty(glj["quantity"]) * calcTools.uiNodeQty(node)).toDecimal(decimalObj.process);
                rst = rst.toDecimal(decimalObj.process);
            }
        };
        return rst.toDecimal(decimalObj.glj.quantity);
    },
    '甲供定额基价人工费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JGDEJJRGF);
    },
    '甲供定额基价材料费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JGDEJJCLF);
    },
    '甲供定额基价机械费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JGDEJJJXF);
    },
    '甲供主材费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JGZCF);
    },
    '甲供设备费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JGSBF);
    },
    '甲定定额基价人工费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JDDEJJRGF);
    },
    '甲定定额基价材料费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JDDEJJCLF);
    },
    '甲定定额基价机械费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JDDEJJJXF);
    },
    '甲定主材费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JDZCF);
    },
    '甲定设备费': function (node) {
        return calcTools.partASupplyFee(node, calcBaseNames.JDSBF);
    },
    '暂估材料费': function (node) {
        return calcTools.estimateFee(node, true);
    },
    '分包定额基价人工费': function (node) {
        if (node.data.isSubcontract) return this.定额基价人工费(node)
        else return 0;
    },
    '分包定额基价材料费': function (node) {
        if (node.data.isSubcontract) return this.定额基价材料费(node)
        else return 0;
    },
    '分包定额基价机械费': function (node) {
        if (node.data.isSubcontract) return this.定额基价机械费(node)
        else return 0;
    },
    '分包主材费': function (node) {
        if (node.data.isSubcontract) return this.主材费(node)
        else return 0;
    },
    '分包设备费': function (node) {
        if (node.data.isSubcontract) return this.设备费(node)
        else return 0;
    },
    '分包人工工日': function (node) {
        if (node.data.isSubcontract) return this.人工工日(node)
        else return 0;
    }
};

let analyzer = {
    calcTemplate: null,

    standard: function(expr){
        let str = expr;
        str = str.replace(/\s/g, "");               // 去空格、去中文空格
        str = str.replace(/（/g, "(");              // 中文括号"（"换成英文括号"("
        str = str.replace(/）/g, ")");              // 中文括号"）"换成英文括号")"
        str = str.replace(/f/g, "F");               // f换成F
        return str;
    },
    getFArr: function (expr) {
        let pattF = new RegExp(/F\d+/gi);
        let arrF = expr.match(pattF);
        return arrF ? arrF : [];
    },
    getAtIDArr: function (expr) {
        let patt = new RegExp(/@\d+/gi);
        let arr = expr.match(patt);
        return arr ? arr : [];
    },
    getFID: function (FName) {          // F3、F22
        let me = this;
        let idx = FName.slice(1) - 1;
        let id = me.calcTemplate.calcItems[idx] ? me.calcTemplate.calcItems[idx].ID : null;
        return id;
    },
    getFItem: function (FName){
        let me = this;
        let idx = FName.slice(1) - 1;
        return me.calcTemplate.calcItems[idx];
    },
    isCycleCalc: function (expr) {     // @5+@6  这里已经是ID引用
        let me = this;
        
        function isCycle(nodeExpr) {
            let atIDArr = me.getAtIDArr(nodeExpr);
            for (let atID of atIDArr){
                let ID = atID.slice(1);
                let item = me.calcTemplate.compiledCalcItems[ID];
                if (item.expression.includes(atID)) {
                    return true;
                }
                else {
                    isCycle(item.expression);
                }
            };
            return false;
        };

        return isCycle(expr);
    },
    isLegal: function (expr) {   // 调用前必须先标准化
        let me = this;

        let invalidChars = /[^0-9\u4e00-\u9fa5\+\-\*\/\(\)\.\[\]F%]/g;
        if (invalidChars.test(expr)){
            alert('表达式中含有无效的字符！');
            return false;
        };

        let pattCn = new RegExp(/[\u4E00-\u9FA5]+/gi);
        let arrCn = expr.match(pattCn);
        let pattBase = new RegExp(/\[[\u4E00-\u9FA5]+\]/gi);
        let arrBase = expr.match(pattBase);
        if (arrCn.length != arrBase.length){
            for (let cn of arrCn){
                let tempBase = `[${cn}]`;
                  if (!arrBase.includes(tempBase)){
                      alert(`定额基数“${cn}”必须用中括号[]括起来！`);
                      return false;
                  }
            };
            // 这里要加一个保险。因为上面的 for 循环在“主材费 + [主材费]” 情况下有Bug
            alert('定额基数必须用中括号[]括起来！');
            return false;
        };

        for (let base of arrBase){
            let baseName = base.slice(1, -1);
            if (!rationCalcBases[baseName]){
                alert('定额基数 [' + baseName + '] 末定义！');
                return false;
            }
        };

        // 行引用检测、行引用转ID引用
        let arrF = me.getFArr(expr);
        for (let F of arrF){
            let num = F.slice(1);
            if (num > me.calcTemplate.calcItems.length){
                alert('表达式中 “F'+ num +'” 行号引用错误！');
                return false;
            };
            let id = me.getFID(F);
            let fn = new RegExp(F, "g");
            expr = expr.replace(fn, `@('${id}')`);
        };

        // 循环计算
        if (me.isCycleCalc(expr)){
            alert('表达式中有循环计算！');
            return false;
        }

        return true;
    },
    analyzeUserExpr: function(calcTemplate, calcItem){
        let me = this;
        me.calcTemplate = calcTemplate;
        let expr = calcItem.dispExpr;
        expr = me.standard(expr);
        calcItem.dispExpr = expr;
        if (me.isLegal(expr)){
            calcItem.expression = expr;
            return true;
        }else
            return false;
    }
};

let executeObj = {
    treeNode: null,
    template: null,
    tempCalcItem: null,

    at: function(ID) {
        let me = executeObj;
        let rst = me.template.compiledCalcItems[ID].unitFee;
        rst = parseFloat(rst);
        return rst;
    },
    base: function(baseName) {
        let me = executeObj;

        // 量价、工料机形式的定额, 要把自己的市场单价用于计算程序中的基数。
        if (calcTools.isVolumePrice(me.treeNode) || calcTools.isGljRation(me.treeNode))
            return calcTools.marketPriceToBase(me.treeNode, baseName)
        else{
            if (!rationCalcBases[baseName]){
                alert('定额基数“' + baseName + '”末定义，计算错误。 (模板 ' + me.template.ID + '，规则 ' + me.tempCalcItem.ID +')');
                return 0;
            }
            else
                return rationCalcBases[baseName](me.treeNode);
        }
    },
    HJ: function () {
        let me = this;
        let p = me.treeNode.data.calcBaseValue ? me.treeNode.data.calcBaseValue : 0;
        let q = calcTools.uiNodeQty(me.treeNode) ? calcTools.uiNodeQty(me.treeNode) : 1;
        let u = (p / q).toDecimal(decimalObj.decimal('unitPrice', me.treeNode));
        return u;
    }
};

class CalcProgram {
    constructor(project){
        let me = this;
        me.project = project;
        me.datas = [];
        project.registerModule(ModuleNames.calc_program, me);
    };

    // 兼容Project框架方法
    getSourceType () {
        return ModuleNames.calc_program;
    };

    // 兼容Project框架方法
    loadData (datas) {
        this.datas = datas;
        this.compileAllTemps();
    };

    // 兼容Project框架方法
    doAfterUpdate (err, data) {
        if(!err){
            $.bootstrapLoading.end();
        }
    };

    // 经测试，全部编译一次耗时0.003~0.004秒。耗时基本忽略不计。
    compileAllTemps(){
        let me = this;
        me.compiledFeeRates = {};
        me.compiledLabourCoes = {};
        me.compiledTemplates = {};
        me.compiledTemplateMaps = {};
        me.compiledTemplateNames = [];
        me.compiledFeeTypeMaps = {};
        me.compiledFeeTypeNames = [];
        me.compiledCalcBases = {};
        me.saveForReports = [];

        me.feeRates = this.project.FeeRate.datas.rates;
        me.labourCoes = this.project.labourCoe.datas.coes;
        me.feeTypes = cpFeeTypes;
        // me.calcBases = rationCalcBase;
        me.templates = this.project.calcProgram.datas.templates;

        // me.templates.push(defaultBillTemplate);
        // 先编译公用的基础数据
        me.compilePublics();
        for (let t of me.templates){
            me.compileTemplate(t);
        };

        // 存储费率临时数据，报表用。
        if (me.saveForReports.length > 0){
            let saveDatas = {};
            saveDatas.projectID = projectInfoObj.projectInfo.ID;
            saveDatas.calcItems = me.saveForReports;
            CommonAjax.post('/calcProgram/saveCalcItems', saveDatas, function (data) {
                me.saveForReports = [];
            });
        };
    };

    compilePublics(){
        let me = this;
        for (let rate of me.feeRates) {
            me.compiledFeeRates[rate.ID] = rate;
        }

        for (let coe of me.labourCoes) {
            me.compiledLabourCoes[coe.ID] = coe;
        }

        for (let ft of me.feeTypes) {
            me.compiledFeeTypeMaps[ft.type] = ft.name;
            me.compiledFeeTypeMaps[ft.name] = ft.type;    // 中文预编译，可靠性有待验证
            me.compiledFeeTypeNames.push(ft.name);
        }

/*        for (let cb of me.calcBases) {
            me.compiledCalcBases[cb.dispName] = cb;         // 中文预编译，可靠性有待验证
        }*/
    };

    compileTemplate(template){
        let me = this;
        me.compiledTemplates[template.ID] = template;
        me.compiledTemplateMaps[template.ID] = template.name;
        me.compiledTemplateMaps[template.name] = template.ID;
        me.compiledTemplateNames.push(template.name);
        template.hasCompiled = false;
        template.errs = [];

        let private_extract_ID = function(str, idx){
            let rst = '', lBracket = 0, rBracket = 0, firstIdx = idx, lastIdx = 0;
            for (let i = idx; i < str.length; i++) {
                if (str[i] === '(') {
                    lBracket++;
                    if (lBracket == 1) firstIdx = i + 1;
                }
                if (str[i] === ')') {
                    rBracket++;
                    if (lBracket == rBracket) {
                        lastIdx = i - 1;
                        if (lastIdx > firstIdx) {
                            if (str[firstIdx] === "'") firstIdx++;
                            if (str[lastIdx] !== "'") lastIdx++;
                            if (lastIdx > firstIdx) {
                                rst = str.slice(firstIdx, lastIdx);
                            }
                        }
                        break;
                    }
                }
            }
            return rst;
        };
        let private_parse_ref = function(item, itemIdx){
            let idx = item.expression.indexOf('@(', 0);
            while (idx >= 0) {
                let ID = private_extract_ID(item.expression, idx);
                if (ID.length > 0) {
                    let subItem = template.compiledCalcItems[ID];
                    if (subItem) {
                        if (subItem.ID !== item.ID) {
                            private_parse_ref(subItem, template.compiledCalcItems[ID + "_idx"]);
                        } else {
                            template.errs.push("There exists the self refer ID: " + ID);
                        }
                    } else {
                        template.errs.push("There exists the invalid ID by which could not find the item: " + ID);
                        console.log('invalid ID： ' + ID);
                    }
                }
                idx = item.expression.indexOf('@(', idx + ID.length + 3);
            }
            if (template.compiledSeq.indexOf(itemIdx) < 0) {
                template.compiledSeq.push(itemIdx);
            }
        };
        let private_compile_items = function() {
            for (let idx of template.compiledSeq) {
                let item = template.calcItems[idx];
                item.dispExprUser = item.dispExpr;    // 用于界面显示。disExpr是公式模板，不允许修改：人工系数占位符被修改后变成数值，第二次无法正确替换。
                if (item.expression == 'HJ')
                    item.compiledExpr = '$CE.HJ()'
                else{
                    item.compiledExpr = item.expression.split('@(').join('$CE.at(');
                    item.compiledExpr = item.compiledExpr.split('base(').join('$CE.base(');
                };

                if (item.labourCoeID){
                    let lc = me.compiledLabourCoes[item.labourCoeID].coe;
                    item.dispExprUser = item.dispExpr.replace(/L/gi, lc.toString());
                    item.compiledExpr = item.compiledExpr.replace(/L/gi, lc.toString());
                };

                if (item.feeRateID) {
                    let orgFeeRate = item.feeRate;
                    let cmf = me.compiledFeeRates[item.feeRateID];
                    item.feeRate = cmf?cmf.rate:100;

                    if (!orgFeeRate || (orgFeeRate && orgFeeRate != item.feeRate)){
                        me.saveForReports.push({templatesID: template.ID, calcItem: item});
                    }
                };

                // 字段名映射
                item.displayFieldName = me.compiledFeeTypeMaps[item.fieldName];
            }
        };

        if (template && template.calcItems && template.calcItems.length > 0) {
            template.compiledSeq = [];
            template.compiledCalcItems = {};

            for (let i = 0; i < template.calcItems.length; i++) {
                let item = template.calcItems[i];
                template.compiledCalcItems[item.ID] = item;
                template.compiledCalcItems[item.ID + "_idx"] = i;
            }

            for (let i = 0; i < template.calcItems.length; i++) {
                let item = template.calcItems[i];
                if (template.compiledSeq.indexOf(i) < 0) {
                    private_parse_ref(item, i);
                }
            }

            if (template.errs.length == 0) {
                private_compile_items();
                template.hasCompiled = true;
            } else {
                console.log('errors: ' + template.errs.toString());
            }
        };
    };

    // 存储、刷新零散的多个结点。
    saveNodes(treeNodes, callback){
        if (treeNodes.length < 1) {
            $.bootstrapLoading.end();
            return;
        }

        let me = this;
/*        me.project.beginUpdate('');
        for (let node of treeNodes){
            if (node.changed){
                let data = calcTools.cutNodeForSave(node);
                let newData = {'updateType': 'ut_update', 'updateData': data};
                me.project.push(node.sourceType, [newData]);
            }
        };
        me.project.endUpdate();*/

        let dataArr = [];
        for (let node of treeNodes){
            if (node.changed){
                let data = calcTools.cutNodeForSave(node);
                let newData = {'type': node.sourceType, 'data': data};
                dataArr.push(newData);
            }
        };
        if (dataArr.length < 1) {
            $.bootstrapLoading.end();
            return;
        };
        $.bootstrapLoading.start();
        me.project.updateNodes(dataArr, function (data) {
            if(callback){
                callback(data);
            };

            for (let node of treeNodes){delete node.changed};
            projectObj.mainController.refreshTreeNode(treeNodes);

            // 批量树结点计算后，计算程序早已物是人非，所以这里要重新计算一下。
            if (activeSubSheetIs(subSheetIndex.ssiCalcProgram)) {
                calcProgramObj.refreshCurNodeCalcItems(me.project.mainTree.selected);
            };
            $.bootstrapLoading.end();
        });
    };

    // 只计算treeNode自身。changedArr: 外部传来的一个数组，专门存储发生变动的节点。
    innerCalc(treeNode, changedArr){
        let me = this;
        // 仅用作树节点显示的工料机不能参与计算。
        if (treeNode.sourceType === ModuleNames.ration_glj) return;

        treeNode.calcType = calcTools.getCalcType(treeNode);

        function isBaseFeeType(type){
            return ['labour', 'material', 'machine', 'mainMaterial', 'equipment'].indexOf(type) > -1;
        };

        // 删掉多余的费用。例如：从其它计算方式切换到公式计算方式，会多出其它的费(不光是common)
        function deleteUselessFees(treeNode, fieldNameArr){
            if (fieldNameArr){   // 用于计算程序没有绑定的费用类别，不要同步到清单，而清单因为以前计算过该类别又有值，需删除。如切换取费类别，旧费要清掉。
                for (var i = 0; i < treeNode.data.fees.length; i++) {
                    let fee = treeNode.data.fees[i];
                    if (!fieldNameArr.includes(fee.fieldName)){
                        treeNode.data.fees.splice(i, 1);
                        delete treeNode.data.feesIndex[fee.fieldName];
                        treeNode.changed = true;
                    }
                }
            }
            else{   // 总造价清单只留common, estimate两个费用类别。其它公式清单只留common。
                let reserveArr = calcTools.isTotalCostBill(treeNode)? ['common', 'estimate']:['common'];
                if (treeNode.data.fees && treeNode.data.fees.length > 0){
                    let feesArr = treeNode.data.fees;
                    for (let i = 0; i < feesArr.length; i++) {
                        if (!reserveArr.includes(feesArr[i].fieldName)) {
                            delete treeNode.data.feesIndex[feesArr[i].fieldName];
                            feesArr.splice(i, 1);
                            treeNode.changed = true;
                        }
                    }
                };
            };
        };

        // 父清单汇总子项(子清单或定额)的费用类别
        if (treeNode.calcType == treeNodeCalcType.ctGatherBillsFees || treeNode.calcType == treeNodeCalcType.ctGatherRationsFees){
            treeNode.data.programID = null;
            calcTools.initFees(treeNode);
            let nodes = (treeNode.calcType == treeNodeCalcType.ctGatherBillsFees) ? treeNode.children : me.project.Ration.getRationNodes(treeNode);
            let rst = [];
            for (let ft of cpFeeTypes) {
                let isEstimate = ft.type == 'estimate';
                let ftObj = {};
                ftObj.fieldName = ft.type;
                ftObj.name = ft.name;
                let buf = 0, btf = 0, btuf = 0, bttf = 0;
                let bq = calcTools.uiNodeQty(treeNode) ? calcTools.uiNodeQty(treeNode) : 1;

                if (treeNode.calcType == treeNodeCalcType.ctGatherBillsFees){
                    for (let node of nodes) {
                        if (node.data.feesIndex && node.data.feesIndex[ft.type]) {
                            // 父清单不要汇总综合单价。
                            // buf = (buf + parseFloatPlus(node.data.feesIndex[ft.type].unitFee)).toDecimal(decimalObj.process);
                            btf = (btf + parseFloatPlus(node.data.feesIndex[ft.type].totalFee)).toDecimal(decimalObj.process);
                            // btuf = (btuf + parseFloatPlus(node.data.feesIndex[ft.type].tenderUnitFee)).toDecimal(decimalObj.process);
                            bttf = (bttf + parseFloatPlus(node.data.feesIndex[ft.type].tenderTotalFee)).toDecimal(decimalObj.process);
                        };
                    };
                }
                else if (treeNode.calcType == treeNodeCalcType.ctGatherRationsFees){     // 这里的算法要配合冷姐姐的神图才能看懂^_^
                    let sum_rtf = 0, sum_rttf = 0;
                    for (let node of nodes) {
                        let rq = calcTools.uiNodeQty(node) ? calcTools.uiNodeQty(node) : 0;
                        let ruf = 0, rtuf = 0, rtf = 0, rttf = 0;
                        if (node.data.feesIndex && node.data.feesIndex[ft.type]) {
                            ruf = parseFloatPlus(node.data.feesIndex[ft.type].unitFee).toDecimal(decimalObj.bills.unitPrice);
                            rtuf = parseFloatPlus(node.data.feesIndex[ft.type].tenderUnitFee).toDecimal(decimalObj.bills.unitPrice);
                            rtf = parseFloatPlus(node.data.feesIndex[ft.type].totalFee).toDecimal(decimalObj.bills.totalPrice);
                            rttf = parseFloatPlus(node.data.feesIndex[ft.type].tenderTotalFee).toDecimal(decimalObj.bills.totalPrice);
                        };
                        if (me.project.property.billsCalcMode === leafBillGetFeeType.rationContent) {
                            buf = (buf + (ruf * parseFloatPlus(node.data.contain)).toDecimal(decimalObj.bills.unitPrice)).toDecimal(decimalObj.process);
                            btuf = (btuf + (rtuf * parseFloatPlus(node.data.contain)).toDecimal(decimalObj.bills.unitPrice)).toDecimal(decimalObj.process);
                        };
                        sum_rtf = (sum_rtf + rtf).toDecimal(decimalObj.process);
                        sum_rttf = (sum_rttf + rttf).toDecimal(decimalObj.process);
                    };
                    if (isEstimate){
                        btf = sum_rtf;
                        bttf = sum_rttf;
                    }else{
                        if (me.project.property.billsCalcMode == leafBillGetFeeType.rationPriceConverse ||
                            me.project.property.billsCalcMode == leafBillGetFeeType.rationPrice) {
                            buf = (sum_rtf / bq).toDecimal(decimalObj.process);
                            btuf = (sum_rttf / bq).toDecimal(decimalObj.process);
                        };
                        if (isBaseFeeType(ft.type) ||
                            (me.project.property.billsCalcMode === leafBillGetFeeType.rationPrice && ft.type == "common")){
                            btf = sum_rtf;
                            bttf = sum_rttf;
                        }
                        else{
                            btf = (buf.toDecimal(decimalObj.bills.unitPrice) * bq).toDecimal(decimalObj.process);
                            bttf = (btuf.toDecimal(decimalObj.bills.unitPrice) * bq).toDecimal(decimalObj.process);
                        };
                    };
                };

                ftObj.totalFee = btf.toDecimal(decimalObj.bills.totalPrice);
                ftObj.tenderTotalFee = bttf.toDecimal(decimalObj.bills.totalPrice);
                if (isEstimate){
                    if (treeNode.calcType == treeNodeCalcType.ctGatherRationsFees){
                        ftObj.unitFee = (ftObj.totalFee / bq).toDecimal(decimalObj.bills.unitPrice);
                        ftObj.tenderUnitFee = (ftObj.tenderTotalFee / bq).toDecimal(decimalObj.bills.unitPrice);
                    }
                }
                else{
                    ftObj.unitFee = buf.toDecimal(decimalObj.bills.unitPrice);
                    ftObj.tenderUnitFee = btuf.toDecimal(decimalObj.bills.unitPrice);
                }

                calcTools.checkFeeField(treeNode, ftObj);

                rst.push(ftObj);
            };
            treeNode.data.calcTemplate = {"calcItems": rst};
        }
        // 叶子清单无子结点、无公式计算（啥都没有时）
        else if (treeNode.calcType == treeNodeCalcType.ctNull){
            delete treeNode.data.gljList;

            // 不能直接删除该属性，否则无法冲掉库中已存储的值。下同。
            if (treeNode.data.calcBase){
                treeNode.data.calcBase = null;
                treeNode.changed = true;
            }

            if (treeNode.data.calcBaseValue){
                treeNode.data.calcBaseValue = null;
                treeNode.changed = true;
            }

            if (treeNode.data.programID) {
                treeNode.data.programID = null;
                treeNode.changed = true;
            }

            if (treeNode.data.fees && treeNode.data.fees.length > 0){
                treeNode.data.fees = null;
                treeNode.data.feesIndex = null;
                treeNode.changed = true;
            }
            treeNode.data.calcTemplate = {"calcItems": []};
        }
        // 叶子清单公式计算
        else if (treeNode.calcType == treeNodeCalcType.ctCalcBaseValue){
            delete treeNode.data.gljList;

            if (treeNode.data.programID) {
                treeNode.data.programID = null;
                treeNode.changed = true;
            }

            let f = treeNode.data.feeRate ? treeNode.data.feeRate : 100;
            let b = treeNode.data.calcBaseValue ? treeNode.data.calcBaseValue : 0;
            let q = calcTools.uiNodeQty(treeNode) ? calcTools.uiNodeQty(treeNode) : 1;
            let uf = (b * f * 0.01 / q).toDecimal(decimalObj.bills.unitPrice);
            let tuf = uf;
            let tf = (me.project.property.billsCalcMode === leafBillGetFeeType.rationPrice) ? (b * f / 100) : (uf * q);
            tf = tf.toDecimal(decimalObj.bills.totalPrice);
            let ttf = tf;
            deleteUselessFees(treeNode);
            calcTools.checkFeeField(treeNode, {'fieldName': 'common', 'unitFee': uf, 'totalFee': tf});

            // 总造价清单还要做单项工程、建设项目的四大项金额汇总
            if (calcTools.isTotalCostBill(treeNode)){
                // 公式叶子清单没有暂估费，但总造价清单除外。
                calcTools.estimateFee(treeNode);
                calcTools.initSummaryFee(treeNode);
                treeNode.data.summaryFees.totalFee = tf;
                treeNode.data.summaryFees.estimateFee = calcTools.getFee(treeNode, 'estimate.totalFee');
                treeNode.data.summaryFees.safetyFee = calcTools.getFee(calcTools.getNodeByFlag(fixedFlag.SAFETY_CONSTRUCTION), 'common.totalFee');
                treeNode.data.summaryFees.chargeFee = calcTools.getFee(calcTools.getNodeByFlag(fixedFlag.CHARGE), 'common.totalFee');
            }

            treeNode.data.calcTemplate = {"calcItems": []};
        }
        // 定额或叶子清单自己的计算程序计算
        else{
            let fnArr = [];
            if (treeNode.calcType == treeNodeCalcType.ctRationCalcProgram) {
                if (treeNode.data.type == rationType.volumePrice || treeNode.data.type == rationType.gljRation){
                    delete treeNode.data.gljList;
                    let muf = treeNode.data.marketUnitFee ? treeNode.data.marketUnitFee : 0;
                    let q = calcTools.uiNodeQty(treeNode) ? calcTools.uiNodeQty(treeNode) : 0;
                    treeNode.data.marketTotalFee = (muf * q).toDecimal(decimalObj.ration.totalPrice);
                }
                else{
                    treeNode.data.gljList = me.project.ration_glj.getGljArrByRation(treeNode.data.ID);
                    // 计算程序里没有暂估费的计算规则，会漏掉，所以这里要专门算。
                    calcTools.estimateFee(treeNode);
                    fnArr.push('estimate');
                };

                if (treeNode.data.programID == undefined){
                    treeNode.data.programID = projectInfoObj.projectInfo.property.engineering;
                };
            }
            else if (treeNode.calcType == treeNodeCalcType.ctBillCalcProgram) {
                let rations = me.project.Ration.getBillsSortRation(treeNode.source.getID());
                let q = calcTools.uiNodeQty(treeNode) ? calcTools.uiNodeQty(treeNode) : 1;
                treeNode.data.gljList = me.project.ration_glj.getGatherGljArrByRations(rations, q);

                if (treeNode.data.programID == undefined){
                    treeNode.data.programID = projectInfoObj.projectInfo.property.engineering;
                }

                // 叶子清单自己的计算程序计算，其暂估费也要汇总算。
                calcTools.estimateFee(treeNode);
                fnArr.push('estimate');
            };

            let template = me.compiledTemplates[treeNode.data.programID];
            treeNode.data.calcTemplate = template;

            if (treeNode && template.hasCompiled) {
                let $CE = executeObj;
                $CE.treeNode = treeNode;
                $CE.template = template;

                calcTools.initFees(treeNode);

                for (let idx of template.compiledSeq) {
                    let calcItem = template.calcItems[idx];
                    $CE.tempCalcItem = calcItem;
                    let feeRate = parseFloatPlus(calcItem.feeRate) ? parseFloatPlus(calcItem.feeRate).toDecimal(decimalObj.feeRate) : 100;  // 100%
                    calcItem.unitFee = (eval(calcItem.compiledExpr) * feeRate * 0.01).toDecimal(decimalObj.decimal('unitPrice', treeNode));   // 如果eval()对清单树有影响，就换成小麦的Expression对象再试

                    let q = calcTools.uiNodeQty(treeNode) ? calcTools.uiNodeQty(treeNode) : 0;
                    calcItem.totalFee = (calcItem.unitFee * q).toDecimal(decimalObj.decimal('totalPrice', treeNode));

                    if (calcItem.fieldName) {
                        fnArr.push(calcItem.fieldName);
                        calcTools.checkFeeField(treeNode, calcItem);
                    };
                };
                deleteUselessFees(treeNode, fnArr);
            };
        };

        if (treeNode.changed && !changedArr.includes(treeNode)) changedArr.push(treeNode);
    };

    // 计算本节点、所有父节点(默认,可选)、公式引用节点(默认,可选)。
    calculate(treeNode, calcParents = true, calcFormulas = true){
        let me = this;
        let changedNodes = [];

        me.innerCalc(treeNode, changedNodes);

        if (treeNode.changed) {
            // 计算父结点
            if (calcParents){
                let curNode = treeNode.parent;
                while (curNode){
                    me.innerCalc(curNode, changedNodes);
                    curNode = curNode.parent;
                };
            };

            // 父结点算完，再计算所有的公式结点(必须先算完父结点，再算公式结点)
            if (calcFormulas) {
                me.calcFormulaNodes(changedNodes);
            };
        };

        return changedNodes;
    };

    /* 计算所有树结点(分3种情况)，并返回发生变动的零散的多个树结点。参数取值如下：
        calcAllType.catAll       计算所有树结点 (不指定参数时的默认值)
        calcAllType.catBills     计算所有清单 (改变项目属性中清单取费算法时会用到)
        calcAllType.catRations   计算所有定额、工料机形式的定额、量价，因为它们都走自己的计算程序 (改变人工系数、费率值、工料机单价时会用到)
    */
    calcAllNodes(calcType = calcAllType.catAll){
        let me = this;
        let changedNodes = [];

        function calcNodes(nodes) {
            for (let node of nodes) {
                if (node.children.length > 0) {
                    calcNodes(node.children);
                };

                if ((calcType == calcAllType.catAll || calcType == node.sourceType) && node.calcType != treeNodeCalcType.ctCalcBaseValue) {
                    me.innerCalc(node, changedNodes);
                };
            }
        };

        calcNodes(me.project.mainTree.roots);

        me.calcFormulaNodes(changedNodes);
        return changedNodes;
    };

    // 计算全部公式项。 (参数意义：将通过本方法后发生改变的节点存入changedNodesArr中)
    calcFormulaNodes(changedArr){
        let me = this;
        let formulaNodes = cbTools.getFormulaNodes(true);
        if (formulaNodes.length == 0) return;
        for (let formulaNode of formulaNodes){
            formulaNode.data.userCalcBase = formulaNode.data.calcBase;    // 这句不该出现，projectObj.project.calcBase中要改进。
            projectObj.project.calcBase.calculate(formulaNode, true);
            if (projectObj.project.calcBase.success){
                // 计算公式结点
                me.innerCalc(formulaNode, changedArr);

                // 计算父结点
                if (formulaNode.changed){
                    let curNode = formulaNode.parent;
                    while (curNode){
                        me.innerCalc(curNode, changedArr);
                        curNode = curNode.parent;
                    };
                };
            };
        };
    };

    // 计算叶子清单下的所有子结点、自身、所有父结点、公式引用结点(即跟该叶子清单相关的所有结点)。最后打包存储。
    calcLeafAndSave(treeNode){
        let me = this;
        if(!calcTools.isLeafBill(treeNode)) return;
        if (treeNode.children && treeNode.children.length > 0) {
            let changedNodes = [];
            for (let child of treeNode.children){
                me.innerCalc(child, changedNodes);
            };

            let curChangeds = me.calculate(treeNode);
            mergeArr(changedNodes, curChangeds);
            me.saveNodes(changedNodes);
        };
    };

    // 计算多条零散的定额，并计算他们所属的清单、父级清单，然后打包存储。如：批量替换工料机后受影响的定额。
    calcRationsAndSave(rationNodes, callback){
        let me = this, leafBills = [], allChangedNodes = [];
        for (let node of rationNodes) {
            me.innerCalc(node, allChangedNodes);
            let leafBill = node.parent;
            // 多条定额同属一条叶子清单时，避免叶子清单重复计算
            if (leafBill && leafBills.indexOf(leafBill) < 0) leafBills.push(leafBill);
        };

        for (let node of leafBills){
            let curChangeds = me.calculate(node);
            mergeArr(allChangedNodes, curChangeds);
        };

        me.saveNodes(allChangedNodes, callback);
    };

    // 计算多条零散的清单，并计算他们的父清单、引用清单，然后打包存储。如：花选删除树结点(如花选清单、定额等，不区分树结点类型)。
    calcBillsAndSave(billNodes,callback){
        let me = this, allChangedNodes = [];
        for (let node of billNodes) {
            let curChangeds = me.calculate(node, true, false);
            mergeArr(allChangedNodes, curChangeds);
        };
        me.calcFormulaNodes(allChangedNodes);
        me.saveNodes(allChangedNodes,callback);
    };

    // 计算并保存指定的一个树节点。修改一个树节点，实际上要计算和保存的是一批树结点：层层父结点、被其它结点(的公式)引用的公式结点。
    // 这个方法实际上封装了calculate()和saveNodes()两个方法，主要目的是为了外部调用方便，少写一点累赘代码。
    calcAndSave(treeNode, callback){
        let changedNodes = this.calculate(treeNode);
        this.saveNodes(changedNodes, callback);
    };

    calcAllNodesAndSave(calcType = calcAllType.catAll, callback){
        let changedNodes = this.calcAllNodes(calcType);
        this.saveNodes(changedNodes, callback);
    };

    // 排除指定项的综合合价计算（用于带循环计算的情况）
    getTotalFee(baseNodes, excludeNodes){
        let rst = 0;
        function calcNodes(nodes) {
            for (let node of nodes) {
                if (!excludeNodes.includes(node)){
                    if (node.children.length > 0) {
                        calcNodes(node.children);
                    }
                    else{
                        if (node.sourceType != ModuleNames.ration_glj) {
                            rst = (rst + calcTools.getFee(node, 'common.totalFee')).toDecimal(decimalObj.decimal("totalPrice", node));
                        };
                    }
                }
            }
        };
        calcNodes(baseNodes);
        return rst;
    };

    // 税前工程造价
    getBeforeTaxTotalFee(excludeNodes){
        let baseNodes = [], me = this;
        baseNodes.push(calcTools.getNodeByFlag(fixedFlag.SUB_ENGINERRING));
        baseNodes.push(calcTools.getNodeByFlag(fixedFlag.MEASURE));
        baseNodes.push(calcTools.getNodeByFlag(fixedFlag.OTHER));
        baseNodes.push(calcTools.getNodeByFlag(fixedFlag.CHARGE));
        return me.getTotalFee(baseNodes, excludeNodes);
    };
};