利用PowerBuilder实现LIS系统中的串口通讯.docVIP

利用PowerBuilder实现LIS系统中的串口通讯 南晓北，书恒 （赤峰学院 ，内蒙古 赤峰 024000） 摘要：介绍了如何使用PowerBuilder中的MSComm 控件来实现检验仪器与计算机之间的串口通讯。 关键词：LIS、MSComm 控件、串口通讯 随着医院信息系统技术日趋成熟，如今医院信息系统在医院得到广泛应用。检验信息系统（LIS: Laboratory Information System）是医院信息系统中一个较大组成部分。利用计算机对检验仪器进行数据的自动采集是医院检验科室信息化建设中的重要内容。串口因其速度快所以是目前检验仪器大量采用的一种数据传输端口。PB（PowerBuilder）工具软件是Sybase公司开发的分布式数据库应用程序的前端开发工具，它以功能强大、使用灵活的数据窗口，面向对象的、具有可视图形界面的因此深受广大的PB进行LIS系统串口通讯程序的开发也是被广泛应用的一种方式。 一、MSComm控件常用的属性及通讯方法 在使用PB开发LIS系统串口通讯程序应首先来了解一下微软的Microsoft Communications Control（简称MSComm）控件，MSComm属于Windows下串行通讯编程的ActiveX控件，它为应用程序提供了通过串行端口传输和接收数据，为应用程序提供串行通讯功能。 1、MSComm 控件的常用属性 　　CommPort设置通讯端口号。　? 　　Settings以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位。　? 　　PortOpen设置通讯端口的状态可以打开关闭端口。　? 　　Input　?从接收缓冲区返回和删除字符。　? Output　向传输缓冲区写一个字符串。InBufferSize:　设置或返回接收缓冲区的大小，缺省为1024?字节。InBufferCount:返回接收缓冲区内的等代读取的字节个数，设属性为0清除接收缓冲区。?OutBufferSize: 设置或返回发送缓冲区，缺省为512字节。?OutBufferCounter:　返回发送缓冲区内等待发送的字符数，可用0来清空缓冲区。?RThreshold:?　该属性确定当接收缓冲区内字节个数达或超过该值后就产生代码为ComEventReceive的OnComm事件，设置位0，则不产生OnComm事件。?CommEvent:　有通讯错误或事件发生时产生OnComm事件，CommEvent事件的值可以用来确定引发OnComm事件的具体的错误或事件常用的有以下几种ComEventbreak：接受到中断信号ComEventRxOver：接收缓冲区溢出。ComEventTxFull：发送缓冲区溢出。ComEventReceive：接受到规定的字符数。InputLen:设置或返回接收缓冲区内用Input读入的个数。若取0，则读取整个缓冲区的内容。SQL Server就可以。 第二步：设计应用程序界面。在这里主要说一下如何插入MSComm控件，在设计窗口插入MSComm控件的步骤：选中Create OLE Control在Insert Object会话框中选中Insert Control页卡中的Microsoft Communications Control项，这便完成了添加MSComm控件。如下图 第三步：这一步是编写程序的重点与难点，在完成上面的界面设计之后我们就要为界面里的控件编写代码。在界面设计时除MSComm控件外还有两项是必需要设计的。一个是通讯端口选择，因为一台计算机有多个串口（com1,com2,……）如果一台计算机连接两台或更多的仪器时就要凭借通讯端口来区分数据和接收数据。另一个是通讯参数配置，检验仪器进行数据传输时会根据仪器自身的参数来进行通讯，这些参数包括：波特率，数据位，停止位，校验位。 接下来我们来重点看一下对MSComm控件相关事件及相关函数的编写。 1、为MSComm控件编写Oncomm事件 注：代码中ole_comm_one为MSComm控件的名称 String ls_receipt_data char lc_char_data Integer li_len, i ls_receipt_data = ole_comm_one.object.Input if gs_status = P then return li_len = Len(ls_receipt_data) for i = 1 to li_len lc_char_data = Mid(ls_receipt_data, i, 1) f_comm_char_monitor(lc_char_data) next 2、f_comm_char_monitor函数： 它的功能是当有字符触