How can I get other parts infomation of a multi-part package part with tcl script?

Hi Jadystone,

We're looking into your query. Will get back to you ASAP.

Hi Jadystone,

Select the parts with multiple section and source the below code:

proc dumplist {ref} {

#Use current Session in Orcad_Capture
set lSession $::DboSession_s_pDboSession
DboSession -this $lSession
set lNullObj NULL
set lStatus [DboState]
set lDesign [$lSession GetActiveDesign]
set lSchi_Name [DboTclHelper_sMakeCString]
set lPropRef [DboTclHelper_sMakeCString "Reference"]
set lPropPRName [DboTclHelper_sMakeCString "Part Reference"]
set lPropPRVal [DboTclHelper_sMakeCString ]
set lPropRefVal [DboTclHelper_sMakeCString ]
set reflist {}
if {$lDesign != $lNullObj} {

set lSchematicIter [$lDesign NewViewsIter $lStatus $::IterDefs_SCHEMATICS]
#get the first schematic view
set lView [$lSchematicIter NextView $lStatus]

set lPage_Name [DboTclHelper_sMakeCString]
while { $lView != $lNullObj} {
#dynamic cast from DboView to DboSchematic
set lSchematic [DboViewToDboSchematic $lView]
$lSchematic GetName $lSchi_Name
set lPagesIter [$lSchematic NewPagesIter $lStatus]
#get the first page
set lPage [$lPagesIter NextPage $lStatus]
# puts [DboTclHelper_sGetConstCharPtr $lSchi_Name]
while {$lPage!=$lNullObj} {
#placeholder: do your processing on $lPage
$lPage GetName $lPage_Name
# puts [DboTclHelper_sGetConstCharPtr $lPage_Name]
set lPartInstsIter [$lPage NewPartInstsIter $lStatus]
#get the first part inst
set lInst [$lPartInstsIter NextPartInst $lStatus]
while {$lInst!=$lNullObj} {
#dynamic cast from DboPartInst to DboPlacedInst
set lPlacedInst [DboPartInstToDboPlacedInst $lInst]
if {$lPlacedInst != $lNullObj} {
$lPlacedInst GetEffectivePropStringValue $lPropRef $lPropRefVal
$lPlacedInst GetEffectivePropStringValue $lPropPRName $lPropPRVal
if {[DboTclHelper_sGetConstCharPtr $lPropRefVal ] == $ref && [DboTclHelper_sGetConstCharPtr $lPropPRVal] != $ref} {

lappend reflist [DboTclHelper_sGetConstCharPtr $lPropPRVal]

}
}
#get the next part inst
set lInst [$lPartInstsIter NextPartInst $lStatus]
}
#get the next page
set lPage [$lPagesIter NextPage $lStatus]
}
#get the next schematic view
set lView [$lSchematicIter NextView $lStatus]
}
delete_DboLibViewsIter $lSchematicIter
delete_DboSchematicPagesIter $lPagesIter
return $reflist
}
}

set selObj [GetSelectedObjects]
set lPropRefDes [DboTclHelper_sMakeCString "Reference"]
set lPropRefDesVal [DboTclHelper_sMakeCString ]
foreach obj $selObj {

$obj GetEffectivePropStringValue $lPropRefDes $lPropRefDesVal
set lRefdes [DboTclHelper_sGetConstCharPtr $lPropRefDesVal]
# puts $lRefdes
puts [dumplist $lRefdes]

}

Hope this helps!

I get it. Thank you very much!

if have one pin number eg U1.5,
it's belongs to a multi-part package part,eg: U1.5 at the section U1B
how can i get the U1B's page name from U1.5 with tcl
could you give me some advice ?

tennywhy  above tcl work for selected instance not for pin but you can modify the above tcl for getting the information when select pin .

Tyr below suggestion to achieve your requirement,

1. Get the selected Pin dbId (use command "GetSelectedObjects").

2. Get the owner of the selected part (use command [GetSelectedObjects] GetOnwer). It will return the placed part instance.

Now you have part instance you can use above tcl code to get the rest of information.

Do let me know if still stuck.