×
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

How to create a quad element from nodes in FEMAP API

How to create a quad element from nodes in FEMAP API

How to create a quad element from nodes in FEMAP API

(OP)
Hi
I am new to API in FEMAP and I am trying to create a quad element from 4 nodes in API. I know how to create a surface and create the elements from the surface. But, I am wondering if I can create the element directly using the nodes.

Thanks

RE: How to create a quad element from nodes in FEMAP API

For future inquiries, please use the regularly monitored FEMAP forum found here:
https://community.plm.automation.siemens.com/t5/CA...

FEMAP > Help > FEMAP User Community will direct you there as well.

You can use the ".PutAllArray" method on the Element object. To see how to properly populate, it is helpful to create an element with the FEMAP GUI then use ".GetAllArray3" method. This will show you how to create the proper Variants for the call.




Here is the API:


Sub Main
Dim App As femap.model
Set App = feFemap()

Dim e As Elem
Set e = App.feElem

Dim numElem As Long
Dim idArray As Variant, propIDArray As Variant, elemTypeArray As Variant
Dim topologyArray As Variant, layerArray As Variant, colorArray As Variant
Dim formulationArray As Variant, orientArray As Variant, offsetArray As Variant
Dim releaseArray As Variant, orientSetArray As Variant, orientIDArray As Variant
Dim nodesSetArray As Variant, connectTypeArray As Variant, connectSegArray As Variant

Dim exist As Variant, materialCsys As Variant, warpingArray As Variant, springLocationArray As Variant
e.Get(1)
e.GetAllArray3( 0, numElem, idArray, exist, propIDArray, elemTypeArray, topologyArray, layerArray, _
colorArray, formulationArray, orientArray, offsetArray, releaseArray, orientSetArray, _
orientIDArray, nodesArray, connectTypeArray, connectSegArray, materialOrientType, materialCsys, warpingArray, springLocationArray)

rc = e.PutAllArray( numElem, idArray, propIDArray, elemTypeArray, topologyArray, layerArray, _
colorArray, formulationArray, orientArray, offsetArray, releaseArray, orientSetArray, _
orientIDArray, nodesArray, connectTypeArray, connectSegArray)

App.feViewRegenerate( 0 )

End Sub


RE: How to create a quad element from nodes in FEMAP API

(OP)
Hi RCatania

Thanks for your inputs. I will work on it. It has been helpful.

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