RECEIVE PARTN 1 INTO(
data-area
) 1 SET(
ptr-ref
) 2 LENGTH(
data-value
) 3? ASIS