引数の説明
COMPUTATIONAL-1,COMPUTATIONAL-2,INDEX,POINTER,PROCEDURE-POINTER,BINARY-CHAR,BINARY-SHORT,BINARY-LONGまたはBINARY-DOUBLE. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2009.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 E1 PIC S9(9) BINARY-LONG.
000007 PROCEDURE DIVISION.
000008 END PROGRAM P2009.
P2009.cob (6) : JMN2009I-S USAGE句の'BINARY-LONG'は,PICTURE句を持つ項目に指定できません.
詳細な説明
以下のいずれかのUSAGE句を持つデータ項目は,桁数や符号の有無を指定することはできません.
COMPUTATIONAL-1(COMP-1)
COMPUTATIONAL-2(COMP-2)
INDEX
POINTER
PROCEDURE-POINTER
BINARY-CHAR
BINARY-SHORT
BINARY-LONG
BINARY-DOUBLE
PICTURE句を削除してください.