× 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.


  1.  Home
  2. RPG400-L
  3. February 2004

What am I doing wrong...

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             
 
 
 

Rob Joubert
Authentic Fitness Corporation
(323) 837-6486
rjoubert@xxxxxxxxxxxxxxxxxxxx

As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow-Ups:
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2025 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.