Re: Those flippin dates

["Rory Hewitt" <roryhewitt@xxxxxxxxx>]

Pete,

You could simply use the following overlay technique (assuming MMDDYYDate is
your date field (which could be either signed or packed):

D Char6           DS
D   Char2_1                      2A
D   Char2_2                      2A
D   Char2_3                      2A
D   Sign6                 1      6S 0

 /free

   Sign6 = MMDDYYDate;
   Char6 = Char2_3 + Char2_1 + Char2_2;
   MMDDYYDate = Sign6;

 /end-free


On 9/5/07, Pete Helgren <Pete@xxxxxxxxxx> wrote:
> What would be the most expedient way to convert a 6.0 numeric field that
> represents a date in MMDDYY format to a 6.0 numeric field that
> represents a date in YYMMDD order?  The resultant numeric is used in an
> SQL statement comparing it to a numeric (not a date) field.  The old
> technique of  YYMMDD = MMDDYY * 10000.0001 appears not to work because
> the program is cranky at runtime about the result field not being large
> enough.
>
> Since the compare is a numeric I figured that the math would be
> numeric.  Or, is using a date field and converting it to a numeric host
> variable for the SQL the way to go?
>
> Pete Helgren