× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



It looks like you have done nothing wrong as *YMD is a two digit
year thus 00050101 is correct.  If you want a different result
then you want a different format than *YMD.

Scott Mildenberger

--- "Joubert, Robert" <RJoubert@xxxxxxxxxxxxxxxxxxxx> wrote:
> I just know that I am doing something wrong but I cannot
> figure it out.  The
> field @todte has a value of 010105, the field USADate has a
> value of
> 01/01/2005 but BOTH #PToDate8 and #PToDate10 has the value of
> 00050101.
>  
> Can anyone tell me what I have missed?
>  
> The code look like this:-
>  
>      H DATEDIT(*YMD)                    
> ......
>      D @todte          S              6  0 inz(0)             
>  
>      D #PToDate8       S              8  0 inz(0)
>      D #PToDate10      S             10  0 inz(0)             
>  
>      D USADate         S               D   DATFMT(*USA)       
>   
> .......
>      C     *mdy          move      @todte        USADate      
>      C     *ymd          move      USADate       #PToDate8    
>         
>      C     *ymd          move      USADate       #PToDate10   
>          
>  



__________________________________
Do you Yahoo!?
Yahoo! Mail SpamGuard - Read only the mail you want.
http://antispam.yahoo.com/tools

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.