×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
Here is how I convert JDE dates.
// Deriving a Date from a J.D. Edwards (CYYJJJ) Date
// Convert JDE date to *iso date
D Resultddate S D DATFMT(*ISO)
ResultDate = %date(JDEDate + 1900000 : *longjul);
// Deriving a J.D. Edwards Date from a true Date field
// Convert an *ISO date to JDE date (CYYJJJ)
D iGlDgj S D DATFMT(*ISO)
GlDgj = %int(%char(iGlDgj:*longjul0)) - 1900000;
Also posted on my website.
http://www.as400pro.com/tipView.php?cat=RPG&key=5359
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.
midrange.com
