From http://organognosi.blogspot.com.es/2011/03/how-to-reveal-front-skim-pdf-document.html

Reveal in DEVONthink.scpt

(**
--You need to adjust appropriately the name of the DEVONthink database  in the line:
    tell database "MySources"
**)

tell application "Skim"
    set the xDEVONthinkLink to (get text for note 4 of document 1) as string
    set customUUID to text 21 thru -8 of xDEVONthinkLink as string
end tell

tell application "DEVONthink Pro"
    activate
    tell database "MySources"
        set myPDF to get record with uuid customUUID
        open tab for record myPDF
        tell application "System Events"
            tell process "DEVONthink Pro" to click menu item "Reveal" of menu 1 of menu bar item "Data" of menu bar 1
        end tell
    end tell
    close document window 1
end tell