View all script labels and find an object by its script label

Question

Hello,
I have an InDesign document in which many objects get a script label. I know how to view and edit the script label of an object, but is it possible to:
1 - See a list of all the script labels of the document (as can be done with the styles for example)?
2 - Search an object in the document by its script label?

Answer 1

If you are using OSX this AppleScript displays a list of document labels:
global labels
set labels to []
tell application "Adobe InDesign CS6"
    set x to every page item of active document
    repeat with i in x
        if class of i is group then
            my checkGroup(i)
        else
            my getLabel(i)
        end if
    end repeat
    display dialog labels as string
end tell
on checkGroup(g)
    tell application "Adobe InDesign CS6"
        set gi to all page items of g
        repeat with a in gi
            if class of a is group then
                my checkGroup(a)
            else
                my getLabel(a)
            end if
        end repeat
    end tell
end checkGroup
on getLabel(pageitem)
    tell application "Adobe InDesign CS6"
        if label of pageitem is not "" and label of pageitem is not in labels then
            set labels to labels & label of pageitem
        end if
    end tell
end getLabel