GETMAIN

1 GETMAIN  SET(ptr-ref)
2 FLENGTH(data-value)
2.1? BELOW
2 LENGTH(data-value)
3? INITIMG(data-value)
4? SHARED
5? NOSUSPEND
6? 
6 USERDATAKEY
6 CICSDATAKEY