All Frameworks  Object Hierarchy  This Framework  Indexes

MoveHomeAct (Object)

Interface representing a MoveHomeAct.

Role: This interface is used to retrieve/assign the value of motion targets/attrs for the move home activity.
The following code snippet can be used to obtain a MoveHomeAct from a selected Activity 
   Dim oSelectAct As Activity
   Set oSelectAct = CATIA.ActiveDocument.Selection.FindObject("CATIAActivity")
   Dim objMoveAct As MoveHomeAct
   Set objMoveAct = oSelectAct.GetTechnologicalObject("MoveHomeAct")

Property Index

Acceleration
This property returns and sets the Acceleration percentage for the move activity.
CornerRounding
This property returns and sets the Corner Rounding for the move activity.
HomeName
Sets and Retrieves Home Name corresponding to the activity target
MechanismIndex
Sets and Retrieves mechanism index for the move activity.
MotionBasis
Sets and Retrieves Motion Basis defined for the activity ("TIME" / "SPEED")
SpeedPercent
This property returns and sets the speed value percentage for the move activity.

Properties


o Property Acceleration() As
This property returns and sets the Acceleration percentage for the move activity. • For straight line motion, the percentage of the maximum TCP linear acceleration • For joint-interpolated motion, the percentage of the maximum joint acceleration
Returns:
oAccel The Speed Percent for the move activity.
Parameters:
iAccel
The specified Speed Percent for the move activity.
Example: 
   Dim objMoveAct As MoveHomeAct
          ......
   Dim  Accl as Double
   Accl=objMoveAct.Acceleration
   Accl  = 30
   objMoveAct.Acceleration=Accl
o Property CornerRounding() As
This property returns and sets the Corner Rounding for the move activity. Corner Rounding::The percentage represents the extent to which the device decelerates as it rounds the corner.
Returns:
oCornerRounding The Corner Rounding for the move activity.
Parameters:
iCornerRounding
The specified Corner Rounding for the move activity.
Example: 
   Dim objMoveAct As MoveHomeAct
          ......
   Dim  Rounding as Double
   Rounding=objMoveAct.CornerRounding
   Rounding = 30
   objMoveAct.CornerRounding=Rounding
o Property HomeName() As
Sets and Retrieves Home Name corresponding to the activity target
Returns:
oHomeName Home Name stored as the target.
Parameters:
iHomeName
The specified Home Name as the activity target
Example: 
   Dim objMoveAct As MoveHomeAct
          ......
   Dim  HomeName as string
   HomeName=objMoveAct.HomeName
   HomeName  = "Home.2"
   objMoveAct.HomeName=HomeName
o Property MechanismIndex() As
Sets and Retrieves mechanism index for the move activity. The index of mechanism in the list of mechanisms of the owning resource.
Returns:
oMechanismIndex The mechanism index for the move activity.
Parameters:
iMechanismIndex
The specified mechanism index for the move activity.
Example: 
   Dim objMoveAct As MoveHomeAct
          ......
   Dim  MechIndex as Integer
   MechIndex=objMoveAct.MechanismIndex
   MechIndex = 1
   objMoveAct.MechanismIndex=MechIndex
o Property MotionBasis() As
Sets and Retrieves Motion Basis defined for the activity ("TIME" / "SPEED")
Returns:
oMotionBasis The Motion Basis for the move activity.
Parameters:
iMotionBasis
The specified Motion Basis for the move activity.
Example: 
   Dim objMoveAct As MoveHomeAct
          ......
   Dim  MotionBas as string
   MotionBas=objMoveAct.MotionBasis
   MotionBas  = "SPEED"
   objMoveAct.MotionBasis=MotionBas
o Property SpeedPercent() As
This property returns and sets the speed value percentage for the move activity. • For straight line motion, the percentage of the maximum TCP linear speed. • For joint-interpolated motion, the percentage of the maximum joint speed.
Returns:
oSpeedPercent The Speed Percent for the move activity.
Parameters:
iSpeedPercent
The specified Speed Percent for the move activity.
Example: 
   Dim objMoveAct As MoveHomeAct
          ......
   Dim  SpeedValPr as Double
   SpeedValPr=objMoveAct.SpeedPercent
   SpeedValPr = 80
   objMoveAct.SpeedPercent=SpeedValPr

Copyright © 2003, Dassault Systèmes. All rights reserved.