Re: Date Printing

[Jim Langston <jlangston@xxxxxxxxxxxxxxxx>]

Well, in this case I would probably write a service program,
that accepted a date field as a parameter, and returned a
character field.  As a Bif I could say:

Eval  PrintDate = %OutDate(DateField)

which would make it nice and clean.

Regards,

Jim Langston

Jon.Paris@halinfo.it wrote:

>  >> There's got to be a better way.  Any suggestions would be appreciated.
>
> I guess IBM haven't got round to implementing the MAPVAL on printer files yet 
>-
> haven't had time to check lately.
>
> To avoid indicators you can print the date as a Char field and do something 
>like
> :
>
> If   Datefield <> *LoVal
> Eval PrintDate = %Char(DateField)
> Else
> Eval PrintDate = *Blank
>
> Less than optimum but .......
>

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