SEND TEXT NOEDIT

1 SEND TEXT NOEDIT  FROM(data-area)
2? LENGTH(data-value)
3? ERASE
3.1? 
3.1 DEFAULT
3.1 ALTERNATE
4? PRINT
5? FREEKB
6? ALARM
7? OUTPARTN(name)
8! TERMINAL
8?
8 TERMINAL
8.1? WAIT
8.2? LAST
8 PAGING
9? REQID(name)
10! HONEOM
10?
10 L40
10 L64
10 L80