KG_generation/project2json/analysis-server/analysis-config/bpc/bcl/主网/2.1.0/施工图预算.技经参数.bcl

///////////////////////////////////////////////////////////////
//
// 变电
//
///////////////////////////////////////////////////////////////
BEGIN:本期主变压器_型号_最高设备价格
${
  iif(getparam("本期主变压器_型号_最高设备价格_已计算") != 1,
  ?{
  setparam("变量值",0);  
  setparam("中间值",0);
  for(filter(@项目划分.安装, "工程量",?工程量.type == "清单"),"清单",
  ?{
    for(filter(items,"消耗量",?(消耗量.type == "设备")),"设备",
    ?{
      setparam("中间值",设备.单价含税);  
      iif(getparam("中间值") > getparam("变量值"),?setparam("变量值",getparam("中间值")),0);
    },?0);
  },?0);
     setparam("本期主变压器_型号_最高设备价格_已计算", 1);
  },?0);
  getparam("变量值");
}

BEGIN:主变压器型号
${
  iif(getparam("主变压器型号_已计算") != 1,
  ?{
	setparam("变量值_主变压器型号","");	
	setparam("变量值_主变压器_名称","");	
	for(filter(@项目划分.安装, "工程量",?工程量.type == "清单" ),"清单",
		?{
			for(filter(items,"消耗量",?(消耗量.type == "设备")),"设备",
				?{
					iif(getparam("变量值_主变压器型号") == "" && 本期主变压器_型号_最高设备价格() == 设备.单价含税,
					?{
					setparam("变量值_主变压器型号",设备.名称);
					setparam("变量值_主变压器_名称",设备.规格型号);
					},"");
				},?0);
		},?0);
     setparam("主变压器型号_已计算", 1);
  },?0);
   setparam("变量值_主变压器型号",getparam("变量值_主变压器型号")+getparam("变量值_主变压器_名称"));
	getparam("变量值_主变压器型号");
}

BEGIN:中压侧配电装置_最大电压等级
${
  iif(getparam("中压侧配电装置_最大电压等级_已计算") != 1,
  ?{
  setparam("变量值_高", 0);
  for(@项目划分.安装, "工程量",
    ?{
      iif(工程量.type == "项目划分" && 工程量.叶子节点=="1" && 工程量.存在非拆除清单==1,
      ?{
        iif(strFind(工程量.名称,"配电装置") >= 0,
        ?{
          setparam("遍历清单", 1);
          setparam("最大电压等级", 工程量.项目划分电压等级);
        },?setparam("遍历清单", 0));        
      },?0);
      
      iif(工程量.type == "清单" && getparam("遍历清单")== 1,
	  ?{
        for(filter(items, "消耗量", ?(消耗量.type == "定额" || 消耗量.type == "主材" || 消耗量.type == "设备" || 消耗量.type == "一笔性费用" || 消耗量.type == "注解")),"定额",
            ?{
              iif(getparam("最大电压等级")>getparam("变量值_高"),?setparam("变量值_高",getparam("最大电压等级")),0);
          },?0);
      },?0);    
    }, ?0);
     setparam("中压侧配电装置_最大电压等级_已计算", 1);
  },?0);
  getparam("变量值_高");
}

BEGIN:中压侧配电装置电压等级
${
  iif(getparam("中压侧配电装置电压等级_已计算") != 1,
  ?{
  setparam("变量值_中", 0);
  for(@项目划分.安装, "工程量",
    ?{
      iif(工程量.type == "项目划分" && 工程量.叶子节点=="1" && 工程量.存在非拆除清单==1,
      ?{
        iif(strFind(工程量.名称,"配电装置") >= 0,
        ?{
          setparam("遍历清单", 1);
          setparam("第二大电压等级", 工程量.项目划分电压等级);
        },?setparam("遍历清单", 0));        
      },?0);
      
      iif(工程量.type == "清单" && getparam("遍历清单")== 1,
	  ?{
        for(filter(items, "消耗量", ?(消耗量.type == "定额" || 消耗量.type == "主材" || 消耗量.type == "设备" || 消耗量.type == "一笔性费用" || 消耗量.type == "注解")),"定额",
            ?{
			iif(中压侧配电装置_最大电压等级()!=getparam("第二大电压等级") && getparam("第二大电压等级")>getparam("变量值_中"),?setparam("变量值_中",getparam("第二大电压等级")),0);
          },?0);
      },?0);    
    }, ?0);
     setparam("中压侧配电装置电压等级_已计算", 1);
  },?0);
  getparam("变量值_中");
}

BEGIN:低压侧配电装置电压等级
${
  iif(getparam("中压侧配电装置电压等级_已计算") != 1,
  ?{
  setparam("变量值_低", 0);
  for(@项目划分.安装, "工程量",
    ?{
      iif(工程量.type == "项目划分" && 工程量.叶子节点=="1" && 工程量.存在非拆除清单==1,
      ?{
        iif(strFind(工程量.名称,"配电装置") >= 0,
        ?{
          setparam("遍历清单", 1);
          setparam("第三大电压等级", 工程量.项目划分电压等级);
        },?setparam("遍历清单", 0));        
      },?0);
      
      iif(工程量.type == "清单" && getparam("遍历清单")== 1,
	  ?{
        for(filter(items, "消耗量", ?(消耗量.type == "定额" || 消耗量.type == "主材" || 消耗量.type == "设备" || 消耗量.type == "一笔性费用" || 消耗量.type == "注解")),"定额",
            ?{
			iif(中压侧配电装置_最大电压等级()!=getparam("第三大电压等级") && 中压侧配电装置电压等级()!=getparam("第三大电压等级") && getparam("第三大电压等级")>getparam("变量值_低"),?setparam("变量值_低",getparam("第三大电压等级")),0);
          },?0);
      },?0);    
    }, ?0);
     setparam("中压侧配电装置电压等级_已计算", 1);
  },?0);
  getparam("变量值_低");
}

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

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

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

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

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