RE: mdy date in query

["Mark Villa" <markvilla@xxxxxxxxxxx>]

 >> Can I write a opnqryf to select records out of a file,

The other responses I saw about the logical was what I was thinking also. If
the date is packed, some methods don't work to hot. As you said there are
many programs using this file, and I am thinking more than an "on the fly"
query is what your doing. You can do this in your DDS for a logical file:
---logical---
A          R YYMMDDR                   PFILE(MMDDYY)
A            MMDDYY         6S 0I
A            YY                 I      SST(MMDDYY 5 2)
A            MM                 I      SST(MMDDYY 3 2)
A            DD                 I      SST(MMDDYY 1 2)

The query/400 could be like this:

(Define Result Fields)

MM          substr(digits(mmddyy),1,2)
DD          substr(digits(mmddyy),3,2)
YY          substr(digits(mmddyy),5,2)
YYMMDD      yy ||  mm || dd



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