LINK

1 LINK  PROGRAM(name)  RETCODE(data-area)
2? SYNCONRETURN
3? 
3 COMMAREA(data-area)  LENGTH(data-value)
4? APPLID(name)
5? TRANSID(name)
6? DATALENGTH(data-value)