Your Products have been synced, click here to refresh
COUNT_PROMPT =COMMENT/INPUT,NO,FULL SCREEN=NO, How many parts are you inspecting? $$ NO, ~ ~ ~ ADD STUFF RIGHT HERE TO LOCK DOWN THE NUMBER THEY'RE ALLOWED TO TYPE IN FOR THE "COUNT_PROMPT" (ABOVE). LOOP BACK TO "COUNT_PROMPT" IF THEY MESS UP. ~ ~ ~ ASSIGN/TOTAL_PARTS=COUNT_PROMPT.INPUT ASSIGN/SER=0 WHILE/SER<TOTAL_PARTS ASSIGN/SER=SER+1 SER_PROMPT =COMMENT/INPUT,NO,FULL SCREEN=NO, Please enter the serial number of the "part at Pallet Position "+SER+"." $$ NO, ~ ~ ~ ADD STUFF RIGHT HERE TO LOCK DOWN THE NUMBER THEY'RE ALLOWED TO TYPE IN FOR THE "SER_PROMPT" (ABOVE). LOOP BACK TO "SER_PROMPT" IF THEY MESS UP. ~ ~ ~ ASSIGN/SER_NUM[SER]=SER_PROMPT.INPUT END_WHILE/ ASSIGN/CONFIRMCOUNTSTATEMENT="Are there "+COUNT_PROMPT.INPUT+" parts on the table?" CONFIRM_COUNT =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, CONFIRMCOUNTSTATEMENT CONFIRM_LOCATIONS =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, Are the part(s) in the correct location(s)? IF_GOTO/CONFIRM_LOCATIONS.INPUT=="NO" OR CONFIRM_COUNT.INPUT=="NO",GOTO = COUNT_PROMPT RECALL/ALIGNMENT,EXTERNAL,FIXT_ALN_FAKE $$ NO, Pallet Handling --------------- ASSIGN/PALLET_POS[1]=MPOINT(0,0,0) ASSIGN/PALLET_POS[2]=MPOINT(6,0,0) ASSIGN/PALLET_POS[3]=MPOINT(12,0,0) ASSIGN/PALLET_POS[4]=MPOINT(0,6,0) ASSIGN/PALLET_POS[5]=MPOINT(6,6,0) ASSIGN/PALLET_POS[6]=MPOINT(12,6,0) ASSIGN/PALLET_POS[7]=MPOINT(0,12,0) ASSIGN/PALLET_POS[8]=MPOINT(6,12,0) ASSIGN/PALLET_POS[9]=MPOINT(12,12,0) $$ NO, Inspection Loop --------------- ASSIGN/CURR_POS=0 WHILE/CURR_POS<TOTAL_PARTS ASSIGN/CURR_POS=CURR_POS+1 $$ NO, Report Header ------------- COMMENT/REPT, "Serial Number: "+SER_NUM[CURR_POS] $$ NO, Pallet Position Offset (PO) ASSIGN/PO=PALLET_POS[CURR_POS] PO_PNT =GENERIC/POINT,DEPENDENT,CARTESIAN,$ NOM/XYZ,<0*1,0*1,0*1>,$ MEAS/XYZ,<PO.X,PO.Y,PO.Z>,$ NOM/IJK,<0*1,0*1,1*1>,$ MEAS/IJK,<0*1,0*1,1*1> INIT_ALN =ALIGNMENT/START,RECALL:FIXT_ALN_FAKE,LIST=YES ALIGNMENT/TRANS,XAXIS,PO_PNT ALIGNMENT/TRANS,YAXIS,PO_PNT ALIGNMENT/TRANS,ZAXIS,PO_PNT ALIGNMENT/END LABEL_TERMINUS=LABEL/
COUNT_PROMPT =COMMENT/INPUT,NO,FULL SCREEN=NO, How many parts are you inspecting? $$ NO, ~ ~ ~ ADD STUFF RIGHT HERE TO LOCK DOWN THE NUMBER THEY'RE ALLOWED TO TYPE IN FOR THE "COUNT_PROMPT" (ABOVE). LOOP BACK TO "COUNT_PROMPT" IF THEY MESS UP. ~ ~ ~ ASSIGN/TOTAL_PARTS=COUNT_PROMPT.INPUT ASSIGN/SER=0 WHILE/SER<TOTAL_PARTS ASSIGN/SER=SER+1 SER_PROMPT =COMMENT/INPUT,NO,FULL SCREEN=NO, Please enter the serial number of the "part at Pallet Position "+SER+"." $$ NO, ~ ~ ~ ADD STUFF RIGHT HERE TO LOCK DOWN THE NUMBER THEY'RE ALLOWED TO TYPE IN FOR THE "SER_PROMPT" (ABOVE). LOOP BACK TO "SER_PROMPT" IF THEY MESS UP. ~ ~ ~ ASSIGN/SER_NUM[SER]=SER_PROMPT.INPUT END_WHILE/ ASSIGN/CONFIRMCOUNTSTATEMENT="Are there "+COUNT_PROMPT.INPUT+" parts on the table?" CONFIRM_COUNT =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, CONFIRMCOUNTSTATEMENT CONFIRM_LOCATIONS =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, Are the part(s) in the correct location(s)? IF_GOTO/CONFIRM_LOCATIONS.INPUT=="NO" OR CONFIRM_COUNT.INPUT=="NO",GOTO = COUNT_PROMPT RECALL/ALIGNMENT,EXTERNAL,FIXT_ALN_FAKE $$ NO, Pallet Handling --------------- ASSIGN/PALLET_POS[1]=MPOINT(0,0,0) ASSIGN/PALLET_POS[2]=MPOINT(6,0,0) ASSIGN/PALLET_POS[3]=MPOINT(12,0,0) ASSIGN/PALLET_POS[4]=MPOINT(0,6,0) ASSIGN/PALLET_POS[5]=MPOINT(6,6,0) ASSIGN/PALLET_POS[6]=MPOINT(12,6,0) ASSIGN/PALLET_POS[7]=MPOINT(0,12,0) ASSIGN/PALLET_POS[8]=MPOINT(6,12,0) ASSIGN/PALLET_POS[9]=MPOINT(12,12,0) $$ NO, Inspection Loop --------------- ASSIGN/CURR_POS=0 WHILE/CURR_POS<TOTAL_PARTS ASSIGN/CURR_POS=CURR_POS+1 $$ NO, Report Header ------------- COMMENT/REPT, "Serial Number: "+SER_NUM[CURR_POS] $$ NO, Pallet Position Offset (PO) ASSIGN/PO=PALLET_POS[CURR_POS] PO_PNT =GENERIC/POINT,DEPENDENT,CARTESIAN,$ NOM/XYZ,<0*1,0*1,0*1>,$ MEAS/XYZ,<PO.X,PO.Y,PO.Z>,$ NOM/IJK,<0*1,0*1,1*1>,$ MEAS/IJK,<0*1,0*1,1*1> INIT_ALN =ALIGNMENT/START,RECALL:FIXT_ALN_FAKE,LIST=YES ALIGNMENT/TRANS,XAXIS,PO_PNT ALIGNMENT/TRANS,YAXIS,PO_PNT ALIGNMENT/TRANS,ZAXIS,PO_PNT ALIGNMENT/END LABEL_TERMINUS=LABEL/
© 2024 Hexagon AB and/or its subsidiaries. | Privacy Policy | Cloud Services Agreement |