Re: *DATE in SDA-- hoping against hope.

[Jason Kleinemas <jkleinemas@xxxxxxxx>]

Here is some RPG3 code to try is out for your self. 
H        1   Y                                              
C                     MOVE *DATE     DATEL   80             
C                     DEBUG          DATEL                  
C                     SETON                     LR  

It worked for me on RISC 4.2 & 4.4 .        

Terry Richardson wrote:
> 
> The H specs allow me to specify YYMMDD, MMDDYY, or DDMMYY, but unless
> I'm missing something, they don't allow CCYYMMDD.
> 
>         -----Original Message-----
>         From:   Jason Kleinemas [SMTP:jkleinemas@mohs.org]
>         Sent:   Monday, August 09, 1999 12:35 PM
>         To:     MIDRANGE-L@midrange.com
>         Subject:        Re: *DATE in SDA-- hoping against hope.
> 
>         In the H specs you need to specify the format you want.
> 
>         Terry Richardson wrote:
>         >
>         > I'm sure this has been discussed here ad infinitum, but I just
> recently
>         > re-subscribed to the list, and searching the archives on
> MIDRANGE.COM
>         > has proven futile.
>         >
>         > In SDA, when I enter *DATE to put the job date on the screen ,
> the date
>         > appears in MM/DD/YY format.  Is there any way to have it
> appear in
>         > YYYY-MM-DD format without moving the *date to another field
> within the
>         > RPG program that drives the screens?
>         >
>         > TIA
>         > Terry Richardson
>         > Sr. P/A
>         > The Orvis Company, Inc.
>         > +---
>         > | 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
>         > +--- << File: Card for Jason Kleinemas >>
> +---
> | 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
> +---

-- 
Jason Kleinemas 

Programmer/Analyst

Medcenter One 
Information Services
300 N 7th St. P.O. Box 5525
Bismarck ND 58506-5525  USA

ICQ #: 7834507
 Work: 701-323-6862
+---
| 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
+---