Можно ли автоматически вставить местный разрез на виде чертежа Autodesk Inventor с помощью API?

[Искатель_ru 0]

В процессе своей работы потребовалось разобраться с функциональностью автоматизации оформления чертежей Autodek Inventor. И возник вопрос, есть ли инструменты API, позволяющие вставить на вид местный разрез.

[Искатель_ru 0]

Появилось дополнение к вопросу. Я нашел на англоязычном форуме код VBA, который работает после адаптации его синтаксиса под ILogic, однако пока не побороть неустранимую ошибку. Хотя сам местный разрез строится. Поэтому сам вопрос переформулируется, есть ли работоспособный аналог кода.

 

Привожу текст кода, адаптированный под ILogic:

 

Dim oDoc As DrawingDocument

oDoc = ThisApplication.ActiveDocument
    
Dim oSheet As Sheet
oSheet = oDoc.ActiveSheet
    
Dim oView As DrawingView
oView = oSheet.DrawingViews(1)
    
Dim oSketch As Sketch
oSketch = oView.Sketches(1)
   
'Create a  profile then revolve it
Dim oProfile As Profile
oProfile = oSketch.Profiles.AddForSolid

Dim oDCurve As DrawingCurve

oDCurve = oView.DrawingCurves.Item(1)
     
Dim oPointIntent As Point2d
oPointIntent = oDCurve.StartPoint
    
Dim oIntent1 As GeometryIntent
oIntent1 = oSheet.CreateGeometryIntent(oDCurve, oPointIntent)
     
'Add break out view
 Dim oBreakOut As BreakOutOperations
 
 oBreakOut = oView.BreakOutOperations.Add(oProfile, oIntent1, 0.5, True)