Subject: | |
From: | |
Reply To: | Shahan, Ray |
Date: | Fri, 14 Feb 2003 10:25:38 -0600 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Thanks all, I just didn't do a good job of reading the manual (in a hurry
as always). :-)
Ray Shahan
"Life is what happens while you're busy making other plans", John Lennon
> -----Original Message-----
> From: Shahan, Ray
> Sent: Friday, February 14, 2003 9:59 AM
> To: [log in to unmask]
> Subject: Weird COBOL thing
>
> Hi all,
>
> I don't understand what's going on with a simple accept statement:
>
>
> 01 KC-CONTRACT PIC X(02) VALUE SPACES.
>
> PERFORM UNTIL (KC-CONTRACT <> SPACES)
> ; DISPLAY "Enter KAD contract to process or 'E' to Exit: "
> ; WITH NO ADVANCING
> ;
> ; ACCEPT KC-CONTRACT FREE
> END-PERFORM.
>
>
> One contract value is #7, and if I try that value, it's treated as spaces,
> and so is just the single value of #. I can't find where/why the pound
> sign symbal is converted/treated as spaces in the *&^%$ hp WEB on-line
> COBOL manual, so any help would be appreciated.
>
> BTW, happy FRIDAY!!
>
> TIA
>
> Ray Shahan
>
> "Life is what happens while you're busy making other plans", John Lennon
>
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
|
|