// DXL generated by DOORS traceability wizard on 24 March 2009.
// Wizard version 2.0, DOORS version 8.2.0.2
//Modified by KM 25MAR09 to display object identifier in bold
pragma runLim, 0
int lines[1] = {0}
void adjustLines(int depth, showAtDepth) {
    int count
    for (count = 0; count < 1; count++) {
        while (lines[depth-1] < lines[count]) {
            if (depth == showAtDepth) displayRich("\\pard " " ")
            lines[depth-1]++
        }
    }
}
void showOut(Object o, int depth) {
    Link l
    LinkRef lr
    ModName_ otherMod = null
    Module linkMod = null
    ModuleVersion otherVersion = null
    Object othero
    string disp = null
    string s = null
    string plain, plainDisp
    int plainTextLen
    int count
    bool doneOne = false
    string linkModName = "*"
    for l in all(o->linkModName) do {
        otherVersion = targetVersion l
        otherMod = module(otherVersion)
        if (null otherMod || isDeleted otherMod) continue
        othero = target l
        if (null othero) {
            load(otherVersion,false)
        }
        othero = target l
        if (null othero) continue
        if (isDeleted othero) continue
        int oldLines = lines[depth-1]
        adjustLines(depth, 1)
        bool kick = (doneOne) && (lines[depth-1] == oldLines)
        if (kick) {
            lines[depth-1]++
            if (depth == 1) displayRich("\\pard " " ")
        }
        if (depth < 1) {
            showOut(othero, depth+1)
        }
        doneOne = true
        if (depth == 1) {

            s = "{\\b " identifier(othero) " }"
            displayRich(s)

            s = probeRichAttr_(othero,"Object Heading", true)
            displayRich("\\pard " s)
            
            s = probeRichAttr_(othero,"Object Text", true)
            displayRich("\\pard " s)

        }
        lines[depth-1] += 3
    }
    if (depth == 1) {
        ExternalLink extLink
        doneOne = false
        for extLink in o->"" do {
            if (!doneOne) {
                displayRich("\\pard " "{\\b External Links:}")
                doneOne = true
            }
        }
    }
}
showOut(obj,1)
       }