@START
---------------------------------------------------------------------------
            TOOLING SEQUENCE FOR PROGRAMME #FILE
            PROGRAMMED BY BILL PAYTER #DATE #SYSTIME
---------------------------------------------------------------------------
---------------------------------------------------------------------------
TOOL#TOOL#EVAL(#S1=jos(st_desc))	#S1	#EVAL(#S7=jos(step_num))#S7#EXLN
	B#INDXA
@TOOLCHG
 
TOOL#TOOL#EVAL(#S1=jos(st_desc))	#S1	#EVAL(#S7=jos(step_num))#S7#EXLN
	B#INDXA
@END
 
            END OF PROGRAMME #FILE
  
//            #FMT(#V3,T3.0) TOOLS USED ON THIS PROGRAMME
// 
//            (NB. SAME TOOL CAN BE COUNTED MORE THAN ONCE!!!)
---------------------------------------------------------------------------
---------------------------------------------------------------------------
@LINE
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@ARC
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@RAPID
@FXD1
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@FXD2
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@FXD3
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@FXD4
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@FXD5
#EVAL(#S6=jos(step_num))
#IF(#S6<>#S7)<#CALL(TOOLCHG)>
@DWELL