DEF Placing(iProduct:IN)
INT iProduct
INT Index1
INT Index2
;*** Move PTP place approx position
VelAccApo(2,3,150)
PTP pTestePlace2 C_DIS
FOR Index1=0 TO 9 STEP 1
;Move LIN place position
VelAccApo(3,10,50)
PTP_REL {X 60} C_DIS
ENDFOR
FOR Index2=0 TO 9 STEP 1
;Move LIN place reatreat position
VelAccApo(3,10,50)
PTP_REL {X -60} C_DIS
ENDFOR
END