ACCEPT ステートメント - 形式 5 - PIP データ域 1 ACCEPT ID-1 FROM 簡略名 2? ON 2.1 EXCEPTION 命令ステートメント-1 3? NOT 3.1? ON 3.2 EXCEPTION 命令ステートメント-2 4? END-ACCEPT