|
One choice to write a CL program and use parms to pass the data and the instructions. The CVTDAT command will validate and restructure any dates. It would be entirely possible to pass in a date, get back a date in Julian format (*LONGJUL is available now but I don't know about for V2R2). In some fashion or another this may do all you need done. 0008.00 CVTDAT DATE(&DATEIN) TOVAR(&DATEIN) FROMFMT(*YMD) + 0009.00 TOFMT(*LONGJUL) TOSEP(*NONE) 0010.00 MONMSG(____) In <3812400831121998/A03182/TIMONE/11CCFA280C00*@MHS>, on 12/31/98 at 03:40 AM, Don Schenck <schencd%AM_LZCH%VASELL@mr.mops.wl.com> said: >Gang -- >Could someone please e-mail me some code to perform some date math on >fields that are in yymmdd format? This is for an old V2R2, non-ILE >machine. >This machine will be out of service in six months, but until then ... >Peace, >-- Don Schenck >www.SchenckTech.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 >+--- -- ----------------------------------------------------------- boothm@ibm.net Booth Martin ----------------------------------------------------------- +--- | 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 +---
As an Amazon Associate we earn from qualifying purchases.
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.