Как упоминалось ранее, блокировка транзакции определяется полем TSTC-CINFO. В этом поле установлен 1-байтовый флаг. Код ниже демонстрирует технику декодирования флагов:
TABLES: tstc.
DATA: x01 TYPE x VALUE '01',
x02 TYPE x VALUE '02',
x20 TYPE x VALUE '20',
x80 TYPE x VALUE '80'.
SELECT * FROM tstc.
IF tstc-cinfo O x80.
" Report transaction
ENDIF.
IF tstc-cinfo O x01.
" Menu transaction.
ENDIF.
IF tstc-cinfo O x02.
" Parameter transaction
ENDIF.
IF tstc-cinfo O x20.
" Locked.
NEW-LINE.
WRITE: 'Locked:', tstc-tcode.
ENDIF.
ENDSELECT.