///////////////////////////////////////////////////////////////
//
// 架空线路
//
///////////////////////////////////////////////////////////////
BEGIN:回路数
${
	setparam("变量值", "");
	for(@线路特征,"线路特征",
    ?{
      #{
		->(线路特征.特征段 == 1 && (strFind(线路特征.回路类型,"单回路")>= 0 || strFind(线路特征.回路类型,"已有一回,新建第二回")>= 0))
		:
		setparam("变量值", "单回");		
		->(线路特征.特征段 == 1 && (strFind(线路特征.回路类型,"同时架设双回路")>= 0 || strFind(线路特征.回路类型,"已有一回,新建双回路")>= 0))
		:
		setparam("变量值", "双回");
		->(线路特征.特征段 == 1 && (strFind(线路特征.回路类型,"同时架设三回路")>= 0 || strFind(线路特征.回路类型,"已有一回,新建三回路")>= 0))
		:
		setparam("变量值", "三回");
		->(线路特征.特征段 == 1 && (strFind(线路特征.回路类型,"同时架设四回路")>= 0 || strFind(线路特征.回路类型,"已有一回,新建四回路")>= 0))
		:
		setparam("变量值", "四回");
		->(线路特征.特征段 == 1 && strFind(线路特征.回路类型,"已有一回,新建五回路") >= 0 )
		:
		setparam("变量值", "五回");
		->(线路特征.特征段 == 1 && strFind(线路特征.回路类型,"同时架设六回路") >= 0 )
		:
		setparam("变量值", "六回");

		->strFind(线路特征.回路类型,"单回路") > 0 || strFind(线路特征.回路类型,"已有一回,新建第二回") > 0 || strFind(线路特征.回路类型,"双") > 0 || strFind(线路特征.回路类型,"三") >0 || strFind(@监理费.属性.回路类型,"四") >0 || strFind(线路特征.回路类型,"五") >0 || strFind(线路特征.回路类型,"六") >0 
		:
		setparam("变量值", "混合");
		};
    }, ?0);
  getparam("变量值");
}

BEGIN:折单回总长度
${
	?round(折单回总长度_未截位(),3);
}

BEGIN:折单回总长度_未截位
${
	setparam("变量值", 0);
	for(@线路特征,"线路特征",
    ?{
      #{
	  ->(strFind(线路特征.回路类型, "单回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 1*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "同时架设双回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 2*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "同时架设三回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 3*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "同时架设四回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 4*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "同时架设六回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 6*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "已有一回,新建第二回") >= 0 )
        :setparam("变量值", getparam("变量值") + 1*线路特征.架线长度);
	  ->(strFind(线路特征.回路类型, "已有一回,新建双回路") >= 0 )
		:setparam("变量值", getparam("变量值") + 2*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "已有一回,新建三回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 3*线路特征.架线长度);
	  ->(strFind(线路特征.回路类型, "已有一回,新建四回路") >= 0 )
		:setparam("变量值", getparam("变量值") + 4*线路特征.架线长度);
	  ->(strFind(线路特征.回路类型, "已有一回,新建五回路") >= 0 )
		:setparam("变量值", getparam("变量值") + 5*线路特征.架线长度);
      };
    }, ?0);
    getparam("变量值");
}

BEGIN:折单回单位单价
${
  setparam("变量值",0);
  setparam("中间值",0);
  
  iif(@报表属性.总算表取整 == "1" && (@工程信息.报表类型=="概算报表" || @工程信息.报表类型=="预算报表"),
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "总算表万元")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="工程动态投资",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  },
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "工程费用")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="工程动态投资",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  });  
  iif(@报表属性.总算表取整 == "1" && (@工程信息.报表类型=="招标报表" || @工程信息.报表类型=="投标报表" || @工程信息.报表类型=="结算报表"),
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "总算表万元")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="总金额",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  },
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "工程费用")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="总金额",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  });
   setparam("变量值", ?round(getparam("中间值")/折单回总长度_未截位(),3)); 
   getparam("变量值");
}


