|
I truly believe that RPG is expecting a date parameter to come in
character formatted and not as the internal representation of a date, or
how a *CMD object formats it.
For example
CALL PGM(PALMER) PARM('2005-12-31')
to this code
results in this
D PALMER PR EXTPGM('PALMER')
D InDate like(WorkDate)
D PALMER PI *ENTRY PLIST
D InDate like(WorkDate)
D WorkDate s d datfmt(*iso)
D FinalDate s d datfmt(*iso)
/free
*inlr=*on;
FinalDate=InDate;
dsply finalDate;
return;
/end-free
DSPLY 2005-12-31
Rob Berendt
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.