Блин, все гениальное просто...Спасибо Роману за подсказку.
Распишу, если кто на будущее столкнется.
1. Вы вызываем
Code:
CALL FUNCTION 'RHOM_READ_INFTY_BUFFERED'
EXPORTING
plvar = l_info-plvar
otype = l_info-otype
objid = l_info-objid
infty = '1001'
subty = 'A031' " <-- note 489249
istat = l_info-istat "Note 1640619
TABLES
infty_dat = pt_1001
EXCEPTIONS
OTHERS = 0.
2. Используем класс из 2 методов созданный специально для этого:
Code:
DATA pad31 type PAD31.
call method cl_hr_adata_type_cast=>ADATA_TO_PADNN
EXPORTING
adata = pt_1001-adata
IMPORTING
padnn = pad31.
3. Pad31-Chara и есть значение квалификации.
P.S. Для сохранения в буфер тоже самое call method cl_hr_adata_type_cast=>PADNN_TO_ADATA. Затем p1001-adata = adata. И вызов RHOM_WRITE_INFTY_BUFFERED.