Hello,
is it possible to write a macro that goes through the assembly and exports the parts to the step that start with the name z0000?
thank you for the support
any help?
I would like to create a macro that goes through the assembly and opens individual parts in a new window, then calls up a file export dialog and saves it, then closes the file, returns to the assembly and opens another part, etc.
hello,
I made a macro to export the file to the step, but I don’t know how to make the main loop to only go through the parts.
Can you advise me?
MACRO main
GLOBAL CMD = " "
SA= " "
SB = """
cesta <= "D:\EXPORT\"
A=2
WHILE (A<1000)
[vxSendEvt,"UiAssemblyManager",110,A,14,8]
[vxSendEvt,"UiAssemblyManager",110,A,2,8]
[vxSend,"~AsmCall(open)"]
[vxSend,"$CdDispPMIOn"]
[vxFileActive,active_file]
[Print,active_file]
[Print,rootAssembly]
[StringParseStart,active_file,".",string_out_A] #Delimiter to header string slice
partName <=string_out_A + ".stp"
[vxSend,"$CdRootExport"]
BUFFER
[vxSend,partName]
ENDBUFFER
cesta2 <= cesta + partName
[vxSendEvt,"UiDxStepForm_Old",991,1,11,cesta2]
[vxSendEvt,"UiDxStepForm_Old",61,2,2]
[vxSendEvt,"UiDxStepForm_Old",90,1,2]
[vxFileActive,active_file]
CMD <= "$CdFileClose" + SA + SB + active_file + SB
[vxSend,CMD]
BUFFER
BUFFER
[vxSendEvt,"UiGetOpt",-1,0,-2]
ENDBUFFER
ENDBUFFER
[vxSend,"$CdSheetAutoRegen"]
CMD = " "
[Print,partName]
A=A+1
ENDWHILE
ENDMACRO