Fooch,
If you are talking about calling an RPG program from a CL program, remember that numeric parms are passed from a CL as 15/5. When faced with this situation I always define the numeric parms as such in both the CL and RPG programs and then convert the values passed to the RPG program...
Fooch,
If you are going to pass numeric parms from a command line you need to tell the system that you are passing hex values for the numeric parms. The command shown below should do what you want:
call pl0330r01 ('Test' X'00055F' 'I' X'01234567890F' 'O')
Notice that the numeric parms are...
TracyV;
If you have ever read much written by Bob Cozzi you might remember that he very strongly says "You call programs and procedures, not modules". The design of binding modules at compile time is as obsolete as the CallB opcode. I would suggest that you use FlapEyre's suggestion and...
You don't need to use Move or create a service program. Assuming your 8 digit date should be in yyyymmdd format, the following will work.
Date8 = %int(%char(DateIso : *iso0));
Notice the "0" following "*iso"
Date8 is an 8 digit numeric field and DateIso is a date field in ISO format.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.