On Tue, 15 Apr 2003, Jeff Crosby wrote:
[SNIP]
> D GetInvPDFDir    PR            80
> D                                 D   DatFmt(*ISO) Value
> I need to call this from a CL program.  I thought I therefore needed to
> define the parm in the CL as *CHAR length 10.  I did, and confirmed that
> it contains valid data such as '2003-04-15'.  When I debug the RPG
> service program, however, I am receiving garbage from the CL.
>
> Any suggestions?  Thanks.

I think you're going to have to create a "wrapper procedure" in RPG to
convert from the character data type to the ISO date data type.

Just a simple subprocedure in RPG that accepts a 10A parameter, converts
it to an ISO date.   Then it calls your existing procedure.  Should take
10 minutes to write.



This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 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.