Lo siento, estoy escribiendo esto con un poco de prisa, así que tendré que volver y actualizarlo con una explicación adecuada. Sin embargo, aquí hay un script con un controlador para obtener una lista de páginas de un documento PDF, donde item n en la lista devuelta es la etiqueta correspondiente a la página en el índice n :

 use framework "Foundation"
use framework "PDFKit"
use scripting additions

property this : a reference to the current application
property PDFDocument : a reference to PDFDocument of this

choose file of type "com.adobe.pdf" with prompt "Select PDF File"
PDFPagesInDocument at result

on PDFPagesInDocument at filepath
        local filepath

        try -- test file exists
                set fileURL to filepath as text ¬
                        as {alias, POSIX file} ¬
                        as «class fsrf»
        on error
                return false
        end try

        script pages
                property list : {}
        end script

        tell PDFDocument to tell alloc()
                initWithURL_(fileURL)
                repeat with i from 0 to pageCount() - 1
                        tell pageAtIndex_(i) to set the end of the ¬
                                list of pages to its label() as text
                end repeat
        end tell

        return the list of pages
end PDFPagesInDocument
 

Aquí está mi código final que funcionó:

 tell application "Skim"
    activate
    set theDoc to front document
    tell application "System Events" to tell application process "Skim"
        set metaPage to (get value of text field "Page" of group 2 of toolbar 1 of window 1)
    end tell
end tell
 

Espero que algunos de ustedes puedan responder mis otras preguntas indicadas anteriormente.