例題
[P2106.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2106. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 D1 PIC X. 000007 88 CD1 VALUE "A" THRU "Z". 000008 88 CD2 VALUE "z" THRU "a". 000009 PROCEDURE DIVISION. 000010 END PROGRAM P2106.
P2106.cob 8: JMN2106I-S 条件名のVALUE句のTHROUGHの後の値は,THROUGHの前の値より大きくなければなりません.
詳細な説明
条件名記述項(レベル番号が88)のVALUE句のTHRU(THROUGHとTHRUは同義語です)は,条件名の値の範囲を示します.「”THRUの前に記述した値”以上,かつ,”THRUの後ろに記述した値”以下」を値の範囲とみなすので,THRUの後ろに記述する値は,THRUの前に記述する値よりも大きくなければなりません.