Aspen+Plus服务器在软件集成中的应用

２００７，２４（２）孔祥冰等：ＡｓｐｅｎＰｌｕｓ服务器在软件集成中的应用２５７

量’１昏ｌ’ｌｈｅｔｏＪｕｅｎｅ

ａｂ嘲ｍｅｄｔ洲盯．

图ｌ甲苯吸收塔

４．２甲苯吸收塔简要分析

工艺要求甲苯吸收塔的塔底液相出料中ＨＣＩ，以及塔顶气相出料中的光气含量应尽量低，工艺甲苯量对甲苯吸收塔的吸收效果有很大影响，减少甲苯量有利于降低Ｈｃｌ在塔底的量，但对光气的吸收不利；相反增加甲苯量虽然有利于光气的吸收，但会增加Ｈｃｌ在塔底的量。原工艺中所有物流都从塔底进料，但各流股的组成不同，改变富含Ｈｃｌ的流股的进料位置对ＨＣｌ的吸收也有一定影响。同时Ｈｃｌ的吸收量还与塔内温度分布有关系，由于光气的吸收会产生大量的热量，使塔内部温度升高，而增加一个中间冷却器可以部分解决该问题。新增中间冷却器从塔某块板上抽出全部液体，冷却到一１０℃，再回到下一块塔坂。

４．３解决思路

通过改变甲苯流量、富含Ｈｃｌ流股的进料位置和中间冷却器的物料采出位置３个操作变量，用ＶＢ按操作变量范围随机产生多组数据，传递给Ａ叩ｅｎＰＩｕｓ进行模拟计算，再将结果返回ＶＢ并储存，这样就避免了在ＡｓｐｅｎＰｌｕｓ界面下频繁输入变量来考察模拟结果。

４．４具体实现步骤

ＡｓｐｅｎＰｌｕｓ模拟甲苯吸收塔应用界面如图２所示。，

使用ＶＢ中的ｒａｎｄｏｍ函数，规定甲苯流量８００～１５００ｋｇ／ｈ，富含ＨＣｌ流股的进料位置５一。１４块板，中间冷却器的物料采出位置５—１４块板。随机生成的１００组变量传递给ＡｓｐｅｎＰｌｕｓ模拟计算并将结果储存在文本文件里。此过程的ＶＢ代码如下：ＰｒｉｖａｔｅＳｕｂＭａｉｎ（）

ＤｉｍｉＡ８Ｉｍｅｇｅｒ，ｎＡＢＩｍｅｇｅｒ

Ｄｉｍｄａｔ（）Ａｓｅｘｅ

Ｄｉｍ

ｃｏｃｌ２一ｌ

ＡｓＤｏｕｂｌｅ

Ｄｉｍｃｏｃｌ２２ＡｓＤ叫ｂｌｅ

Ｆ培２Ａｓｐ吼Ｐｌｕｓｕ８盯ｉｎｔｅ日‰ｅ．

图２Ａ８Ｐ∞Ｐｌ岫用户界面

ＤｉｍＨＹＤＲＯ—ｌＡｓＤｏｕｂｌｅ

ＤｉｍＨＹＤＲ０—２ＡｓＤｏｕｂｌｅ

ＤｉｍｉｈＡＰｓｉｍＡｓＨ印ｐＩＰ

ＳｅｔｉｈＡＰｓｉｍ＝Ｇｅｔｏｂｊｅｃｔ（”Ｄ：、ｔｄｉ＼ｔｄｉ．印矿）

ｉｈＡＰｓｉｍ．Ｖｉｓｉｂｌｅ＝’Ｉ．ｍｅ

ＤｉｍｉｈＥｎ矛ｎｅＡｓＩＨＡＰＥｎｇｉｎｅ

ＳｅｔｉｈＥｎｇｉｎｅ＝ｉｈＡＰ８ｉｍ．Ｅｎｇｉｎｅ

Ｏｐｅｎ”Ｅ：、ＧＡ、ｄ砷ｅ２．ｔｘｔ”ｆＩｏｒ０ｕｔｐｕｔＡｓ舵

Ｃｌｏ∞＃２

０ｐｅｎ”Ｅ：＼ＧＡ＼ｄ砒ｅ１．ｂ【ｔ『，Ｆ０ｒＩ叩ｕｔＡｓ＃ｌ

ｎ＝ＩｎｐｕｔＢｏｘ（”需要数组数”）

