4 lines
126 B
COBOL
4 lines
126 B
COBOL
|
01 p PICTURE 9.
|
||
|
|
88 nil VALUE ZERO WHEN SET TO FALSE IS 1.
|
||
|
|
88 t VALUE 1 WHEN SET TO FALSE IS ZERO.
|