BEGIN:单回长度
${
	setparam("变量值", 0);
	for(@线路特征,"线路特征",
    ?{
       #{
	  ->(strFind(线路特征.回路类型, "单回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 线路特征.架线长度);
      };
    }, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
    getparam("变量值");
}

BEGIN:双回长度
${
	setparam("变量值", 0);
	for(@线路特征,"线路特征",
    ?{
       #{
	  ->(strFind(线路特征.回路类型, "同时架设双回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 线路特征.架线长度);
      };
    }, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
    getparam("变量值");
}

BEGIN:三回长度
${
	setparam("变量值", 0);
	for(@线路特征,"线路特征",
    ?{
       #{
	  ->(strFind(线路特征.回路类型, "同时架设三回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 线路特征.架线长度);
      };
    }, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
    getparam("变量值");
}

BEGIN:四回长度
${
	setparam("变量值", 0);
	for(@线路特征,"线路特征",
    ?{
       #{
	  ->(strFind(线路特征.回路类型, "同时架设四回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 线路特征.架线长度);
      };
    }, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
    getparam("变量值");
}

BEGIN:加挂导线
${
	setparam("变量值", 0);
	for(@线路特征,"线路特征",
    ?{
      #{
      ->(strFind(线路特征.回路类型, "已有一回,新建第二回") >= 0 )
        :setparam("变量值", getparam("变量值") + 1*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "已有一回,新建双回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 2*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "已有一回,新建三回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 3*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "已有一回,新建四回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 4*线路特征.架线长度);
      ->(strFind(线路特征.回路类型, "已有一回,新建五回路") >= 0 )
        :setparam("变量值", getparam("变量值") + 5*线路特征.架线长度);
      };
    }, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
    getparam("变量值");
}

BEGIN:平地
${
	100-丘陵()-河网()-泥沼()-山地()-高山()-峻岭()-沙漠();
}

BEGIN:丘陵
${
  setparam("当前最大次数", 0);
  setparam("丘陵", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("丘陵", 地形系数.地形比例丘陵);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("丘陵");
}


BEGIN:河网
${
  setparam("当前最大次数", 0);
  setparam("河网", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("河网", 地形系数.地形比例河网);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("河网");
}

BEGIN:泥沼
${
  setparam("当前最大次数", 0);
  setparam("泥沼", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("泥沼", 地形系数.地形比例泥沼);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("泥沼");
}

BEGIN:山地
${
  setparam("当前最大次数", 0);
  setparam("山地", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("山地", 地形系数.地形比例一般山地);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("山地");
}

BEGIN:高山
${
  setparam("当前最大次数", 0);
  setparam("高山", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("高山", 地形系数.地形比例高山大岭);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("高山");
}

BEGIN:峻岭
${
  setparam("当前最大次数", 0);
  setparam("峻岭", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("峻岭", 地形系数.地形比例峻岭);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("峻岭");
}

BEGIN:沙漠
${
  setparam("当前最大次数", 0);
  setparam("沙漠", 0);
  setparam("地形关键字序号", 0);
  setparam("当前地形关键字序号", 99);
  for(@地形系数,"地形系数",
  ?{
    setparam("地形关键字", ftos(地形系数.地形比例丘陵) + "," + ftos(地形系数.地形比例河网) + "," + ftos(地形系数.地形比例泥沼) + "," + ftos(地形系数.地形比例一般山地) + "," + ftos(地形系数.地形比例高山大岭) + "," + ftos(地形系数.地形比例峻岭) + "," + ftos(地形系数.地形比例沙漠));
    iif(getparam(getparam("地形关键字")) == "", 
    ?{
    setparam(getparam("地形关键字"), 0);
    },?0);    
    setparam(getparam("地形关键字"), getparam(getparam("地形关键字")) + 1);
    iif(getparam(getparam("地形关键字")) == 1,
    ?{
    setparam(getparam("地形关键字") + "序号", getparam("地形关键字序号"));
    setparam("地形关键字序号", getparam("地形关键字序号") + 1);
    },?0);
    iif((getparam(getparam("地形关键字")) > getparam("当前最大次数")) || (getparam(getparam("地形关键字")) == getparam("当前最大次数") && getparam(getparam("地形关键字") + "序号") < getparam("当前地形关键字序号")),
    ?{
    setparam("沙漠", 地形系数.地形比例沙漠);
    setparam("当前最大次数", getparam(getparam("地形关键字")));
    setparam("当前地形关键字序号", getparam(getparam("地形关键字") + "序号"));
    },?0);
   },?0);
  getparam("沙漠");
}

BEGIN:交叉跨越_铁路
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && in(消耗量.编码,"YX5-80~88"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:交叉跨越_高速公路
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && in(消耗量.编码,"YX5-107~115"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:交叉跨越_公路
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && in(消耗量.编码,"YX5-98~106"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:交叉跨越_河流
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && in(消耗量.编码,"YX5-177~184"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:交叉跨越_高压线路
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && (in(消耗量.编码,"YX5-117~123") || 消耗量.编码 == "YX5-125" || in(消耗量.编码,"YX5-127~128") || in(消耗量.编码,"YX5-130~132") || in(消耗量.编码,"YX5-134~137") || in(消耗量.编码,"YX5-139~143") || in(消耗量.编码,"YX5-145~150") || in(消耗量.编码,"YX5-152~158") || in(消耗量.编码,"YX5-160~167")))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:交叉跨越_弱电线路
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && (消耗量.编码 == "YX5-116" || 消耗量.编码 == "YX5-124" || 消耗量.编码 == "YX5-126" || 消耗量.编码 == "YX5-129" || 消耗量.编码 == "YX5-133" || 消耗量.编码 == "YX5-138" || 消耗量.编码 == "YX5-144" || 消耗量.编码 == "YX5-151" || 消耗量.编码 == "YX5-159"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:导线截面
${
	setparam("变量值", 0);
	setparam("导线截面积对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.截面积),0);
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("导线截面积对应值", ftos(getparam("变量值"))), setparam("导线截面积对应值", getparam("导线截面积对应值") + "," + ftos(getparam("变量值"))));
		
					}, "");

				iif(getparam("导线截面积对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("导线截面积对应值");
}

BEGIN:导线1_牌号
${
	setparam("变量值", "");
	setparam("导线1型号", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.导线型号),"");
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("导线1型号", getparam("变量值")), setparam("导线1型号", getparam("导线1型号") + "," + getparam("变量值")));
		
					}, "");
				iif(getparam("导线1型号") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
				
			}, ?0);
		}, ?0);
	getparam("导线1型号");
}

BEGIN:导线1_长度
${
	setparam("变量值", 0);
	setparam("导线1长度对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.长度*组件.线长系数*组件.总根数),0);
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("导线1长度对应值", ftos(getparam("变量值"))), setparam("导线1长度对应值", getparam("导线1长度对应值") + "," + ftos(getparam("变量值"))));
		
					}, "");
			
				iif(getparam("导线1长度对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("导线1长度对应值");
}

BEGIN:导线1_每相根数
${
  setparam("变量值", 0);
  setparam("导线1根数对应值", "");
  setparam("个数", 1);
  for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
    ?{
      for(items,"组件",
      ?{
        iif(组件.特征段 == "特征1" && (组件.分裂数 == " " || 组件.分裂数 == ""), ?setparam("变量值", 0),?0);
        iif(组件.特征段 == "特征1" && 组件.分裂数 == "无", ?setparam("变量值", 1),?0);
        iif(组件.特征段 == "特征1" && 组件.分裂数 == "二分裂", ?setparam("变量值", 2),?0);
        iif(组件.特征段 == "特征1" && 组件.分裂数 == "四分裂", ?setparam("变量值", 4),?0);
        iif(组件.特征段 == "特征1" && 组件.分裂数 == "六分裂", ?setparam("变量值", 6),?0);
        iif(组件.特征段 == "特征1" && 组件.分裂数 == "八分裂", ?setparam("变量值", 8),?0);
        iif(组件.特征段 == "特征1",
          ?{
            iif(getparam("个数") == 1, ?setparam("导线1根数对应值", ftos(getparam("变量值"))), ?setparam("导线1根数对应值", getparam("导线1根数对应值") + "," + ftos(getparam("变量值"))));
    
          }, ?0);
      
        iif(getparam("导线1根数对应值") != "", ?setparam("个数", getparam("个数") + 1), ?setparam("个数", 1));
      }, ?0);
    }, ?0);
  getparam("导线1根数对应值");
}

BEGIN:导线1_单位单价
${
	setparam("导线1单价对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", 0);
				iif(组件.特征段 == "特征1",
					?{
						for(items,"装材",
						?{
							iif(装材.统计类型 == "导线", ?setparam("变量值",getparam("变量值") + 装材.预算价含税),0);
						}, ?0);					
					},"");
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("导线1单价对应值", ftos(getparam("变量值"))), setparam("导线1单价对应值", getparam("导线1单价对应值") + "," + ftos(getparam("变量值"))));
		
					}, "");

				iif(getparam("导线1单价对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("导线1单价对应值");
}

BEGIN:导线2_牌号
${
	setparam("变量值", "");
	setparam("导线2型号", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征2", ?setparam("变量值", 组件.导线型号),"");				
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("导线2型号", getparam("变量值")), setparam("导线2型号", getparam("导线2型号") + "," + getparam("变量值")));
		
					}, "");
				iif(getparam("导线2型号") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
				
			}, ?0);
		}, ?0);
	getparam("导线2型号");
}

BEGIN:导线2_长度
${
	setparam("变量值", 0);
	setparam("导线2长度对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征2", ?setparam("变量值", 组件.长度*组件.线长系数*组件.总根数),0);
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("导线2长度对应值", ftos(getparam("变量值"))), setparam("导线2长度对应值", getparam("导线2长度对应值") + "," + ftos(getparam("变量值"))));		
					}, "");			
				iif(getparam("导线2长度对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("导线2长度对应值");
}

BEGIN:导线2_每相根数
${
  setparam("变量值", 0);
  setparam("导线2根数对应值", "");
  setparam("个数", 1);
  for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
    ?{
      for(items,"组件",
      ?{
        iif(组件.特征段 == "特征2" && (组件.分裂数 == " " || 组件.分裂数 == ""), ?setparam("变量值", 0),?0);
        iif(组件.特征段 == "特征2" && 组件.分裂数 == "无", ?setparam("变量值", 1),?0);
        iif(组件.特征段 == "特征2" && 组件.分裂数 == "二分裂", ?setparam("变量值", 2),?0);
        iif(组件.特征段 == "特征2" && 组件.分裂数 == "四分裂", ?setparam("变量值", 4),?0);
        iif(组件.特征段 == "特征2" && 组件.分裂数 == "六分裂", ?setparam("变量值", 6),?0);
        iif(组件.特征段 == "特征2" && 组件.分裂数 == "八分裂", ?setparam("变量值", 8),?0);       
        iif(组件.特征段 == "特征2",
          ?{
            iif(getparam("个数") == 1, ?setparam("导线2根数对应值", ftos(getparam("变量值"))), ?setparam("导线2根数对应值", getparam("导线2根数对应值") + "," + ftos(getparam("变量值"))));    
          }, ?0);     
        iif(getparam("导线2根数对应值") != "", ?setparam("个数", getparam("个数") + 1), ?setparam("个数", 1));
      }, ?0);
    }, ?0);
  getparam("导线2根数对应值");
}

BEGIN:导线2_单位单价
${
	setparam("导线2单价对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "导线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", 0);
				iif(组件.特征段 == "特征2",
					?{
						for(items,"装材",
						?{
							iif(装材.统计类型 == "导线", ?setparam("变量值",getparam("变量值") + 装材.预算价含税),0);
						}, ?0);					
					},"");
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("导线2单价对应值", ftos(getparam("变量值"))), setparam("导线2单价对应值", getparam("导线2单价对应值") + "," + ftos(getparam("变量值"))));		
					}, "");
				iif(getparam("导线2单价对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("导线2单价对应值");
}

BEGIN:地线1_牌号
${
	setparam("变量值", "");
	setparam("地线1型号", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.避雷线型号),"");				
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("地线1型号", getparam("变量值")), setparam("地线1型号", getparam("地线1型号") + "," + getparam("变量值")));		
					}, "");
				iif(getparam("地线1型号") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));				
			}, ?0);
		}, ?0);
	getparam("地线1型号");
}

