×
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Log In

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

CATScript: Adding to Lists

CATScript: Adding to Lists

CATScript: Adding to Lists

(OP)
Hi All,

Does anyone know the syntax for adding to a List within a CATScript Macro?  I have been using the .add() method, however it keeps returning an error saying that the Object does not support of the method.  

I read in the documentation that the .add() method will not put an already existing element into a List if .IsDuplicateElementsAllowed is set to false, however I am not able to find documentation on how to use this statement.

To be more specific, I am trying to add points that I create within a Macro loop into a list.

RE: CATScript: Adding to Lists

Try this,

Sub Main()

Dim oDoc
Set oDoc = CATIA.ActiveDocument

Dim oPart
Set oPart = oDoc.Part

Dim oHBs
Set oHBs = oPart.HybridBodies

Dim oHB
Set oHB = oHBs.Add

Dim oHSF
Set oHSF = oPart.HybridShapeFactory

Dim oParams
Set oParams = oPart.Parameters

Dim oList
Set oList = oParams.CreateList("Points")

For i = 1 To 10
    X = X + 25
    Set myPoint = oHSF.AddNewPointCoord(X, 0, 0)
    oHB.AppendHybridShape myPoint
    oList.ValueList.Add myPoint
Next i

End Sub

RE: CATScript: Adding to Lists

(OP)
Thank you nev99 !

Worked perfectly!

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Eng-Tips Forums free from inappropriate posts.
The Eng-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members!


Resources