例題
[P2868.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2868. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WPX POINTER. 000007 88 ZOKPX VALUE ZERO. 000008 88 ZNGPX VALUE 1. 000009 PROCEDURE DIVISION. 000010 END PROGRAM P2868.
P2868.cob 8: JMN2868I-S 条件変数がポインタデータ項目である条件名のVALUE句には,表意定数ZEROまたはNULLを指定しなければなりません.