RE: convert 8 digit date to ISO date

[Andy Youens <Andy@xxxxxxxxxxxxxxxx>]

Ray

Use the following C Spec

                                                          
C                       Move      DigitDate     CharDate      
C     *ISO0         Move      CharDate      DateISO       

you must move the digit date to a character date first then move it to a
defined date variable.

The *ISO0   (with a zero at the end assumes no separator)

Hope this helps.

Regards 

Andy Youens 
FormaServe Systems Ltd 
T: 01908 319566 
M: 07770 380276 
E: <Mailto:Andy@FormaServe.Co.Uk>   
W: <http://www.FormaServe.Co.Uk>   

 


>  -----Original Message-----
> From:         Ray, Adam [mailto:aray@fhp.org] 
> Sent: 01 February 2001 14:56
> To:   'RPG400-L@midrange.com'
> Subject:      convert 8 digit date to ISO date
> 
> This may be a silly question and I'm hoping it has a simple answer.
> What is the easiest way to convert an 8 digit numeric date (defined as 8P
> 0) in the format CCYYMMDD to an ISO format date field (defined as 10D)?
> I need to do some date calculations using the SUBDUR command.
> TIA
> Adam Ray
This message contains confidential information and is intended solely for
the named addressee.
If you are not the named addressee you should not distribute, copy or take
any action in relevance to the contents of this email.
FormaServe Systems does not accept liability for any errors or omissions in
the contents of this message or attached documents or for any damage
suffered by your computer system caused by any errors or viruses contained
in the email or any attached documents.
+---
| 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
+---