RE: Passing Blank Date ?

[Marco Facchinetti <facchinetti@xxxxxxxxx>]

DDS for display file? keyword MAPVAL
Eg: MAPVAL((?01/01/40? *BLANK))

marco
--- michael@xxxxxxxxxxxxxxxxxx wrote:

> A blank date is not valid. *LOVAL is what you see...0001-01-01. Try a
> character variable if the date is *LOVAL or null.
> 
> > -------- Original Message --------
> > Subject: Passing Blank Date ?
> > From: "Luqman" <pearlsoft@xxxxxxxxxxxx>
> > Date: Fri, January 13, 2006 6:33 am
> > To: rpg400-l@xxxxxxxxxxxx
> > 
> > How can I pass a Blank Date Literals to a Variable in RPG ?
> > 
> > For example:
> > 
> > D myDate               S                            D        INZ
> > D myDate2             S                            D        INZ
> > C                                 EVAL      myDate2=myDate
> > C          myDate2         DSPLY    <------------------------This line 
> > displaying 0001-01-01
> > 
> > The above code displaying 00001-01-01, but I need this to display a
> Blank 
> > Date with Literals   like --->     '  /  /  '


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com