COPY は、ストリング x のコピーを y 回連結して 構成される CHARACTER ストリングを戻します。
>>-COPY(x,y)---------------------------------------------------><
x のタイプは CHARACTER でなければならず、 それ以外の場合はこのタイプに変換されます。
y は、負以外でなければなりません。
y がゼロの場合は、結果はヌル・ストリングです。