COBOL2002 言語 拡張仕様編
01 MY-DYNAMIC PIC X DYNAMIC LENGTH C-STRING
LIMIT 20.
:
MOVE 'abc' TO MY-DYNAMIC.
*> 動的長基本項目MY-DINAMICに'abc'が転記され,MY-DYNAMICは長さが3となる。
MOVE SPACE TO MY-DYNAMIC.
*> SPACEは3文字でなく空白1文字が転記され,MY-DYNAMICは長さが1となる。
MOVE ALL 'abc' TO MY-DYNAMIC.
*> 'abc'が転記され,MY-DYNAMICは長さが3となる。
MOVE ALL SPACE TO MY-DYNAMIC.
*> SPACEは1文字のため,空白1文字が転記され,MY-DYNAMICは長さが1となる。All Rights Reserved. Copyright (C) 2003, 2017, Hitachi, Ltd.