FOXPRO计算机语言编程计算K值方法.pdf

《自动化与仪器仪表》2016年第9期(总第203期
FOXPRO计算机语言编程计算K值方法
王刚,肖薇
(四川金象赛瑞化工股份有限公司四川眉山,620031)
摘要:介绍了一种输配气站场,天然气实用流量标准孔板计量,用 FOXPRO计算机语言编程计算K值方法。
关键词: FOXPRO语言;K值;天然气流量;标准孔板
中图分类号:TP301.6
文献标识码:B
DOL编码:10.14016/.cki.1001-9227.2016.09.21
Abstract: this paper introduces a kind of distribution Qizhan field, practical gas flow standard orifice metering, K value was
caleulated by the FOXPRO computer language programming method
Key words: FOXPRO language; k value; gas flow; the standard orifice plate
1前
R,=1.53x10°Q,G./(86400x0.0112D2m)=1580Q,G/Da2
2
输配气站场,天然气实用流量标准孔板计量方法中,行业
对于一个确定的节流装置,其取爪方式和β值是一定的,
标准SY/T6143-196规定流量应进行送代计算,为了减少计所以,式ー中带雷诺数项之外的各项之和为一常数,命名为初
算,应尽量将其中一些相同的计算项合并成常数项,即K值。始流量系数C。,并将Cい'提出为公因数,则式一可表达为:
在合并计算K值时,哪些量合并,其计算式的形式如何,应充
C=C'L1+0.002932(10/R。)/Co。
分考虑节省计算流量程序计算器的内存和输配气工便于操
再将雷诺数表达式式二代入上式即可得
作。另外,现场生产出现非标准情况亦应充分考虑予以处理,
C=Cっ'[1+0.0092(10°Da1580Q,G,)03/C0']=Cn
这主要是孔板人口锐利度和计量管内壁粗度以及因校验仪[1+0.3659482(D。/C.)/ccra]
4)
式中:C'=0.5959+0.0312B21-0.18408-xBン/D+yB/
起输气处最先使用PC-1500编程计算K值,90年代初又用E
D2(1-β
(5
500编程计算K值,随后又用PB-120计算K值,近两年推
广应用-4800编程算K值,但是至今没有一套完整的用计
当为角接取压时,x=0y=0
当为法兰取压且D2≤58.62m时
算机语言编程打印结果的一体化模式。现为方便实用,采用
FOXPRO计算机语言编计算K值,彻底解决了这一难题。特
x=0.85598y=0.0390D20
別说明,因为Qn<100m/h时,流量用一次计算方法,其中K
当为法兰取压且D2n>58.62mm时:
x=0.85598y=2.2860
值无需迭代,根据行业标准SY/T6143-19%中一次流量计算
公式可直接算出,故不赘述,本程序主要针对流量Qn≥
综上所述,当Qm≥100m'/h,需迭代计算。实际上就是流
100m/h需要计算K值的迭代法适用
出系数C中与雷诺数有关的一项和粗糙度修正系数YRe进
行迭代计算,这时流量常数用K。'表示,其值为
2参数的确定方法
K'=4.70324x10Cbd2VP。H。/Gr(1-B)(6)
2.1流量常数K。或K。
式中:C,为天然气在标准状态下的真实相对密度;
流出系数C、粗糙度修正系统数γRe都是雷诺数的函数,
P。为压力计测量量程,MPa;
H。为差压计测量量程,Pa;
而雷诺数的大小又有待于流量值才能确定,故计算流量需要
逐步通近的迭代计算方法。按标准SY/T6143-1996规定,流
dn为孔板开孔直径,20℃下测量值,mm;
出系统C由下式计算
C。为标准孔板在常用流量下的流出系数,其值由下述式
C=0.5959+0.031282-0.18408°+0.0900LB/(1-B
七、式八计算;
0.0337L-B3+0.0029832-(10/R。)°3
C。'为初始流出系数,其值由式五确定
(1)
当L≥0.0390/0.0900时,β'(1-)的系数用0.0390
必ン为非标准孔板在常用流量下的粗糙度修正系数,其值
八确定,当为标准测量管时,取值为
式中:β3~直径比,β=d/D
法兰取压时,Ll=L2=25.4/D;角接取压时,Il=I2=0
b为孔板尖锐度系数,其值从附表一或表二中査取,当
为标准孔板时,取值为1。
RcD管径雷诺数,标准规定由下式计算:
Ra。=1.53x10"Q,G,/以1D
C=C0'+0.3659482(Dn/G,Q。)3
式中Qn为每秒标方,将其改为每天气量;ul为天然气的
式中:Q。为常用流量,m/d
粘度,因对粘度准确度要求不高,使用其平均值可以满足要
Y=(Yo-1)(IgRo/6)2+1
求,四川石油局管输天然气在常温、
当Ra≥10°时,m=yy与直径比B和相对粗糙度的
常压下以l的平均值为0.0112cp;用D20代替D,则
倒数D/K有关,其值可从附表三中查取。
式(8)中:Ra为常用流量时的管雷诺数,用下式计算
收稿日期:2016-04-25
R=1580Q。C/D2
(9
215
万方数据