BEGIN:地线1_长度
${
	setparam("变量值", 0);
	setparam("地线1长度对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.长度*组件.线长系数*组件.根数),0);
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("地线1长度对应值", ftos(getparam("变量值"))), setparam("地线1长度对应值", getparam("地线1长度对应值") + "," + ftos(getparam("变量值"))));		
					}, "");		
				iif(getparam("地线1长度对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("地线1长度对应值");
}

BEGIN:地线1_根数
${
	setparam("变量值", 0);
	setparam("地线1根数对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.根数),0);
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("地线1根数对应值", ftos(getparam("变量值"))), setparam("地线1根数对应值", getparam("地线1根数对应值") + "," + ftos(getparam("变量值"))));		
					}, "");			
				iif(getparam("地线1根数对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));				
			}, ?0);
		}, ?0);
	getparam("地线1根数对应值");
}

BEGIN:地线1_单位单价
${
	setparam("地线1单价对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", 0);
				iif(组件.特征段 == "特征1",
					?{
						for(items,"装材",
						?{
							iif(装材.统计类型 == "避雷线", ?setparam("变量值", getparam("变量值") + 装材.预算价含税),0);
						}, ?0);
					},"");
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("地线1单价对应值", ftos(getparam("变量值"))), setparam("地线1单价对应值", getparam("地线1单价对应值") + "," + ftos(getparam("变量值"))));
					}, "");
				iif(getparam("地线1单价对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("地线1单价对应值");
}

BEGIN:地线2_牌号
${
	setparam("变量值", "");
	setparam("地线2型号", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征2", ?setparam("变量值", 组件.避雷线型号),"");
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("地线2型号", getparam("变量值")), setparam("地线2型号", getparam("地线2型号") + "," + getparam("变量值")));
					}, "");
				iif(getparam("地线2型号") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("地线2型号");
}

