From: <bko...@ma...> - 2002-06-20 20:26:27
|
If WA-MAXIMUM-MODEL-YEAR-FROM-USER is PIC 9, it will never be equal to SPACES. SPACES is an alphanumeric literal, whereas PIC 9 data is only numeric. In other words, you can compare PIC X and PIC A data to SPACES, but never PIC 9. -----Original Message----- From: Jason Dravet [mailto:dr...@ca...] Sent: Tuesday, June 18, 2002 5:08 PM To: tin...@li... Subject: [Tiny-cobol-users] SPACES keyword I have the following piece of code PERFORM GET-MAXIMUM-MODEL-YEAR UNTIL ((WA-MAXIMUM-MODEL-YEAR-FROM-USER <= WA-YEAR) AND (WA-MAXIMUM-MODEL-YEAR-FROM-USER > 00)) OR (WA-MAXIMUM-MODEL-YEAR-FROM-USER = SPACES). The program compiles and runs, but the program will continue past this point. When the program runs it prompts for a model-year. The program should move to the next question if I just press enter to the question, but the program is not reading the SPACES keyword right. I put in 2 spaces and press enter but it didn't work either. Jason ---------------------------------------------------------------------------- Bringing you mounds of caffeinated joy >>> http://thinkgeek.com/sf <<< _______________________________________________ Tin...@li... https://lists.sourceforge.net/lists/listinfo/tiny-cobol-users |