ＲｅＤｉｍｄａｔ（ｎ）Ａ８ｅｘｅ

Ｆｏｒｉ＝１’Ｉ＇０

ｎ

Ｉｎｐｕｔ＃ｌ，ｄａｔ（ｉ）．ｃｏｍｐｏｓ，ｄａｔ（ｉ）．ｓｔａｇｅ，ｄａｔ（ｉ）．ｓｏｕＩ℃ｅ，ｄａｔ（ｉ）．ｄｅｓｔ

ｉｈＡＰ８ｉｍ．‰ｅ．Ｄａ诅．ｓ仃ｅ锄８．Ｅｌｅｍｅｎｔｓ（，，５０８”）．Ｉｎｐｕｔ．Ｅｌｅ—ｍｅｎｔｓ（叮ＯＴＡＬ，，）．Ｅ１ｅｍｅｎｔｓ（”ＭＩｘＥＤ”）．Ｖａｌｕｅ＝ｄａｔ（ｉ）．ｃｏｍ—

ｐｏｓ

ｉｈＡＰｓｉｍ．Ｔｒｅｅ．Ｄａ诅．Ｂ１０ｃｋｓ．Ｅｌｅｍｅｎｔｓ（”Ｂ２”）．Ｉｎｐｕｔ．Ｅｌｅ－ｍｅｎｔｓ（”Ｓ０ｕＲｃＥ—ＳｆＩ．ＡＧＥ”）．Ｅｌｅｍｅｎｔｓ（”Ｐ一１”）．Ｖａｌｕｅ＝ｄａｔ（ｉ）．ｓｏｕｒｃｅ

ｉｈＡＰｓｉｍ．’Ｉ＇ｒｅｅ．Ｄａｔａ．Ｂ１０ｃｋｓ．Ｅｌｅｍｅｎｔｓ（”Ｂ２”）．Ｉｎｐｕｔ．Ｅ１ｅ—ｍｅｎｔ８（”ＤＥｓＴ—ｓ＇１ＡＧＥ”）．Ｅｌｅｍｅｎｔｓ（叩一１”）．Ｖａｌｕｅ＝ｄａｔ（ｉ）．ｄｅｓｔ

ｉｈＡＰｓｉｍ．Ｔｒｅｅ．Ｄａ诅．Ｂｌｏｃｋｓ．Ｂ２．Ｉｎｐｕｔ．Ｅｌｅ砒ｎｔｓ（”ＦＥ功一ｓ，ｒＡＧＥ，，）．Ｅｌｅｍｅｎｔ８（７，加７”）．Ｖａｌｕｅ＝ｄａｔ（ｉ）．ｓ姆

’ｒｕｎｔｌｌｅ８ｉｍｕｌａｔｉｏｎ

ｉｈＡＰｓｉｍ．Ｒ瑚

ｌｏｏｋａｔｔｈｅｓｔａｔｕｓａｎｄｒｅｓｕｌ协

ｃｏｃｌ２＿ｌ＝ｉｈＡＰｓｉｍ．Ｔｒｅｅ．Ｄａ诅．Ｓ仃ｅ锄ｓ．Ｅｌｅｍｅｎｔｓ（，，５０９”）．０ｕｔｐｕｔ．Ｅｌｅｍｅｎｔｓ（”ＭＡＳＳＦＬ０ｗ”）．Ｅｌｅｍｅｎｔｓ（”ＭＩＸＥＤ”）．Ｅｌｅ－ｍｅｎｔｓ（佗０ＣＬ２”）．Ｖａｌｕｅ

ＨＹＤＲＯ一２＝ｉｈＡＰｓｉｍ．１、℃ｅ．Ｄａｔａ．ｓｔｒｅａｍｓ．Ｅｌｅｍｅｎｔｓ（”５０７”）．０ｕｔｐｕｔ．Ｅｌｅｍｅｎ协（”ＭＡｓｓＦＬ０ｗ”）．Ｅｌｅｍｅｎ协（”ＭＩｘＥＤ”）．Ｅｌｅｍｅｎｔ８（”ＨＹＤＲ０—０ｌ”）．Ｖａｌｕｅ

０ｐｅｎ”Ｅ：、ＧＡ、ｄａｔｅ２．ｔｘｔ”ＦｏｒＡｐｐｅｎｄ

Ａｓ圯

Ｐｒｉｎｔ舵，ｃｏｃｌ２—１，ＨＹＤＲＯ一２