BEGIN:地线2_长度
${
	setparam("变量值", 0);
	setparam("地线2长度对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征2", ?setparam("变量值", 组件.长度*组件.线长系数*组件.根数),0);
				setparam("变量值", ?round(getparam("变量值"),3));
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("地线2长度对应值", ftos(getparam("变量值"))), setparam("地线2长度对应值", getparam("地线2长度对应值") + "," + ftos(getparam("变量值"))));
					}, "");
				iif(getparam("地线2长度对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("地线2长度对应值");
}

BEGIN:地线2_根数
${
	setparam("变量值", 0);
	setparam("地线2根数对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征2", ?setparam("变量值", 组件.根数),0);
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("地线2根数对应值", ftos(getparam("变量值"))), setparam("地线2根数对应值", getparam("地线2根数对应值") + "," + ftos(getparam("变量值"))));
					}, "");
				iif(getparam("地线2根数对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("地线2根数对应值");
}

BEGIN:地线2_单位单价
${
	setparam("地线2单价对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", 0);
				iif(组件.特征段 == "特征2",
					?{
						for(items,"装材",
						?{
							iif(装材.统计类型 == "避雷线", ?setparam("变量值", getparam("变量值") + 装材.预算价含税),0);
						}, ?0);
					},"");
				setparam("变量值", ?round(getparam("变量值"),3));	
				iif(组件.特征段 == "特征2",
					?{
						iif(getparam("个数") == 1, ?setparam("地线2单价对应值", ftos(getparam("变量值"))), setparam("地线2单价对应值", getparam("地线2单价对应值") + "," + ftos(getparam("变量值"))));
					}, "");
				iif(getparam("地线2单价对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("地线2单价对应值");
}

BEGIN:OPGW_芯数
${
	setparam("变量值", 0);
	setparam("OPGW芯数对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "OPGW架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.光缆芯数),0);
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("OPGW芯数对应值", ftos(getparam("变量值"))), setparam("OPGW芯数对应值", getparam("OPGW芯数对应值") + "," + ftos(getparam("变量值"))));
					}, "");
				iif(getparam("OPGW芯数对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("OPGW芯数对应值");
}

BEGIN:OPGW_根数
${
	setparam("变量值", 0);
	setparam("OPGW根数对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "OPGW架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.特征段 == "特征1", ?setparam("变量值", 组件.根数),0);
				iif(组件.特征段 == "特征1",
					?{
						iif(getparam("个数") == 1, ?setparam("OPGW根数对应值", ftos(getparam("变量值"))), setparam("OPGW根数对应值", getparam("OPGW根数对应值") + "," + ftos(getparam("变量值"))));
					}, "");
				iif(getparam("OPGW根数对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("OPGW根数对应值");
}

BEGIN:OPGW_单位单价
${
	setparam("OPGW价格对应值", "");
	setparam("个数", 1);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "OPGW架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", 0);
				iif(组件.特征段 == "特征1",
					?{
						for(items,"装材",
						?{
							iif(装材.统计类型 == "光缆", ?setparam("变量值",getparam("变量值") + 装材.预算价含税),0);
						}, ?0);
					},"");
				setparam("变量值", ?round(getparam("变量值"),3));	
				iif(组件.特征段 == "特征1",
				?{
					iif(getparam("个数") == 1, ?setparam("OPGW价格对应值", ftos(getparam("变量值"))), setparam("OPGW价格对应值", getparam("OPGW价格对应值") + "," + ftos(getparam("变量值"))));
				}, "");
				iif(getparam("OPGW价格对应值") != "", ?setparam("个数", getparam("个数") + 1), setparam("个数", 1));
			}, ?0);
		}, ?0);
	getparam("OPGW价格对应值");
}

