gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [open-cobol-list] pic field for level 88.


From: Kevin Monceaux
Subject: Re: [open-cobol-list] pic field for level 88.
Date: Mon, 22 Apr 2013 15:11:24 -0500
User-agent: Mutt/1.5.21 (2010-09-15)

John,

On Mon, Apr 22, 2013 at 02:59:01PM -0400, john Culleton wrote:

> On a level 88 I would like both Y and y to be valid entries. How
> exactly would I configure it?
> I tried 88  FOO PIC 'Y", "y".
> but that didn't work.

There shouldn't be a PIC on a level 88 condition name.  The PIC should be on
the data item the level 88 condition name is under.  Page 6-5 of the
OpenCOBOL Programmer's Manual shows this example, which has some level 88
condition names with multiple values:

    05   SHIRT-SIZE                  PIC 99V9.
         88 LILLIPUTIAN              VALUE 0 THRU 12.5
         88 XS                       VALUE 13 THRU 13.5.
         88 S                        VALUE 14, 14.5.
         88 M                        VALUE 15, 15.5.
         88 L                        VALUE 16, 16.5.
         88 XL                       VALUE 17, 17.5.
         88 XXL                      VALUE 18, 18.5.
         88 HUMUNGOUS                VALUE 19 THRU 99.9.



-- 

Kevin
http://www.RawFedDogs.net
http://Lassie.RawFedDogs.net
http://www.WacoAgilityGroup.org
Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.


reply via email to

[Prev in Thread] Current Thread [Next in Thread]