start-of-selection.
GET objec.
    if objec-otype = 'P'.
       it_detail-pernr = objec-objid.
       append it_detail.
       "write: /  it_detail-pernr.
    endif.
end-of-selection.