Re: Testing a Date

     Venu,
     
     If testing an alpha date field, it would actually be eight bytes, 
     not six. You have to have separator characters in the string thus 
     adding two additional characters. (ie DATE = '98/09/21')
     
     HTH :)
     eric.delong@pmsi-services.com


______________________________ Reply Separator _________________________________
Subject: Testing a Date 
Author:  <MIDRANGE-L@midrange.com > at INET_WACO
Date:    9/21/98 2:34 PM


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 
+---
     


+---
| 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
+---