BEGIN:杆塔基数_角钢塔
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "角钢塔"),"组件列表",
	?{
		for(filter(items, "组件", ?组件.塔重 != 0),"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:杆塔基数_钢管杆
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "钢管杆"),"组件列表",
	?{
		for(filter(items, "组件", ?组件.杆重 != 0),"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:杆塔基数_钢管塔
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "钢管塔"),"组件列表",
	?{
		for(filter(items, "组件", ?组件.塔重 != 0),"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:杆塔基数_混凝土杆
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "混凝土杆"),"组件列表",
	?{
		for(filter(items, "组件", ?组件.杆重 != 0),"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:杆塔基数_合计
${
	?round(杆塔基数_角钢塔() + 杆塔基数_钢管杆() + 杆塔基数_钢管塔() + 杆塔基数_混凝土杆(),0);
}

BEGIN:杆塔基数_直线塔
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "角钢塔" || 组件目录.名称 == "钢管塔")),"组件列表",
	?{
		for(filter(items, "组件", ?(组件.所属塔型 == "直线" && 组件.塔重 != 0)),"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:杆塔基数_耐张转角塔
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "角钢塔" || 组件目录.名称 == "钢管塔")),"组件列表",
	?{
		for(filter(items, "组件", ?(组件.所属塔型 == "耐张(转角)" && 组件.塔重 != 0)),"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_大板式
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "现浇基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础类型 == "大板式" && 组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_阶梯式
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "现浇基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础类型 == "阶梯式" && 组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_插入式
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "现浇基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础类型 == "插入式" && 组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_掏挖基础
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "挖孔基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础类型 == "掏挖基础" && 组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_岩石基础
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "挖孔基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础类型 == "岩石嵌固基础" && 组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_锚杆基础
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "岩石锚杆基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif(组件.孔径 != 0 && 组件.孔深 != 0, ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_灌注桩基础
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "灌注桩基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_挖孔桩基础
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "挖孔基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			iif((组件.基础类型 == "挖孔桩基础" && 组件.基础_砼量 != 0), ?setparam("变量值", getparam("变量值") + 组件.基数), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_其他基础
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "混凝土装配式基础" || 组件目录.名称 == "预制桩基础" || 组件目录.名称 == "钢管桩基础")),"组件列表",
	?{
		for(items,"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.基数);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:基础_护坡挡土墙排水沟
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && (in(消耗量.编码,"YX7-17~24") || 消耗量.编码 == "YX7-26"))),"定额",
		?{
			setparam("变量值", getparam("变量值") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:架空输电线路_基坑
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 != "接地装置" && 组件目录.名称 != "尖峰及施工基面")),"组件列表",
	?{
		for(items,"组件",
		?{
			setparam("变量值", getparam("变量值") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
		}, ?0);
	}, ?0);
	getparam("变量值");
}

BEGIN:单公里土石方量_基坑
${
	?round(架空输电线路_基坑() / 南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:架空输电线路_接地土石方量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && in(消耗量.编码,"YX2-213~219"))),"定额",
		?{
			setparam("变量值", getparam("变量值") + 定额.数量);
		}, ?0);
	}, ?0);
	getparam("变量值");
}

BEGIN:单公里土石方量_接地
${
	?round(架空输电线路_接地土石方量() / 南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:架空输电线路_尖峰及施工基面
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.数量!=0 && in(消耗量.编码,"YX2-226~230"))),"定额",
		?{
			setparam("变量值", getparam("变量值") + 定额.数量);
		}, ?0);
	}, ?0);
	getparam("变量值");
}

BEGIN:单公里土石方量_尖峰及施工基面
${
	?round(架空输电线路_尖峰及施工基面() / 南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:单公里土石方量_合计
${
	?round(单公里土石方量_基坑() + 单公里土石方量_接地() + 单公里土石方量_尖峰及施工基面(),3);
}

BEGIN:土质比例_普通土
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("普通土土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
		
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("普通土土方量", getparam("普通土土方量") + 组件.土方量.普通土);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("普通土土方量")/getparam("总土方量")*100, 3),0));	
	getparam("变量值");
}

BEGIN:土质比例_坚土
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("坚土土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
		
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("坚土土方量", getparam("坚土土方量") + 组件.土方量.坚土 + 组件.土方量.冻土);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("坚土土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:土质比例_松砂石
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("松砂石土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
		
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("松砂石土方量", getparam("松砂石土方量") + 组件.土方量.松砂石);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("松砂石土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:土质比例_岩石爆破
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("岩石爆破土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
		
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("岩石爆破土方量", getparam("岩石爆破土方量") + 组件.土方量.岩石（爆破）);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("岩石爆破土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:土质比例_岩石人凿
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("岩石人凿土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("岩石人凿土方量", getparam("岩石人凿土方量") + 组件.土方量.岩石（人凿）);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("岩石人凿土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:土质比例_泥水
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("泥水坑土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("泥水坑土方量", getparam("泥水坑土方量") + 组件.土方量.泥水坑);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("泥水坑土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:土质比例_水坑
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("水坑土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("水坑土方量", getparam("水坑土方量") + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("水坑土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:架空输电线路_干砂坑比例
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("干砂坑土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("干砂坑土方量", getparam("干砂坑土方量") + 组件.土方量.干砂坑);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("干砂坑土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:架空输电线路_流砂坑比例
${
	setparam("变量值", 0);
	setparam("总土方量", 0);
	setparam("流砂坑土方量", 0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("总土方量", getparam("总土方量") + 组件.土方量.普通土 + 组件.土方量.坚土 + 组件.土方量.冻土 + 组件.土方量.松砂石 + 组件.土方量.岩石（爆破） + 组件.土方量.岩石（人凿） + 组件.土方量.泥水坑 + 组件.土方量.流砂坑 + 组件.土方量.干砂坑 + 组件.土方量.水坑);
			}, ?0);
		}, ?0);
	for(@组件, "组件目录",
		?{
			for(items,"组件",
			?{
				setparam("流砂坑土方量", getparam("流砂坑土方量") + 组件.土方量.流砂坑);
			}, ?0);
		}, ?0);
	setparam("变量值", iif(getparam("总土方量")!= 0,?round(getparam("流砂坑土方量")/getparam("总土方量")*100, 3),0));
	getparam("变量值");
}

BEGIN:土质比例_流砂干砂
${
	setparam("变量值", ?round(架空输电线路_干砂坑比例() + 架空输电线路_流砂坑比例(),3));
	getparam("变量值");
}

BEGIN:绝缘子串型式_悬垂串
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "悬垂串")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.串数);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:绝缘子串型式_耐张串
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "耐张串")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.组数);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:绝缘子串型式_跳线串
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "跳线串")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.串数);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),0));
	getparam("变量值");
}

