Extracting All Names from Wires with Multiple Names

Question

Hello, 
 The problem I am having is that I am trying to get the names of wires on a page. I already have code to iterate over every schematic, every page, and every wire. However, when I use the GetNetName command for my wire, it only returns the top name for the wire. In my design, I have wires that have more than one name. I want to find a way to extract all of the names of each wire. Does anyone know how I can do this? 
 I appreciate it.

CadAP · Accepted Answer

Hi AB_1717543042707, 
 
 You can try the below code which will give you schematic net, Alias Name and Net Name of a wire. 
 Need to select the design and source the below code. 
 
 set lNets [CapFindObjects $COrFindFilterDlg_NETS {*}] set lStatus [DboState] # set lAliasName [DboTclHelper_sMakeCString] # set lNetName [DboTclHelper_sMakeCString] # set lSchiNetName [DboTclHelper_sMakeCString] set lNullObj NULL foreach lNet $lNets { set lAliasName [DboTclHelper_sMakeCString] set lNetName [DboTclHelper_sMakeCString] set lSchiNetName [DboTclHelper_sMakeCString] set lWiresIter [$lNet NewWiresIter $lStatus] #get the first wire set lWire [$lWiresIter NextWire $lStatus] while {$lWire != $lNullObj} { puts $lWire $lWire GetNetName $lNetName $lNet GetName $lSchiNetName set lObjectType [$lWire GetObjectType] if {$lObjectType == $::DboBaseObject_WIRE_SCALAR} { set lAliasIter [$lWire NewAliasesIter $lStatus] # #get the first alias of wire set lAlias [$lAliasIter NextAlias $lStatus] while { $lAlias!=$lNullObj} { #placeholder: do your processing on $lAlias $lAlias GetName $lAliasName set AliasNetName [DboTclHelper_sGetConstCharPtr $lAliasName] set SchiNetName [DboTclHelper_sGetConstCharPtr $lSchiNetName] set NetName [DboTclHelper_sGetConstCharPtr $lNetName] #get the next alias of wire # puts $lAlias set lAlias [$lAliasIter NextAlias $lStatus] } # $lWire GetNetName $netname # puts [DboTclHelper_sGetConstCharPtr $netname] #placeholder: do your processing on Wire scalar $lWire } #get the next wire delete_DboWireAliasesIter $lAliasIter set lWire [$lWiresIter NextWire $lStatus] puts "AliasNetName: = $AliasNetName , SchiNetName := $SchiNetName , NetName: = $NetName" } } 
 
 If this doesn't work for you then can you please share the screen shot of you schematic(a wire with multiple name) for what you are looking for.

CadAP · Answer

Hi AB_1717543042707, 
 
 Good to hear that it worked for you. 
 Please find the below code which need to be sourced(capture command window) without selecting the design. 
 
 set lSession $::DboSession_s_pDboSession DboSession -this $lSession set lStatus [DboState] set lDesign [GetActivePMDesign] set lNullObj NULL set lAliasName [DboTclHelper_sMakeCString] set lNetName [DboTclHelper_sMakeCString] set lSchiNetName [DboTclHelper_sMakeCString] if { $lDesign!= $lNullObj} { 
 # puts $lDesign set lSchematicIter [$lDesign NewViewsIter $lStatus $::IterDefs_SCHEMATICS] # get the first schematic view set lView [$lSchematicIter NextView $lStatus] puts $lView while { $lView != $lNullObj} { # dynamic cast from DboView to DboSchematic set lSchematic [DboViewToDboSchematic $lView] set schematicName [DboTclHelper_sMakeCString] $lSchematic GetName $schematicName puts [DboTclHelper_sGetConstCharPtr $schematicName] set lSchiName [DboTclHelper_sGetConstCharPtr $schematicName] 
 set lPagesIter [$lSchematic NewPagesIter $lStatus] # get the first page set lPage [$lPagesIter NextPage $lStatus] set lNullObj NULL while {$lPage!=$lNullObj} { # placeholder: do your processing on $lPage set pageName [DboTclHelper_sMakeCString] 
 $lPage GetName $pageName puts [DboTclHelper_sGetConstCharPtr $pageName] set lPageName [DboTclHelper_sGetConstCharPtr $pageName] # get the next page set lWiresIter [$lPage NewWiresIter $lStatus] #get the first wire set lWire [$lWiresIter NextWire $lStatus] set lNullObj NULL while {$lWire != $lNullObj} { set lObjectType [$lWire GetObjectType] if {$lObjectType == $::DboBaseObject_WIRE_SCALAR} { #placeholder: do your processing on Wire scalar $lWire set lNet [$lWire GetNet $lStatus] $lWire GetNetName $lNetName $lNet GetNetName $lSchiNetName set SchiNetName [DboTclHelper_sGetConstCharPtr $lSchiNetName] set NetName [DboTclHelper_sGetConstCharPtr $lNetName] set lAliasIter [$lWire NewAliasesIter $lStatus] # #get the first alias of wire set lAlias [$lAliasIter NextAlias $lStatus] while { $lAlias!=$lNullObj} { #placeholder: do your processing on $lAlias $lAlias GetName $lAliasName 
 set AliasNetName [DboTclHelper_sGetConstCharPtr $lAliasName] 
 #get the next alias of wire # puts $lAlias set lAlias [$lAliasIter NextAlias $lStatus] } } puts "AliasNetName: = $AliasNetName , SchiNetName := $SchiNetName , NetName: = $NetName" #get the next wire set lWire [$lWiresIter NextWire $lStatus] } delete_DboPageWiresIter $lWiresIter 
 set lPage [$lPagesIter NextPage $lStatus] } set lView [$lSchematicIter NextView $lStatus] delete_DboSchematicPagesIter $lPagesIter } 
 delete_DboLibViewsIter $lSchematicIter 
 }

Stats

Extracting All Names from Wires with Multiple Names

Community Guidelines