EXTRACT LOGONMSG 1 EXTRACT LOGONMSG 2 INTO(
data-area
) 2 SET(
ptr-ref
) 3 LENGTH(
data-area
)