BEGIN:运距_人力运距
${
  setparam("当前最大次数", 0);
  setparam("人力运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.人力运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("人力运距", 运输设置.人力运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("人力运距", ?round(getparam("人力运距"),3));   
  getparam("人力运距");
}

BEGIN:运距_汽车运距
${
  setparam("当前最大次数", 0);
  setparam("汽车运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.汽车运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("汽车运距", 运输设置.汽车运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("汽车运距", ?round(getparam("汽车运距"),3));   
  getparam("汽车运距");
}


BEGIN:运距_拖拉机运距
${
  setparam("当前最大次数", 0);
  setparam("拖拉机运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.拖拉机运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("拖拉机运距", 运输设置.拖拉机运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("拖拉机运距", ?round(getparam("拖拉机运距"),3));   
  getparam("拖拉机运距");
}


BEGIN:运距_船舶运距
${
  setparam("当前最大次数", 0);
  setparam("船舶运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.船舶运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("船舶运距", 运输设置.船舶运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("船舶运距", ?round(getparam("船舶运距"),3));   
  getparam("船舶运距");
}

BEGIN:运距_海缆船舶运距
${
  setparam("当前最大次数", 0);
  setparam("海缆船舶运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.海缆船舶运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("海缆船舶运距", 运输设置.海缆船舶运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("海缆船舶运距", ?round(getparam("海缆船舶运距"),3));   
  getparam("海缆船舶运距");
}

BEGIN:运距_其他运距
${
  setparam("其他运距", 0);
  setparam("索道运距最大值", 0);
  setparam("索道运距最大值之和", 0);
  for(filter(@线路特征, "特征段", ?(特征段.索道运输 == 1)),"线路特征",
    ?{
      for(items, "索道运输设置",
      ?{      
    setparam("当前索道级数", 0);
        for(items, "索道级数项",
        ?{    
      setparam("当前索道级数", getparam("当前索道级数") + 1);
          iif(索道级数项.运距 >= getparam(ftos(getparam("当前索道级数"))+"索道运距最大值"),?setparam(ftos(getparam("当前索道级数"))+"索道运距最大值", 索道级数项.运距),?0);
        },?0);    
      },?0);
    setparam("统计运距", 1);
    
    for(items, "索道运输设置",
      ?{      
    setparam("当前索道级数", 0);
    iif(getparam("统计运距") == 1,
    ?{
      for(items, "索道级数项",
      ?{    
        setparam("当前索道级数", getparam("当前索道级数") + 1);
        setparam("索道运距最大值之和", getparam(ftos(getparam("当前索道级数"))+"索道运距最大值")+getparam("索道运距最大值之和"));
        setparam(ftos(getparam("当前索道级数"))+"索道运距最大值", 0);
      },?0); 
      setparam("统计运距", 0);
    },?0);          
      },?0);
    
    },?0);
  setparam("其他运距",?round(getparam("索道运距最大值之和")+运距_拖拉机运距()+运距_船舶运距()+运距_海缆船舶运距(),3));
  getparam("其他运距");
}

BEGIN:导线_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "导线架设"),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.总重 / 1000);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:导线_单公里用量
${
	    ?round(导线_数量()/南网架空线路_单公里用量_计算规则(),4);
}

BEGIN:地线_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "避雷线架设")),"组件列表",
		?{
			for(items,"组件",
			?{
				iif(组件.线材类型 == "钢绞线" || 组件.线材类型 == "良导体" , ?setparam("变量值", getparam("变量值") + 组件.总重 / 1000), 0);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:地线_单公里用量
${
	 ?round(地线_数量()/南网架空线路_单公里用量_计算规则(),4);
}

BEGIN:角钢塔_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "角钢塔")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.基数 * 组件.塔重);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:角钢塔_单公里用量
${
	?round(角钢塔_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:钢管塔_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "钢管塔"),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.基数 * 组件.塔重);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:钢管塔_单公里用量
${
	?round(钢管塔_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:插入钢材_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材")),"主材",
		?{
			iif(主材.运输类型 == "插入材", ?setparam("变量值", getparam("变量值") + 主材.数量 * 主材.单重/1000),0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:插入钢材_单公里用量
${
	?round(插入钢材_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:地脚螺栓_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "现浇基础" || 组件目录.名称 == "挖孔基础")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.地脚螺栓 * 组件.基数 * 组件.每基坑数);
			}, ?0);
		}, ?0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "灌注桩基础" || 组件目录.名称 == "岩石锚杆基础")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + 组件.地脚螺栓 * 组件.基数 * 组件.每基孔数);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:地脚螺栓_单公里用量
${
	?round(地脚螺栓_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:基础钢_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "现浇基础" || 组件目录.名称 == "挖孔基础")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + (组件.一般钢筋_钢筋量 + 组件.钢筋笼_钢筋量) * 组件.基数 * 组件.每基坑数);
			}, ?0);
		}, ?0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "灌注桩基础" || 组件目录.名称 == "岩石锚杆基础")),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + (组件.一般钢筋_钢筋量 + 组件.钢筋笼_钢筋量) * 组件.基数 * 组件.每基孔数);
			}, ?0);
		}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:基础钢_单公里用量
