COBOL2002 メッセージ
KCCC
3040
C
-S
手続き名(節名,段落名)に特殊レジスタは指定できません。