RNF3556
フリー・フォーム・ステートメントが含まれたグループでEND-XXステートメントが欠落している。
20
原因−−
- LIKEDSまたはLIKERECキーワードが使用されている場合を除いて,DCL-DS
Xテートメントで開始されたデータ構造またはフリー・フォーム・サブフィー
泣hが含まれたデータ構造を終了するために,END-DSステートメントが必要で
キ。
- DCL-PIステートメントで開始されたプロシージャー・インターフェースま
たはフリー・フォーム・パラメーターが含まれたプロシージャー・インターフ
ェースを終了するために,END-PIステートメントが必要です。
- DCL-PRステートメントで開始されたプロシージャー・インターフェースま
たはフリー・フォーム・パラメーターが含まれたプロシージャー・インターフ
ェースを終了するために,END-PRステートメントが必要です。
回復手順−−END-DS,END-PI,またはEND-PRステートメントを指定してく
セさい。コンパイルし直してください。