通过跳转语句实现子程序调用
测量的过程中，经常会遇到需要对一批零件中的某几个选择性进行测量.
这时候通常是用一个主程序对几个零件的测量程序进行调用,但是我们可以用跳转JUMPTO的语句简单实现这一要求.
1.定义所需要的变量.
2.Prompt进行提示让用户选择.
3.做判断是测量还是跳转.
DECL/INTGR,ItemA,ItemB,ItemC,ItemD,ItemE
Tempchar = Prompt/CHECK,'工件A',ItemA,$
CHECK,'工件B',ItemB,$
CHECK,'工件C',ItemC,$
CHECK,'工件D',ItemD,$
CHECK,'工件E',ItemE
IF/(ItemA .EQ. 0)
Jumpto/(BBB)
ENDIF
$$$ 这段是测量A工件的程序
Write/DID(defaultscreen),'测量A工件完成'
(BBB)
IF/(ItemB .EQ. 0)
Jumpto/(CCC)
ENDIF
$$$ 这段是测量B工件的程序
Write/DID(defaultscreen),'测量B工件完成'
(CCC)
IF/(ItemC .EQ. 0)
Jumpto/(DDD)
ENDIF
$$$ 这段是测量C工件的程序
Write/DID(defaultscreen),'测量C工件完成'
(DDD)
IF/(ItemD .EQ. 0)
Jumpto/(EEE)
ENDIF
$$$ 这段是测量D工件的程序
Write/DID(defaultscreen),'测量D工件完成'
(EEE)
IF/(ItemE .EQ. 0)
Jumpto/(FFF)
ENDIF
$$$ 这段是测量E工件的程序
Write/DID(defaultscreen),'测量E工件完成'
(FFF)
您的位置:
DMIS 空间-- -> DMIS 区 -> DMIS 心得 -> 通过跳转语句实现子程序调用