${
	?round(基础钢_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:接地钢_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1" && 工程量.父级名称 == "接地工程")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材")),"主材",
		?{
			iif(主材.运输类型 == "钢筋(加工制作)" || 主材.运输类型 == "钢筋、型钢(成品、半成品)" || 主材.运输类型 == "钢筋、型钢(成品、半成品及加工制作)" || 主材.运输类型 == "铜覆钢", 
			?setparam("变量值", getparam("变量值") + 主材.数量 * 主材.单重/1000), 0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:接地钢_单公里用量
${
	?round(接地钢_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:现浇混凝土_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && 消耗量.自动统计 == 1 && 消耗量.数量!=0 && (in(消耗量.编码,"YX3-63~71") || in(消耗量.编码,"YX3-73~83") || in(消耗量.编码,"YX3-171~178") || in(消耗量.编码,"YX3-181") || in(消耗量.编码,"YX3-192~193")))),"定额",
		?{
			setparam("变量值", getparam("变量值") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:现浇混凝土_单公里用量
${
	?round(现浇混凝土_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:现浇混凝土_灌注桩混凝土用量_总量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?组件目录.名称 == "灌注桩基础"),"组件列表",
		?{
			for(items,"组件",
			?{
				setparam("变量值", getparam("变量值") + (组件.基础_砼量*(1+@工程信息.灌注桩超灌量/100)+组件.承台_砼量+组件.联梁_砼量+(组件.孔径/2)*(组件.孔径/2)*3.14*组件.加灌长度)*组件.基数*组件.每基孔数);
			}, ?0);
		}, ?0);
	getparam("变量值");
}

BEGIN:现浇混凝土_灌注桩混凝土用量
${
	setparam("变量值", 0);
	setparam("变量值",现浇混凝土_灌注桩混凝土用量_总量() / 南网架空线路_单公里用量_计算规则());
	setparam("变量值",?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:预制混凝土_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额"  && 消耗量.自动统计 == 1 && 消耗量.数量!=0 && in(消耗量.编码,"YX3-37~42"))),"定额",
		?{
			setparam("变量值", getparam("变量值") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:预制混凝土_单公里用量
${
	?round(预制混凝土_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:水泥_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材" && 消耗量.数量!=0 && 消耗量.运输类型=="水泥")),"主材",
		?{
			setparam("变量值", getparam("变量值") + 主材.数量*主材.单重/1000);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:水泥_单公里用量
${
	?round(水泥_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:砂子_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材" && 消耗量.数量!=0 && 消耗量.运输类型=="砂")),"主材",
		?{
			setparam("变量值", getparam("变量值") + 主材.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:砂子_单公里用量
${
	?round(砂子_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:碎石_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材" && 消耗量.数量!=0 && 消耗量.运输类型=="碎石")),"主材",
		?{
			setparam("变量值", getparam("变量值") + 主材.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:碎石_单公里用量
${
	?round(碎石_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:瓷绝缘子_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材" && 消耗量.数量!=0 && 消耗量.运输类型=="瓷绝缘子")),"主材",
		?{
			setparam("变量值", getparam("变量值") + 主材.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:瓷绝缘子_单公里用量
${
	?round(瓷绝缘子_数量() / 南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:玻璃绝缘子_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材" && 消耗量.数量!=0 && 消耗量.运输类型=="玻璃绝缘子")),"主材",
		?{
			setparam("变量值", getparam("变量值") + 主材.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:玻璃绝缘子_单公里用量
${
	?round(玻璃绝缘子_数量() / 南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:合成绝缘子_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材" && 消耗量.数量!=0 && (消耗量.运输类型=="复合绝缘子" || 消耗量.运输类型=="超长复合绝缘子"))),"主材",
		?{
			setparam("变量值", getparam("变量值") + 主材.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:合成绝缘子_单公里用量
${
	?round(合成绝缘子_数量() / 南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:盘式绝缘子_数量
${
	?round(瓷绝缘子_数量() + 玻璃绝缘子_数量(),3);
}

BEGIN:盘式绝缘子_单公里用量
${
	?round(盘式绝缘子_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:挂线金具_数量
${
	setparam("变量值", 0);
	for(filter(@组件, "组件目录", ?(组件目录.名称 == "悬垂串" || 组件目录.名称 == "耐张串" || 组件目录.名称 == "跳线串" || 组件目录.名称 == "地线金具")),"组件目录",
	?{
		for(items,"组件",
		?{
			for(items,"主材",
			?{
				iif((主材.运输类型=="金具(包括压接线夹)" && 组件目录.名称 != "跳线串") || (主材.运输类型=="金具(包括压接线夹)" && 组件目录.名称 == "跳线串" && 组件.跳线类型 == "软跳线"), ?setparam("变量值", getparam("变量值") + 组件.串数*主材.数量*主材.单重/1000), 0);
			}, ?0);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:挂线金具_单公里用量
${
	?round(挂线金具_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:间隔棒_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && in(消耗量.编码,"YX6-106~116"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:间隔棒_单公里用量
${
	?round(间隔棒_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:防振锤_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && in(消耗量.编码,"YX6-101~105"))),"定额",
			?{
				setparam("变量值", getparam("变量值") + 定额.数量);
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:防振锤_单公里用量
${
	?round(防振锤_数量()/南网架空线路_单公里用量_计算规则(),3);
}

BEGIN:降阻剂_数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.线路, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="主材")),"主材",
			?{
				iif(主材.运输类型 == "降阻剂", ?setparam("变量值", getparam("变量值") + 主材.数量 * 主材.单重/1000),0);				
			}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值"),3));
	getparam("变量值");
}

BEGIN:降阻剂_单公里用量
${
	?round(降阻剂_数量()/南网架空线路_单公里用量_计算规则(),3);
}


///////////////////////////////////////////////////////////////
//
//通信线路
//
///////////////////////////////////////////////////////////////
BEGIN:折合单回长度
${
	@工程信息.架线长度;
}

BEGIN:折合单回单位单价
${
  setparam("变量值",0);
  setparam("中间值",0);
  
  iif(@报表属性.总算表取整 == "1" && (@工程信息.报表类型=="概算报表" || @工程信息.报表类型=="预算报表"),
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "总算表万元")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="工程静态投资",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  },
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "工程费用")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="工程静态投资",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  }); 
  iif(@报表属性.总算表取整 == "1" && (@工程信息.报表类型=="招标报表" || @工程信息.报表类型=="投标报表" || @工程信息.报表类型=="结算报表"),
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "总算表万元")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="总金额",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  },
  ?{
  for(filter(@费用表, "费用表", ?(费用表.type == "工程费用")), "费用表", 
    ?{
    for(items, "费用项",?{
       iif(费用项.名称=="总金额",?setparam("中间值",费用项.合计费),?0);  
    },?0);
    }, ?0); 
  });
   setparam("变量值", ?round(getparam("中间值")/折合单回长度(),3)); 
   getparam("变量值");
}

///////////////////////////////////////////////////////////////
//
//电缆线路
//
///////////////////////////////////////////////////////////////
BEGIN:顶管
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && in(消耗量.编码,"YL1-57~59"))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && in(消耗量.编码,"YL1-57~59"))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:排管长
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-13~16") || in(消耗量.编码,"YL2-29~32") || in(消耗量.编码,"YL2-48~52") || 消耗量.编码 == "YL2-55"))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-13~16") || in(消耗量.编码,"YL2-29~32") || in(消耗量.编码,"YL2-48~52") || 消耗量.编码 == "YL2-55"))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:沟道长
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-5~8") || in(消耗量.编码,"YL2-21~24") || in(消耗量.编码,"YL2-38~42") || 消耗量.编码 == "YL2-53"))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-5~8") || in(消耗量.编码,"YL2-21~24") || in(消耗量.编码,"YL2-38~42") || 消耗量.编码 == "YL2-53"))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:直埋长
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-1~4") || in(消耗量.编码,"YL2-17~20") || in(消耗量.编码,"YL2-33~37")))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-1~4") || in(消耗量.编码,"YL2-17~20") || in(消耗量.编码,"YL2-33~37")))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:隧道长
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-9~12") || in(消耗量.编码,"YL2-25~28") || in(消耗量.编码,"YL2-43~47") || 消耗量.编码 == "YL2-54"))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL2-9~12") || in(消耗量.编码,"YL2-25~28") || in(消耗量.编码,"YL2-43~47") || 消耗量.编码 == "YL2-54"))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:淤泥
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && in(消耗量.编码,"YX2-48~55"))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && in(消耗量.编码,"YX2-48~55"))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:工地运输_人力运距
${
  setparam("当前最大次数", 0);
  setparam("人力运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.人力运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("人力运距", 运输设置.人力运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("人力运距", ?round(getparam("人力运距"),3));   
  getparam("人力运距");
}

BEGIN:工地运输_汽车运距
${
  setparam("当前最大次数", 0);
  setparam("汽车运距", 0);
  setparam("运距关键字序号", 0);
  setparam("当前运距关键字序号", 99);
  for(filter(@运输设置, "运输设置弹框", ?(运输设置弹框.运输类型 != "砂" && 运输设置弹框.运输类型 != "碎石" && 运输设置弹框.运输类型 != "水泥" && 运输设置弹框.运输类型 != "水"  && 运输设置弹框.运输类型 != "余土外运" && 运输设置弹框.运输类型 != "水超运")),"运输设置",
  ?{
      setparam("运距关键字", ftos(运输设置.汽车运距));
    iif(getparam(getparam("运距关键字")) == "", 
    ?{
    setparam(getparam("运距关键字"), 0);
    },?0); 
    setparam(getparam("运距关键字"), getparam(getparam("运距关键字")) + 1);
    iif(getparam(getparam("运距关键字")) == 1,
    ?{
    setparam(getparam("运距关键字") + "序号", getparam("运距关键字序号"));
    setparam("运距关键字序号", getparam("运距关键字序号") + 1);
    },?0);
    iif((getparam(getparam("运距关键字")) > getparam("当前最大次数")) || (getparam(getparam("运距关键字")) == getparam("当前最大次数") && getparam(getparam("运距关键字") + "序号") < getparam("当前运距关键字序号")),
    ?{
    setparam("汽车运距", 运输设置.汽车运距);
    setparam("当前最大次数", getparam(getparam("运距关键字")));
    setparam("当前运距关键字序号", getparam(getparam("运距关键字") + "序号"));
    },?0);
  },?0);
  setparam("汽车运距", ?round(getparam("汽车运距"),3));   
  getparam("汽车运距");
}

BEGIN:工地运输_余土运距
${
	setparam("余土运距_已设置", 0);
	setparam("余土运距", 0);
	for(@运输设置,"运输设置",
	?{
		iif(getparam("余土运距_已设置") == 0 && 运输设置.运输类型 == "余土外运", 
		?{
			setparam("余土运距", 运输设置.人力运距 + 运输设置.汽车运距 + 运输设置.拖拉机运距 + 运输设置.船舶运距 + 运输设置.海缆船舶运距);
			setparam("余土运距_已设置", 1);
		},0);
	},?0);
	setparam("余土运距", ?round(getparam("余土运距"),3)); 
	getparam("余土运距");
}

BEGIN:终端接头_GIS数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL3-37~38") || in(消耗量.编码,"YL3-43~46") || in(消耗量.编码,"YL3-49~50") || in(消耗量.编码,"YL3-56~62")))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL3-37~38") || in(消耗量.编码,"YL3-43~46") || in(消耗量.编码,"YL3-49~50") || in(消耗量.编码,"YL3-56~62")))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}

BEGIN:终端接头_空气数量
${
	setparam("变量值", 0);
	for(filter(@项目划分.建筑, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL3-35~36") || in(消耗量.编码,"YL3-39~42") || in(消耗量.编码,"YL3-47~48") || in(消耗量.编码,"YL3-51~55")))),"定额",
		?{
			setparam("变量值1", getparam("变量值1") + 定额.数量);
		}, ?0);
	}, ?0);
	for(filter(@项目划分.安装, "工程量", ?(工程量.type == "项目划分" && 工程量.叶子节点 == "1")), "项目划分", 
	?{
		for(filter(items, "消耗量", ?(消耗量.type=="定额" && (in(消耗量.编码,"YL3-35~36") || in(消耗量.编码,"YL3-39~42") || in(消耗量.编码,"YL3-47~48") || in(消耗量.编码,"YL3-51~55")))),"定额",
		?{
			setparam("变量值2", getparam("变量值2") + 定额.数量);
		}, ?0);
	}, ?0);
	setparam("变量值", ?round(getparam("变量值1")+getparam("变量值2"),3));
	getparam("变量值");
}