VALUE(FNUM) LIKE QRETSTATE-QRFNUM
REFERENCE(FNUM) LIKE QRETSTATE-QRFNUM
REFERENCE(FNUM) LIKE QRETSTATE-QRFNUM DEFAULT '00000000'
QRSTATE STRUCTURE QRETSTATE