RationalDMIS 7.1 超差时自动报警

前段时间客户有一个要求,想在评价元素的时候,如果超差,机器能自动提示警报.

这个功能实现起来比较简单,但是很有意思,也很实用.

1.声明一个DOUBLE型变量.

2.取得某一项公差的偏差值(等于实际-理论-公差带)

3.判断如果这个值为0表示没超差.

如果不为0,表示超差,播放计算机上的一个声音文件.

代码如下

DECL/COMMON,DOUBLE,knptr1

knptr1 = value/TA(TDISTB3),AMT

IF/(knptr1 .eq. 0)

ENDIF

IF/(knptr1 .gt. 0)

tempchar = prompt/SOUND,‘c:\samplew.wav’

ENDIF

文件名为C盘根目录下的samplew.wav声音文件,大家可以用XP带的录音机录制一段自己的发音,比如 “超差啦~~~” "快去看结果~~~"等等.

RE:

在判断后加增加的语句.

                          1.公差超差后.

                          2.         I = I+1

                          3.         J = J+1

                          4.公差未超差

                            5.         J = J+1

                合格率为 I/J

    判断是否超差的语句参见前面的语句.![在这里插入图片描述](https://img-blog.csdnimg.cn/20200802095454526.jpg?x-oss-process=image/watermark,type_ZmFuZ3poZW5naGVpdGk,shadow_10,text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3dlaXhpbl80MzkxMTc5OA==,size_16,color_FFFFFF,t_70)