Code to make program end if diameter of a certain dimension is out.

Question

I don't know much at all about expressions, labels, etc. I've been working the past few hours trying to make a command that will end my program if a particular dimension is out of spec. All I want is a code that #1) checks that dimension, #2) has a comment that informs the operator that the dimension is out of spec, #3) ends the program. 
 Here is the dimension as it is in the program. If the diameter is out of spec, I want it to trigger a comment to the operator, then end the program. 
 DIM 68= LOCATION OF CIRCLE F2 UNITS=IN ,$ GRAPH=OFF TEXT=OFF MULT=1.00 OUTPUT=BOTH HALF ANGLE=NO AX NOMINAL +TOL -TOL MEAS OUTTOL DEV D 1.4100 0.1500 0.2000 2.3337 0.7737 0.9237 --------> END OF DIMENSION 68 
 I appreciate any help anyone can give me. Thanks!!

JacobCheverie · Accepted Answer

For a dimension LOC1 giving the diameter of a feature, you simply need to put 
 
 IF/LOC1.D.OUTTOL > 0 
 ROUTINE/END 
 END_IF/ 
 
 You can include an operator comment before the ROUTINE/END line.

Matthew D. Hoedeman · Answer

I never tried that, BUT, since some 'operators' are 'operators' that shouldn't be 'operators', by keeping it split, you can go to two different labels, one with a message stating TOO BIG or one stating TOO SMALL, with both having another goto to the end of the program. Ya know, ya gotta spell it out for some 'operators'.

Matthew D. Hoedeman · Answer

assign a variable to the measured value of the diameter. Then flow control to goto a label at the end of the program IF the variable is more than MAX or less than MIN allowed size. 
 where GH002 is the hole, with .D indicating the size. 
 
 ASSIGN/V1 = GH002.D
 IF_GOTO/V1>10.1,GOTO = BAD
 IF_GOTO/V1<9.9,GOTO = BAD
BAD =LABEL/

WilliamL · Answer

You are correct about that, better off splitting it because of those "operators". Might save you that headache. 
 IF_GOTO/CR1.D > .625,GOTO = 2BIG
 IF_GOTO/CR1.D < .625,GOTO = 2SMALL
2BIG =LABEL/
 COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,OVC=NO,
 D 2 BIG
 GOTO/D_END
2SMALL =LABEL/
 COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO,OVC=NO,
 D 2 SMALL
 GOTO/D_END
D_END =LABEL/

WilliamL · Answer

Not sure if this is a valid statement in PC-DMIS but I feel like I have used it or seen it before. You can put it all into 1 line. I can't test this right now. 
 IF_GOTO/CR1.D > .625 OR CR1.D < .625,GOTO = BAD
BAD =LABEL/