×
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.
Packed data on the command line is specified like x'12345f' making sure
there are complete hex pairs. CALL PGM (x'12345F' x'001F' ....).
A better way is to create a command definition that types each parameter
the same as the called programs interface. Packed is DEC(), etc.
Date/time would be the only ones where you could make the command
parameter character and pass in a formatted date/time string and make it
work. SBMJOB CMD(RUNREPORT DATE('05/14/2007') AMOUNT(123.45))
JOB(EXAMPLE).
Here's an FAQ on this topic:
http://faq.midrange.com/data/cache/197.html
Thanks, Matt
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[
mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Josh Diggs
Sent: Monday, May 14, 2007 4:39 PM
To: RPG programming on the AS400 / iSeries
Subject: Packed decimal parameters
As a relative babe in the world of RPG I am having trouble calling a
program which requires parameters to be passed as packed decimals. The
program I'm trying to call is a vendor's program, so modifying the
source is not really an option (I wouldn't want to do it even if I
could). The method I've used to do this type of thing in the past is to
use the QCMDEXC api. Apparently this approach does not allow me to pass
packed decimal fields.
First, does anyone see a problem with my diagnosis? If not, does anyone
know of a solution?
Thanks,
Josh
midrange.com
