chentianrui/KG_generation
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
9609bb67b44278e7073d6b87390d6a8362e441e1
KG_generation/project2json/analysis-server/analysis-config/bpc/bcl/主网/2.1.0/南网规约.线路.技经参数.bcl
T
chentianrui 9609bb67b4 上传文件
2025-08-01 15:31:56 +08:00

2432 lines
95 KiB
Plaintext
Raw Blame History

///////////////////////////////////////////////////////////////
//
// 架空线路
//
///////////////////////////////////////////////////////////////
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("变量值");
}
Reference in New Issue View Git Blame Copy Permalink