例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2583.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WBUF PIC X(20).
000007 PROCEDURE DIVISION.
000008 MOVE SPACE TO WBUF("ABC":1)
000009 END PROGRAM P2583.
P2583.cob (8) : JMN2583I-S 部分参照子の最左端文字位置の指定に誤りがあります．1とみなします．
詳細な説明
最左端文字位置は，算術式でなければなりません．