|
Hi Brad, maybe *JOBRUN solves your problem? (Just checked it, compiling to TGTRLS(V3R2M0) works) So you would just *JOBRUN TEST(D) OperDate and *JOBRUN MOVE OperDate RealDateField Unfortunately, this can handle only 6 digits, not 8. Maybe IBM didn't want us to make 8-digit date-entry fields and keep the 6-digit ones? I do not understand why; it would be such a smart cutie. As one doesn't know where the year is (left or right?); it's not simple to save the century and apply it to the real date field. So we ended up with a function for checking dates that calls a module that does a RTVJOBA DATFMT(&DATFMT) to know in what date format the user was trying a date to key in. Mit freundlichen Grüssen / best regards Anton Gombkötö Avenum Technologie GmbH Wien - Mattsee - Stuttgart e-mail Office : mailto:Anton.Gombkoetoe@avenum.com Homepage : http://www.avenum.com Lest das Redbook / read the redbook "Who knew you could do that with RPG?": http://www.redbooks.ibm.com/abstracts/sg245402.html +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-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-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.