ACCEPT ステートメント - 形式 8 - セッション I/O 1 ACCEPT
ID-1
2? FROM 2.1 DISPLAY 3? END-ACCEPT