× 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.



Hi I've try this but appears a decimal data error


Craig Jacobsen escribió:
Try passing the parms without the comma:
CALL MPDE98P ('MPDE98 ' 800 2006 2007)

HTH,
Craig

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of pepitovadecurt
Sent: Monday, June 02, 2008 7:53 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Call a program with variables

Hi, can you post an example.
I can't read these books because my english is bad.
Example:
10 text
3,0 numeric
4,0 numeric
4,0 numeric
CALL MPDE98P ('MPDE98 ' 800,0 2006,0 2007,0)

Thankyou.



Michael Ryan escribió:
It's not a problem...it's just the way it works.
http://faq.midrange.com/data/cache/57.html

On Mon, Jun 2, 2008 at 4:35 AM, pepitovadecurt <pepitovadecurt@xxxxxxxxx>
wrote:
I have an V5R2, the V5R3 resolve this problem?
Regards.

Simon Coulter escribió:
On 02/06/2008, at 5:00 PM, pepitovadecurt wrote:

Hi is posible to call a program ex: call MPDE98P ('XX','XX'), with a
numeric parameters?
I've test it but only can with the character parameters.
Search the archives. This problem has been done to death in the past.

Essentially two choices:
1) Define the numeric values as 15,5 in your program and pass
literals without quotes
2) Pass numeric literals in hexadecimal including required sign
bits
(e.g., X'0123456F')

Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------



--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.





As an Amazon Associate we earn from qualifying purchases.

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-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.