XCTL 1 XCTL PROGRAM(name) 2? 2 COMMAREA(data-area) 2.1? LENGTH(data-value) 2 CHANNEL(name) 3? 3 INPUTMSG(data-area) 3.1? INPUTMSGLEN(data-value)