RE: Testing a Date

["Erickson, Jon" <JonErickson@xxxxxxxxxxxxxxxxxxxx>]

Vg,

Not at all,.. the error "Result field too small to contain *YMD/
format". Means that in order to be valid, a character date field must be
large enough to include the separators, in this case, a character date
field must be of length eight, e.g. (98-09-21). Where as zoned date
fields do not, (980921).  Hth.


Regards,
~~~~~~~~~~~~~~~~~~~~~
Jon A. Erickson
Viking Industries, Inc.
http://www.vikingindustries.com
~~~~~~~~~~~~~~~~~~~~~
 <<Jon Erickson.vcf>> 


                -----Original Message-----
                From:   VENU YAMAJALA
[mailto:venu_yamajala@goodyear.com]
                Sent:   Monday, September 21, 1998 11:34 AM
                To:     MIDRANGE-L@midrange.com
                Subject:        Testing a Date

                Hi All,

                I need some help in one of our problems here. I am doing
a TEST(D) in my RPGIV
                as

                *YMD    TEST(D)     Alpha6

                We have to compile the pgms at V3R2M0. So when we tried
to compile this at
                V3R2M0, we ran into compile error "Result field too
small to contains *YMD/
                format.

                Then we changed it to

                *YMD    TEST(D)    Zoned6

                This time it got compiled. The manual says that if the
result field is numeric,
                the digit portions of the date field are tested and if
it is character, both
                digit and separators are tested.

                Is there something hidden in this? Is this anyway
related to the compile
                problem we faced? TIA.

                Rgds
                Vg
                +---
                | This is the Midrange System Mailing List!
                | To submit a new message, send your mail to
MIDRANGE-L@midrange.com.
                | To subscribe to this list send email to
MIDRANGE-L-SUB@midrange.com.
                | To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
                | Questions should be directed to the list
owner/operator: david@midrange.com
                +---

Jon Erickson.vcf