例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2866.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WNUM PIC S9(9) BINARY VALUE NULL.
000007 PROCEDURE DIVISION.
000008 END PROGRAM P2866.
P2866.cob (6) : JMN2866I-S 表意定数NULLは,ポインタデータ項目以外のVALUE句に指定できません.