COBCH0393 内 PERFORM 文を指定した