I got it! RE: mdy date in query

[Angela Wawrzaszek <wawrzaszeka@xxxxxxxxxxx>]

  Just wanted to let everyone know I got the opnqryf to work   thanks for
everyones help.  I had to define the date by mapping it with the substring
and digits 
  
  
                                                                
  OPNQRYF    FILE((ECDX)) QRYSLT('SHPDTE *EQ +                  
               %RANGE("' *CAT &LOWDTE *CAT '" "' *CAT +         
               &HIDTE *CAT '") *AND CXWHSE *EQ ( "' *CAT +      
               AU *CAT '")') KEYFLD((CXBOL#)) +                 
               MAPFLD((SHPDTE '%SST(%DIGITS(CXSHDT) 5 2) +      
               || %SST(%DIGITS(CXSHDT) 1 4)' *CHAR 6))          
                                                                
                                                                
Angie Wawrzaszek
M.I.S. Department


-----Original Message-----
From: Joe Pluta [mailto:joepluta@plutabrothers.com]
Sent: Wednesday, March 14, 2001 2:57 PM
To: MIDRANGE-L@midrange.com
Subject: Re: mdy date in query


I haven't had a chance to test this, but you can theoretically change the
date in the file to alpha, substring it, and reconcatenate it to make them
YYMMDD.  Then just make sure your comparison dates are in YYMMDD as well.

%SST(%DIGITS(datfld) 5 2) || %SST(%DIGITS(datfld) 1 4) = %RANGE(000301
010228)

Note that this particular technique will only work if both dates in your
range are in the same millenium - either both BEFORE 010100 or both AFTER
010100.

Joe

---------- Original Message ----------------------------------
From: Angela Wawrzaszek <wawrzaszeka@AUSTEEL.com>
Date: Wed, 14 Mar 2001 12:31:38 -0500

>Can I write a opnqryf to select records out of a file,  where the date on
>the file is stored in MDY  and I want to select dates out to process within
>a range.  Since I can't sort the file by a logical - ie.   030100 through
>030101 will not give me the correct records as will 000301 -  010301.
>How can I get the correct selection?   I can not change the way the date is
>stored on this file since it is populated there by many different programs.
> 
> 
>Angie Wawrzaszek 
>M.I.S. Department 
> 
>
>+---
| 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
+---

+---
| 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
+---
+---
| 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
+---